hallo, ich habe einen farmbot für ein browsergame geschrieben
dies war mein erstes werk und ne menge arbeit
nun bin ich eig fertig, er leuft auch bei anderen leuten, nur nicht bei mir !
er sagt ,dass das letzte schleifenende keinen schleifenanfang hat bzw eins fehlt... setze ich nun eins rann oder ziehe eins weg, sagt er das eins fehlt oder eins zuviel ist = er ist nie zufrieden....
dabei habe ich 3 schleifenanfänge und 3 enden...
hier mal das ding:
Spoiler anzeigen
run("C:\Programme\Mozilla Firefox\firefox.exe")
winwaitactive(".:Narakis:. - Das Browserspiel - Mozilla Firefox","")
sleep(1000)
send("{Tab}")
send("xxxxxxxxxxx" & "{Tab}")
sleep(1000)
send("xxxxxxx"&"{Enter}")
;--------------------------------------------------------------------------------------------------------anmeldung fertig
sleep(3000)
mouseclick("left",747,165); info-fenster-schliezen
sleep(1000)
;-------------------------------------------------------------------------------------------------------- fenster geschlossen
while 1
mouseclick("left",460,680); Handelslager
sleep(1000)
mouseclick("left",325,547);sol-kauf
sleep(200)
send("20" & "{Enter}");20 sol kaufen
sleep(1000)
mouseclick("left",155,700); karte
sleep(1000)
mouseclick("left",746,467); sarana
sleep(1000)
send("{Enter}")
sleep(1000)
;-------------------------------------------------------------------------------------------------------- 1. stadt fertig eingekauft
$Kampf = 0
while 2
mousewheel("down",7)
if PixelGetColor(392,433) = 0x3EE523 then mouseclick("left",392,433); trümmerfeld
if PixelGetColor(489,421) = 0x3F2D21 then $Kampf = 1
if PixelGetColor(277,287) = 0x646B85 then exitloop ; bei stadt -> ende
wend
;-------------------------------------------------------------------------------------------------------- 1. fahrt fertig
if $Kampf = 1 then
mouseclick("left",160,520)
sleep(500)
mousewheel("down",7)
sleep(500)
mouseclick("left",461,547)
sleep(200)
mouseclick("left",456,592)
;-------------------------------------------------------------------------------------------------------- falls kampf war, dann nun geheilt
mouseclick("left",389,680); handelslager
sleep(1000)
mouseclick("left",691,546); sol-kauf button
sleep(200)
send("20"&"{Enter}"); 20 sol verkaufen
sleep(1000)
mouseclick("left",155,700); karte
sleep(1000)
MouseWheel("down",7); runterscrollen auf der karte
sleep(200)
mouseclick("left",813,434); karturan
sleep(1000)
send("{Enter}"); reise bestätigen
sleep(1000)
;-------------------------------------------------------------------------------------------------------- 2. stadt verkauft
$Kampf = 0
while 3
mousewheel("down",7)
if PixelGetColor(392,433) = 0x3EE523 then mouseclick("left",392,433); trümmerfeld
if PixelGetColor(489,421) = 0x3F2D21 then $Kampf = 1
if PixelGetColor(277,287) = 0x646B85 then exitloop ; falls stadt
wend
;-------------------------------------------------------------------------------------------------------- 2. fahrt fertig
if $Kampf = 1 then
mouseclick("left",160,520)
sleep(500)
mousewheel("down",7)
sleep(500)
mouseclick("left",461,547)
sleep(200)
mouseclick("left",456,592)
wend