Difference between revisions of "Script Function: Q440"

Revision as of 15:04, 12 October 2018

 function obj Q440(obj ship, loc where)
 {
   list Q5G9;
   getObjectsOnMulti(Q5G9, ship);
   if (numInList(Q5G9) > 0x00)
   {
     return (NULL());
   }
   obj Q62K = createGlobalObjectAt(0x0EFA, where);
   if (Q62K == NULL())
   {
     return (NULL());
   }
   setType(Q62K, 0x14F2);
   setStatus(Q62K, 0x80, 0x01);
   int Q5SR = 0x00;
   if (hasObjVar(ship, "myshiptype"))
   {
     Q5SR = getObjVar(ship, "myshiptype");
     setObjVar(Q62K, "myshiptype", Q5SR);
   }
   if (hasObjVar(ship, "mymultiname"))
   {
     string Q57O = getObjVar(ship, "mymultiname");
     setObjVar(Q62K, "mymultiname", Q57O);
   }
   Q43Y(Q62K, ship, where);
   setObjVar(Q62K, "claimloc", where);
   setObjVar(Q62K, "shipobj", ship);
   attachScript(Q62K, "shipclaim");
   int Q52Q = putObjContainer(ship, Q62K);
   return (Q62K);
 }