00.03.00 -

Script Terlarang Untuk Mengerjai Teman Dari Notepad



Hai Sobat alien, kali ini s alien pengen baigin beberapa script untuk mengerjai teman hanya modal Notepad. gimana penasaran nih silahkan di coba, tapi hati-hati jangan di coba di komputer sendiri karena kami tidak bertanggung jawab atas apa yang terjadi dengan koputer anda !!!. tapi bila masih ingin nekad mencoba sendiri pastikan bahwa anda sudah terinstall Deep freeze sebelumnya (bila belum punya baca artikelnya dan download di sini) agar setidaknya keamanan anda terjamin. hehehe....


Caranya gampang kok !!!
  1. Pertama pilih dan Copy Script di bawah ini.
  2. Lalu paste di software notepad.
  3. Save dengan type all file lalu tambahkan tulisan ".vbs" di akhir nama file tersebut (contoh : Sialien.vbs)
  4. lalu silahkan jalankan file tersebut di tempat yang kalian inginkan.
  5. selesai.

Dan ini dia script terlarangnya !

1. Mengeject CD-Drive Terus Menerus

Set oWMP = CreateObject(“WMPlayer.OCX.7″)
Set colCDROMs = oWMP.cdromCollectiondo
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop

2. Dengan Tombol Enter Terus Menerus

Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop

3. Dengan Pesan Lambat Notepad “Hello, how are you? I am good thanks!”

WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject(“WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hel”
WScript.Sleep 500
WshShell.SendKeys “lo ”
WScript.Sleep 500
WshShell.SendKeys “, ho”
WScript.Sleep 500
WshShell.SendKeys “w a”
WScript.Sleep 500
WshShell.SendKeys “re ”
WScript.Sleep 500
WshShell.SendKeys “you”
WScript.Sleep 500
WshShell.SendKeys “? ”
WScript.Sleep 500
WshShell.SendKeys “I a”
WScript.Sleep 500
WshShell.SendKeys “m g”
WScript.Sleep 500
WshShell.SendKeys “ood”
WScript.Sleep 500
WshShell.SendKeys ” th”
WScript.Sleep 500
WshShell.SendKeys “ank”
WScript.Sleep 500
WshShell.SendKeys “s! “

4. Backspace

MsgBox “Maaf, Anda Harus Mengulang Kembali”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop

5. Membuka Calculator Terus Menerus

@ECHO off
:top
START %SystemRoot%\system32\cacl.exe
GOTO top

6. Keyboard

Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “Maaf, Keyboard Tidak Berfungsi! Harap Diperbaiki”
loop

7. Shutdown Computer

@echo off
msg * Komputer Anda Terinfeksi Virus
shutdown -c “Error! Virus Menyebar Keseluruh System!” -s -t 0

 Tips bila bingung cara menghentikannya : singkat !!! Tinggal Pencet Tombol Reset