iseng, ada yang berisi pesan moral, ada yang dijadikan pelampiasan cinta, pokoknya sekarang
sudah banyak orang yang bisa membuat virus. Virus-virus anak negeri biasa disebut dengan
Virus Lokal. Walaupun mereka lahir dari orang lokal tapi sudah banyak orang yang emosi,
frustrasi dan hampir mati gara-gara kelakuan si virus lokal. Virus lokal yang berjalan di sistem
operasi windows kebanyakan menggunakan teknik “modifikasi konfigurasi sistem” yang
terletak di registry windows, serta beberapa “pemanggilan fungsi-fungsi sistem” yang
digunakan untuk membuat semacam “attack with defense operation” atau “defense with attack
operation” terhadap suatu program. Tujuan artikel ini bukan untuk menjadikan anda sebagai
penjahat, tapi untuk menerapkan metode pak polisi dalam menangkap penjahat “untuk
menangkap maling, harus tahu cara kerja maling”.
Artikel ini akan membahas cara pembuatan virus berkualitas sedang menggunakan program delphi.
Kode yang ditulis tidak panjang dan mudah dimengerti sehingga para pemula delphi dapat
langsung belajar membuat program yang mudah dan menarik serta bisa memodifikasi program
dengan “keinginan” sendiri. Penulis menggunakan delphi 7.0, tapi kode program ini tetap bisa
digunakan untuk delphi yang ada di bawah versi 7.0. Pembahasan akan dimulai dari
perancangan sampai dengan pembuatan kode-kode program. Nama program yang akan kita buat
ini diberi nama VIRUZ bukan virus. Selamat menikmati dan berdo’a supaya ilmu ini tidak
diniatkan untuk hal-hal yang jahat (itu kalau bisa, tapi kalau ga bisa terserah individu anda sendiri)
Tahap 4 : Membuat Kode Program
Kode program dibuat di events komponen yang terletak di kotak “Objek Inspector”. Berikut ini
gambar events komponen :
Klik komponen FORM yang ada di “Object TreeView” kemudian klik “Events” yang ada di
“Objek Inspector”, cari event “OnShow” kemudian double klik kotak kosong disampingnya
seperti tampak pada gambar di bawah ini :
Setelah kotak disamping event “OnShow” di double klik maka editor delphi akan langsung
membuat prosedur untuk event OnShow. Tugas kita hanyalah mengisi kode yang diapit oleh
keyword BEGIN dan END. Kode yang kita ketikan di event OnShow akan dijalankan pada saat
form muncul. Berikut ini gambar penulisan kodenya :
Selanjutnya cari event “OnPaint” kemudian double klik disebelah kanannya, sama seperti pada
event “OnShow” maka editor delphi akan langsung membuat prosedur untuk event OnPain.
Ketikan kode diantara BEGIN dan END seperti tampak pada gambar berikut ini :
Kode event untuk FORM sudah selesai sekarang tinggal membuat kode event TIMER. Sebelum
kode event TIMER dibuat, terlebih dahulu harus membuat prosedur-prosedur seperti flowchart
di atas yaitu prosedur untuk mengkloning virus dan membuat startup, prosedur untuk modifikasi
konfigurasi sistem dan prosedur untuk melakukan operasi “attack & defense”. Berikut ini cara
pembuatan prosedur beserta implementasinya :
Prosedur yang sudah dideklarasikan harus diimplementasikan. Berikut ini implementasi
prosedur kloning_dan_startup :
Berikutnya implementasi prosedur modifikasi konfigurasi sistem yang diletakan dibawah
implementasi prosedur kloning_dan_startup :
Terakhir adalah implementasi prosedur operasi_attack_defense yang diletakan dibawah
implementasi prosedur modifikasi_konfigurasi_sistem :
Pengkodean sudah selesai, sekarang pilih menu PROJECT BUILD ALL PROJECTS, delphi
akan membuat program Viruz secara otomatis yang diletakan di folder project (AWAS : jangan
dibuka ! ! !). Jika ada pesan error atau kesalahan coba cek lagi pengkodean anda. Untuk
menjalankan Viruz pilih menu RUN RUN atau tekan tombol F9 dan jreng… apa yang
terjadi? Untuk menghentikan program pilih menu RUN PROGRAM RESET atau tekan
kombinasi tombol CTRL+F2. PERHATIAN : jangan menjalankan Viruz diluar Delphi karena
jika berjalan di luar Delphi, Viruz tidak bisa di-reset, resiko ditanggung sendiri.
Program Viruz yang kita buat akan mengeksekusi program Notepad milik Windows sebanyak
lima kali setiap 1 menit. Kode untuk mengeksekusi notepad terdapat dibawah komentar
ATTACK. Selamat memodifikasi program Viruz ! ! !
Kesimpulan
Viruz merupakan salah satu contoh viruz berkualitas sedang di kelas dunia yang dibuat dengan menggunakan Delphi. Tapi walaupun berkualitas sedang, anti viruz yang hanya bisa mendeteksi viruz ini cuma ada 2.
Lakukan percobaan viruz ini hanya pada komputer orang yang pernah menyakiti anda saja. Resiko tanggung sendiri..........
Semoga bermanfaat merusak komputer, lain kali saya akan membahas membuat viruz tanpa terlacak anti virus walaupun si anti virus tetap update.