summaryrefslogtreecommitdiff
path: root/npc/021-2_Tulimshar/heathin.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/021-2_Tulimshar/heathin.txt')
-rw-r--r--npc/021-2_Tulimshar/heathin.txt45
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;
}