1 files changed, 147 insertions, 0 deletions
diff --git a/npc/00000SAVE/smiths/009-2_nahrec.txt b/npc/00000SAVE/smiths/009-2_nahrec.txt
new file mode 100644
index 000000000..46817eab3
--- /dev/null
+++ b/npc/00000SAVE/smiths/009-2_nahrec.txt
@@ -0,0 +1,147 @@
+
+009-2,181,56,0	script	Nahrec	NPC311,{
+    mes "[Nahrec]";
+    mes "\"Ah, hello! It is good to see another traveler in this town!\"";
+    next;
+    menu
+        "Really? Where are you from?", L_Story,
+        "It's good to see you too, do you happen to be able to make stuff?", L_Makestuff,
+        "Alright.", L_close;
+
+L_Story:
+    mes "[Nahrec]";
+    mes "\"I came from Thermin, a town in the Kazei area.\"";
+    next;
+    mes "\"I'm an experienced weapon master helping this smithy here, but I am new in this town. I am best at smithing armor.\"";
+    next;
+    menu
+        "'Best'? So you can make other things?", L_Makestuff,
+        "Good to know.", L_close;
+
+L_Makestuff:
+    mes "[Nahrec]";
+    mes "\"Yes, I can craft many things. In addition to plating and improving armor, I can craft smaller items made of gold and other metals.\"";
+    menu
+        "Can you make a monocle for me? I want that...classy look...", L_Monocle,
+        "Can you improve my Warlord Plate for me?", L_Goldenwplate,
+        "Can you improve my Light Platemail for me?", L_Goldenlplate,
+        "Can you craft Savior Pants?", L_Saviorpants,
+        "Do you know something about 'Mylarin Dust'?", L_Mylarin,
+        "Nevermind, bye!", L_close;
+
+L_Mylarin:
+    if (countitem("MylarinDust") == 0) goto L_No_Mylarin;
+    mes "[Nahrec]";
+    mes "\"Mylarin dust?! Where did you get that? That's amazing!\"";
+    next;
+    mes "\"I can craft you an amazingly strong armor with that - uhm, well, I first need to set up my smithy here.\"";
+    next;
+    mes "\"Please come back, when I'm ready with that. Mylarin dust... amazing.\"";
+    goto L_close;
+
+L_No_Mylarin:
+    mes "[Nahrec]";
+    mes "\"Mylarin dust!? I do indeed, but I don't suppose you have any.\"";
+    next;
+    mes "Nahrec sighs.";
+    mes "\"Ah well, I'm not prepared to work with Mylarin right now anyways. I suppose I should get back to setting up my forge.\"";
+    goto L_close;
+
+L_Goldenwplate:
+    mes "[Nahrec]";
+    mes "\"I can plate that armor in gold if you so wish, I will need 30 gold ore and 450,000gp.\"";
+    if (countitem("Gold") < 30) goto L_Missing;
+    if (countitem("WarlordPlate") < 1) goto L_Missing;
+    if (Zeny < 450000) goto L_NotEnoughMoney;
+    getinventorylist;
+    if (@inventorylist_count == 100 && countitem("Gold") > 30) goto L_Full;
+    delitem "Gold", 30;
+    delitem "WarlordPlate", 1;
+    Zeny = Zeny - 450000;
+    getitem "GoldenWarlordPlate", 1;
+    mes "[Nahrec]";
+    mes "\"There you go!\"";
+    goto L_close;
+
+L_Goldenlplate:
+    mes "[Nahrec]";
+    mes "\"I can plate that armor in gold if you so wish, I will need 20 gold ore and 250,000gp.\"";
+    if (countitem("Gold") < 20) goto L_Missing;
+    if (countitem("LightPlatemail") < 1) goto L_Missing;
+    if (Zeny < 250000) goto L_NotEnoughMoney;
+    getinventorylist;
+    if (@inventorylist_count == 100 && countitem("gold") > 20) goto L_Full;
+    delitem "Gold", 20;
+    delitem "LightPlatemail", 1;
+    Zeny = Zeny - 250000;
+    getitem "GoldenPlatemail", 1;
+    mes "[Nahrec]";
+    mes "\"There you go!\"";
+    goto L_close;
+
+L_Monocle:
+    mes "[Nahrec]";
+    mes "\"Yes, I can craft a monocle. For this, I would need you to bring me a Standard Headband, 5 gold ore, and 50,000gp\"";
+    menu
+        "I have the items you need.", L_Monocle2,
+        "I can have those soon...", L_Beback,
+        "That's lame.", L_close;
+
+L_Monocle2:
+    if (countitem("Gold") < 5) goto L_Missing;
+    if (countitem("StandardHeadband") < 1) goto L_Missing;
+    if (Zeny < 50000) goto L_NotEnoughMoney;
+    getinventorylist;
+    if (@inventorylist_count == 100 && countitem("Gold") > 5) goto L_Full;
+    delitem "Gold", 5;
+    delitem "StandardHeadband", 1;
+    Zeny = Zeny - 50000;
+    getitem "Monocle", 1;
+    mes "[Nahrec]";
+    mes "\"There you go!\"";
+    goto L_close;
+
+L_Saviorpants:
+    mes "[Nahrec]";
+    mes "\"I can craft Savior Pants. I'll need 30 gold ore, 1 pair of cotton trousers, and 200,000gp.\"";
+    menu
+        "I have what you need.", L_Saviorpants2,
+        "I'll be back with those items..", L_Beback,
+        "That's crazy!", L_close;
+
+L_Saviorpants2:
+    if (countitem("Gold") < 30 || countitem("CottonTrousers") < 1) goto L_Missing;
+    if (Zeny < 200000) goto L_NotEnoughMoney;
+    getinventorylist;
+    if (@inventorylist_count == 100 && countitem("Gold") > 30) goto L_Full;
+    delitem "Gold", 30;
+    delitem "CottonTrousers", 1;
+    Zeny = Zeny - 200000;
+    getitem "SaviorPants", 1;
+    mes "[Nahrec]";
+    mes "\"There you go!\"";
+    goto L_close;
+
+L_Full:
+    mes "[Nahrec]";
+    mes "\"It looks like you don't have room for this item. Come back when you have more room!\"";
+    goto L_close;
+
+L_Beback:
+    mes "[Nahrec]";
+    mes "\"Be back soon with the items I need!\"";
+    goto L_close;
+
+L_Missing:
+    mes "[Nahrec]";
+    mes "\"It looks like you're missing some items. Please come back when you have what I need!\"";
+    goto L_close;
+
+L_NotEnoughMoney:
+    mes "[Nahrec]";
+    mes "\"You don't have enough money, come back later!\"";
+    goto L_close;
+
+L_close:
+    close;
+}