Помогите перенести скрипт с X7 в Autoit

[Parasite]

Доброго времени суток. Такая ситуация. У меян есть скрипт написаный для мыши X7 появилась необходимость перенести этот скрипт в .au3

Нажать F1
пауза 20
Нажать space
пауза 20
Нажать space
пауза 20
Нажать esc
пауза 20
Нажать F2
пауза 20
Нажать space
пауза 20
Нажать space
пауза 20
Нажать esc
пауза 20
Нажать F3
пауза 20
Нажать space
пауза 20
Нажать space
пауза 20
Нажать esc
пауза 20
рестарт

Единственное что хотелось бы добавить горячии клавиши на запуск и остановку скрипта. зарание спасибо.

 

[CreatoR]

Re: Помогите со скриптом

Parasite
{TopicNameWarn.Admin}

А также оформите тему в соотсветствий с правилами раздела.

 

[Garrett]

Где-то так:

#include <Constants.au3>

Global $iStop
Global $sKey[12]
$sKey[0]="{F1}"
$sKey[1]="{SPACE}"
$sKey[2]="{SPACE}"
$sKey[3]="{ESC}"
$sKey[4]="{F2}"
$sKey[5]="{SPACE}"
$sKey[6]="{SPACE}"
$sKey[7]="{ESC}"
$sKey[8]="{F3}"
$sKey[9]="{SPACE}"
$sKey[10]="{SPACE}"
$sKey[11]="{ESC}"

HotKeySet("!q", "_Exit")	; Alt-q
HotKeySet("!s", "_Go")		; Alt-s Start/Pause

_Loop()

Func _Loop()
	While 1
		ToolTip("Stop!",0,0)
		Sleep(100)
	WEnd
EndFunc

Func _Go()
    $iStop = NOT $iStop
	$i = 0
    While $iStop
		If $i <> UBound($sKey) Then 
		ToolTip("Go!",0,0)
			Send($sKey[$i])
			Sleep(200)
		$i += 1
		Else
		$i = 0
		EndIf
    WEnd
EndFunc

Func _Exit() 
	$iMsg = MsgBox(33,"Внимание!","Завершить работу?")
	If $iMsg = 2 Then
		_Loop()
	Else
		Exit
	EndIf
EndFunc

 

[Parasite]

Идеально. огромное спасибо.

 

[Garrett]

Рад был помочь.

 

[VitAl2013]

Что за Х7?

 

[axlwor]

x7 вроде это ботомышь ;D

 

[Parasite]

да да это мышь.
Тему где бы задать вопрос где то видел но не смог найти сейчас, поэтому задам вопрос здесь.

Подскажите можно ли сделать чтобы данный скрипт работал в неактивном окне и не отбирал клавиатуру из других приложений? и если можно то как это сделать. заранее спасибо.