bot hazardowy pomocy

[Chonilo]

Witam, napisałem oto cos takiego:
 

HotKeySet("{F1}" , "start")
HotKeySet("{END}" , "koniec")
WinActivate("")

$tytul = ""
$lapka = WinGetHandle($tytul)

While 1
Sleep(100)
WEnd
Func koniec()
   Exit
EndFunc
Func start()
		MouseClick("",902, 312)
		Sleep(100)
		Send("^a")
		Sleep(100)
		Send("{BACKSPACE}")
		Sleep(100)
		Send(500000)
		Sleep(100)
		Send("{ENTER}")
		Sleep(6000)
	While 1
$pixel = PixelSearch( 581, 177, 591, 191, 0xFF0000)

If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send(1000000)
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
	EndIf
	If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send(2000000)
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
	EndIf
	If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send("4000000")
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
	EndIf
	If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send(8000000)
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
	EndIf
	If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send(16000000)
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
	EndIf
	If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send(32000000)
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
	EndIf
	If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send(64000000)
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
	EndIf
	If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send(128000000)
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
	EndIf
	If @ then
	ExitLoop
EndIf
	If Not @ Then
	MouseClick("",902, 312)
	Sleep(100)
	Send("^a")
	Sleep(100)
	Send("{BACKSPACE}")
	Sleep(100)
	Send(256000000)
	Sleep(100)
	Send("{ENTER}")
	Sleep(5000)
EndIf
WEnd
EndFunc

Męczę się nad nim od północy, jestem tak zielony w autoIT jak trawa na kartkach z życzeniami wielkanocnymi, ale mniejsza o to, pomógłby mi ktos zrobić to w sposób, by działał w sposób:
- wysyła pierwszą wartoć(tak jak działa do góry czyli od razu po rozpoczęciu Func start)
-szuka tego pixela i jesli go znajdzie podwaja wartosc poczynając od 500 tys do 256mln(byłbym wdzięczny za pomoc i wytłumaczenie mi tego w jaki sposób to ogarnąć) i ją wysyła, a jesli go nie znajdzie w tym miejscu, cofa się do początku funkcji start

Reszta kodu jest ok, tylko z tym mam problemy :/

Z góry dziękuję za pomoc, 
Chonilo