elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: (TUTORIAL) Aprende a emular Sentinel Dongle By Yapis


  Mostrar Mensajes
Páginas: [1]
1  Foros Generales / Noticias / Re: Órdago a la grande de Tencent: 10 Tb de almacenamiento gratuito en la nube en: 16 Diciembre 2013, 02:53 am
Excelente funcionando de maravilla

2  Programación / Scripting / Re: Ayuda codigo autoit en: 16 Noviembre 2012, 22:36 pm
Código:
#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.9.4 (beta)
 Author:         bywarrior

 Script Function:
Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here


$destination = "1.bmp"

SplashImageOn("MSN administrador@lobosolitario.tk", $destination,228,217)
Sleep(1000)
SplashOff()
$DEL=REGread("HKEY_LOCAL_MACHINE\SOFTWARE\ESET\ESET Security\CurrentVersion\Info","ProductName")
IF $DEL=1 THEN
TRAYTIP("ESET AutoPassword "&"VX","No se detecto Antivirus"&@CR&@CR&"Instala un Antivirus ESET v3 ó v4"&@CR&@CR&"...::: by warrior   administrador@videowarrior.tk :::...",5,3)
SLEEP(5000)
EXIT
ENDIF

TRAYTIP("ESET AutoPassword "&"VX","Descargando Licencia"&@CR&@CR&"Para el Nod32 Antivirus"&@CR&@CR&"...::: by warrior   administrador@videowarrior.tk :::...",2,1)

InetGet("http://bywarrior.com/eset.txt", @TempDir& "\key.txt", 1)

$file = FileOpen(@TempDir& "\key.txt", 0)


   $user = FileReadLine($file,2)
   $pass4 = FileReadLine($file,4)
   $pass3 = FileReadLine($file,6)
   $fecha = FileReadLine($file,8)
   FileClose($file)
FileDelete(@TempDir& "\key.txt")


IF $DEL=2 THEN
RUN("egui.exe")
WINACTIVATE("ESET ")
SEND("^u")
WINACTIVATE("License ")
SEND("!u")
SEND($user&"{TAB}")
SEND($pass4&"{ENTer}")
SEND("!{F4}")
TRAYTIP("ESET AutoPassword "&"VX","Se inserto la licencia, valida "&$Fecha&@CR&@CR&"Ya puede empezar actualizar el Antivirus"&@CR&@CR&"...::: by warrior   administrador@videowarrior.tk :::...",5,1)
SLEEP(5000)
EXIT
ELSE
REGWRITE("HKEY_LOCAL_MACHINE\SOFTWARE\ESET\ESET Security\CurrentVersion\Plugins\01000400\Profiles\@My profile","Password","REG_BINARY",BINARY("0x"&$pass3))
REGWRITE("HKEY_LOCAL_MACHINE\SOFTWARE\ESET\ESET Security\CurrentVersion\Plugins\01000400\Profiles\@My profile","Username","REG_SZ",$user)
REGWRITE("HKEY_LOCAL_MACHINE\SOFTWARE\ESET\ESET Security\CurrentVersion\Info","EditionName","REG_SZ","    Administrador@videowarrior.tk")
REGWRITE("HKEY_LOCAL_MACHINE\SOFTWARE\ESET\ESET Security\CurrentVersion\Info","ProductName","REG_SZ","ESET NOD32 by warrior")
TRAYTIP("ESET AutoPassword "&"VX","Se inserto la licencia, valida "&$fecha&@CR&@CR&"Ya puede empezar actualizar el Antivirus"&@CR&@CR&"...::: by warrior   administrador@videowarrior.tk :::...",5,1)
SLEEP(5000)
EXIT
ENDIF
3  Programación / Scripting / Re: Ayuda codigo autoit en: 16 Noviembre 2012, 21:34 pm
 ;D En si cual es tu duda chaval, Quieres Que te explique como funciona el codigo?
Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines