Код:
HotKeySet("{F1}", "_Pause") ;Пауза
HotKeySet("{F2}", "_NotPause") ;Продолжить
Global $Paused
Func _Pause()
$Paused = True
While $Paused
Sleep(100)
WEnd
EndFunc
Func _NotPause()
$Paused = False
EndFunc
While 1
$aWinList = WinList('Counter-Strike')
$pid = WinGetProcess("Counter-Strike")
For $i = 1 To $aWinList[0][0] Step +1
If WinGetProcess($aWinList[$i][1]) = $Pid Then
Sleep (2000)
ControlSend($aWinList[$i][1], '', '', '{Space}')
Sleep (2000)
ControlSend($aWinList[$i][1], '', '', '{5}')
Sleep (2000)
ControlSend($aWinList[$i][1], '', '', '{5}')
Sleep (2000)
ControlSend($aWinList[$i][1], '', '', '{1}')
Sleep(1000)
ControlSend($aWinList[$i][1], '', '', '{9}')
Sleep (1000)
ControlSend($aWinList[$i][1], '', '', '{0}')
ControlSend($aWinList[$i][1], '', '', '{0}')
ControlSend($aWinList[$i][1], '', '', '{0}')
ControlSend($aWinList[$i][1], '', '', '{0}')
ControlSend($aWinList[$i][1], '', '', '{0}')
ControlSend($aWinList[$i][1], '', '', '{0}')
ControlSend($aWinList[$i][1], '', '', '{0}')
ControlSend($aWinList[$i][1], '', '', '{0}')
ExitLoop
EndIf
Next
WEnd
Всем доброго времени суток, у меня возникла проблема при запускании скрипта курсор мыши, через какое то время перепрыгивает в левый верхний угол экрана.