hab in diesem script irgentwo einen gedankenfehler. es tut einfach nicht...
Bitte seit doch mal so nett und seht ob ihr in findet. ich sehe irgentwie "den wald vor lauter bäumen nicht mehr"
Code: Select all
Version: 1
for Script Engine Version: 24
Description
Fuegt Ware zu Handelsdock hinzu
Arguments
1: upgrade , Var/Ware , 'upgrade'
Source Text
001 $Universe.maxX = get max sectors in x direction
002 $Universe.maxY = get max sectors in y direction
003 * Schleifen zum Durchlaufen aller Sektoren
004 $Universe.y = 0
005 while $Universe.y < $Universe.maxY
006 $Universe.x = 0
007 while $Universe.x < $Universe.maxX
008 * Pruefen ob Sektor bei Universe.x, Universe.y existriert
009 $Universe.sector = get sector from universe index: x=$Universe.x, y=$Universe.y
010 if $Universe.sector != null
011 $race = Argonen
012 * Sektor existiert - Handelsdock suchen
013 race.select:
014 $station = find station: sector=$Universe.sector class or type=Trade Dock race=$race flags=null refobj=null maxdist=null maxnum=1 refpos=null
015 if not $station -> trades with ware $upgrade
016 $dummy = $station -> add 1 units of $upgrade
017 end
018 if $station == null
019 if $race == Argonen
020 $race = Boronen
021 goto label race.select
022 else if $race == Boronen
023 $race = Split
024 goto label race.select
025 else if $race == Split
026 $race = Paraniden
027 goto label race.select
028 else if $race == Paraniden
029 $race = Teladi
030 goto label race.select
031 end
032 end
033 end
034 inc $Universe.x =
035 end
036 inc $Universe.y =
037 end
038 return null
RGee