Fehlersuche

[Australopiticus]

vielleicht kennt wer von euch das spiel freewar also ich schreib grad einen bot und hab irgendwo einen fehler bei einer selbsterstellten funtion die meinen avatar auf ein feld mit einer bestimmten position gehen lassen sollte
zwar macht er irgendwas wenn der bot aktiviert is aber er bewegt sich leider nicht vom fleck
ich hab mal nur die 2 funktionen rauskopiert die ihr hierfür braucht vielleicht findet ihr ja was
danke im voraus

Func GoToHeal()

$map=TCPRequest($ip,'welt'&$server&'.freewar.de',0 ,'freewar/internal/map.php?reload=1.php',"",$cookies)
local $xpos=_StringBetween($map,"Position X: "," Y:"),$ypos=_StringBetween($map," Y: ","</p></div>")

while $xpos[0]<>110 Or $ypos[0]<>115
$map=TCPRequest($ip,'welt'&$server&'.freewar.de',0 ,'freewar/internal/map.php?reload=1.php',"",$cookies)
$xpos=_StringBetween($map,"Position X: "," Y:")
$ypos=_StringBetween($map," Y: ","</p></div>")
Select
Case $xpos[0]<110 And $ypos[0]<115
Gehen("downrightright")
Sleep(8000)
Case $xpos[0]<110 And $ypos[0]>115
Gehen("upright")
Sleep(8000)
Case $xpos[0]=110 And $ypos[0]>115
Gehen("up")
Sleep(8000)
Case $xpos[0]=110 And $ypos[0]<115
Gehen("down")
Sleep(8000)
Case $xpos[0]>110 And $ypos[0]>115
Gehen("upleft")
Sleep(8000)
Case $xpos[0]>110 And $ypos[0]<115
Gehen("downleft")
Sleep(8000)
Case $xpos[0]<110 And $ypos[0]=115
Gehen("right")
Sleep(8000)
Case $xpos[0]>110 And $ypos[0]=115
Gehen("left")
Sleep(8000)
Endselect



Func Gehen($Direction)
local $walkid
$map=TCPRequest($ip,'welt'&$server&'.freewar.de',0 ,'freewar/internal/map.php?reload=1.php',"",$cookies)
$walkid=_StringBetween($map,"'&intwalkid=","';")
$gehen=TCPRequest($ip,'welt'&$server&'.freewar.de' ,0,'freewar/internal/map.php?walk='&$Direction&'&intwalkid='&$walkid[0],"",$cookies)

EndFunc

WEnd
$heal=TCPRequest($ip,'welt'&$server&'.freewar.de', 0,'freewar/internal/main.php?arrive_eval=drinkwater',"",$cookies)
EndFunc

mfg australo

[ddl]

Die Funktion Gehen ist aber in Wirklichkeit nicht in der GoToHeal Funktion, oder?
Wäre der einzige Fehler der mir gerade so beim überfliegen aufgefallen ist.

[Australopiticus]

nein sry da is mir beim kopieren was durcheinandergekommen hab das problem jetzt schon gelöst