14.12.2007, 23:48
|
|
Reservists Of Antichat - Level 6
Регистрация: 19.03.2007
Сообщений: 953
С нами:
10077446
Репутация:
3965
|
|
Мигалка на клаве(Visual Basic Script)
PHP код:
set WshShell = WScript.CreateObject("WScript.Shell")
KL = true
do while KL
if WshShell.AppActivate("Блокнот") then
WriteWord()
KL = false
end if
WScript.Sleep 10
loop
function WriteWord()
WshShell.SendKeys "{CAPSLOCK}"
WshShell.SendKeys "{Scrolllock}"
WshShell.SendKeys "{CAPSLOCK}"
WshShell.SendKeys "{CAPSLOCK}"
WshShell.SendKeys "{Scrolllock}"
WshShell.SendKeys "{Scrolllock}"
WshShell.SendKeys "{Scrolllock}"
WshShell.SendKeys "{CAPSLOCK}"
WshShell.SendKeys "{Scrolllock}"
WshShell.SendKeys "{CAPSLOCK}"
WshShell.SendKeys "{CAPSLOCK}"
WshShell.SendKeys "{Scrolllock}"
WshShell.SendKeys "{Scrolllock}"
WshShell.SendKeys "{CAPSLOCK}"
WshShell.SendKeys "{Scrolllock}"
end function
__________________
BlackHat. MoDL
|
|
|