WEnd fehler ? O.o

[_sh0x]

Hi ich hab ein Bot gemacht nur er zeigt mir immer ein WEnd fehler an hier der genaue fehler:

>"C:\Program Files\AutoIt3\SciTE\..\autoit3.exe" /ErrorStdOut "C:\Documents and Settings\Dawid\Pulpit\Seeli Reader.au3"    
C:\Documents and Settings\Dawid\Pulpit\Seeli Reader.au3 (24) : ==> "Wend" statement with no matching "While" statement.:
WEnd

>Exit code: 1    Time: 0.214

Und dann noch mein Script:

HotKeySet ( "{F1}" , "Start" )
HotKeySet ( "{F2}" , "Terminate" )


$Seeli = PixelSearch ( 1274,514,1431,810,0xF5F269 )


Func Start()
	
	
	While 1
		
		WinWaitActive ( "Metin2 United" )
		send ( "!1" )
		send ( "!2" )
		if isArray($Seeli) = True Then
		Mousemove($Seeli[0], $Seeli[1], 1)
		MouseClick ( "left" ,"","",1,1 )
		MouseClick ( "left" ,721,397,1,1 )
		MouseClick ( "left" ,722,388,1,1 )
		MouseClick ( "left" ,726,450,1,1 )
		MouseClick ( "left" ,722,431,1,1 )
		
	WEnd
EndFunc


Func Terminate()
	Exit
EndFunc

Ich hoffe das ihr mir helfen könnt danke!

[omer36]

PHP Code:

HotKeySet ("{F1}" , "Start")
HotKeySet ("{F2}" , "Terminate")


$Seeli = PixelSearch ( 1274,514,1431,810,0xF5F269 )


Func Start()
    While 1
        WinWaitActive ( "Metin2 United" )
        send ( "!1" )
        send ( "!2" )
        if isArray($Seeli) = True Then
        Mousemove($Seeli[0], $Seeli[1], 1)
        MouseClick ( "left" ,"","",1,1 )
        MouseClick ( "left" ,721,397,1,1 )
        MouseClick ( "left" ,722,388,1,1 )
        MouseClick ( "left" ,726,450,1,1 )
        MouseClick ( "left" ,722,431,1,1 )
    EndIf
    WEnd
EndFunc



Func Terminate()
    Exit
EndFunc 


[_sh0x]

Ahhh bin ich dumm danke!

[omer36]

np

[bladerofdarknes]

ich weiß es war net gefragt aber willst du das ganze nicht lieber universal nehmen, sprich das es für jeden (privat) server funktioniert?
wäre relativ simpel!

#Include <SendMessage.au3>
HotKeySet ("{F1}" , "Start")
HotKeySet ("{F2}" , "Terminate")

IniWrite("seeli.ini", "window", "name", "METIN2")
sleep(100)
$read1=IniRead("seeli.ini","window","name","")
$input1=InputBox("Prozess","Gebe hier den Namen deines Metin2 Fensters an, groß klein Schreibung beachten!",$read1)
IniWrite("seeli.ini","window","name",$input1)
$window = FileRead("bot.ini")

$Seeli = PixelSearch ( 1274,514,1431,810,0xF5F269 )


Func Start()
While 1
WinWaitActive ( "$window" )
send ( "!1" )
send ( "!2" )
if isArray($Seeli) = True Then
Mousemove($Seeli[0], $Seeli[1], 1)
MouseClick ( "left" ,"","",1,1 )
MouseClick ( "left" ,721,397,1,1 )
MouseClick ( "left" ,722,388,1,1 )
MouseClick ( "left" ,726,450,1,1 )
MouseClick ( "left" ,722,431,1,1 )
EndIf
WEnd
EndFunc



Func Terminate()
Exit
EndFunc

while 2
sleep(10000)
WEnd

nur ein verbesserungsvorschlag