Script Function: Q47O

From Ultima Online: The Second Age
Jump to: navigation, search
 function void Q47O(obj usedon, obj user)
 {
   if (!isEditing(user))
   {
     return ();
   }
   systemMessage(user, getName(usedon));
   systemMessage(user, "Loc=<" + getLocation(usedon) + ">");
   int num;
   int Q5T5;
   int mod;
   int Q4PP;
   if (isContainer(usedon))
   {
     int Q4Q1 = openContainer(user, usedon);
     list Q4E4;
     getContents(Q4E4, usedon);
     systemMessage(user, "# Items contained=" + numInList(Q4E4));
   }
   if (isMobile(usedon))
   {
     systemMessage(user, "Notoriety=" + getNotoriety(usedon));
     systemMessage(user, "Fame=" + getFame(usedon));
     systemMessage(user, "Karma=" + getKarma(usedon));
     getWeaponClass(usedon, num, Q5T5, mod, Q4PP);
     systemMessage(user, "NaturalWC=" + num + "d" + Q5T5 + "+" + mod);
     int s;
     int d;
     int i;
     s = getRealStat(usedon, 0x00);
     d = getRealStat(usedon, 0x01);
     i = getRealStat(usedon, 0x02);
     systemMessage(user, "Stats=" + s + "s " + d + "d " + i + "i  Total=" + (s + d + i));
     s = getStatMod(usedon, 0x00);
     d = getStatMod(usedon, 0x01);
     i = getStatMod(usedon, 0x02);
     systemMessage(user, "StatMods=" + s + "s " + d + "d " + i + "i  Total=" + (s + d + i));
     systemMessage(user, "Skill Total=" + getSkillTotal(usedon));
     int Q57X = 0x00;
     for(i = 0x00; i < 0x2E; i++)
     {
       mod = getSkillMod(usedon, i);
       if (mod > 0x00)
       {
         Q57X = Q57X + mod;
         systemMessage(user, "#" + i + ": " + getSkillName(i) + " mod=" + mod);
       }
     }
     systemMessage(user, "Total skill mods=" + Q57X);
   }
   else
   {
     systemMessage(user, "Type=" + getObjType(usedon));
     int Q4XG = getHue(usedon);
     if (Q4XG != 0x00)
     {
       systemMessage(user, "Hue=" + Q4XG);
     }
   }
   systemMessage(user, "Value=" + getValue(usedon));
   systemMessage(user, "Weight=" + getWeight(usedon));
   if (isWeapon(usedon))
   {
     getWeaponClass(usedon, num, Q5T5, mod, Q4PP);
     systemMessage(user, "WC=" + num + "d" + Q5T5 + "+" + mod);
     systemMessage(user, "AC=" + getCurArmorClass(usedon));
     systemMessage(user, "HP=(" + getWeaponCurHP(usedon) + "/" + getWeaponMaxHP(usedon) + ")");
     systemMessage(user, "Speed=" + getWeaponSpeed(usedon));
     systemMessage(user, "Eqpos=" + getEquipSlot(usedon));
     return ();
   }
   return ();
 }