Grimoric at 08:04, 21 October 2018

2018-10-21T08:04:27Z

Grimoric: Created page with " inherits globals; member list Q4GP;
2018-10-06T00:11:57Z

Created page with " inherits globals; member list Q4GP; inherits [[Script:_Globals|globals]];

member list Q4GP;

function void Q5M4()
{
list args;
[[Engine Function:_multiMessageToLoc|multiMessageToLoc]]([[Engine Function:_getMasterObjLoc|getMasterObjLoc]](0x00), "registerBoard", args);
return ();
}

trigger callback(0x2F)
{
[[Script_Function:_Q5M4|Q5M4]]();
return (0x01);
}

trigger objectloaded
{
[[Engine Function:_callback|callback]](this, 0x01, 0x2F);
list Q4E4;
[[Engine Function:_getContents|getContents]](Q4E4, this);
for(int i = [[Engine Function:_numInList|numInList]](Q4E4); i; i--)
{
[[Engine Function:_deleteObject|deleteObject]](Q4E4[0x00]);
[[Engine Function:_removeItem|removeItem]](Q4E4, 0x00);
}
return (0x00);
}

trigger creation
{
[[Script_Function:_Q5M4|Q5M4]]();
return (0x01);
}

trigger lookedat
{
list Q4E4;
[[Engine Function:_getContents|getContents]](Q4E4, this);
int count = 0x00;
for(int i = [[Engine Function:_numInList|numInList]](Q4E4); i; i--)
{
if ([[Engine Function:_hasObjVar|hasObjVar]](Q4E4[0x00], "killer"))
{
count++;
}
[[Engine Function:_removeItem|removeItem]](Q4E4, 0x00);
}
[[Engine Function:_barkTo|barkTo]](this, looker, "a bounty board with " + count + " posted bounties");
return (0x00);
}

forward void [[postKillerToBB|postKillerToBB]](list args);

trigger message("clearBounties")
{
list Q4E4;
[[Engine Function:_getContents|getContents]](Q4E4, this);
for(int i = [[Engine Function:_numInList|numInList]](Q4E4); i; i--)
{
[[Engine Function:_deleteObject|deleteObject]](Q4E4[0x00]);
[[Engine Function:_removeItem|removeItem]](Q4E4, 0x00);
}
return (0x01);
}

trigger message("setBounty")
{
[[postKillerToBB|postKillerToBB]](args);
return (0x01);
}

function string Q4RW(int Q4XG)
{
if (!Q4XG)
{
return ("");
}
Q4XG = Q4XG - 0x044C;
switch (Q4XG)
{
case 0x00
return ("indeterminate color");
break;
case 0x01
case 0x02
case 0x03
return ("white");
break;
case 0x04
case 0x05
case 0x06
return ("graying");
break;
case 0x07
case 0x08
return ("black hair");
case 0x09
case 0x0A
case 0x0B
return ("copper");
break;
case 0x0C
case 0x0D
case 0x0E
case 0x0F
return ("brown");
break;
case 0x10
return ("reddish brown");
break;
case 0x11
case 0x12
case 0x13
return ("blonde");
break;
case 0x14
case 0x15
case 0x16
return ("light brown");
break;
case 0x17
case 0x18
return ("golden brown");
break;
case 0x19
case 0x1A
case 0x1B
return ("golden");
break;
case 0x1C
case 0x1D
case 0x1E
return ("bronze");
break;
case 0x1F
case 0x20
return ("dark brown");
break;
case 0x21
case 0x22
return ("sandy");
break;
case 0x23
case 0x24
case 0x25
return ("honey-colored");
break;
case 0x26
case 0x27
case 0x28
return ("red");
break;
case 0x29
case 0x2A
case 0x2B
return ("nut brown");
break;
case 0x2C
case 0x2D
case 0x2E
return ("rich brown");
break;
case 0x2F
case 0x30
return ("very dark brown");
break;
}
return ("outlandishly colored");
}

function string Q4RX(int Q65M)
{
string Q5Y4;
switch (Q65M)
{
case 0x2049
Q5Y4 = "hair in two pigtails";
break;
case 0x2047
Q5Y4 = "curly hair";
break;
case 0x2046
Q5Y4 = "hair tied in buns";
break;
case 0x204A
Q5Y4 = "shaved head and topknot";
break;
case 0x203C
Q5Y4 = "hair worn long";
break;
case 0x2044
Q5Y4 = "a mohawk hairstyle";
break;
case 0x203D
Q5Y4 = "hair tied back";
break;
case 0x2045
Q5Y4 = "pageboy hair";
break;
case 0x2048
Q5Y4 = "receding hairline";
break;
case 0x203B
Q5Y4 = "hair worn short";
break;
default
Q5Y4 = "bald";
break;
}
return (Q5Y4);
}

function string Q4SU(int Q4XG)
{
string Q5Y4;
Q4XG = Q4XG - 0x03E8;
Q4XG = Q4XG - 0x8000;
switch (Q4XG)
{
case 0x0F
case 0x16
case 0x1D
case 0x1E
case 0x24
case 0x25
Q5Y4 = "pale";
break;
case 0x08
case 0x09
case 0x17
case 0x1F
case 0x2C
case 0x2D
case 0x01
case 0x02
case 0x10
case 0x11
case 0x12
case 0x2E
Q5Y4 = "fair";
break;
case 0x0A
case 0x0B
case 0x13
case 0x18
case 0x19
case 0x20
case 0x26
case 0x27
case 0x28
case 0x2F
Q5Y4 = "tanned";
break;
case 0x03
case 0x04
case 0x05
case 0x0C
case 0x1A
case 0x29
case 0x2A
case 0x30
case 0x38
Q5Y4 = "copper";
break;
case 0x06
case 0x07
case 0x0D
case 0x0E
case 0x14
case 0x15
case 0x1B
case 0x1C
case 0x21
case 0x22
case 0x23
case 0x2B
case 0x31
case 0x32
case 0x39
Q5Y4 = "dark";
break;
case 0x33
case 0x34
case 0x35
Q5Y4 = "yellow";
break;
default
Q5Y4 = "deathly";
break;
}
return (Q5Y4);
}

function string Q4RY(int murderCount)
{
list Q5Y8 = "hath murdered one too many!", "shall not slay again!", "hath slain too many!", "cannot continue to kill!", "must be stopped.", "is a bloodthirsty monster.", "is a killer of the worst sort.", "hath no conscience!", "hath cowardly slain many.", "must die for all our sakes.", "sheds innocent blood!", "must fall to preserve us.", "must be taken care of.", "is a thug and must die.", "cannot be redeemed.", "is a shameless butcher.", "is a callous monster.", "is a cruel, casual killer.";
string Q5Y4 = Q5Y8<nowiki>[</nowiki>[[Engine Function:_random|random]](0x00, [[Engine Function:_numInList|numInList]](Q5Y8) - 0x01)];
return (Q5Y4);
}

function string Q4J2(int bounty)
{
list Q5Y8 = " A bounty is hereby offered", " Lord British sets a price", " Claim the reward! 'Tis", " Lord Blackthorn set a price", " The Paladins set a price", " The Merchants set a price", " Lord British's bounty ";
string Q5Y4 = Q5Y8<nowiki>[</nowiki>[[Engine Function:_random|random]](0x00, [[Engine Function:_numInList|numInList]](Q5Y8) - 0x01)];
return (Q5Y4);
}

function obj Q5K6(obj Q47Z, obj Q521)
{
obj Q58D;
obj killer;
obj Q4QI;
list Q4E4;
[[Engine Function:_getContents|getContents]](Q4E4, Q47Z);
int Q55T = [[Engine Function:_numInList|numInList]](Q4E4);
for(int i = 0x00; i < Q55T; i++)
{
Q58D = Q4E4[i];
if ([[Engine Function:_getObjType|getObjType]](Q58D) == 0x0EB0)
{
if ([[Engine Function:_hasObjVar|hasObjVar]](Q58D, "killer"))
{
killer = [[Engine Function:_getObjVar|getObjVar]](Q58D, "killer");
if (killer == Q521)
{
return (Q58D);
}
}
}
}
return ([[Engine Function:_NULL|NULL]]());
}

function void postKillerToBB(list args)
{
debugMessage("[[postKillerToBB|postKillerToBB]]: args=");
[[Engine Function:_printList|printList]](args);
obj killer = args[0x00];
int bounty = args[0x01];
string Q522 = args[0x02];
list postText = Q522 + ": " + bounty + "gold. ";
if ([[Engine Function:_numInList|numInList]](args) > 0x03)
{
int murderCount = [[Engine Function:_oprlist|oprlist]](args[0x03], 0x00);
int Q5RO = [[Engine Function:_oprlist|oprlist]](args[0x03], 0x01);
int Q4UT = [[Engine Function:_oprlist|oprlist]](args[0x03], 0x02);
int Q4UR = [[Engine Function:_oprlist|oprlist]](args[0x03], 0x03);
int Q5TN = [[Engine Function:_oprlist|oprlist]](args[0x03], 0x04);
obj Q58D = [[Script_Function:_Q5K6|Q5K6]](this, killer);
if (Q58D == [[Engine Function:_NULL|NULL]]())
{
Q58D = [[Engine Function:_createNoResObjectIn|createNoResObjectIn]](0x0EB0, this);
}
[[Engine Function:_setObjVar|setObjVar]](Q58D, "killer", killer);
string Q5Y5;
string Q5Y6;
string Q67E;
string Q67F;
switch ([[Engine Function:_random|random]](0x00, 0x05))
{
case 0x00
default
Q5Y5 = "Bounty for ";
Q5Y6 = "!";
break;
case 0x01
Q5Y5 = "";
Q5Y6 = " must die!";
break;
case 0x02
Q5Y5 = "A price on ";
Q5Y6 = "!";
break;
case 0x03
Q5Y5 = "";
Q5Y6 = " outlawed!";
break;
case 0x04
Q5Y5 = "Execute ";
Q5Y6 = "!";
break;
case 0x05
Q5Y5 = "WANTED: ";
Q5Y6 = "!";
break;
}
string Q4W4;
string Q4W6;
string Q4VJ;
if (Q5RO)
{
Q4W4 = "her";
Q4W6 = "her";
Q4VJ = "she";
}
else
{
Q4W4 = "him";
Q4W6 = "his";
Q4VJ = "he";
}
int Q534 = [[Engine Function:_wordWrap|wordWrap]](postText, "The foul scum known as " + Q522 + " " + [[Script_Function:_Q4RY|Q4RY]](murderCount) + " For " + Q4VJ + " is responsible for " + murderCount + " murders. " + [[Script_Function:_Q4J2|Q4J2]](bounty) + " of " + bounty + " gold pieces for " + Q4W6 + " head!", 0x1C);
[[Engine Function:_appendToList|appendToList]](postText, " A description:");
if (Q4UR)
{
[[Engine Function:_appendToList|appendToList]](postText, " - " + [[Script_Function:_Q4RW|Q4RW]](Q4UR) + " hair");
}
[[Engine Function:_appendToList|appendToList]](postText, " - " + [[Script_Function:_Q4RX|Q4RX]](Q4UT));
[[Engine Function:_appendToList|appendToList]](postText, " - " + [[Script_Function:_Q4SU|Q4SU]](Q5TN) + " skin");
[[Engine Function:_appendToList|appendToList]](postText, "If you kill " + Q4W4 + ", remove the");
[[Engine Function:_appendToList|appendToList]](postText, "head, and give it to a guard");
[[Engine Function:_appendToList|appendToList]](postText, "to claim your reward.");
}
else
{
[[Engine Function:_appendToList|appendToList]](postText, "No information available.");
}
[[Engine Function:_setObjVar|setObjVar]](Q58D, "postText", postText);
[[Engine Function:_setPostTime|setPostTime]](Q58D);
return ();
}

@@ Line 52: / Line 52: @@
+  }
-  forward <span style="color:#0000FF">void</span> [[postKillerToBB|<span style="color:#2B91AF">postKillerToBB</span>]](<span style="color:#0000FF">list</span> args);
+  forward <span style="color:#0000FF">void</span> [[Script_Function:_postKillerToBB|<span style="color:#2B91AF">postKillerToBB</span>]](<span style="color:#0000FF">list</span> args);
   <span style="color:#0000FF">trigger</span> message(<span style="color:#800000">"clearBounties"</span>)
@@ Line 68: / Line 68: @@
   <span style="color:#0000FF">trigger</span> message(<span style="color:#800000">"setBounty"</span>)
+  {
-    [[postKillerToBB|<span style="color:#2B91AF">postKillerToBB</span>]](args);
+    [[Script_Function:_postKillerToBB|<span style="color:#2B91AF">postKillerToBB</span>]](args);
     <span style="color:#0000FF">return</span> (0x01);
+  }
@@ Line 336: / Line 336: @@
   <span style="color:#0000FF">function</span> <span style="color:#0000FF">void</span> postKillerToBB(<span style="color:#0000FF">list</span> args)
+  {
-    debugMessage(<span style="color:#800000">"[[postKillerToBB|<span style="color:#2B91AF">postKillerToBB</span>]]:  args="</span>);
+    debugMessage(<span style="color:#800000">"postKillerToBB:  args="</span>);
     [[Engine Function:_printList|<span style="color:#FF0000;font-weight:bold">printList</span>]](args);
     <span style="color:#0000FF">obj</span> killer = args[0x00];

Script: Bountyboard - Revision history

Grimoric at 08:04, 21 October 2018