summaryrefslogtreecommitdiff
path: root/npc/009-2/peter.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/009-2/peter.txt')
-rw-r--r--npc/009-2/peter.txt80
1 files changed, 80 insertions, 0 deletions
diff --git a/npc/009-2/peter.txt b/npc/009-2/peter.txt
new file mode 100644
index 00000000..995bfc31
--- /dev/null
+++ b/npc/009-2/peter.txt
@@ -0,0 +1,80 @@
+// Nicholas' Apprentice and Armorsmith
+
+009-2.gat,183,57,0 script Peter 157,{
+
+ mes "[Peter]";
+ mes "\"Hello, I am Peter, apprentice to Nicholas.\"";
+ next;
+ mes "\"I can make you some sturdy armor: you must give me [Iron Ingot]s to craft with and some gold pieces for my efforts.\"";
+ next;
+ mes "[Peter]";
+ mes "\"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 < 50000) 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;
+ delitem "Coal", 20;
+ getitem "LightPlatemail", 1;
+ mes "[Peter]";
+ mes "\"Here you go!\"";
+ close;
+
+L_Peter_Warlord_Plate:
+ if (zeny < 100000) 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;
+ delitem "Coal", 30;
+ 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;
+
+}