summaryrefslogtreecommitdiff
path: root/npc/012-1/richard.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/012-1/richard.txt')
-rw-r--r--npc/012-1/richard.txt154
1 files changed, 154 insertions, 0 deletions
diff --git a/npc/012-1/richard.txt b/npc/012-1/richard.txt
new file mode 100644
index 000000000..c71febd13
--- /dev/null
+++ b/npc/012-1/richard.txt
@@ -0,0 +1,154 @@
+// TMW-2 Script.
+// Author:
+// Saulc
+// Jesusalva
+
+012-1,65,64,0 script Richard NPC_LLOYD,{
+
+// Evol scripts.
+// Authors:
+// gumi
+// Reid
+// Description:
+// banker NPC.
+
+
+ function explain_guild {
+ speech S_LAST_NEXT,
+ l("The guild is in charge of the commerce regularization throughout Hurnscald and its surroundings."),
+ l("With the help of the town hall we organize some auction and we help local merchants to launch their businesses."),
+ l("We also feature some services like a storage and a bank for members."),
+ l("Registration is open to everybody, but newcomers need to pay a fee for all of the paperwork.");
+
+ narrator S_FIRST_BLANK_LINE,
+ l("The bank and item storage is shared between all characters within a same account."),
+ l("With it, you can safely move items and funds between your characters."),
+ l("To move between characters that are on different accounts, you have to use the Trade function.");
+ return;
+ }
+
+ function first_visit {
+ speech S_LAST_NEXT,
+ l("Welcome!"),
+ l("My name is @@, I am a representative of the Merchant Guild on Hurnscald.", .name$);
+
+ select(l("My name is @@...", strcharinfo(0)));
+
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("\"@@\", I like this name!", strcharinfo(0)),
+ l("Oh, wait a second...");
+ narrator S_LAST_NEXT,
+ l("@@ is searching something in his book.", .name$);
+ speech S_LAST_NEXT,
+ l("I see."),
+ lg("You are new around here, right?");
+
+ if (select(l("How do you know?"), l("Yes I am.")) == 1)
+ {
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("Oh, it is simple. I have on this book the names of every citizen of Hurnscald and its surroundings."),
+ l("And I have no mention of a so called \"@@\" on it!", strcharinfo(0));
+ }
+ else
+ {
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("I knew it!");
+ }
+
+ speech S_LAST_NEXT,
+ l("Let me explain to you what the Merchant Guild is for.");
+
+ explain_guild;
+ next;
+
+ .@price = 12000;
+ speech S_LAST_NEXT,
+ l("The fee is of @@ GP. So, do you want to register?", .@price);
+
+ switch (select(l("Yes."),
+ l("I don't have the time now.")))
+ {
+ case 1:
+ if (Zeny < .@price)
+ {
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("You do not seem to have enough money, come back later!");
+ }
+ else
+ {
+ Zeny = Zeny - .@price;
+ setq ArtisQuests_Lloyd, 1;
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("Perfect!"),
+ l("I wrote your name on the book, you are now free to use the storage and bank services.");
+ }
+ break;
+ case 2:
+ break;
+ }
+
+ return;
+ }
+
+
+ if (getq(ArtisQuests_Lloyd) == 0) {
+ first_visit;
+
+ closedialog;
+ goodbye;
+ close;
+ }
+
+ speech S_LAST_NEXT,
+ l("Welcome to the Merchant Guild of Hurnscald."),
+ l("What do you want today?");
+
+ do
+ {
+
+ select
+ l("I would like to store some items."),
+ l("I would like to perform money transactions."),
+ l("What is this guild for?"),
+ l("Bye.");
+
+ switch (@menu)
+ {
+ case 1:
+ openstorage;
+ closedialog;
+ close;
+ break;
+ case 2:
+ MerchantGuild_Bank;
+ break;
+ case 3:
+ mes "";
+ explain_guild;
+ break;
+ }
+ if (@menu != 4)
+ {
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT | S_NO_NPC_NAME,
+ l("Something else?");
+ }
+ } while (@menu != 4);
+
+ closedialog;
+ goodbye;
+ close;
+
+OnInit:
+ .sex = G_MALE;
+ .distance = 4;
+ end;
+
+OnPCLoginEvent:
+ checkclientversion;
+ if (#MerchantBank)
+ {
+ BankVault += max(0, #MerchantBank);
+ #MerchantBank = 0;
+ }
+ end;
+}