From bb0a5a4170d1a7959704ad153d475919bda7e65c Mon Sep 17 00:00:00 2001 From: Wombat Date: Sun, 22 Aug 2010 11:52:26 -0400 Subject: Crafting NPC release and related changes Ingots now needed for armor and helmets, terranite quest, ring jeweler quest fixes related to these changes to maintain balance --- npc/009-2_Hurnscald/peter.txt | 75 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 75 insertions(+) create mode 100644 npc/009-2_Hurnscald/peter.txt (limited to 'npc/009-2_Hurnscald/peter.txt') diff --git a/npc/009-2_Hurnscald/peter.txt b/npc/009-2_Hurnscald/peter.txt new file mode 100644 index 00000000..1fcea250 --- /dev/null +++ b/npc/009-2_Hurnscald/peter.txt @@ -0,0 +1,75 @@ +// Nicholas' Apprentice and Armorsmith + +009-2.gat,183,57,0 script Peter 157,{ + + mes "[Peter]"; + mes "\"Hello, I am Nicholas' apprentice, Peter.\""; + next; + mes "\"I can make you some sturdy armor if you give me iron ingots to craft with and gold pieces for my efforts. What would you like me to make?\""; + menu + "Chain Mail (10 coal, 5 ingots and 20000 GP)", L_Peter_Chain_Mail, + "Light Plate (20 coal, 10 ingots and 50000 GP)", L_Peter_Light_Plate, + "Warlord Plate (30 coal, 15 ingots and 100000 GP)", L_Peter_Warlord_Plate, + "nevermind", -; + close; + +L_Peter_Chain_Mail: + if (zeny < 20000) goto L_Peter_NotEnough_Zeny; + if (countitem("IngotIron") < 5) goto L_Peter_NotEnough_Ingot; + if (countitem("Coal") < 10) goto L_Peter_NotEnough_Coal; + getinventorylist; + if (@inventorylist_count == 100) goto L_Peter_TooMany; + set zeny, zeny - 20000; + delitem "IngotIron", 5; + getitem "ChainmailShirt", 1; + mes "[Peter]"; + mes "\"Here you go!\""; + close; + +L_Peter_Light_Plate: + if (zeny < 20000) goto L_Peter_NotEnough_Zeny; + if (countitem("IngotIron") < 10) goto L_Peter_NotEnough_Ingot; + if (countitem("Coal") < 20) goto L_Peter_NotEnough_Coal; + getinventorylist; + if (@inventorylist_count == 100) goto L_Peter_TooMany; + set zeny, zeny - 50000; + delitem "IngotIron", 10; + getitem "LightPlatemail", 1; + mes "[Peter]"; + mes "\"Here you go!\""; + close; + +L_Peter_Warlord_Plate: + if (zeny < 20000) goto L_Peter_NotEnough_Zeny; + if (countitem("IngotIron") < 15) goto L_Peter_NotEnough_Ingot; + if (countitem("Coal") < 30) goto L_Peter_NotEnough_Coal; + getinventorylist; + if (@inventorylist_count == 100) goto L_Peter_TooMany; + set zeny, zeny - 100000; + delitem "IngotIron", 15; + getitem "WarlordPlate", 1; + mes "[Peter]"; + mes "\"Here you go!\""; + close; + +L_Peter_NotEnough_Zeny: + mes "[Peter]"; + mes "\"You don't have enough gold.\""; + close; + +L_Peter_NotEnough_Ingot: + mes "[Peter]"; + mes "\"You don't have enough ingots.\""; + close; + +L_Peter_NotEnough_Coal: + mes "[Peter]"; + mes "\"You don't have enough coal.\""; + close; + +L_Peter_TooMany: + mes "[Peter]"; + mes "\"You have too much stuff. Please get rid of something if you want some armor.\""; + close; + +} -- cgit v1.2.3-70-g09d2