Difference between revisions of "Script: Polymrphbase"
From Ultima Online: The Second Age
(Created page with " <span style="color:#0000FF">inherits</span> sumdaem; <span style="color:#0000FF">member</span> <span style="color:#0000FF">int</span> picking; <span style="color:#0000...") |
|||
Line 28: | Line 28: | ||
[[Engine Function:_setHue|<span style="color:#FF0000;font-weight:bold">setHue</span>]](user, 0x00); | [[Engine Function:_setHue|<span style="color:#FF0000;font-weight:bold">setHue</span>]](user, 0x00); | ||
<span style="color:#0000FF">int</span> Q4NC = ([[Engine Function:_getSkillLevel|<span style="color:#FF0000;font-weight:bold">getSkillLevel</span>]](user, 0x19) / 0x05) * 0x05; | <span style="color:#0000FF">int</span> Q4NC = ([[Engine Function:_getSkillLevel|<span style="color:#FF0000;font-weight:bold">getSkillLevel</span>]](user, 0x19) / 0x05) * 0x05; | ||
− | <span style="color:#0000FF">if</span> ([[ | + | <span style="color:#0000FF">if</span> ([[Script_Function:_isScroll|<span style="color:#2B91AF">isScroll</span>]]()) |
{ | { | ||
Q4NC = 0x3C; | Q4NC = 0x3C; |
Latest revision as of 14:14, 18 October 2018
inherits sumdaem;
member int picking; member obj Q62D;
forward void Q4MU(obj user, int Q4NC);
function int Q43R(obj user, int newType) { int Q5NC = 0x00; if (Q50G(user)) { if (newType >= 0x00) { if (isRiding(user)) { int Q52Q = unRide(user); } if (!(hasObjVar(Q62D, "oldBodyType"))) { setObjVar(Q62D, "oldBodyType", getObjType(Q62D)); } if (!(hasObjVar(Q62D, "oldHue"))) { setObjVar(Q62D, "oldHue", getHue(Q62D)); } setType(user, newType); setHue(user, 0x00); int Q4NC = (getSkillLevel(user, 0x19) / 0x05) * 0x05; if (isScroll()) { Q4NC = 0x3C; } Q4MU(user, Q4NC); Q5NC = 0x01; } } Q5UQ(this); return (Q5NC); }
function void Q43S(obj user, int newType) { Q43R(user, newType); return (); }
trigger typeselected(0x1B) { if (picking == 0x00) { return (0x00); } picking = 0x00; if (listindex == 0x00) { return (0x00); } int newType = 0x00 - 0x01; switch (objtype) { case 0x20D8 newType = 0x12; break; case 0x20F5 newType = 0x1D; break; case 0x20DE newType = 0x23; break; case 0x20DF newType = 0x01; break; case 0x20E9 newType = 0x37; break; case 0x20CD newType = 0x0190; break; case 0x20CE newType = 0x0191; break; case 0x20CF newType = 0xD3; break; case 0x20DB newType = 0xD4; break; case 0x20E1 newType = 0xD5; break; case 0x20D1 newType = 0xD0; break; case 0x20D3 newType = 0x09; break; case 0x20D5 newType = 0xD9; break; case 0x20D9 newType = 0x04; break; case 0x20E0 newType = 0x11; break; case 0x20E8 newType = 0x33; break; case 0x20EA newType = 0xE1; break; case 0x2119 newType = 0xD6; break; default systemMessage(user, "Unknown body type"); break; } Q43S(Q62D, newType); return (0x00); }
function void Q4MV(obj user) { list monsters = 0x20CF, "Bear, Black", 0x20DB, "Bear, Grizzly", 0x20E1, "Bear, Polar", 0x20D1, "Chicken", 0x20D3, "Daemon", 0x20D5, "Dog", 0x20D8, "Ettin", 0x20D9, "Gargoyle", 0x20F5, "Gorilla", 0x20CD, "Human, Male", 0x20CE, "Human, Female", 0x20DE, "Lizard Man", 0x20DF, "Ogre", 0x20E0, "Orc", 0x2119, "Panther", 0x20E8, "Slime", 0x20E9, "Troll", 0x20EA, "Wolf"; Q62D = user; picking = 0x01; selectType(user, this, 0x1B, "Choose a Creature", monsters); return (); }
function void Q4MU(obj user, int Q4NC) { obj Q5F4; obj Q69F; list Q5FH; int Q51J; if (hasScript(Q62D, "remincognito")) { list Q5DR; message(Q62D, "undoincognito", Q5DR); } for(int x = 0x01; x < 0x11; x++) { Q5F4 = getItemAtSlot(Q62D, x); if (isValid(Q5F4)) { debugMessage("removing items"); Q51J = putObjContainer(Q5F4, Q62D); appendToList(Q5FH, Q5F4); setObjVar(Q5F4, "objSlot", x); if (!Q51J) { debugMessage("item stacker error"); } } } setObjVar(user, "notMyItems", Q5FH); attachScript(user, "polychec"); callback(user, Q4NC, 0x14)return(); }