//Обучение войск на эмуляторе
$count_army = 7837	// Количество войск
$count_click = 1		// Количество нажатий на ускорение
$line = 1 					// Номер строки с ускорением
$line_tyr = 1				// Номер строки с видом войск

$h = WNDFIND("BlueStacks")
WNDPOS($h,0,0)
WNDSIZE($h,368,724)
TOCLIP($count_army)
$y = 292+($line-1)*106
WAITMS(300)

WHILE(1)

// Ждем пока не нажмем на вид войск
$flag = false
$err = 0
WHILE($flag = false)
	GETSCREEN(23,193,58,223)
	IF(PXL(28,210) = 65938)
		LCLICK(51,277+($line_tyr-1)*72)
		$flag = true
	ELSE
		INC($err)
	END_IF

	IF($err>20)
		GETSCREEN(265,281,280,626)
		IF(PXL(275,$y) = 102)
			LCLICK(275,$y)
			$err = 0
		END_IF
	END_IF
	WAITMS(25)
END_CYC

// Жмем на поле ввода, вставляем количество, жмем обучить
$flag = false
$err = 0
WHILE($flag = false)
	GETSCREEN(250,315,284,330)
	IF(PXL(258,323) = 1118481)
		LCLICK(258,323)
		WAITMS(25)
		KEYDOWN(#CTRL)
		WAITMS(25)
		KEYDOWN(86)
		WAITMS(25)
		KEYUP(86)
		KEYUP(#CTRL)
		WAITMS(50)
		LCLICK(115,404)
		WAITMS(300)
	ELSE
		INC($err)
	END_IF

	GETSCREEN(335,577,349,593)
	COLORMODE(5)
	IF(PXL(339,584) = 2047807)
		$flag = true
	END_IF

	IF($err > 10)
		LCLICK(150,455)
		$err = 0
	END_IF
	WAITMS(25)
END_CYC

// Жмем кнопку ускорить пока не перейдем
$flag = false
WHILE($flag = false)
	GETSCREEN(264,276,281,632)
	IF(PXL(275,$y) = 102)
		$flag = true
	END_IF
	LCLICK(217,638)
	WAITMS(25)
END_CYC

// Применяем ускорение
$flag = false
WHILE($flag = false)
	GETSCREEN(265,281,280,626)
	IF(PXL(275,$y) = 102)
		FOR($i=0,$i<$count_click)
			LCLICK(275,$y)          //?
			logwrite("4.1")
			WAITMS(250)
		END_CYC
		$flag = true
	END_IF
END_CYC


END_CYC