Bring all LoF unique scripts temporary to npc/0000SAVE folder

2 files changed, 272 insertions, 0 deletions

diff --git a/npc/00000SAVE/smiths/009-1_silversmith.txt b/npc/00000SAVE/smiths/009-1_silversmith.txt
new file mode 100644
index 000000000..9be3acc8b
--- /dev/null
+++ b/npc/00000SAVE/smiths/009-1_silversmith.txt
@@ -0,0 +1,125 @@
+
+009-1,43,32,0	script	Silversmith	NPC135,{
+
+    mes "[Smith Silvers]";
+    mes "\"Hello, I am your local silversmith, here for all of your smithing needs!\"";
+    goto L_Smithmenu;
+
+L_Smithmenu:
+    menu
+        "Can you smith my Short Sword?", L_Sword,
+        "How about a Crusade Helmet?", L_Helm,
+        "Can you silver my Forest Bow?", L_Bow,
+        "I'd like my Clover Silvered.", L_Clover,
+        "I think I have everything I need, thanks.", L_close;
+
+L_Sword:
+    mes "[Smith Silvers]";
+    mes "\"I can, it will cost you 9 Silver Ore, 5 Raw Coal, and 40,000 gp.\"";
+    menu
+        "Sure.", L_sword2,
+        "What a ripoff!  No way!", L_close;
+
+L_Helm:
+    mes "[Smith Silvers]";
+    mes "\"I can silver that helmet for 6 Silver Ore, 9 Raw coal, and 50,000 gp.\"";
+    menu
+        "Here you go.", L_helm2,
+        "Are you nuts?! Forget it!", L_close;
+
+L_Bow:
+    mes "[Smith Silvers]";
+    mes "\"I can silver that bow for 18 Silver Ore, 18 Raw Coal, and 200,000 gp.\"";
+    menu
+        "Sure.", L_bow2,
+        "Whoa, that's way too much.", L_close;
+
+L_Clover:
+    mes "[Smith Silvers]";
+    mes "\"I can silver your clover for 4 Silver Ore, 5 Raw Coal, and 50,000 gp.\"";
+    menu
+        "I have them right here.", L_Clover2,
+        "Whoa, that's way too much.", L_close;
+
+L_sword2:
+    if (countitem("SilverOre") < 9) goto L_Missing;
+    if (countitem("RawCoal") < 5) goto L_Missing;
+    if (countitem("ShortSword") < 1) goto L_Missing;
+    if (Zeny < 40000) goto L_NotEnoughMoney;
+    delitem "SilverOre", 9;
+    delitem "RawCoal", 5;
+    delitem "ShortSword", 1;
+    Zeny = Zeny - 40000;
+    getitem "SilverSword", 1;
+    mes "[Smith Silvers]";
+    mes "\"There you go! Want me to silver anything else?\"";
+    menu
+        "Yes.", L_Smithmenu,
+        "Nope.", L_No;
+
+L_helm2:
+    if (countitem("SilverOre") < 6) goto L_Missing;
+    if (countitem("RawCoal") < 9) goto L_Missing;
+    if (countitem("UnsilveredCrusadeHelmet") < 1) goto L_Missing;
+    if (Zeny < 50000) goto L_NotEnoughMoney;
+    delitem "RawCoal", 9;
+    delitem "SilverOre", 6;
+    delitem "UnsilveredCrusadeHelmet", 1;
+    Zeny = Zeny - 50000;
+    getitem "CrusadeHelmet", 1;
+    mes "[Smith Silvers]";
+    mes "\"There you go.  Would you like anything else silvered?\"";
+    menu
+        "Yes.", L_Smithmenu,
+        "No.", L_No;
+
+L_bow2:
+    if (countitem("SilverOre") < 18) goto L_Missing;
+    if (countitem("RawCoal") < 18) goto L_Missing;
+    if (countitem("ForestBow") < 1) goto L_Missing;
+    if (Zeny < 200000) goto L_NotEnoughMoney;
+    delitem "RawCoal", 18;
+    delitem "SilverOre", 18;
+    delitem "ForestBow", 1;
+    Zeny = Zeny - 200000;
+    getitem "SilverBow", 1;
+    mes "[Smith Silvers]";
+    mes "\"There you go.  Would you like anything else silvered?\"";
+    menu
+        "Yes.", L_Smithmenu,
+        "No.", L_No;
+
+L_Clover2:
+        if (countitem("SilverOre") < 4) goto L_Missing;
+        if (countitem("RawCoal") < 5) goto L_Missing;
+        if (countitem("FourLeafClover") < 1) goto L_Missing;
+        if (Zeny < 50000) goto L_NotEnoughMoney;
+        delitem "RawCoal", 5;
+        delitem "SilverOre", 4;
+        delitem "FourLeafClover", 1;
+        Zeny = Zeny - 50000;
+        getitem "SilverFourLeafAmulet", 1;
+        mes "[Smith Silvers]";
+        mes "\"There you go.  Would you like anything else silvered?\"";
+        menu
+            "Yes.", L_Smithmenu,
+            "No.", L_No;
+
+L_Missing:
+    mes "[Smith Silvers]";
+    mes "\"It looks like you're missing some items.  Please come back when you have what I need!\"";
+    goto L_close;
+
+L_NotEnoughMoney:
+    mes "[Smith Silvers]";
+    mes "\"You don't have enough money, come back later!\"";
+    goto L_close;
+
+L_No:
+    mes "[Smith Silvers]";
+    mes "\"Have a great day!\"";
+    goto L_close;
+
+L_close:
+    close;
+}
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;
+}