Ich bin schlichtweg zu faul Aldrin komplett zu erforschen

Moderators: Scripting / Modding Moderators, Moderatoren für Deutsches X-Forum
Code: Select all
<RetVar> = <RefObj> get station array from sector
Code: Select all
001 $a = [SECTOR] -> get station array from sector
002 $b = size of array $a
003 $b = $b - 1
004 $n = 0
005 $c = $a[$n]
006 $c -> set known status to [TRUE]
007 inc $n =
008 return null
Code: Select all
for $n:=0 to $b do
...
end;
ODER
while $n<=$b do
...
end;
Code: Select all
001 $a = [SECTOR] -> get station array from sector
002 $b = size of array $a
003 while $b
004 dec $b =
005 $c = $a [$b]
006 $c -> set known status to [TRUE]
007 end
008 return null
Code: Select all
Argument 1 sector Var/Sector wähle Sektor
$stat.arr = $sector -> get station array from sector
$stat.size = size of array $stat.arr
while $stat.size
| dec $stat.size
| $stat = $stat.arr [ $stat.size ]
| $stat -> set known status to [TRUE]
end