Script: Userisfishing - Revision history

Grimoric at 07:34, 19 October 2018

2018-10-19T07:34:30Z

Grimoric at 05:45, 19 October 2018

2018-10-19T05:45:08Z

Grimoric: Created page with " inherits sndfx; forward void cleanup(); forward
2018-10-05T06:12:17Z

Created page with " inherits sndfx; forward void cleanup(); forward <s..."

New page
inherits [[Script:_Sndfx|sndfx]];

forward void [[cleanup|cleanup]]();
forward void [[Script_Function:_Q5NI|Q5NI]]();

trigger message("fish")
{
obj pole = args[0x00];
loc there = args[0x01];
[[Engine Function:_setObjVar|setObjVar]](this, "there", there);
loc Q4VS = [[Engine Function:_getLocation|getLocation]](this);
int Q4ID = [[Engine Function:_getDirectionInternal|getDirectionInternal]](Q4VS, there);
[[Engine Function:_faceHere|faceHere]](this, Q4ID);
if (([[Engine Function:_isEquipped|isEquipped]](pole)))
{
[[Engine Function:_setObjVar|setObjVar]](this, "equipped", 0x01);
}
else
{
obj Q47F = [[Engine Function:_getBackpack|getBackpack]](this);
obj rightHand = [[Engine Function:_getItemAtSlot|getItemAtSlot]](this, 0x01);
if (!(rightHand == [[Engine Function:_NULL|NULL]]()))
{
if (!([[Engine Function:_putObjContainer|putObjContainer]](rightHand, Q47F)))
{
return (0x00);
}
}
obj leftHand = [[Engine Function:_getItemAtSlot|getItemAtSlot]](this, 0x02);
if (!(leftHand == [[Engine Function:_NULL|NULL]]()))
{
if (!([[Engine Function:_putObjContainer|putObjContainer]](leftHand, Q47F)))
{
return (0x00);
}
}
loc Q61U;
obj container;
int contained = 0x00;
if ([[Engine Function:_isInContainer|isInContainer]](pole))
{
container = [[Engine Function:_containedBy|containedBy]](pole);
[[Engine Function:_setObjVar|setObjVar]](pole, "container", container);
}
else
{
Q61U = [[Engine Function:_getLocation|getLocation]](pole);
[[Engine Function:_setObjVar|setObjVar]](pole, "location", Q61U);
}
if (!([[Engine Function:_putObjContainer|putObjContainer]](pole, this)))
{
}
if (!([[Engine Function:_equipObj|equipObj]](pole, this, 0x01)))
{
return (0x00);
}
[[Engine Function:_setObjVar|setObjVar]](this, "rightHand", rightHand);
[[Engine Function:_setObjVar|setObjVar]](this, "leftHand", leftHand);
[[Engine Function:_setObjVar|setObjVar]](this, "pole", pole);
}
[[Engine Function:_animateMobile|animateMobile]](this, 0x0C, 0x07, 0x01, 0x00, 0x00);
[[Engine Function:_callback|callback]](this, 0x02, 0x4B);
return (0x01);
}

trigger callback(0x4B)
{
obj rightHand;
obj leftHand;
obj pole;
int Q4Q1;
loc there;
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "there"))
{
there = [[Engine Function:_getObjVar|getObjVar]](this, "there");
}
if (!([[Engine Function:_hasObjVar|hasObjVar]](this, "splash")))
{
[[Engine Function:_doLocAnimation|doLocAnimation]](there, 0x352D, 0x04, 0x10, 0x00, 0x00);
sfx([[Engine Function:_getLocation|getLocation]](this), 0x023F, 0x00);
[[Engine Function:_setObjVar|setObjVar]](this, "splash", 0x01);
[[Engine Function:_callback|callback]](this, 0x05, 0x4B);
return (0x00);
}
if (!([[Engine Function:_hasObjVar|hasObjVar]](this, "equipped")))
{
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "rightHand"))
{
rightHand = [[Engine Function:_getObjVar|getObjVar]](this, "rightHand");
}
else
{
[[cleanup|cleanup]]();
return (0x00);
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "leftHand"))
{
leftHand = [[Engine Function:_getObjVar|getObjVar]](this, "leftHand");
}
else
{
[[cleanup|cleanup]]();
return (0x00);
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "pole"))
{
pole = [[Engine Function:_getObjVar|getObjVar]](this, "pole");
}
else
{
[[cleanup|cleanup]]();
return (0x00);
}
[[Script_Function:_Q5NI|Q5NI]]();
if (!(rightHand == [[Engine Function:_NULL|NULL]]()))
{
if (!([[Engine Function:_equipObj|equipObj]](rightHand, this, 0x01)))
{
[[cleanup|cleanup]]();
return (0x00);
}
}
if (!(leftHand == [[Engine Function:_NULL|NULL]]()))
{
if (!([[Engine Function:_equipObj|equipObj]](leftHand, this, 0x02)))
{
[[cleanup|cleanup]]();
return (0x00);
}
}
}
if (![[Engine Function:_testSkill|testSkill]](this, 0x12))
{
[[Engine Function:_systemMessage|systemMessage]](this, "You fish a while, but fail to catch anything.");
[[cleanup|cleanup]]();
return (0x00);
}
string Q5YJ = [[Engine Function:_getObjVar|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;
[[Engine Function:_getObjectsInRange|getObjectsInRange]](Q5FG, there, 0x02);
obj Q61Z;
int Q621;
list Q4PH;
int Q4PI;
int i;
for(i = 0x00; i < [[Engine Function:_numInList|numInList]](Q5FG); i++)
{
Q61Z = Q5FG[i];
Q621 = [[Engine Function:_getObjType|getObjType]](Q61Z);
if ([[Engine Function:_isInList|isInList]](Q686, Q621))
{
Q4Q1 = [[Engine Function:_getResource|getResource]](Q4PG, Q61Z, "fish", 0x03, 0x02);
if (Q4PG > 0x00)
{
[[Engine Function:_appendToList|appendToList]](Q4PH, Q61Z);
Q4PI++;
if (Q4PI > 0x03)
{
break;
}
}
}
else
{
i++;
continue;
}
}
debugMessage("fish tiles");
if (Q4PI > 0x03)
{
Q4PJ = [[Engine Function:_random|random]](0x09CC, 0x09CF);
Q604 = [[Engine Function:_createNoResObjectAt|createNoResObjectAt]](Q4PJ, [[Engine Function:_getLocation|getLocation]](this));
for(i = 0x00; i < 0x04; i++)
{
Q61Z = Q4PH[i];
[[Engine Function:_transferResources|transferResources]](Q604, Q61Z, 0x01, "fish");
}
[[Engine Function:_systemMessage|systemMessage]](this, "You pull out a nice fish!");
}
else
{
[[Engine Function:_barkTo|barkTo]](this, this, "The fish don't seem to be biting here.");
}
}
if (Q5YJ == "terrain")
{
debugMessage("fishing on terrain");
obj Q4D6 = [[Engine Function:_getChunkEgg|getChunkEgg]](there);
string Q5WN = [[Engine Function:_objToStr|objToStr]](Q4D6);
debugMessage("chunk egg = " + Q5WN);
Q4Q1 = [[Engine Function:_getResource|getResource]](Q4PG, Q4D6, "fish", 0x03, 0x02);
debugMessage("FishAvailable = " + Q4PG);
if (Q4PG > 0x04)
{
Q4PJ = [[Engine Function:_random|random]](0x09CC, 0x09CF);
Q604 = [[Engine Function:_createNoResObjectAt|createNoResObjectAt]](Q4PJ, [[Engine Function:_getLocation|getLocation]](this));
[[Engine Function:_transferResources|transferResources]](Q604, Q4D6, 0x04, "fish");
[[Engine Function:_systemMessage|systemMessage]](this, "You pull out a nice fish!");
}
else
{
[[Engine Function:_barkTo|barkTo]](this, this, "The fish don't seem to be biting here.");
}
}
[[cleanup|cleanup]]();
return (0x00);
}

function void cleanup()
{
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "pole"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "pole");
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "targetType"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "targetType");
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "there"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "there");
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "splash"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "splash");
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "rightHand"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "rightHand");
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "leftHand"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "leftHand");
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "staff"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "staff");
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "equipped"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "equipped");
}
else
{
[[Script_Function:_Q5NI|Q5NI]]();
}
if ([[Engine Function:_hasObjVar|hasObjVar]](this, "poleID"))
{
[[Engine Function:_removeObjVar|removeObjVar]](this, "poleID");
}
[[Engine Function:_detachScript|detachScript]](this, "userisfishing");
return ();
}

function void Q5NI()
{
obj pole = [[Engine Function:_getObjVar|getObjVar]](this, "poleID");
obj container;
loc location;
int Q4Q1;
if ([[Engine Function:_hasObjVar|hasObjVar]](pole, "container"))
{
container = [[Engine Function:_getObjVar|getObjVar]](pole, "container");
Q4Q1 = [[Engine Function:_putObjContainer|putObjContainer]](pole, container);
}
else
{
location = [[Engine Function:_getObjVar|getObjVar]](pole, "location");
Q4Q1 = [[teleport|teleport]](pole, location);
}
return ();
}

@@ Line 1: / Line 1: @@
   <span style="color:#0000FF">inherits</span> [[Script:_Sndfx|sndfx]];
-  forward <span style="color:#0000FF">void</span> [[cleanup|<span style="color:#2B91AF">cleanup</span>]]();
+  forward <span style="color:#0000FF">void</span> [[Script_Function:_Cleanup|<span style="color:#2B91AF">cleanup</span>]]();
   forward <span style="color:#0000FF">void</span> [[Script_Function:_Q5NI|<span style="color:#2B91AF">Q5NI</span>]]();
@@ Line 91: / Line 91: @@
       <span style="color:#0000FF">else</span>
+      {
-        [[cleanup|<span style="color:#2B91AF">cleanup</span>]]();
+        [[Script_Function:_Cleanup|<span style="color:#2B91AF">cleanup</span>]]();
         <span style="color:#0000FF">return</span> (0x00);
+      }
@@ Line 100: / Line 100: @@
       <span style="color:#0000FF">else</span>
+      {
-        [[cleanup|<span style="color:#2B91AF">cleanup</span>]]();
+        [[Script_Function:_Cleanup|<span style="color:#2B91AF">cleanup</span>]]();
         <span style="color:#0000FF">return</span> (0x00);
+      }
@@ Line 109: / Line 109: @@
       <span style="color:#0000FF">else</span>
+      {
-        [[cleanup|<span style="color:#2B91AF">cleanup</span>]]();
+        [[Script_Function:_Cleanup|<span style="color:#2B91AF">cleanup</span>]]();
         <span style="color:#0000FF">return</span> (0x00);
+      }
@@ Line 117: / Line 117: @@
         <span style="color:#0000FF">if</span> (!([[Engine Function:_equipObj|<span style="color:#FF0000;font-weight:bold">equipObj</span>]](rightHand, this, 0x01)))
+        {
-          [[cleanup|<span style="color:#2B91AF">cleanup</span>]]();
+          [[Script_Function:_Cleanup|<span style="color:#2B91AF">cleanup</span>]]();
           <span style="color:#0000FF">return</span> (0x00);
+        }
@@ Line 125: / Line 125: @@
         <span style="color:#0000FF">if</span> (!([[Engine Function:_equipObj|<span style="color:#FF0000;font-weight:bold">equipObj</span>]](leftHand, this, 0x02)))
+        {
-          [[cleanup|<span style="color:#2B91AF">cleanup</span>]]();
+          [[Script_Function:_Cleanup|<span style="color:#2B91AF">cleanup</span>]]();
           <span style="color:#0000FF">return</span> (0x00);
+        }
@@ Line 133: / Line 133: @@
+    {
       [[Engine Function:_systemMessage|<span style="color:#FF0000;font-weight:bold">systemMessage</span>]](this, <span style="color:#800000">"You fish a while, but fail to catch anything."</span>);
-      [[cleanup|<span style="color:#2B91AF">cleanup</span>]]();
+      [[Script_Function:_Cleanup|<span style="color:#2B91AF">cleanup</span>]]();
       <span style="color:#0000FF">return</span> (0x00);
+    }
@@ Line 211: / Line 211: @@
+      }
+    }
-    [[cleanup|<span style="color:#2B91AF">cleanup</span>]]();
+    [[Script_Function:_Cleanup|<span style="color:#2B91AF">cleanup</span>]]();
     <span style="color:#0000FF">return</span> (0x00);
+  }

@@ Line 275: / Line 275: @@
+    {
       location = [[Engine Function:_getObjVar|<span style="color:#FF0000;font-weight:bold">getObjVar</span>]](pole, <span style="color:#800000">"location"</span>);
-      Q4Q1 = [[teleport|<span style="color:#FF0000;font-weight:bold">teleport</span>]](pole, location);
+      Q4Q1 = [[Engine Function:_teleport|<span style="color:#FF0000;font-weight:bold">teleport</span>]](pole, location);
+    }
     <span style="color:#0000FF">return</span> ();
+  }