Why not for Laser

Oder kann ich den nicht finden.
Code: Select all
001 $Sektor = $Fabwahl -> get sector
002 $x = $Fabwahl -> get x position
003 $y = $Fabwahl -> get y position
004 $z = $Fabwahl -> get z position
005 $Race = $Fabwahl -> get owner race
006
007 $newship = create ship: type=$Shipwahl owner=$Race addto=$Sektor x=$x y=$y z=$z
008
009 $RT = $newship -> get max upgrades for upgrade Triebwerkstuning
010 $RandomT = random value from 1 to $RT - 1
011 $empty = $newship -> install $RandomT units of Triebwerkstuning
012
013 $RR = $newship -> get max upgrades for upgrade Ruder-Optimierung
014 $RandomR = random value from 1 to $RR - 1
015 $empty = $newship -> install $RandomR units of Ruder-Optimierung
016
017 $RF = $newship -> get max upgrades for upgrade Laderaumerweiterung
018 $Random = random value from 100 to $RF - 1
019 $empty = $newship -> install $Random units of Laderaumerweiterung
020
021 $Guns = $newship -> -----get maximum laser strength------- ???
022 $AnzahlG = $newship -> get number of laser bays
023 $empty = $newship -> install $AnzahlG units of $Guns
024
025 $Schild = $newship -> get max. shield type that can be installed
026 $AnzahlS = $newship -> get number of shield bays
027 $empty = $newship -> install $AnzahlS units of $Schild
028
029 $newship -> set homebase to $Fabwahl
030 @ $empty = $newship -> fly to home base
031 return null