2/7/2010, 10:23
![MinhTuan](https://2img.net/u/1213/16/58/28/avatars/1-3.jpg)
![MinhTuan](https://2img.net/u/1213/16/58/28/avatars/1-3.jpg)
- Code:
#NoTrayIcon
Global $e
If Not IsDeclared("sToolTipAnswer") Then Local $sToolTipAnswer
$sToolTipAnswer = ToolTip("Neu ban muon thoat hay an HOME de thoat", 0, 0, "hello", 0, 0)
HotKeySet("{HOME}", "qwe")
HotKeySet("!a", "qa")
Func qa()
Exit
EndFunc
Func qwe()
$e = 1
Sleep( Random(5000,50000))
q()
EndFunc ;==>qwe
q()
Func q()
$e =4
$c = 1
$d = 5
For $c = 1 To $d
$a = Random(0, 1023)
$b = Random(0, 768)
MouseMove($a, $b)
MouseClick("left", $a, $b, 2)
$c = 1
Sleep(700)
If $e = 1 Then ExitLoop
Next
EndFunc
Đây là bản hoàn chỉnh để tham khảo:(có bổ sung 1 số code khác)
[You must be registered and logged in to see this link.]