warum funktioniert der nicht?
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 451, 199, 142)
$Label1 = GUICtrlCreateLabel("Fischöffner Von Christian", 8, 16, 613, 79)
GUICtrlSetFont(-1, 45, 400, 0, "A Charming Font Superexpanded")
$Button1 = GUICtrlCreateButton("Start", 112, 112, 433, 209, 0)
GUICtrlSetFont(-1, 100, 400, 0, "A Charming Font Superexpanded")
GUICtrlSetColor(-1, 0x3169B6)
$Label2 = GUICtrlCreateLabel("Wenn ihr auf Star drückt startet der Bot in 45 min. dann wartet der Bot wieder 45 und öffnet wieder alle Fisch. ", 16, 424, 595, 19)
GUICtrlSetFont(-1, 9, 400, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label3 = GUICtrlCreateLabel("Er öffnet Manderienfische, Zander, Karpfen, Bachforrellen, Lachse und sonst nichts !", 0, 328, 625, 39)
GUICtrlSetFont(-1, 13, 400, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0xFFFF00)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 451, 199, 142)
$Label1 = GUICtrlCreateLabel("Fischöffner Von Christian", 8, 16, 613, 79)
GUICtrlSetFont(-1, 45, 400, 0, "A Charming Font Superexpanded")
$Button1 = GUICtrlCreateButton("Start", 112, 112, 433, 209, 0)
GUICtrlSetFont(-1, 100, 400, 0, "A Charming Font Superexpanded")
GUICtrlSetColor(-1, 0x3169B6)
$Label2 = GUICtrlCreateLabel("Wenn ihr auf Star drückt startet der Bot in 45 min. dann wartet der Bot wieder 45 und öffnet wieder alle Fisch. ", 16, 424, 595, 19)
GUICtrlSetFont(-1, 9, 400, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label3 = GUICtrlCreateLabel("Er öffnet Manderienfische, Zander, Karpfen, Bachforrellen, Lachse und sonst nichts !", 0, 328, 625, 39)
GUICtrlSetFont(-1, 13, 400, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0xFFFF00)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_start()
EndSwitch
WEnd
While
Sleep (5000)
WEnd
Func Start3()
While (2)
send ( "{numpad5}" )
Global $bachforelle = PixelSearch(635, 240, 795, 556, 0x6B5931)
If not @error Then
MouseMove ($bachforelle[0], $bachforelle[1] ,1)
sleep (500)
MouseClick( "Right" )
Global $Mandarinenfisch = PixelSearch(635, 240, 795, 556, 0x635129)
If not @error Then
MouseMove ($Mandarinenfisch[0], $Mandarinenfisch[1] ,1)
sleep (500)
MouseClick( "Right" )
Global $Zander = PixelSearch(635, 240, 795, 556, 0xFFFFBD)
If not @error Then
MouseMove ($Zander[0], $Zander[1] ,1)
sleep (500)
MouseClick( "Right" )
Global $kleinerfisch = PixelSearch(635, 240, 795, 556, 0x424929)
If not @error Then
MouseMove ($kleinerfisch[0], $kleinerfisch[1] ,1)
sleep (500)
MouseClick( "left" )
Sleep(200)
MouseMove ( 365, 347 )
Sleep(200)
MouseClick ( "left" )
Sleep(200)
MouseMove ( 360, 320 )
Sleep(200)
MouseClick ( "left" )
EndIf
Sleep (5000)
WEnd
EndFunc
func ende ()
Exit
endfunc






