summaryrefslogtreecommitdiff
path: root/npc/017-5/nahrec.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/017-5/nahrec.txt')
-rw-r--r--npc/017-5/nahrec.txt51
1 files changed, 51 insertions, 0 deletions
diff --git a/npc/017-5/nahrec.txt b/npc/017-5/nahrec.txt
index 8be80c597..54ea9044a 100644
--- a/npc/017-5/nahrec.txt
+++ b/npc/017-5/nahrec.txt
@@ -8,6 +8,45 @@
// TODO: Mylarin Dust for THE EPISODE. This means Savior Pants is part of THE EPISODE
017-5,0,0,0 script Nahrec NPC_PLAYER,{
+ // blacksmith_create( BaseItem1, Amount, BaseItem2, Amount, PrizeItem, Price )
+ function blacksmith_create {
+ .@base1=getarg(0);
+ .@amon1=getarg(1);
+ .@base2=getarg(2);
+ .@amon2=getarg(3);
+ .@prize=getarg(4);
+ .@price=getarg(5);
+
+ mesn;
+ mesq l("Do you want to craft @@? For that I will need @@ @@, @@ @@ and @@ gp.",
+ getitemlink(.@prize), .@amon1, getitemlink(.@base1), .@amon2, getitemlink(.@base2), .@price);
+
+ select
+ l("Yes"),
+ l("No");
+
+ if (@menu == 2)
+ return;
+
+ if (countitem(.@base1) >= .@amon1 &&
+ countitem(.@base2) >= .@amon2 &&
+ Zeny >= .@price) {
+ inventoryplace .@prize, 1;
+ delitem .@base1, .@amon1;
+ delitem .@base2, .@amon2;
+ Zeny = Zeny - .@price;
+ getitem .@prize, 1;
+
+ mes "";
+ mesn;
+ mesq l("Many thanks! Come back soon.");
+ } else {
+ speech S_FIRST_BLANK_LINE,// | S_LAST_NEXT,
+ l("You don't have enough material, sorry.");
+ }
+ return;
+ }
+
mesn;
mesq l("Ah, hello! It is good to see another traveler in this town!");
next;
@@ -42,6 +81,18 @@ L_Makestuff:
l("Nevermind, bye!");
mes "";
switch (@menu) {
+ case 1:
+ blacksmith_create(GoldIngot, 35, WarlordPlate, 1, GoldenWarlordPlate, 200000);
+ break;
+ case 2:
+ blacksmith_create(GoldIngot, 10, LightPlatemail, 1, GoldenLightPlatemail, 30000);
+ break;
+ case 3:
+ blacksmith_create(IronIngot, 15, SilverIngot, 5, LightPlatemail, 10000);
+ break;
+ case 4:
+ blacksmith_create(IronIngot, 5, GoldenLightPlatemail, 1, WarlordPlate, 5000);
+ break;
case 5:
goto L_Savior;
case 6: