darklord2 wrote:Ich werd noch wahnsinnig!
Willkommen im Club!
Code: Select all
001 $counter1 = 50000
002 while $counter1 >= 0
003 dec $counter1 =
004 if exists SectorObject $counter1
005 $objekt = get object from SectorObject $counter1
006 $maintyp = get maintype of ware $objekt
007 if $maintyp == 20
008 $objekt -> destruct: show no explosion=[TRUE]
009 end
010 end
011 end
Du mußt in Deinem Code noch die Zeile 006 ändern. Siehe mein vorheriges Posting... Das muß heißen
Code: Select all
006 $maintyp = $object -> get maintype
Weil "get maintype of ware" nur echte Waren will,
während der "-> get maintype" den Maintype jedes beliebigen Objektes lesen kann.
Und dann klappts... Damit hab' ich Trantor erfolgreich von Schrott geräumt:
Code: Select all
002 $counter1 = 50000
003 while $counter1 >= 0
004 dec $counter1 =
005 if exists SectorObject $counter1
006 $waretypecode = $object -> get ware type code of object
007 $object = get object from SectorObject $counter1
008 $maintype = $object -> get maintype
009 $waretypecode = $object -> get ware type code of object
010 $message = $object + ' ' + $maintype + ' ' + $waretypecode
011 write to player logbook $message
012 if $maintype == 20
013 $object -> destruct: show no explosion=[TRUE]
014 end
015 end
016 end
017 return null
Dabei sieht man dann noch interessante Sachen im Logbuch
Daß ein Sektor auch einen Maintype hat (1)...
Daß in Sektoren unbekannte Sachen mit Maintyp "0" rumschwirren...
Und irgendwas mit Maintyp "3"...
Na ja... Denken wir nicht weiter drüber nach...