06/20/2015 15:20:28	Transcendence 1.6 Beta 4
06/20/2015 15:20:28	Graphics quality maximum: 78 ms; 2 cores.
06/20/2015 15:20:30	Loaded library: Extensions\120DnO1\120Ships.xml
06/20/2015 15:20:30	Loaded extension: Extensions\120DnO1\120ShipsNPC.xml
06/20/2015 15:20:30	Loaded extension: Extensions\AsteroidScanner.xml
06/20/2015 15:20:30	Loaded extension: Extensions\d912_DrakeTech\DrakeTech.xml
06/20/2015 15:20:30	Loaded extension: Extensions\d912_InfiniteFuel\InfiniteFuel.xml
06/20/2015 15:20:30	Loaded extension: Extensions\d912_LibMods\TradeMenu.xml
06/20/2015 15:20:30	Loaded library: Extensions\d912_LibResources\Lib912Resources.xml
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUDShip_Sapphire.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUDShip_EI500.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUDShip_Wolfen.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUDShip.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUDShip.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round111.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round144.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round223.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round224.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round233.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round234.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round243.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round244.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round344.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round344b.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round434.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round443.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round444.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round544.bmp.
06/20/2015 15:20:30	backColor not supported: Resources\ArmorHUD_Round544b.bmp.
06/20/2015 15:20:31	backColor not supported: Resources\ArmorHUD_Round634.bmp.
06/20/2015 15:20:31	backColor not supported: Resources\ArmorHUD_Round644.bmp.
06/20/2015 15:20:31	backColor not supported: Resources\ArmorHUD_Round644b.bmp.
06/20/2015 15:20:31	backColor not supported: Resources\ArmorHUD_Round844.bmp.
06/20/2015 15:20:31	backColor not supported: Resources\ArmorHUD_Wedge4.bmp.
06/20/2015 15:20:31	backColor not supported: Resources\ArmorHUD_Wedge6.bmp.
06/20/2015 15:20:31	Loaded library: Extensions\d912_PlayerShipDrones\PlayerShipDrones.xml
06/20/2015 15:20:31	Loaded extension: Extensions\d912_PSD_DnO1\PSD_DnO1.xml
06/20/2015 15:20:31	Loaded extension: Extensions\d912_PSD_DnOOut1\PSD_DnOOut1.xml
06/20/2015 15:20:31	Loaded extension: Extensions\d912_Relief\Relief912.xml
06/20/2015 15:20:31	Loaded extension: Extensions\d912_Slaver\Slaver912.xml
06/20/2015 15:20:31	Loaded library: Extensions\DockScreenFramework-master\Library.xml
06/20/2015 15:20:31	Loaded extension: Extensions\Doomsday800GWreactor.xml
06/20/2015 15:20:31	Loaded extension: Extensions\DySys V6 PrintTo (for 1.3)\Dynamic Systems V4 Vanilla Override.xml
06/20/2015 15:20:31	Loaded extension: Extensions\DySys V6 PrintTo (for 1.3)\Dynamic Systems V5.b Asteroid Override for TG.xml
06/20/2015 15:20:31	Loaded adventure desc: Extensions\DySys V6 PrintTo (for 1.3)\DynamicSystems.xml
06/20/2015 15:20:31	backColor not supported: DySys Resources\CentauriBaseShipFull.jpg.
06/20/2015 15:20:31	backColor not supported: DySys Resources\Centauri Base Ship Test.jpg.
06/20/2015 15:20:31	Loaded extension: Extensions\DySys V6 PrintTo (for 1.3)\DynamicSystemsStuff.xml
06/20/2015 15:20:31	backColor not supported: DySys Resources\Exiamask.jpg.
06/20/2015 15:20:31	Loaded extension: Extensions\DySys V6 PrintTo (for 1.3)\Nerefir Carrier POC.xml
06/20/2015 15:20:31	Loaded extension: Extensions\GalacticOmniDevice-master\Core.xml
06/20/2015 15:20:31	Loaded extension: Extensions\GODMod\CommonFunctions.xml
06/20/2015 15:20:31	Loaded extension: Extensions\GODMod\Framework.xml
06/20/2015 15:20:32	Loaded extension: Extensions\GODMod\G.O.D.Mod.xml
06/20/2015 15:20:32	Loaded extension: Extensions\GODMod\ScreenHook_ShipInterior.xml
06/20/2015 15:20:32	Loaded extension: Extensions\Parallax\Parallax.xml
06/20/2015 15:20:32	Loaded extension: Extensions\PDMod_beta1.xml
06/20/2015 15:20:32	Loaded extension: Extensions\SFStargateDockNGo v02.xml
06/20/2015 15:20:32	Loaded extension: Extensions\SystemDensityLite.xml
06/20/2015 15:20:32	backColor not supported: Resources\targetBuoy.jpg.
06/20/2015 15:20:32	Loaded extension: Extensions\Test Drive\Test Drive.xml
06/20/2015 15:20:32	backColor not supported: packer.jpg.
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\Bobby_packers\Packer Resources.xml
06/20/2015 15:20:32	backColor not supported: Packer.jpg.
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\Bobby_packers\Packer ResourcesTG.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\Bobby_packers\Packer.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\Bobby_packers\PackerTG.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\TG_WTS_AsteroidScanner.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\TG_WTS_CargoPods.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\TG_WTS_IngotsArmors.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\TG_WTS_MiningColonyUpgrade.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\TG_WTS_MiningWeapons.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\TG_WTS_RawMaterialsProcessor.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\WTS_MiscItemsGFX_Override.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\WTS_NewFuels.xml
06/20/2015 15:20:32	Loaded extension: Extensions\TG_WTS_MiningPack\WTS_OreGFX_Override.xml
06/20/2015 15:20:32	Loaded extension: Extensions\Visible Damage V2\Visible Damage-No gameplay change.xml
06/20/2015 15:20:33	backColor not supported: WE/Praetorian.jpg.
06/20/2015 15:20:33	backColor not supported: WE/tenhove.jpg.
06/20/2015 15:20:33	Loaded extension: Extensions\WE5-master\WE_WeaponsExtended.xml
06/20/2015 15:20:33	Loading news.
06/20/2015 15:20:34	All resources downloaded.
06/20/2015 15:20:36	Loaded game file version: 106cc00
06/20/2015 15:20:40	Exception in eq; arg = ((itmGetCategory itm) 4)
06/20/2015 15:20:40	Overlay OnUpdate: Exception in eq; arg = ((itmGetCategory itm) 4) [((itmGetCategory itm) 4)] ### (eq (itmGetCategory itm) 4) ### []: Exception in eq; arg = ((itmGetCategory itm) 4) [((itmGetCategory itm) 4)] ### (eq (itmGetCategory itm) 4) ###
06/20/2015 15:20:43	Exception in setq; arg = (theRoll (random 1 (item (item probTable 0) 0)))
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:43	Exception in sysGetData; arg = ("08040003_oreTable")
06/20/2015 15:20:45	Exception in subtract; arg = ((min (max fromMin x) fromMax) fromMin)
06/20/2015 15:20:45	Exception in setq; arg = (result (@ (power (list result toRange) (list gamma 100)) 0))
06/20/2015 15:20:45	Exception in setq; arg = (toRange (subtract toMax toMin))
06/20/2015 15:20:45	Exception in subtract; arg = ((max 12 (min maxSpeed 35)) 12)
06/20/2015 15:20:45	Exception in setq; arg = (toRange (subtract toMax toMin))
06/20/2015 15:20:45	Exception in setq; arg = (toRange (subtract toMax toMin))
06/20/2015 15:20:45	Exception in setq; arg = (toRange (subtract toMax toMin))
06/20/2015 15:20:45	Exception in subtract; arg = ((max 12 (min maxSpeed 35)) 12)
06/20/2015 15:20:45	Exception in setq; arg = (toRange (subtract toMax toMin))
06/20/2015 15:20:45	Exception in objGetObjRefData; arg = (gSource "home")
06/20/2015 15:20:45	OrderBeginTraffic [freighter Han]: Exception in objGetObjRefData; arg = (gSource "home") [(gSource "home")] ### (objGetObjRefData gSource "home") ###
06/20/2015 15:20:45	OnTrafficControl [Starton Dorado]: Exception in objGetObjRefData; arg = (gSource "home") [(gSource "home")] ### (objGetObjRefData gSource "home") ###
06/20/2015 15:20:46	Exception in if; arg = ((find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))
06/20/2015 15:20:46	Item 4065 Event [Molotok bounty hunter]: Exception in if; arg = ((find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo)))) [((find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))] ### (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo)))) ###
06/20/2015 15:20:46	Exception in shpGetFuelNeeded; arg = (gSource (itmCreate 16444 1))
06/20/2015 15:20:46	Overlay OnUpdate: Exception in shpGetFuelNeeded; arg = (gSource (itmCreate 16444 1)) [(gSource (itmCreate 16444 1))] ### (shpGetFuelNeeded gSource (itmCreate 16444 1)) ### [Manticore-class heavy gunship]: Exception in shpGetFuelNeeded; arg = (gSource (itmCreate 16444 1)) [(gSource (itmCreate 16444 1))] ### (shpGetFuelNeeded gSource (itmCreate 16444 1)) ###
06/20/2015 15:20:46	Exception in not; arg = ((objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0)))
06/20/2015 15:20:46	Item 4065 Event [Molotok bounty hunter]: Exception in not; arg = ((objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) [((objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0)))] ### (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) ###
06/20/2015 15:20:46	Exception in geq; arg = ((objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance")))
06/20/2015 15:20:46	Overlay OnUpdate: Exception in geq; arg = ((objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) [((objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance")))] ### (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) ### []: Exception in geq; arg = ((objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) [((objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance")))] ### (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) ###
06/20/2015 15:20:46	Exception in and; arg = ((itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource))
06/20/2015 15:20:46	Item d9121423 Event [freighter Kennemur]: Exception in and; arg = ((itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) [((itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource))] ### (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) ###
06/20/2015 15:20:46	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:46	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:46	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:46	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:46	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:46	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:47	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:47	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:47	Exception in setq; arg = (behavior (objGetData gSource "behavior"))
06/20/2015 15:20:47	OnOrdersCompleted [freighter Han]: Exception in setq; arg = (behavior (objGetData gSource "behavior")) [(behavior (objGetData gSource "behavior"))] ### (setq behavior (objGetData gSource "behavior")) ###
06/20/2015 15:20:47	Exception in if; arg = ((and aOrderGiver (eq aOrderGiver gPlayerShip) (eq (sovGetDisposition 4098 (objGetSovereign gSource)) "friend") (not (sysFindObject gPlayerShip "sTAEN:100")) (setq theWitness (random (filter (sysFindObject gSource "sTAF Z N:100; -auton; -PlayerShipDrone; -zoanthrope;") theObj (and (objCanDetectTarget theObj gSource) (or (not (eq (shpGetOrder theObj) "escort")) (not (eq (shpGetOrderTarget theObj) gPlayerShip))))))) (not (objGetData gSource "noPiracyCheck"))) (block Nil (objSendMessage gPlayerShip theWitness "Pirate!") (intCommonwealthCrime 2 "piracy")))
06/20/2015 15:20:47	OnDestroy [freighter Han]: Exception in if; arg = ((and aOrderGiver (eq aOrderGiver gPlayerShip) (eq (sovGetDisposition 4098 (objGetSovereign gSource)) "friend") (not (sysFindObject gPlayerShip "sTAEN:100")) (setq theWitness (random (filter (sysFindObject gSource "sTAF Z N:100; -auton; -PlayerShipDrone; -zoanthrope;") theObj (and (objCanDetectTarget theObj gSource) (or (not (eq (shpGetOrder theObj) "escort")) (not (eq (shpGetOrderTarget theObj) gPlayerShip))))))) (not (objGetData gSource "noPiracyCheck"))) (block Nil (objSendMessage gPlayerShip theWitness "Pirate!") (intCommonwealthCrime 2 "piracy"))) [((and aOrderGiver (eq aOrderGiver gPlayerShip) (eq (sovGetDisposition 4098 (objGetSovereign gSource)) "friend") (not (sysFindObject gPlayerShip "sTAEN:100")) (setq theWitness (random (filter (sysFindObject gSource "sTAF Z N:100; -auton; -PlayerShipDrone; -zoanthrope;") theObj (and (objCanDetectTarget theObj gSource) (or (not (eq (shpGetOrder theObj) "escort")) (not (eq (shpGetOrderTarget theObj) gPlayerShip))))))) (not (objGetData gSource "noPiracyCheck"))) (block Nil (objSendMessage gPlayerShip theWitness "Pirate!") (intCommonwealthCrime 2 "piracy")))] ### (if (and aOrderGiver (eq aOrderGiver gPlayerShip) (eq (sovGetDisposition 4098 (objGetSovereign gSource)) "friend") (not (sysFindObject gPlayerShip "sTAEN:100")) (setq theWitness (random (filter (sysFindObject gSource "sTAF Z N:100; -auton; -PlayerShipDrone; -zoanthrope;") theObj (and (objCanDetectTarget theObj gSource) (or (not (eq (shpGetOrder theObj) "escort")) (not (eq (shpGetOrderTarget theObj) gPlayerShip))))))) (not (objGetData gSource "noPiracyCheck"))) (block Nil (objSendMessage gPlayerShip theWitness "Pirate!") (intCommonwealthCrime 2 "piracy"))) ###
06/20/2015 15:20:47	Exception in setq; arg = (theType (objGetType aObjDestroyed))
06/20/2015 15:20:47	OnGlobalObjDestroyed [8020102]: Exception in setq; arg = (theType (objGetType aObjDestroyed)) [(theType (objGetType aObjDestroyed))] ### (setq theType (objGetType aObjDestroyed)) ###
06/20/2015 15:20:47	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:47	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:47	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:47	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:47	Exception in not; arg = ((objIsAbandoned gSource))
06/20/2015 15:20:47	OnConstruction [Ferian colony]: Exception in not; arg = ((objIsAbandoned gSource)) [((objIsAbandoned gSource))] ### (not (objIsAbandoned gSource)) ###
06/20/2015 15:20:47	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:47	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:47	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:47	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:47	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:47	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:47	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:47	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:47	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:47	Item d25c4327 Event [Viking II-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:48	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:48	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:48	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:48	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:48	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:48	Item d9121423 Event [freighter Kennemur]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:48	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:48	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:48	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:48	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:48	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:48	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:48	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:48	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:48	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:48	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:48	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:48	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:48	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:49	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:49	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:49	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:49	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:49	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:49	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:49	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:49	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:49	Item d25c4327 Event [Viking II-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:49	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:49	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:49	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:49	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:49	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:49	Item d9121423 Event [freighter Kennemur]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:49	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:49	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:49	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:49	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:49	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:49	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:49	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:49	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:49	Exception in not; arg = ((objIsAbandoned gSource))
06/20/2015 15:20:50	OnProduceMissiles [Sapiens compound]: Exception in not; arg = ((objIsAbandoned gSource)) [((objIsAbandoned gSource))] ### (not (objIsAbandoned gSource)) ###
06/20/2015 15:20:50	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:50	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:50	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:50	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:50	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:50	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:50	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:50	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:50	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:50	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:50	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:50	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:50	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:50	Item d25c4327 Event [Viking II-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:50	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:50	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:50	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:50	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:50	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:50	Item d9121423 Event [freighter Kennemur]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:50	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:50	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:51	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:51	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:51	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:51	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:51	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:51	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:51	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:51	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:51	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:51	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:51	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:51	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:51	Exception in setq; arg = (behavior (objGetData gSource "behavior"))
06/20/2015 15:20:51	OnOrdersCompleted [frieghter Dick]: Exception in setq; arg = (behavior (objGetData gSource "behavior")) [(behavior (objGetData gSource "behavior"))] ### (setq behavior (objGetData gSource "behavior")) ###
06/20/2015 15:20:51	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:51	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:51	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:51	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:51	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:51	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:51	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:51	Item d25c4327 Event [Viking II-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:51	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:52	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:52	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:52	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:52	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:52	Item d9121423 Event [freighter Kennemur]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:52	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:52	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:52	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:52	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:52	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:52	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:52	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:52	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:52	Exception in if; arg = ((ls (count (sysFindObject homeObj "s D:0010300C_traffic;")) maxTraffic) (block (theShip) (setq theShip (sysCreateShip 1081348 (random (sysFindObject Nil "G -uncharted;")) 4098 1060876)) (objSetObjRefData theShip "home" homeObj) (objFireEvent theShip "OrderBeginTraffic")))
06/20/2015 15:20:52	OnTrafficControl [Starton Dorado]: Exception in if; arg = ((ls (count (sysFindObject homeObj "s D:0010300C_traffic;")) maxTraffic) (block (theShip) (setq theShip (sysCreateShip 1081348 (random (sysFindObject Nil "G -uncharted;")) 4098 1060876)) (objSetObjRefData theShip "home" homeObj) (objFireEvent theShip "OrderBeginTraffic"))) [((ls (count (sysFindObject homeObj "s D:0010300C_traffic;")) maxTraffic) (block (theShip) (setq theShip (sysCreateShip 1081348 (random (sysFindObject Nil "G -uncharted;")) 4098 1060876)) (objSetObjRefData theShip "home" homeObj) (objFireEvent theShip "OrderBeginTraffic")))] ### (if (ls (count (sysFindObject homeObj "s D:0010300C_traffic;")) maxTraffic) (block (theShip) (setq theShip (sysCreateShip 1081348 (random (sysFindObject Nil "G -uncharted;")) 4098 1060876)) (objSetObjRefData theShip "home" homeObj) (objFireEvent theShip "OrderBeginTraffic"))) ###
06/20/2015 15:20:52	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:52	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:52	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:52	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:52	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:52	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:52	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:53	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:53	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:53	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:53	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:53	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:53	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:53	Item d25c4327 Event [Viking II-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:53	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:53	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:53	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:53	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:53	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:53	Item d9121423 Event [freighter Kennemur]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:53	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:53	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:53	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:53	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:53	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:53	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:53	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:53	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:53	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:53	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:53	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:53	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:54	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:54	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:54	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:54	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:54	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:54	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:54	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:54	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:54	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:54	Item d25c4327 Event [Viking II-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:54	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:54	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:54	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:54	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:54	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:54	Item d9121423 Event [freighter Kennemur]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:54	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:54	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:54	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:54	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:54	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:55	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:55	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:55	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:55	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:55	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:55	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:55	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:55	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:55	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:55	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:55	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:55	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:55	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:55	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:55	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:55	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:55	Item d25c4327 Event [Viking II-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:55	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:55	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:55	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:55	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:55	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:55	Item d9121423 Event [freighter Kennemur]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:56	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:56	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:56	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:56	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:56	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:56	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:56	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:56	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:56	Exception in not; arg = ((objIsAbandoned gSource))
06/20/2015 15:20:56	OnProduceMissiles [Sapiens compound]: Exception in not; arg = ((objIsAbandoned gSource)) [((objIsAbandoned gSource))] ### (not (objIsAbandoned gSource)) ###
06/20/2015 15:20:56	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:56	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:56	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:56	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:56	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:56	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:56	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:56	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:56	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:56	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:56	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:56	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:56	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:57	Item d25c4327 Event [Viking II-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:57	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:57	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:57	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:57	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:57	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:57	Item d9121423 Event [freighter Kennemur]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:57	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:57	Item d25c4326 Event [freighter Rance]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:57	Exception in msnGetData; arg = (gSource "state")
06/20/2015 15:20:57	OnUpdate [Benedict Training]: Exception in msnGetData; arg = (gSource "state") [(gSource "state")] ### (msnGetData gSource "state") ###
06/20/2015 15:20:57	Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem))
06/20/2015 15:20:57	Item d25c4327 Event [Viking-class gunship]: Exception in if; arg = ((itmIsDamaged gItem) (shpRepairItem gSource gItem)) [((itmIsDamaged gItem) (shpRepairItem gSource gItem))] ### (if (itmIsDamaged gItem) (shpRepairItem gSource gItem)) ###
06/20/2015 15:20:57	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:57	Item 405b Event [T31-class armed transport]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:57	Exception in eq; arg = (gSource gPlayerShip)
06/20/2015 15:20:57	Overlay OnUpdate: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ### [Manticore-class heavy gunship]: Exception in eq; arg = (gSource gPlayerShip) [(gSource gPlayerShip)] ### (eq gSource gPlayerShip) ###
06/20/2015 15:20:57	Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))
06/20/2015 15:20:57	Overlay OnUpdate: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ### []: Exception in if; arg = ((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) [((and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1))] ### (if (and (geq (objGetOverlayData gSource aOverlayID "Time") (multiply 15 (objGetOverlayData gSource aOverlayID "UpdateInstance"))) (ls (ObjGetDistance gPlayer (SysFindObject gPlayer "GN")) 30)) (block Nil (if (eq (typGetData 4097 "WE_RandomizerOnSwitch") 1) (if (gr (count (we_findTheShips)) 40) (objFireOverlayEvent gSource aOverlayID "LagFix") (objFireOverlayEvent gSource aOverlayID "WERandomize")))) (objIncOverlayData gSource aOverlayID "Time" 1)) ###
06/20/2015 15:20:57	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:57	Item d9121424 Event [Drake Ammo Depot]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:57	Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))
06/20/2015 15:20:58	Item d9121424 Event [Manticore-class heavy gunship]: Exception in if; arg = ((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) [((and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount)))))] ### (if (and (itmGetProperty gItem "installed") (objGetItemProperty gSource gItem "enabled") (not (itmGetProperty gItem "damaged")) (objIsShip gSource)) (block (theData maxArmor hullHP hullMaxHP) (if (not (setq theData (itmGetStaticData gItem "regenArmor"))) (setq theData 1)) (if (not (setq maxArmor (itmGetStaticData gItem "maxArmorLevel"))) (setq maxArmor 25)) (for i 0 (subtract (shpGetArmorCount gSource) 1) (if (geq (objGetArmorDamage gSource i) 1) (block (armorItem repairLevel tics) (setq armorItem (shpGetArmor gSource i)) (setq repairLevel (armGetRepairTech (itmGetType armorItem))) (setq tics (switch (and (gr repairLevel maxArmor)) 0 (@ theData 1) (@ theData (subtract repairLevel 1)) theData)) (if (geq tics 1) (block (theCount healHp) (setq theCount (objGetData gSource (cat "save912Armor" i))) (setq theCount (if theCount (add theCount tics) tics)) (setq healHP (divide theCount 6)) (if (geq healHP 1) (block Nil (objRepairArmor gSource i healHP) (setq theCount (modulo theCount 6)) (itmSetKnown gItem))) (objSetData gSource (cat "save912Armor" i) theCount)))))) (setq hullHP (objGetProperty gSource "interiorHP")) (setq hullMaxHP (objGetProperty gSource "maxInteriorHP")) (if (and (gr hullMaxHP 0) (ls hullHP hullMaxHP)) (block (secsToHeal theCount healHP) (setq secsToHeal 6) (setq theCount (objGetData gSource "save912Hull")) (setq theCount (if theCount (add theCount 1) 1)) (setq healHP (divide theCount secsToHeal)) (if (geq healHP 1) (block (newHullHP) (setq newHullHP (min (add hullHP healHP) hullMaxHP)) (objSetProperty gSource "interiorHP" newHullHP) (setq theCount (modulo theCount secsToHeal)) (itmSetKnown gItem))) (objSetData gSource "save912Hull" theCount))))) ###
06/20/2015 15:20:58	Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))
06/20/2015 15:20:58	Item 4065 Event [Molotok bounty hunter]: Exception in block; arg = ((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) [((ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots)))))))] ### (block (ammolist realshots shots virtualUNID) (if (not (objIsDockedAt gPlayership (@ (sysFindObject gPlayership "sN:3") 0))) (block Nil (setq ammolist (itmGetData gItem "ammolist")) (setq virtualUnid (typGetDataField (itmgettype gItem) "ammoType")) (setq realshots 0) (objEnumItems gSource "m" ammo (if (find ammolist (itmGetType ammo)) (setq realshots (add realshots (itmGetCount ammo))))) (objEnumItems gSource "*V" theItem (if (eq (itmGetType theItem) virtualUNID) (setq shots (itmGetCount theItem)))) (switch (gr realshots shots) (objAddItem gSource (itmCreate virtualUNID (subtract realshots shots))) (ls realshots shots) (objRemoveItem gSource (itmCreate virtualUNID (subtract shots realshots))))))) ###
06/20/2015 15:20:58	Crash in CCodeChainCtx::Run
06/20/2015 15:20:58	Crash in CCodeChainCtx::Run
06/20/2015 15:20:58	Unable to continue due to program error.

program state: OnAnimate
program state: updating object
obj class: CShip
obj name: Manticore-class heavy gunship
obj pointer: 11f220e8
m_pDocked: none
m_pExitGate: none
CPlayerShipController
m_pStation: none
m_pTarget: none
m_pDestination: none
game state: in game


Please contact [email protected] with a copy of Debug.log and your save file. We are sorry for the inconvenience.