diff options
Diffstat (limited to 'npc/017-5')
| -rw-r--r-- | npc/017-5/nahrec.txt | 51 |
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: |