Script: Key - Revision history

Grimoric: Created page with " inherits sk_table; function int Q4CC(
2018-10-05T19:12:34Z

Created page with " <span style="color:#0000FF">inherits</span> sk_table; <span style="color:#0000FF">function</span> <span style="color:#0000FF">int</span> Q4CC(<span style="color:#0000FF..."

New page
<span style="color:#0000FF">inherits</span> [[Script:_Sk_table|sk_table]];

<span style="color:#0000FF">function</span> <span style="color:#0000FF">int</span> Q4CC(<span style="color:#0000FF">obj</span> user, <span style="color:#0000FF">obj</span> key, <span style="color:#0000FF">obj</span> usedon)
{
<span style="color:#0000FF">if</span> (![[Engine Function:_isEditing|<span style="color:#FF0000;font-weight:bold">isEditing</span>]](user))
{
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">list</span> Q45K;
<span style="color:#0000FF">if</span> ([[Engine Function:_hasObjListVar|<span style="color:#FF0000;font-weight:bold">hasObjListVar</span>]](usedon, <span style="color:#800000">"myhousedoors"</span>))
{
[[Engine Function:_getObjListVar|<span style="color:#FF0000;font-weight:bold">getObjListVar</span>]](Q45K, usedon, <span style="color:#800000">"myhousedoors"</span>);
}
<span style="color:#0000FF">else</span>
{
<span style="color:#0000FF">if</span> ([[Engine Function:_isMultiComp|<span style="color:#FF0000;font-weight:bold">isMultiComp</span>]](usedon))
{
<span style="color:#0000FF">obj</span> Q5TP = [[Engine Function:_getMultiSlaveId|<span style="color:#FF0000;font-weight:bold">getMultiSlaveId</span>]](usedon);
<span style="color:#0000FF">if</span> ([[Engine Function:_hasObjListVar|<span style="color:#FF0000;font-weight:bold">hasObjListVar</span>]](Q5TP, <span style="color:#800000">"myhousedoors"</span>))
{
[[Engine Function:_getObjListVar|<span style="color:#FF0000;font-weight:bold">getObjListVar</span>]](Q45K, Q5TP, <span style="color:#800000">"myhousedoors"</span>);
}
<span style="color:#0000FF">else</span>
{
Q45K = usedon;
}
}
<span style="color:#0000FF">else</span>
{
Q45K = usedon;
}
}
[[Engine Function:_setObjVar|<span style="color:#FF0000;font-weight:bold">setObjVar</span>]](this, <span style="color:#800000">"whatIUnlock"</span>, Q45K);
<span style="color:#0000FF">string</span> Q65V;
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](this, user, <span style="color:#800000">"This key now unlocks:"</span>);
<span style="color:#0000FF">int</span> Q669 = [[Engine Function:_numInList|<span style="color:#FF0000;font-weight:bold">numInList</span>]](Q45K);
for(<span style="color:#0000FF">int</span> Q6A0 = 0x00; Q6A0 < Q669; Q6A0++)
{
<span style="color:#0000FF">obj</span> Q65U = Q45K[Q6A0];
Q65V = [[Engine Function:_objToStr|<span style="color:#FF0000;font-weight:bold">objToStr</span>]](Q65U);
<span style="color:#0000FF">if</span> ([[Engine Function:_isValid|<span style="color:#FF0000;font-weight:bold">isValid</span>]](Q65U))
{
<span style="color:#0000FF">concat</span>(Q65V, <span style="color:#800000">" "</span>);
<span style="color:#0000FF">concat</span>(Q65V, [[Engine Function:_getName|<span style="color:#FF0000;font-weight:bold">getName</span>]](Q65U));
}
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](this, user, Q65V);
}
<span style="color:#0000FF">return</span> (0x01);
}

<span style="color:#0000FF">function</span> <span style="color:#0000FF">int</span> Q4CD(<span style="color:#0000FF">obj</span> it, <span style="color:#0000FF">obj</span> user)
{
<span style="color:#0000FF">obj</span> Q4WD = [[Engine Function:_getTopmostContainer|<span style="color:#FF0000;font-weight:bold">getTopmostContainer</span>]](it);
<span style="color:#0000FF">if</span> (Q4WD != user)
{
[[Engine Function:_systemMessage|<span style="color:#FF0000;font-weight:bold">systemMessage</span>]](user, <span style="color:#800000">"That key is unreachable."</span>);
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">return</span> (0x01);
}

<span style="color:#0000FF">trigger</span> use
{
<span style="color:#0000FF">if</span> (![[Script_Function:_Q4CD|<span style="color:#2B91AF">Q4CD</span>]](this, user))
{
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">member</span> <span style="color:#0000FF">int</span> Q65M = 0x01;
<span style="color:#0000FF">if</span> ([[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](this, <span style="color:#800000">"whatIUnlock"</span>))
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](this, user, <span style="color:#800000">"What shall I use this key on?"</span>);
Q65M = 0x00;
}
<span style="color:#0000FF">else</span>
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](this, user, <span style="color:#800000">"This is a key blank. Which key would you like to make a copy of?"</span>);
Q65M = 0x01;
}
[[Engine Function:_targetObj|<span style="color:#FF0000;font-weight:bold">targetObj</span>]](user, this);
<span style="color:#0000FF">return</span> (0x00);
}

<span style="color:#0000FF">trigger</span> targetobj
{
<span style="color:#0000FF">if</span> (![[Script_Function:_Q4CD|<span style="color:#2B91AF">Q4CD</span>]](this, user))
{
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">if</span> (usedon == [[Engine Function:_NULL|<span style="color:#FF0000;font-weight:bold">NULL</span>]]())
{
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">list</span> Q665;
<span style="color:#0000FF">int</span> lockLevel;
<span style="color:#0000FF">int</span> Q66P = [[Engine Function:_getObjType|<span style="color:#FF0000;font-weight:bold">getObjType</span>]](usedon);
<span style="color:#0000FF">if</span> ([[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](this, <span style="color:#800000">"whatIUnlock"</span>))
{
[[Engine Function:_getObjListVar|<span style="color:#FF0000;font-weight:bold">getObjListVar</span>]](Q665, this, <span style="color:#800000">"whatIUnlock"</span>);
}
<span style="color:#0000FF">if</span> ([[Engine Function:_isEditing|<span style="color:#FF0000;font-weight:bold">isEditing</span>]](user) && (usedon == this))
{
<span style="color:#0000FF">string</span> Q65V;
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](this, user, <span style="color:#800000">"This key unlocks:"</span>);
<span style="color:#0000FF">int</span> Q669 = [[Engine Function:_numInList|<span style="color:#FF0000;font-weight:bold">numInList</span>]](Q665);
for(<span style="color:#0000FF">int</span> Q6A0 = 0x00; Q6A0 < Q669; Q6A0++)
{
<span style="color:#0000FF">obj</span> Q65U = Q665[Q6A0];
Q65V = [[Engine Function:_objToStr|<span style="color:#FF0000;font-weight:bold">objToStr</span>]](Q65U);
<span style="color:#0000FF">if</span> ([[Engine Function:_isValid|<span style="color:#FF0000;font-weight:bold">isValid</span>]](Q65U))
{
<span style="color:#0000FF">concat</span>(Q65V, <span style="color:#800000">" "</span>);
<span style="color:#0000FF">concat</span>(Q65V, [[Engine Function:_getName|<span style="color:#FF0000;font-weight:bold">getName</span>]](Q65U));
}
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](this, user, Q65V);
}
}
<span style="color:#0000FF">if</span> (usedon == this)
{
[[Engine Function:_systemMessage|<span style="color:#FF0000;font-weight:bold">systemMessage</span>]](user, <span style="color:#800000">"Enter a description for this key:"</span>);
[[Engine Function:_textEntry|<span style="color:#FF0000;font-weight:bold">textEntry</span>]](this, user, 0x16, 0x00, <span style="color:#800000">""</span>);
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">if</span> (Q65M == 0x00)
{
<span style="color:#0000FF">if</span> ([[Engine Function:_isMobile|<span style="color:#FF0000;font-weight:bold">isMobile</span>]](usedon))
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"You can't unlock that!"</span>);
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">int</span> Q4VE = [[Engine Function:_hasScript|<span style="color:#FF0000;font-weight:bold">hasScript</span>]](usedon, <span style="color:#800000">"locked"</span>);
<span style="color:#0000FF">if</span> (!Q4VE)
{
Q4VE = [[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](usedon, <span style="color:#800000">"lockLevel"</span>);
}
<span style="color:#0000FF">if</span> (!Q4VE)
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"This doesn't appear to have a lock."</span>);
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">if</span> (![[Engine Function:_isInList|<span style="color:#FF0000;font-weight:bold">isInList</span>]](Q665, usedon))
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"This key doesn't seem to unlock that."</span>);
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">int</span> Q682 = [[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](usedon, <span style="color:#800000">"isLocked"</span>);
<span style="color:#0000FF">int</span> Q4AC = [[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](usedon, <span style="color:#800000">"notLockable"</span>);
<span style="color:#0000FF">if</span> (Q4AC)
{
<span style="color:#0000FF">if</span> (Q682)
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"You can not currently unlock that."</span>);
}
<span style="color:#0000FF">else</span>
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"You can not currently lock that."</span>);
}
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">if</span> (Q682)
{
lockLevel = [[Engine Function:_getObjVar|<span style="color:#FF0000;font-weight:bold">getObjVar</span>]](usedon, <span style="color:#800000">"isLocked"</span>);
[[Engine Function:_setObjVar|<span style="color:#FF0000;font-weight:bold">setObjVar</span>]](usedon, <span style="color:#800000">"lockLevel"</span>, lockLevel);
[[Engine Function:_removeObjVar|<span style="color:#FF0000;font-weight:bold">removeObjVar</span>]](usedon, <span style="color:#800000">"isLocked"</span>);
<span style="color:#0000FF">if</span> (![[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](usedon, <span style="color:#800000">"playerMade"</span>))
{
[[Engine Function:_callback|<span style="color:#FF0000;font-weight:bold">callback</span>]](usedon, 0x0258, 0x25);
}
<span style="color:#0000FF">if</span> ([[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](usedon, <span style="color:#800000">"trapLevel"</span>))
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"You disable the trap temporarily. Lock it again to re-enable it."</span>);
[[Engine Function:_setObjVar|<span style="color:#FF0000;font-weight:bold">setObjVar</span>]](usedon, <span style="color:#800000">"disabled"</span>, 0x01);
}
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"You unlock "</span> + [[Engine Function:_getName|<span style="color:#FF0000;font-weight:bold">getName</span>]](usedon) + <span style="color:#800000">"."</span>);
}
<span style="color:#0000FF">else</span>
{
lockLevel = [[Engine Function:_getObjVar|<span style="color:#FF0000;font-weight:bold">getObjVar</span>]](usedon, <span style="color:#800000">"lockLevel"</span>);
[[Engine Function:_setObjVar|<span style="color:#FF0000;font-weight:bold">setObjVar</span>]](usedon, <span style="color:#800000">"isLocked"</span>, lockLevel);
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"You lock "</span> + [[Engine Function:_getName|<span style="color:#FF0000;font-weight:bold">getName</span>]](usedon) + <span style="color:#800000">"."</span>);
<span style="color:#0000FF">if</span> ([[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](usedon, <span style="color:#800000">"disabled"</span>))
{
[[Engine Function:_removeObjVar|<span style="color:#FF0000;font-weight:bold">removeObjVar</span>]](usedon, <span style="color:#800000">"disabled"</span>);
<span style="color:#0000FF">if</span> ([[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](usedon, <span style="color:#800000">"trapLevel"</span>))
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"You re-enable the trap."</span>);
}
}
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">if</span> (Q65M == 0x01)
{
<span style="color:#0000FF">obj</span> Q5GA = [[Engine Function:_getTopmostContainer|<span style="color:#FF0000;font-weight:bold">getTopmostContainer</span>]](usedon);
<span style="color:#0000FF">if</span> (Q5GA != user)
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"This key is unreachable."</span>);
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">switch</span> (Q66P)
{
<span style="color:#0000FF">case</span> 0x100E
<span style="color:#0000FF">case</span> 0x100F
<span style="color:#0000FF">case</span> 0x1010
<span style="color:#0000FF">case</span> 0x1012
<span style="color:#0000FF">case</span> 0x1013
<span style="color:#0000FF">if</span> ([[Engine Function:_testSkill|<span style="color:#FF0000;font-weight:bold">testSkill</span>]](user, 0x25))
{
<span style="color:#0000FF">if</span> (![[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](usedon, <span style="color:#800000">"whatIUnlock"</span>))
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"This key is also a blank."</span>);
<span style="color:#0000FF">return</span> (0x00);
}
[[Engine Function:_getObjListVar|<span style="color:#FF0000;font-weight:bold">getObjListVar</span>]](Q665, usedon, <span style="color:#800000">"whatIUnlock"</span>);
[[Engine Function:_setObjVar|<span style="color:#FF0000;font-weight:bold">setObjVar</span>]](this, <span style="color:#800000">"whatIUnlock"</span>, Q665);
[[Engine Function:_systemMessage|<span style="color:#FF0000;font-weight:bold">systemMessage</span>]](user, <span style="color:#800000">"You make a copy of the key."</span>);
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">else</span>
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"You fail to make a copy of the key."</span>);
<span style="color:#0000FF">int</span> Q5L6 = [[Engine Function:_random|<span style="color:#FF0000;font-weight:bold">random</span>]](0x01, 0x03);
<span style="color:#0000FF">if</span> (Q5L6 == 0x01)
{
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](usedon, user, <span style="color:#800000">"The key was destroyed in the attempt."</span>);
[[Engine Function:_deleteObject|<span style="color:#FF0000;font-weight:bold">deleteObject</span>]](this);
}
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">break</span>;
<span style="color:#0000FF">default</span>
<span style="color:#0000FF">if</span> (![[Script_Function:_Q4CC|<span style="color:#2B91AF">Q4CC</span>]](user, this, usedon))
{
[[Engine Function:_systemMessage|<span style="color:#FF0000;font-weight:bold">systemMessage</span>]](user, <span style="color:#800000">"You can't make a copy of that."</span>);
}
<span style="color:#0000FF">return</span> (0x00);
<span style="color:#0000FF">break</span>;
}
}
<span style="color:#0000FF">return</span> (0x00);
}

<span style="color:#0000FF">trigger</span> textentry(0x16)
{
<span style="color:#0000FF">if</span> (button == 0x00)
{
<span style="color:#0000FF">return</span> (0x00);
}
<span style="color:#0000FF">string</span> Q5CM;
<span style="color:#0000FF">if</span> ([[Engine Function:_hasObjVar|<span style="color:#FF0000;font-weight:bold">hasObjVar</span>]](this, <span style="color:#800000">"predesc"</span>))
{
Q5CM = [[Engine Function:_getObjVar|<span style="color:#FF0000;font-weight:bold">getObjVar</span>]](this, <span style="color:#800000">"predesc"</span>);
}
<span style="color:#0000FF">else</span>
{
Q5CM = <span style="color:#800000">"a key"</span>;
}
<span style="color:#0000FF">if</span> (text != <span style="color:#800000">""</span>)
{
<span style="color:#0000FF">concat</span>(Q5CM, <span style="color:#800000">": "</span>);
<span style="color:#0000FF">concat</span>(Q5CM, text);
}
[[Engine Function:_setObjVar|<span style="color:#FF0000;font-weight:bold">setObjVar</span>]](this, <span style="color:#800000">"lookAtText"</span>, Q5CM);
[[Engine Function:_barkTo|<span style="color:#FF0000;font-weight:bold">barkTo</span>]](this, sender, <span style="color:#800000">"This key is now described as "</span> + Q5CM);
<span style="color:#0000FF">return</span> (0x00);
}