Bot hilfe

03/02/2009 19:05 leridan#1
Hey Leute

Habe 2 kleine Problemchen


hier mal der quelli


WinActivate ("4Story")
Sleep (1000)
WinWaitActive ("4Story")
MouseClick ("left",420, 343)
Sleep (2000)
Attack()

Func Attack()
SEND ("{TAB}")
SEND ("{1}")
Sleep (5000)
$Monster_Tod_Pixel = PixelGetColor ( 475, 33)
If $Monster_Tod_Pixel <> 0xCE0000 Then
Sleep (3000)
Else
SEND ("{z}")
Sleep (2000)
EndIf
EndFunc
While
$Funktion_Test = PixelGetColor (129, 33)
If $Funktion_Heal <> 0xE55931 Then
Heal()
Else
Attack()
ElseIf
WEnd

hier soll nicht verbunden sein .. ..frage mich ob das mit en func geht oder obs probleme gibt

Func Heal()
SEND ("{b}")
Sleep (7000)
EndFunc


also 1 problem ich schreib mal den error auf

Line 26 Error: "Wend" statement with no matching "while" statement.

2 Problem .. bei Wend am ende tut er automati9sch die heal Funktion mit einknüpfen .. das solle r aber nicht es gibt 3 verschiedene sachen attack dann die while schleife dann heal... ich mache ma an die stelle wo es getrennt sein soll bei while und heal eine leerzeile


Ich hoffe ihr könnt mir helfen

MFG Leridan
03/02/2009 20:00 leridan#2
WinActivate ("4Story")
Sleep (1000)
WinWaitActive ("4Story")
MouseClick ("left",420, 343)
Sleep (2000)
Attack()

Func Attack()
SEND ("{TAB}")
SEND ("{1}")
Sleep (5000)
$Monster_Tod_Pixel = PixelGetColor ( 475, 33)
If $Monster_Tod_Pixel <> 0xCE0000 Then
Sleep (3000)
Else
SEND ("{z}")
Sleep (2000)
EndIf
EndFunc
While 1 -----<hier musste eine 1 hin .. somit ist die bedingung immer wahr ;=)
$Funktion_Test = PixelGetColor (129, 33)
If $Funktion_Heal <> 0xE55931 Then
Heal()
Else
Attack()
Endif ----- hier war der fehler
WEnd