From 34039940a81b00277491085d1a8a92c952e0c815 Mon Sep 17 00:00:00 2001 From: Jesusaves Date: Thu, 24 May 2018 20:07:38 -0300 Subject: Move some sequence, and give Trader King a name --- npc/009-1/_import.txt | 2 +- npc/009-1/charles.txt | 199 ++++++++++++++++++++++++++++++++++++++++++++++ npc/009-1/trader_king.txt | 199 ---------------------------------------------- 3 files changed, 200 insertions(+), 200 deletions(-) create mode 100644 npc/009-1/charles.txt delete mode 100644 npc/009-1/trader_king.txt diff --git a/npc/009-1/_import.txt b/npc/009-1/_import.txt index 9e7a960e5..6b83f371c 100644 --- a/npc/009-1/_import.txt +++ b/npc/009-1/_import.txt @@ -3,6 +3,7 @@ "npc/009-1/_mobs.txt", "npc/009-1/_warps.txt", "npc/009-1/barzil.txt", +"npc/009-1/charles.txt", "npc/009-1/dangrostra.txt", "npc/009-1/foxhound.txt", "npc/009-1/guards.txt", @@ -10,4 +11,3 @@ "npc/009-1/luanna.txt", "npc/009-1/lynnthetraveler.txt", "npc/009-1/soul-menhir.txt", -"npc/009-1/trader_king.txt", diff --git a/npc/009-1/charles.txt b/npc/009-1/charles.txt new file mode 100644 index 000000000..9f0f348a3 --- /dev/null +++ b/npc/009-1/charles.txt @@ -0,0 +1,199 @@ +// TMW-2 Script +// Original Creator: Adson Renato +// Date: 2010-11-19 2:31 AM BRT +// Review: +// * 2013-09-03: ernando2000 +// * 2013-09-04: Lunovox Heavenfinder +// * 2016-06-14: Jesusalva +// * 2017-06-17: Jesusalva +// * 2018-05-24: Jesusalva +// * Adapted from TMW-BR to TMW2 +// Minimum Req.: LVL 30 +// Consumables: Bandits drops: CoinBag, Dagger, Leather Shield, Empty Bottle +// Prize: 1 BurglarMask +// Description: +// A contrabandist which feeds Halinarzo's black market. +// Will later teach the Steal skill. (maybe) +// Notes: +// Blame Saulc. + + + + +009-1,24,105,0 script Charles, Trader King NPC_ORC,{ + .@q=getq(HalinarzoQuest_TraderKing); + if (BaseLevel < 30) goto L_Weak; + if (.@q == 1) goto L_Return; + if (.@q == 2) goto L_End; + goto L_Start; + +L_Weak: + mesn; + mesq lg("Get out of here, weakling. You'll be killed by bandits."); + close; + +L_Start: + mesn; + mes lg(":> \"Hello, youngling...\""); + next; + mesn strcharinfo(0); + menu + l("This character person is strange I better get away..."), L_Distrust, + l("Hmm, who are you?") , L_WhoAmI; + +L_WhoAmI: + mes ""; + mesn; + mesq l("I am the Trader King, because I supply a market!"); // the Black Market + close; + +L_Distrust: + mes ""; + mesn strcharinfo(0); + mes l("¬.¬ \"Hmm, to me, you look like a thief or bandit...\""); + next; + mesn; + mes l(":D \"HAHAHAHAH! Me?! a thief? only during free time...\""); + next; + mesn strcharinfo(0); + mes l("¬.¬ \"I knew it! I'll report you at once.\""); + next; + mesn; + mes l("0.0 \"No no, please no! I can propose you a great deal for your silence!\""); + next; + menu + l("Which deal?"), L_Deal, + l("No, justice must be done.") , L_Die; + +L_Deal: + mes ""; + mesn; + mesq l(":/ \"Hmm... let me see... Aha, I know! I can make you a great bandit with a simple burglar mask!\""); + next; + mesn strcharinfo(0); + mes l(":o \"What? I'm not a bandit! But it looks SO COOL! Do you need anything while you're here?\""); + next; + mesn; + mes l(":D \"Ah! Yes, that would help a lot! I don't need anything a bandit couldn't give you: 30 @@, 2 @@, 2 @@ and a @@. And 6000 GP.\"", getitemlink(CoinBag), getitemlink(EmptyBottle), getitemlink(Dagger), getitemlink(LeatherShield)); + mesq l("What do you say?"); + next; + mesn strcharinfo(0); + menu + l("No way! That's absurd!"), L_Close, + l("That's a lot, but we have a deal!"), L_Accept; + +L_Accept: + mes ""; + mesn; + mes l(">:| \"Go take the items and remember: Not even a single word about me!\""); + next; + mesn strcharinfo(0); + mes l(";-) \"Don't worry! Leave to me!\""); + next; + mesn; + mes l("Here's what I need:"); + mes l("@@/30 @@", countitem(CoinBag), getitemlink(CoinBag)); + mes l("@@/5 @@", countitem(EmptyBottle), getitemlink(EmptyBottle)); + mes l("@@/2 @@", countitem(Dagger), getitemlink(Dagger)); + mes l("@@/1 @@", countitem(LeatherShield), getitemlink(LeatherShield)); + mes l("@@/6000 GP", Zeny); + + setq HalinarzoQuest_TraderKing, 1; + close; + +L_Return: + mesn; + mes "\"Do you have what I asked for?\""; + next; + menu + l("Yes, of course."), L_Finish, + l("I forgot what you need."), L_Review, + l("Not yet, I'll be right back."), L_Wait; + +L_Wait: + mes ""; + mesn; + mesq l("\"I'll be waiting for you! And trading some items of questionable origins...\""); + close; + +L_Finish: + if (countitem(CoinBag) < 30 || + countitem(EmptyBottle) < 5 || + countitem(Dagger) < 2 || + countitem(LeatherShield) < 1) + goto L_Missing; + if (Zeny < 6000) goto L_Poor; + + inventoryplace BurglarMask, 1; + delitem CoinBag, 30; + delitem EmptyBottle, 2; + delitem Dagger, 2; + delitem LeatherShield, 1; + Zeny = Zeny - 6000; + getitem BurglarMask, 1; + getexp 800, 25; + setq HalinarzoQuest_TraderKing, 2; + mes ""; + mesn; + mes l(":D \"Excellent! You've kept your end on the bargain!\""); + next; + mesn; + mesq l("\"I always keep my end on the bargain, so here you go.\""); + next; + mesn; + mes l(":) \"A pleasure to trade if you. Don't get caught if you're doing something wrong!\""); + close; + +L_Poor: + mes ""; + mesn; + mes l(":< \"Hey hey! Where's the money?\""); + close; + +L_Missing: + percentheal -15, 0; + mes ""; + mesn; + mes l(":< \"Never lie to me. Keep your end on the bargain! Give me everything I asked for!\""); + close; + +L_End: + mesn; + mes l(":P \"I am busy, leave me alone.\""); + close; + +L_Review: + mes ""; + mesn; + mes l("Here's what I need:"); + mes l("@@/30 @@", countitem(CoinBag), getitemlink(CoinBag)); + mes l("@@/5 @@", countitem(EmptyBottle), getitemlink(EmptyBottle)); + mes l("@@/2 @@", countitem(Dagger), getitemlink(Dagger)); + mes l("@@/1 @@", countitem(LeatherShield), getitemlink(LeatherShield)); + mes l("@@/6000 GP", Zeny); + close; + +L_Die: + mesn; + mesq l("Then I'll be sure you can't talk again."); + percentheal -100, 0; + close; + +L_Close: + close; + +OnInit: + .@npcId = getnpcid(0, .name$); + setunitdata(.@npcId, UDT_HEADTOP, BurglarMask); + setunitdata(.@npcId, UDT_HEADMIDDLE, Chainmail); + setunitdata(.@npcId, UDT_HEADBOTTOM, RaidTrousers); + setunitdata(.@npcId, UDT_WEAPON, LeatherBoots); // Boots + setunitdata(.@npcId, UDT_HAIRSTYLE, 7); + setunitdata(.@npcId, UDT_HAIRCOLOR, 1); + + .sex = G_MALE; + .distance = 5; + end; + + +} diff --git a/npc/009-1/trader_king.txt b/npc/009-1/trader_king.txt deleted file mode 100644 index fde527ab1..000000000 --- a/npc/009-1/trader_king.txt +++ /dev/null @@ -1,199 +0,0 @@ -// TMW-2 Script -// Original Creator: Adson Renato -// Date: 2010-11-19 2:31 AM BRT -// Review: -// * 2013-09-03: ernando2000 -// * 2013-09-04: Lunovox Heavenfinder -// * 2016-06-14: Jesusalva -// * 2017-06-17: Jesusalva -// * 2018-05-24: Jesusalva -// * Adapted from TMW-BR to TMW2 -// Minimum Req.: LVL 30 -// Consumables: Bandits drops: CoinBag, Dagger, Leather Shield, Empty Bottle -// Prize: 1 BurglarMask -// Description: -// A contrabandist which feeds Halinarzo's black market. -// Will later teach the Steal skill. (maybe) -// Notes: -// Blame Saulc. - - - - -009-1,24,105,0 script Trader King NPC_ORC,{ - .@q=getq(HalinarzoQuest_TraderKing); - if (BaseLevel < 30) goto L_Weak; - if (.@q == 1) goto L_Return; - if (.@q == 2) goto L_End; - goto L_Start; - -L_Weak: - mesn; - mesq lg("Get out of here, weakling. You'll be killed by bandits."); - close; - -L_Start: - mesn; - mes lg(":> \"Hello, youngling...\""); - next; - mesn strcharinfo(0); - menu - l("This character person is strange I better get away..."), L_Distrust, - l("Hmm, who are you?") , L_WhoAmI; - -L_WhoAmI: - mes ""; - mesn; - mesq l("I am the Trader King, because I supply a market!"); - close; - -L_Distrust: - mes ""; - mesn strcharinfo(0); - mes l("¬.¬ \"Hmm, to me, you look like a thief or bandit...\""); - next; - mesn; - mes l(":D \"HAHAHAHAH! Me?! a thief? only during free time...\""); - next; - mesn strcharinfo(0); - mes l("¬.¬ \"I knew it! I'll report you at once.\""); - next; - mesn; - mes l("0.0 \"No no, please no! I can propose you a great deal for your silence!\""); - next; - menu - l("Which deal?"), L_Deal, - l("No, justice must be done.") , L_Die; - -L_Deal: - mes ""; - mesn; - mesq l(":/ \"Hmm... let me see... Aha, I know! I can make you a great bandit with a simple burglar mask!\""); - next; - mesn strcharinfo(0); - mes l(":o \"What? I'm not a bandit! But it looks SO COOL! Do you need anything while you're here?\""); - next; - mesn; - mes l(":D \"Ah! Yes, that would help a lot! I don't need anything a bandit couldn't give you: 30 @@, 2 @@, 2 @@ and a @@. And 6000 GP.\"", getitemlink(CoinBag), getitemlink(EmptyBottle), getitemlink(Dagger), getitemlink(LeatherShield)); - mesq l("What do you say?"); - next; - mesn strcharinfo(0); - menu - l("No way! That's absurd!"), L_Close, - l("That's a lot, but we have a deal!"), L_Accept; - -L_Accept: - mes ""; - mesn; - mes l(">:| \"Go take the items and remember: Not even a single word about me!\""); - next; - mesn strcharinfo(0); - mes l(";-) \"Don't worry! Leave to me!\""); - next; - mesn; - mes l("Here's what I need:"); - mes l("@@/30 @@", countitem(CoinBag), getitemlink(CoinBag)); - mes l("@@/5 @@", countitem(EmptyBottle), getitemlink(EmptyBottle)); - mes l("@@/2 @@", countitem(Dagger), getitemlink(Dagger)); - mes l("@@/1 @@", countitem(LeatherShield), getitemlink(LeatherShield)); - mes l("@@/6000 GP", Zeny); - - setq HalinarzoQuest_TraderKing, 1; - close; - -L_Return: - mesn; - mes "\"Do you have what I asked for?\""; - next; - menu - l("Yes, of course."), L_Finish, - l("I forgot what you need."), L_Review, - l("Not yet, I'll be right back."), L_Wait; - -L_Wait: - mes ""; - mesn; - mesq l("\"I'll be waiting for you! And trading some items of questionable origins...\""); - close; - -L_Finish: - if (Zeny < 6000) goto L_Poor; - if (countitem(CoinBag) < 30 || - countitem(EmptyBottle) < 5 || - countitem(Dagger) < 2 || - countitem(LeatherShield) < 1) - goto L_Missing; - - inventoryplace BurglarMask, 1; - delitem CoinBag, 30; - delitem EmptyBottle, 2; - delitem Dagger, 2; - delitem LeatherShield, 1; - Zeny = Zeny - 6000; - getitem BurglarMask, 1; - getexp 800, 25; - setq HalinarzoQuest_TraderKing, 2; - mes ""; - mesn; - mes l(":D \"Excellent! You've kept your end on the bargain!\""); - next; - mesn; - mesq l("\"I always keep my end on the bargain, so here you go.\""); - next; - mesn; - mes l(":) \"A pleasure to trade if you. Don't get caught if you're doing something wrong!\""); - close; - -L_Poor: - mes ""; - mesn; - mes l(":< \"Hey hey! Where's the money?\""); - close; - -L_Missing: - percentheal -15, 0; - mes ""; - mesn; - mes l(":< \"Never lie to me. Keep your end on the bargain! Give me everything I asked for!\""); - close; - -L_End: - mesn; - mes l(":P \"I am busy, leave me alone.\""); - close; - -L_Review: - mes ""; - mesn; - mes l("Here's what I need:"); - mes l("@@/30 @@", countitem(CoinBag), getitemlink(CoinBag)); - mes l("@@/5 @@", countitem(EmptyBottle), getitemlink(EmptyBottle)); - mes l("@@/2 @@", countitem(Dagger), getitemlink(Dagger)); - mes l("@@/1 @@", countitem(LeatherShield), getitemlink(LeatherShield)); - mes l("@@/6000 GP", Zeny); - close; - -L_Die: - mesn; - mesq l("Then I'll be sure you can't talk again."); - percentheal -100, 0; - close; - -L_Close: - close; - -OnInit: - .@npcId = getnpcid(0, .name$); - setunitdata(.@npcId, UDT_HEADTOP, BurglarMask); - setunitdata(.@npcId, UDT_HEADMIDDLE, Chainmail); - setunitdata(.@npcId, UDT_HEADBOTTOM, RaidTrousers); - setunitdata(.@npcId, UDT_WEAPON, LeatherBoots); // Boots - setunitdata(.@npcId, UDT_HAIRSTYLE, 7); - setunitdata(.@npcId, UDT_HAIRCOLOR, 1); - - .sex = G_MALE; - .distance = 5; - end; - - -} -- cgit v1.2.3-60-g2f50