Hilfe bei Pixelsearch un noch was!!!

HotKeySet("{F1}", "_start_adlib")
HotKeySet("{F2}", "_ende")
 
Opt("PixelCoordMode", 2)
Opt("MouseCoordMode", 2)
 
While 1
WEnd
 
func _start_adlib()
	AdlibEnable("_start")
EndFunc
 
 
 
Func _start()
	While 1
		Sleep(1000)
		MouseClick("left", 520, 496, 1, 8)
		Sleep(1000)
		Send ((asd"))
		Sleep(1000)
		Send ("{Tab}")
		Sleep(1000)
		Send (("asd"))
		Send ("{Enter}")
		$pixel = PixelGetColor( 148, 282 )
		If Hex($pixel) =  0x181D89 Then
		Send("{Enter}") <<<--- Drückt er zu früh wtf?!?                                             
		EndIf
		$pixel = PixelGetColor( 345, 612 )
		If Hex($pixel) =  0x85501C Then
		MouseClick("left", 231, 264, 1, 8)
		EndIf
		Sleep(5000)
		MouseClick("left", 923, 164, 1, 8)
		Sleep(1000)
		MouseClick("left", 769, 501, 1, 8)
		Sleep(1000)
		Send (("asd"))
		Sleep(2000)
		Send ("{Tab}")
		Sleep(2000)
		Send (("asd"))
		Send ("{Enter}")
		Sleep(8000)
		Send ("{ENTER}")
		Sleep(8000)
		Send ("{ESC}")
		Sleep(2000)
		MouseClick("left", 167, 295, 1, 8)
	WEnd
EndFunc   ;==>START
 
Func _ende()
	Exit
	AdlibDisable()
EndFunc   ;==>ENDE

HotKeySet("{F1}", "_start")
HotKeySet("{F2}", "_ende")
 
Opt("PixelCoordMode", 2)
Opt("MouseCoordMode", 2)
 
While (1)
Sleep (1000)
Wend

Func _start()
	While (1)
		Sleep(1000)
		MouseClick("left", 520, 496, 1, 8)
		Sleep(1000)
		Send ("..." , 1)
		Sleep(1000)
		Send ("{Tab}" , 0)
		Sleep(1000)
		Send ("..." , 1)
		Send ("{Enter}" , 0)

While (1)
		global $pixel = PixelGetColor( 148, 282 )
		If Hex($pixel) =  0x181D89 Then
		Send("{Enter}" , 0)   
return                                          
		EndIf
Sleep (250)
Wend

while (1)
		global $pixel = PixelGetColor( 345, 612 )
		If Hex($pixel) =  0x85501C Then
		MouseClick("left", 231, 264, 1, 8)
return
		EndIf
sleep (250)
Wend

		Sleep(5000)
		MouseClick("left", 923, 164, 1, 8)
		Sleep(1000)
		MouseClick("left", 769, 501, 1, 8)
		Sleep(1000)
		Send ("..." , 1)
		Sleep(2000)
		Send ("{Tab}" , 0)
		Sleep(2000)
		Send ("..." , 1)
		Send ("{Enter}" , 0)
		Sleep(8000)
		Send ("{ENTER}" , 0)
		Sleep(8000)
		Send ("{ESC}" , 0)
		Sleep(2000)
		MouseClick("left", 167, 295, 1, 8)
	WEnd
EndFunc   ;==>START
 
Func _ende()
	Exit
EndFunc   ;==>ENDE