Difference between revisions of "Script: Userisfishing"
From Ultima Online: The Second Age
(Created page with " <span style="color:#0000FF">inherits</span> sndfx; forward <span style="color:#0000FF">void</span> <span style="color:#2B91AF">cleanup</span>(); forward <s...") |
|||
Line 275: | Line 275: | ||
{ | { | ||
location = [[Engine Function:_getObjVar|<span style="color:#FF0000;font-weight:bold">getObjVar</span>]](pole, <span style="color:#800000">"location"</span>); | location = [[Engine Function:_getObjVar|<span style="color:#FF0000;font-weight:bold">getObjVar</span>]](pole, <span style="color:#800000">"location"</span>); | ||
− | Q4Q1 = [[ | + | Q4Q1 = [[Engine Function:_teleport|<span style="color:#FF0000;font-weight:bold">teleport</span>]](pole, location); |
} | } | ||
<span style="color:#0000FF">return</span> (); | <span style="color:#0000FF">return</span> (); | ||
} | } |
Revision as of 06:45, 19 October 2018
inherits sndfx;
forward void cleanup(); forward void Q5NI();
trigger message("fish") { obj pole = args[0x00]; loc there = args[0x01]; setObjVar(this, "there", there); loc Q4VS = getLocation(this); int Q4ID = getDirectionInternal(Q4VS, there); faceHere(this, Q4ID); if ((isEquipped(pole))) { setObjVar(this, "equipped", 0x01); } else { obj Q47F = getBackpack(this); obj rightHand = getItemAtSlot(this, 0x01); if (!(rightHand == NULL())) { if (!(putObjContainer(rightHand, Q47F))) { return (0x00); } } obj leftHand = getItemAtSlot(this, 0x02); if (!(leftHand == NULL())) { if (!(putObjContainer(leftHand, Q47F))) { return (0x00); } } loc Q61U; obj container; int contained = 0x00; if (isInContainer(pole)) { container = containedBy(pole); setObjVar(pole, "container", container); } else { Q61U = getLocation(pole); setObjVar(pole, "location", Q61U); } if (!(putObjContainer(pole, this))) { } if (!(equipObj(pole, this, 0x01))) { return (0x00); } setObjVar(this, "rightHand", rightHand); setObjVar(this, "leftHand", leftHand); setObjVar(this, "pole", pole); } animateMobile(this, 0x0C, 0x07, 0x01, 0x00, 0x00); callback(this, 0x02, 0x4B); return (0x01); }
trigger callback(0x4B) { obj rightHand; obj leftHand; obj pole; int Q4Q1; loc there; if (hasObjVar(this, "there")) { there = getObjVar(this, "there"); } if (!(hasObjVar(this, "splash"))) { doLocAnimation(there, 0x352D, 0x04, 0x10, 0x00, 0x00); sfx(getLocation(this), 0x023F, 0x00); setObjVar(this, "splash", 0x01); callback(this, 0x05, 0x4B); return (0x00); } if (!(hasObjVar(this, "equipped"))) { if (hasObjVar(this, "rightHand")) { rightHand = getObjVar(this, "rightHand"); } else { cleanup(); return (0x00); } if (hasObjVar(this, "leftHand")) { leftHand = getObjVar(this, "leftHand"); } else { cleanup(); return (0x00); } if (hasObjVar(this, "pole")) { pole = getObjVar(this, "pole"); } else { cleanup(); return (0x00); } Q5NI(); if (!(rightHand == NULL())) { if (!(equipObj(rightHand, this, 0x01))) { cleanup(); return (0x00); } } if (!(leftHand == NULL())) { if (!(equipObj(leftHand, this, 0x02))) { cleanup(); return (0x00); } } } if (!testSkill(this, 0x12)) { systemMessage(this, "You fish a while, but fail to catch anything."); cleanup(); return (0x00); } string Q5YJ = getObjVar(this, "targetType"); int Q4PG; int Q4PJ; obj Q604; if (Q5YJ == "object") { debugMessage("fishing on objects"); list Q686 = 0x1796, 0x1797, 0x1798, 0x1799, 0x179A, 0x179B, 0x179C, 0x179D, 0x179E, 0x179F, 0x17A0, 0x17A1, 0x17A2, 0x17A3, 0x17A4, 0x17A5, 0x17A6, 0x17A7, 0x17A8, 0x17A9, 0x17AA, 0x17AB, 0x17AC, 0x17AD, 0x346E, 0x346F, 0x3470, 0x3471, 0x3472, 0x3473, 0x3474, 0x3475, 0x3476, 0x3477, 0x3478, 0x3479, 0x347A, 0x347B, 0x347C, 0x347D, 0x347E, 0x347F, 0x3480, 0x3481, 0x3482, 0x3483, 0x3484, 0x3485, 0x3486, 0x3487, 0x3488, 0x3489, 0x348A, 0x348B, 0x348C, 0x348D, 0x348E, 0x348F, 0x3490, 0x3491, 0x3492, 0x3493, 0x3494, 0x3495, 0x3496, 0x3497, 0x3498, 0x3499, 0x349A, 0x349B, 0x349C, 0x349D, 0x349E, 0x349F, 0x34A0, 0x34A1, 0x34A2, 0x34A3, 0x34A4, 0x34A5, 0x34A6, 0x34A7, 0x34A8, 0x34A9, 0x34AA, 0x34AB, 0x34AC, 0x34AD, 0x34AE, 0x34AF, 0x34A6, 0x34B1, 0x34B2, 0x34B3, 0x34B4, 0x34B5, 0x34B6, 0x34B7, 0x34B8, 0x34B9, 0x34BA, 0x34BB, 0x34BD, 0x34BE, 0x34BF, 0x34C0, 0x34C2, 0x34C3, 0x34C4, 0x34C5, 0x34C7, 0x34C8, 0x34C9, 0x34CA; list Q5FG; getObjectsInRange(Q5FG, there, 0x02); obj Q61Z; int Q621; list Q4PH; int Q4PI; int i; for(i = 0x00; i < numInList(Q5FG); i++) { Q61Z = Q5FG[i]; Q621 = getObjType(Q61Z); if (isInList(Q686, Q621)) { Q4Q1 = getResource(Q4PG, Q61Z, "fish", 0x03, 0x02); if (Q4PG > 0x00) { appendToList(Q4PH, Q61Z); Q4PI++; if (Q4PI > 0x03) { break; } } } else { i++; continue; } } debugMessage("fish tiles"); if (Q4PI > 0x03) { Q4PJ = random(0x09CC, 0x09CF); Q604 = createNoResObjectAt(Q4PJ, getLocation(this)); for(i = 0x00; i < 0x04; i++) { Q61Z = Q4PH[i]; transferResources(Q604, Q61Z, 0x01, "fish"); } systemMessage(this, "You pull out a nice fish!"); } else { barkTo(this, this, "The fish don't seem to be biting here."); } } if (Q5YJ == "terrain") { debugMessage("fishing on terrain"); obj Q4D6 = getChunkEgg(there); string Q5WN = objToStr(Q4D6); debugMessage("chunk egg = " + Q5WN); Q4Q1 = getResource(Q4PG, Q4D6, "fish", 0x03, 0x02); debugMessage("FishAvailable = " + Q4PG); if (Q4PG > 0x04) { Q4PJ = random(0x09CC, 0x09CF); Q604 = createNoResObjectAt(Q4PJ, getLocation(this)); transferResources(Q604, Q4D6, 0x04, "fish"); systemMessage(this, "You pull out a nice fish!"); } else { barkTo(this, this, "The fish don't seem to be biting here."); } } cleanup(); return (0x00); }
function void cleanup() { if (hasObjVar(this, "pole")) { removeObjVar(this, "pole"); } if (hasObjVar(this, "targetType")) { removeObjVar(this, "targetType"); } if (hasObjVar(this, "there")) { removeObjVar(this, "there"); } if (hasObjVar(this, "splash")) { removeObjVar(this, "splash"); } if (hasObjVar(this, "rightHand")) { removeObjVar(this, "rightHand"); } if (hasObjVar(this, "leftHand")) { removeObjVar(this, "leftHand"); } if (hasObjVar(this, "staff")) { removeObjVar(this, "staff"); } if (hasObjVar(this, "equipped")) { removeObjVar(this, "equipped"); } else { Q5NI(); } if (hasObjVar(this, "poleID")) { removeObjVar(this, "poleID"); } detachScript(this, "userisfishing"); return (); }
function void Q5NI() { obj pole = getObjVar(this, "poleID"); obj container; loc location; int Q4Q1; if (hasObjVar(pole, "container")) { container = getObjVar(pole, "container"); Q4Q1 = putObjContainer(pole, container); } else { location = getObjVar(pole, "location"); Q4Q1 = teleport(pole, location); } return (); }