diff options
Diffstat (limited to 'npc/021-2_Tulimshar/heathin.txt')
| -rw-r--r-- | npc/021-2_Tulimshar/heathin.txt | 45 |
1 files changed, 25 insertions, 20 deletions
diff --git a/npc/021-2_Tulimshar/heathin.txt b/npc/021-2_Tulimshar/heathin.txt index 5d675e3c..270d510a 100644 --- a/npc/021-2_Tulimshar/heathin.txt +++ b/npc/021-2_Tulimshar/heathin.txt @@ -1,7 +1,11 @@ //Items for NPC are incomplete. Makes "simple ring" which can be crafted into a useful ring by Inya and terranite armor. 021-2.gat,29,55,0 script Heathin 147,{ - + + set @TARROW_REQ_TERRA_ORE, 1; + set @TARROW_REQ_COAL, 5; + set @TARROW_REQ_GP, 3000; + if (HEATHIN_QUEST == 14) && (baselevel >= 80) goto L_Heathin_Terranite_Arrows_Trade; if (HEATHIN_QUEST == 13) && (baselevel >= 80) goto L_Heathin_Terranite_Arrows_Ready; if (HEATHIN_QUEST == 12) && (baselevel >= 80) goto L_Heathin_Terranite_Arrows_Forge; @@ -94,7 +98,7 @@ L_Heathin_Terranite_Hood: mes "\"Hello again friend, I just found out about this great metal called terranite.\""; next; mes "\"This metal is almost as strong as steel, but is also very ductile.\""; - next; + next; mes "\"With some effort, I can make this metal form rings tighter than any chain mail. It isn't the prettiest in hue, but its uses can be many.\""; next; mes "\"Unfortunately, it seems to be difficult to gather. Most that have searched for [Terranite Ore] either cannot find it or have never returned...\""; @@ -116,7 +120,7 @@ L_Heathin_Terranite_Yes: set HEATHIN_QUEST, 3; mes "[Heathin]"; mes "\"Great, this is going to be fun! As I have not had much practice with this armor, I'd like to get started soon.\""; - next; + next; mes "Heathin thinks for a moment."; next; mes "\"Ah, I know! I will make a helm... Well, more like a hood, since it will be woven.\""; @@ -175,7 +179,7 @@ L_Heathin_Terranite_Legs_Ready: mes "[Heathin]"; mes "\"I am all done with your terranite pants. Hope you enjoy them! I have some more work to complete for the Council. Come back later and I might be able to assist you again.\""; close; - + L_Heathin_Terranite_Chest_Armor: set HEATHIN_QUEST, 9; mes "[Heathin]"; @@ -224,36 +228,36 @@ L_Heathin_Terranite_Arrows_No: L_Heathin_Terranite_Arrows_Yes: set HEATHIN_QUEST, 12; mes "[Heathin]"; - mes "\"Good, good. I shall begin crafting these arrows as soon as you come back. However, I cannot just make small handfuls as it would not be worth my time and effort to have my concentration interrupted for small tasks. I will make 1,000 [Terranite Arrow]s per request, for which I will need 10 [Terranite Ore], 20 [Coal] and 10,000 gold pieces.\""; + mes "\"Good, good. I shall begin crafting these arrows as soon as you come back. However, I cannot just make small handfuls as it would not be worth my time and effort to have my concentration interrupted for small tasks. I will make 1,000 [Terranite Arrow]s per request, for which I will need "+@TARROW_REQ_TERRA_ORE+" [Terranite Ore], "+@TARROW_REQ_COAL+" [Coal] and "+@TARROW_REQ_GP+" gold pieces.\""; next; mes "\"See you soon!\""; close; L_Heathin_Terranite_Arrows_Forge: - if ( (zeny < 10000) | (countitem("Coal") < 20) | (countitem("TerraniteOre") < 10) ) goto L_Heathin_Terranite_Arrows_Wait; + if ( (zeny < @TARROW_REQ_GP) | (countitem("Coal") < @TARROW_REQ_COAL) | (countitem("TerraniteOre") < @TARROW_REQ_TERRA_ORE) ) goto L_Heathin_Terranite_Arrows_Wait; set HEATHIN_QUEST, 13; - delitem "Coal", 20; - delitem "TerraniteOre", 10; - set zeny, zeny - 10000; + delitem "Coal", @TARROW_REQ_COAL; + delitem "TerraniteOre", @TARROW_REQ_TERRA_ORE; + set zeny, zeny - @TARROW_REQ_GP; mes "[Heathin]"; mes "\"Wonderful! You have everything I asked for. I will start working on the arrows right away.\""; close; L_Heathin_Terranite_Arrows_Wait: mes "[Heathin]"; - mes "\"If you want [Terranite Arrow]s, please get me 10 [Terranite Ore], 20 [Coal] and 10,000 gold pieces.\""; + mes "\"If you want [Terranite Arrow]s, please get me "+@TARROW_REQ_TERRA_ORE+" [Terranite Ore], "+@TARROW_REQ_COAL+" [Coal] and "+@TARROW_REQ_GP+" gold pieces.\""; close; L_Heathin_Terranite_Arrows_Ready: getitem "TerraniteArrow", 1000; set HEATHIN_QUEST, 14; mes "[Heathin]"; - mes "\"All done, here you go! I hope you like them. I am still working on my commission, but if you ever need any more [Terranite Arrow]s, just come on by with 20 [Coal], 10 [Terranite Ore] and 10,000 gold pieces and I will make another 1,000 arrows for you. By now I have enough [Terranite Ore] in reserve that you can just trade me my requirements to keep my resources up. Thank you for all your efforts!\""; + mes "\"All done, here you go! I hope you like them. I am still working on my commission, but if you ever need any more [Terranite Arrow]s, just come on by with "+@TARROW_REQ_COAL+" [Coal], "+@TARROW_REQ_TERRA_ORE+" [Terranite Ore] and "+@TARROW_REQ_GP+" gold pieces and I will make another 1,000 arrows for you. By now I have enough [Terranite Ore] in reserve that you can just trade me my requirements to keep my resources up. Thank you for all your efforts!\""; close; L_Heathin_Terranite_Arrows_Trade: mes "[Heathin]"; - mes "\"Hello, there. If you have 20 [Coal], 10 [Terranite Ore] and 10,000 gold pieces, I will trade you 1,000 [Terranite Arrow]s. Would you like some [Terranite Arrow]s?\""; + mes "\"Hello, there. If you have "+@TARROW_REQ_COAL+" [Coal], "+@TARROW_REQ_TERRA_ORE+" [Terranite Ore] and "+@TARROW_REQ_GP+" gold pieces, I will trade you 1,000 [Terranite Arrow]s. Would you like some [Terranite Arrow]s?\""; menu "No.", L_Heathin_Terranite_Arrows_Trade_No, "Yes.", L_Heathin_Terranite_Arrows_Trade_Yes; @@ -265,18 +269,19 @@ L_Heathin_Terranite_Arrows_Trade_No: close; L_Heathin_Terranite_Arrows_Trade_Yes: - if ( (zeny < 10000) | (countitem("Coal") < 20) | (countitem("TerraniteOre") < 10) ) goto L_Heathin_Terranite_Arrows_Trade_Wait; - delitem "Coal", 20; - delitem "TerraniteOre", 10; - set zeny, zeny - 10000; - getitem "TerraniteArrow", 1000; - mes "[Heathin]"; - mes "\"Here you go! Come back again if you want more [Terranite Arrow]s.\""; + if ( (zeny < @TARROW_REQ_GP) | (countitem("Coal") < @TARROW_REQ_COAL) | (countitem("TerraniteOre") < @TARROW_REQ_TERRA_ORE) ) goto L_Heathin_Terranite_Arrows_Trade_Wait; + delitem "Coal", @TARROW_REQ_COAL; + delitem "TerraniteOre", @TARROW_REQ_TERRA_ORE; + set zeny, zeny - @TARROW_REQ_GP; + set @lucky, 5 * rand(readparam(bLuk)); + getitem "TerraniteArrow", 1000 + @lucky; + mes "[Heathin]"; + mes "\"Here you go! You are lucky, I could forge "+@lucky+" more arrows than expected. Come back again if you want more [Terranite Arrow]s.\""; close; L_Heathin_Terranite_Arrows_Trade_Wait: mes "[Heathin]"; - mes "\"It seems that you do not have the necessary resources for me to trade you. Please come back with 20 [Coal], 10 [Terranite Ore] and 10,000 gold pieces if you want another 1,000 [Terranite Arrow]s.\""; + mes "\"It seems that you do not have the necessary resources for me to trade you. Please come back with "+@TARROW_REQ_COAL+" [Coal], "+@TARROW_REQ_TERRA_ORE+" [Terranite Ore] and "+@TARROW_REQ_GP+" gold pieces if you want another 1,000 [Terranite Arrow]s.\""; close; } |