From e42923293a3d1ce2b16461251b869e3b8211d894 Mon Sep 17 00:00:00 2001
From: Vincent Petithory <vincent.petithory@gmail.com>
Date: Sun, 9 Sep 2012 14:53:48 +0200
Subject: Expand Peter's crafting skills to create warlord boots.
---
world/map/npc/009-2/peter.txt | 26 ++++++++++++++++++++++++++
1 file changed, 26 insertions(+)
diff --git a/world/map/npc/009-2/peter.txt b/world/map/npc/009-2/peter.txt
index ba742424..e0588f99 100644
--- a/world/map/npc/009-2/peter.txt
+++ b/world/map/npc/009-2/peter.txt
@@ -14,6 +14,10 @@
set @peter_warlord_plate_ingot, 15;
set @peter_warlord_plate_money, 100000;
+ set @peter_warlord_boots_coal, 16;
+ set @peter_warlord_boots_ingot, 8;
+ set @peter_warlord_boots_money, 35000;
+
mes "[Peter]";
mes "\"Hello, I am Peter, apprentice to Nicholas.\"";
next;
@@ -25,6 +29,7 @@
"Chain Mail ("+@peter_chain_mail_coal+" coal, "+@peter_chain_mail_ingot+" ingots and "+@peter_chain_mail_money+" GP).", L_Peter_Chain_Mail,
"Light Plate ("+@peter_light_plate_coal+" coal, "+@peter_light_plate_ingot+" ingots and "+@peter_light_plate_money+" GP).", L_Peter_Light_Plate,
"Warlord Plate ("+@peter_warlord_plate_coal+" coal, "+@peter_warlord_plate_ingot+" ingots and "+@peter_warlord_plate_money+" GP).", L_Peter_Warlord_Plate,
+ "Do you know anything else than armor crafting?", L_Peter_New_Skills,
"Nevermind.", -;
goto L_Close;
@@ -52,6 +57,23 @@ L_Peter_Warlord_Plate:
callsub S_Peter_Get_Smithery_Item;
goto L_Close;
+L_Peter_New_Skills:
+ mes "[Peter]";
+ mes "\"Actually, Nicholas, my master, taught me new smithery techniques.";
+ mes "My very first creation are new kind of steel boots. Interested ? That would be "+@peter_warlord_boots_coal+" Coals, "+@peter_warlord_boots_ingot+" Iron Ingots and "+@peter_warlord_boots_money+" GP.\"";
+ menu
+ "Sure!", L_Peter_Warlord_Boots,
+ "No thanks, that sounds too heavy for me.", -;
+ goto L_Close;
+
+L_Peter_Warlord_Boots:
+ set @peter_crafting_coal, @peter_warlord_boots_coal;
+ set @peter_crafting_iron_ingot, @peter_warlord_boots_ingot;
+ set @peter_crafting_money, @peter_warlord_boots_money;
+ set @peter_crafting_item$, "WarlordBoots";
+ callsub S_Peter_Get_Smithery_Item;
+ goto L_Close;
+
S_Peter_Get_Smithery_Item:
if (Zeny < @peter_crafting_money)
goto L_Peter_NotEnough_Zeny;
@@ -104,6 +126,10 @@ L_Close:
set @peter_warlord_plate_ingot, 0;
set @peter_warlord_plate_money, 0;
+ set @peter_warlord_boots_coal, 0;
+ set @peter_warlord_boots_ingot, 0;
+ set @peter_warlord_boots_money, 0;
+
set @peter_crafting_coal, 0;
set @peter_crafting_iron_ingot, 0;
set @peter_crafting_money, 0;
--
cgit v1.2.3-70-g09d2