Difference between revisions of "Script: Bounty"
From Ultima Online: The Second Age
| (One intermediate revision by the same user not shown) | |||
| Line 551: | Line 551: | ||
{ | { | ||
<span style="color:#0000FF">string</span> Q4GQ; | <span style="color:#0000FF">string</span> Q4GQ; | ||
| − | [[ | + | [[Script_Function:_postKillerToBB|<span style="color:#2B91AF">postKillerToBB</span>]](killer); |
[[Engine Function:_attachScript|<span style="color:#FF0000;font-weight:bold">attachScript</span>]](killer, <span style="color:#800000">"bountymark"</span>); | [[Engine Function:_attachScript|<span style="color:#FF0000;font-weight:bold">attachScript</span>]](killer, <span style="color:#800000">"bountymark"</span>); | ||
[[Engine Function:_setNotoriety|<span style="color:#FF0000;font-weight:bold">setNotoriety</span>]](killer, (0x00 - 0x7F)); | [[Engine Function:_setNotoriety|<span style="color:#FF0000;font-weight:bold">setNotoriety</span>]](killer, (0x00 - 0x7F)); | ||
| Line 575: | Line 575: | ||
<span style="color:#0000FF">if</span> ([[Script_Function:_Q4Y1|<span style="color:#2B91AF">Q4Y1</span>]](killer, victim) > 0x0A) | <span style="color:#0000FF">if</span> ([[Script_Function:_Q4Y1|<span style="color:#2B91AF">Q4Y1</span>]](killer, victim) > 0x0A) | ||
{ | { | ||
| − | [[ | + | [[Script_Function:_setBounty|<span style="color:#2B91AF">setBounty</span>]](killer); |
} | } | ||
<span style="color:#0000FF">return</span> (); | <span style="color:#0000FF">return</span> (); | ||
Latest revision as of 09:05, 21 October 2018
inherits globals;
function int Q4S2(obj killer) { if (!hasObjListVar(killer, "killcount")) { return (0x00); } list Q51M; getObjListVar(Q51M, killer, "killcount"); return (numInList(Q51M)); }
function void Q45G(obj killer, obj victim) { list Q51M; if (hasObjListVar(killer, "killcount")) { getObjListVar(Q51M, killer, "killcount"); } if (!0x00) { if (isInList(Q51M, getName(victim))) { return (); } } if (0x00) { bark(killer, "Adding victim to the bounty list."); } appendToList(Q51M, getName(victim)); setObjVar(killer, "killcount", Q51M); return (); }
function void Q4MR(obj killer, obj victim) { if (hasObjVar(this, "bountyKiller")) { removeObjVar(this, "bountyKiller"); } list Q59P; setObjVar(victim, "myLastKiller", killer); appendToList(Q59P, 0x00); appendToList(Q59P, "YES - You report them to Lord British's guards. This will increase the recorded murders under this person's name and may result in a bounty placed on their head."); appendToList(Q59P, 0x01); appendToList(Q59P, "NO - you forgive this person for killing you and do not report them to Lord British's guards."); selectType(victim, victim, 0x01, "You have been murdered! Do you wish to report this crime to Lord British's guards?", Q59P); if (0x00) { bark(killer, "Opening reporting menu."); } return (); }
trigger typeselected(0x01) { if (listindex == 0x00) { systemMessage(this, "You have cancelled the bounty reporting process."); detachScript(this, "bounty"); return (0x01); } switch (objtype) { case 0x00 if (!hasObjVar(this, "myLastKiller")) { systemMessage(this, "An error has occurred and your murder cannot be reported."); detachScript(this, "bounty"); return (0x01); } obj killer = getObjVar(this, "myLastKiller"); removeObjVar(this, "myLastKiller"); Q45G(killer, this); break; case 0x01 systemMessage(this, "You have cancelled the bounty reporting process."); break; default systemMessage(this, "You have cancelled the bounty reporting process."); break; } return (0x01); }
function int Q4BG(obj killer, obj victim) { int Q51M = Q4S2(killer); int Q67R = Q4S2(victim); if (!isPlayer(killer)) { return (0x00); } if (!isPlayer(victim)) { return (0x00); } if (Q51M < Q67R) { if (0x00) { bark(victim, "Killer's killcount lower than victim's"); } systemMessage(victim, "You cannot report this death because the person who killed you has slain less people than you have."); return (0x00); } if (getNotorietyLevel(victim) < (0x00 - 0x01)) { if (0x00) { bark(victim, "Victim's notoriety too low to report."); } systemMessage(victim, "You cannot report this death to Lord British's guards because your notoriety is too low."); return (0x00); } if (isCriminal(victim)) { if (0x00) { bark(victim, "Victim flagged criminal"); } systemMessage(victim, "You cannot report this death to Lord British's guards because you are flagged as a criminal because of your recent deeds."); return (0x00); } if (!hasObjVar(victim, "lastCriminal")) { if (0x00) { bark(victim, "Victim doesn't have lastCriminal attached"); } return (0x00); } obj Q52F = getObjVar(victim, "lastCriminal"); if (Q52F != killer) { if (0x00) { bark(victim, "Victim's last criminal doesn't match killer"); } return (0x00); } return (0x01); }
function int Q4Y1(obj killer, obj victim) { if (Q4BG(killer, victim)) { shortCallback(victim, 0x01, 0x8C); if (0x00) { bark(victim, "Allowed to report!"); } } if (0x00) { bark(killer, "Returning killcount."); string Q4GQ; int Q4Q1 = Q4S2(killer); Q4GQ = Q4Q1; bark(killer, Q4GQ); } return (Q4S2(killer)); }
trigger callback(0x8C) { if (getMobFlag(this, 0x02)) { shortCallback(this, 0x01, 0x8C); return (0x01); } obj killer = getObjVar(this, "bountyKiller"); Q4MR(killer, this); return (0x01); }
function string Q4RW(obj killer) { obj Q4UP = getItemAtSlot(killer, 0x0B); if (Q4UP == NULL()) { return ("indeterminate color"); } int Q4XG = getHue(Q4UP); Q4XG = Q4XG - 0x044C; switch (Q4XG) { 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(obj killer) { obj Q4UP = getItemAtSlot(killer, 0x0B); string Q5Y4; switch (getObjType(Q4UP)) { 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(obj killer) { string Q5Y4; int Q4XG = getHue(killer); Q4XG = Q4XG - 0x03E8; Q4XG = Q4XG - 0x8000; if (0x00) { string Q48R = Q4XG; bark(killer, Q48R); } 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 = "pimply"; break; } return (Q5Y4); }
function string Q4RY(obj killer) { list Q5Y8 = "hath murdered one too many!", "hath killed " + getHisHer(killer) + " last!", "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[random(0x00, numInList(Q5Y8) - 0x01)]; return (Q5Y4); }
function string Q4J2(obj killer) { 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[random(0x00, numInList(Q5Y8) - 0x01)]; return (Q5Y4); }
function obj Q5K6(obj Q47Z, obj Q521) { obj Q58D; obj killer; obj Q4QI; list Q4E4; getContents(Q4E4, Q47Z); int Q55T = numInList(Q4E4); for(int i = 0x00; i < Q55T; i++) { Q58D = Q4E4[i]; if (getObjType(Q58D) == 0x0EB0) { if (hasObjVar(Q58D, "killer")) { killer = getObjVar(Q58D, "killer"); if (killer == Q521) { return (Q58D); } } } } return (NULL()); }
function void postKillerToBB(obj killer) { if (!hasObjListVar(killer, "killcount")) { detachScript(this, "bounty"); return (); } list Q51M; getObjListVar(Q51M, killer, "killcount"); obj Q47Z = findClosestBBoard(getLocation(this)); obj Q58D; Q58D = Q5K6(Q47Z, killer); if (Q58D == NULL()) { Q58D = createNoResObjectIn(0x0EB0, Q47Z); } setObjVar(Q58D, "killer", killer); obj bank = getItemAtSlot(killer, 0x1D); obj Q5NR = doTakeMoney(bank, 0x0EED, 0xC350); if (Q5NR == NULL()) { if (0x00) { bark(killer, "NULL reward!"); } } string reward = "alas, zero"; if (Q5NR != NULL()) { int Q48S = teleport(Q5NR, getLocation(killer)); int Q463; int blah = getResource(Q463, Q5NR, "gold", 0x03, 0x02); if (0x00) { reward = Q463; systemMessage(killer, "Gold resource from bank:"); systemMessage(killer, reward); } transferResources(Q58D, Q5NR, Q463, "gold"); if (0x00) { blah = getResource(Q463, Q5NR, "gold", 0x03, 0x02); reward = Q463; systemMessage(killer, "Gold resource on gold after transfer:"); systemMessage(killer, reward); } blah = getResource(Q463, Q58D, "gold", 0x03, 0x02); if (0x00) { reward = Q463; systemMessage(killer, "Gold resource from board:"); systemMessage(killer, reward); } reward = Q463; if (0x00) { bark(killer, "reward!"); bark(killer, reward); } deleteObject(Q5NR); } string Q5Y5; string Q5Y6; string Q67E; string Q67F; switch (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; } Q67E = Q51M[random(0x00, numInList(Q51M) - 0x01)]; Q67F = Q51M[random(0x00, numInList(Q51M) - 0x01)]; int Q600 = Q4S2(killer); string dead = Q600; list postText = Q5Y5 + getName(killer) + Q5Y6, " The foul scum known as", getName(killer), Q4RY(killer), "For " + getHeShe(killer) + " is guilty of " + dead, "murders, among them those", "of " + Q67E + " and ", Q67F + ".", Q4J2(killer), "of " + reward + " gold pieces", "for " + getHisHer(killer) + " head!", " A description:", " - " + Q4RW(killer) + " hair", " - " + Q4RX(killer), " - " + Q4SU(killer) + " skin", " If you kill " + getHimHer(killer) + ", bring the", "head to a guard here in this", "city to claim your reward."; setObjVar(Q58D, "postText", postText); return (); }
function void setBounty(obj killer) { string Q4GQ; postKillerToBB(killer); attachScript(killer, "bountymark"); setNotoriety(killer, (0x00 - 0x7F)); barkTo(killer, killer, "A bounty hath been issued for thee, and thy worldly goods are hereby confiscated!"); obj bank = getItemAtSlot(killer, 0x1D); list Q47M; getContents(Q47M, bank); for(int i = 0x00; i < numInList(Q47M); i++) { bank = Q47M[i]; if (0x00) { Q4GQ = "Deleting bank item: " + getName(bank); systemMessage(killer, Q4GQ); } deleteObject(bank); } return (); }
function void Q4J1(obj killer, obj victim) { if (Q4Y1(killer, victim) > 0x0A) { setBounty(killer); } return (); }
trigger creation { if (!hasObjVar(this, "bountyKiller")) { if (0x00) { bark(this, "Error attaching bounty script."); } detachScript(this, "bounty"); return (0x01); } obj killer = getObjVar(this, "bountyKiller"); Q4J1(killer, this); return (0x01); }
trigger speech("add") { if (0x00) { Q4J1(speaker, this); } return (0x01); }
trigger speech("count") { if (0x00) { string Q4Q1; int bar = Q4S2(this); Q4Q1 = bar; bark(this, Q4Q1); } return (0x01); }
