code auto move mouse

2/7/2010, 10:23

Admin

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