Script Function: Q4JQ

From Ultima Online: The Second Age
Jump to: navigation, search
 function int Q4JQ(obj user, loc place)
 {
   int Q5NC = 0x00;
   int damage;
   loc Q4VS = getLocation(user);
   faceHere(user, getDirectionInternal(Q4VS, place));
   list Q5FG;
   getObjectsAt(Q5FG, place);
   if (numInList(Q5FG) == 0x00)
   {
     if (!getCompileFlag(0x01))
     {
       Q5UL(user, Q4E1, 0x02, 0x00);
     }
     Q4E1 = place;
     obj Q67S = createGlobalNPCAt(0x023D, Q4E1, 0x00);
     if (Q67S != NULL())
     {
       Q5NC = 0x01;
       copyControllerInfo(Q67S, user);
       attachScript(Q67S, "vortexai");
       attachScript(Q67S, "destcrea");
       setObjVar(Q67S, "summonDifficulty", 0x0320);
       sfx(Q4E1, 0x0212, 0x00);
       callback(Q67S, 0x5A, 0x08);
       int Q4XF = doNPCHandleStates(Q67S);
     }
   }
   else
   {
     barkTo(user, user, "That location is blocked.");
   }
   Q5UQ(this);
   return (Q5NC);
 }