HotKeySet("x", "Terminate")

Func Terminate()
    Exit 0
EndFunc

Opt('MouseCoordMode', 0)
Opt('PixelCoordMode', 0)
HotKeySet('{END}', 'Quit')
HotKeySet('{SPACE}', 'Pause')
Global $Paused

;bot starts paused. press space to start.
Pause()

While 1
      Sleep(3500)
	  CheckDead()
	  MouseClick("left",232, 419) ;resume
	  Sleep(5000) ;load
	  $Pixel1 = PixelSearch(1482,20,1535,95,0xFFF000)
	  If Not @error Then
		 Send("t")
		 Sleep(8000)
		 MouseClick("left", 1480, 281)
		 Sleep(1500)
		 MouseClick("left", 1316, 206)
		 Sleep(1500)
		 MouseClick("left", 845, 225)
		 Sleep(1500)
		 MouseClick("left", 521, 506)
		 Sleep(1500)
		 MouseClick("left", 260, 595)
		 Sleep(2500)
		 Send("{ESCAPE}")
		 Sleep(1000)
		 MouseClick("left", 956, 579)
		 Sleep(8000)
		 MouseClick("left", 230, 416)
		 Sleep(8000)
		Else
		  Send("4")
		  MouseClick("left",1919, 1060)
		  Sleep(2500)
		  Send("4")
		  MouseClick("left",1880, 220)
		  Sleep(2000)
		  Send("4")
		  sleep(2000)
		  MouseClick( "right",1380, 135)
		  Sleep(1000)
		  Send("4")
		  MouseClick("left",1835, 65)
		  Sleep(2000)
		  Send("4")
		  MouseClick("left",1796,493)
		  sleep(2500)
		  send("4")
		  MouseClick("left",1796,475)
		  sleep(2500)
		  ;send("4")
		  ;MouseClick("left",1661,824)
		  ;sleep(2500)4
		  ;send("4")
		  ;MouseClick("left",1555,909)
		  ;sleep(3000)
		  ;send("4")
		  ;MouseClick("left",1319,730)
		  ;sleep(1500)
		  ;send("2")
		  ;sleep(25)
		  ;send("1")
		  ;sleep(1000)
		  send("2")
		  MouseClick("left",1078,593)
		EndIf
	  sleep(700)
	  Send("t")
	  Sleep(7500)
	  LeaveGame()
WEnd

Func Pause()
   $Paused = Not $Paused
   While $Paused
      Sleep(100)
      ToolTip('Paused...', 0, 0)
   WEnd
   ToolTip("")
EndFunc   ;==>Pause
Func LeaveGame()
	  Send("{Escape}")
	  sleep(25)
	  MouseClick("left",970, 578)
EndFunc

Func CheckDead()
	$actPixel = PixelSearch(203,194,263,253,0x926C32)
	If @error Then
		ToolTip('Dead...waiting',0,0)
		sleep(18000)
		ToolTip("")
	EndIf
EndFunc