summaryrefslogtreecommitdiff
path: root/world/map/npc/032-1
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/032-1')
-rw-r--r--world/map/npc/032-1/miriam.txt444
1 files changed, 222 insertions, 222 deletions
diff --git a/world/map/npc/032-1/miriam.txt b/world/map/npc/032-1/miriam.txt
index 0516f4b5..80cd3f4e 100644
--- a/world/map/npc/032-1/miriam.txt
+++ b/world/map/npc/032-1/miriam.txt
@@ -18,283 +18,283 @@
// after you gained the speed skill, all variables are reset to zero.
//#############################################
-032-1.gat,55,20,0 script Miriam 175,{
-
- if (getskilllv(SKILL_SPEED)) goto L_fast;
- if (getequipid(equip_torso) < 0) goto L_naked;
- if (QUEST_MIRIAM == 0) goto L_intro;
- if (QUEST_MIRIAM == 1) goto L_ask1;
- if (QUEST_MIRIAM == 2) goto L_ask2;
- if (QUEST_MIRIAM == 3) goto L_teach;
- if (QUEST_MIRIAM == 4) goto L_testoffer;
- if (QUEST_MIRIAM_run != 0) goto L_checktime;
- if (QUEST_MIRIAM_start != 0) goto L_wasting;
- if (QUEST_MIRIAM == 5) goto L_testoffer;
+032-1.gat,55,20,0|script|Miriam|175,{
+
+ if (getskilllv(SKILL_SPEED)) goto L_fast;
+ if (getequipid(equip_torso) < 0) goto L_naked;
+ if (QUEST_MIRIAM == 0) goto L_intro;
+ if (QUEST_MIRIAM == 1) goto L_ask1;
+ if (QUEST_MIRIAM == 2) goto L_ask2;
+ if (QUEST_MIRIAM == 3) goto L_teach;
+ if (QUEST_MIRIAM == 4) goto L_testoffer;
+ if (QUEST_MIRIAM_run != 0) goto L_checktime;
+ if (QUEST_MIRIAM_start != 0) goto L_wasting;
+ if (QUEST_MIRIAM == 5) goto L_testoffer;
L_intro:
- mes "You see a woman sitting in the hot sand with eyes wide open... But she does not seem to be looking at something in particular...";
- next;
- menu
- "Ehr... Hi, my name is " +strcharinfo(0)+ ". Are you OK?",-;
- next;
- mes "[Miriam]";
- mes "\"...";
- next;
- menu
- "Hello?",-;
- next;
- mes "[Miriam]";
- mes "\"Yes, I am. Why? Do you think I am not OK? I am OK. You interrupted my meditation. Now I will need hours to calm down and stay quiet! Yes, yes, I know, I'm a fast talker!\"";
- next;
- mes "\"In fact, I am fast in everything I do! I can kill a Mountain Snake before it even starts to think about attacking me! Yes my friend, in a battle, speed is power!";
- next;
- menu
- "Wow! Very impressi...",-;
- mes "[Miriam]";
- mes "\"Yes, yes, I know. But if there is one thing I am NOT good at, it is meditation! My master said I need to meditate, but... Ohh! So difficult to stay quiet! And when you FINALLY do, someone INTERRUPTS you, asking if you are 'OK'...\"";
- next;
- menu
- "Oh, I am sorry! I didn't know you were meditating...",-;
- mes "[Miriam]";
- mes "\"You are really sorry? Ok, but that is not enough... I need you to do something for me. As you can imagine, I will need a lot of time to concentrate and get back to the state I was when you interrupted me.\"";
- next;
- mes "\"But the problem is that I wasn't expecting to be here for so long, so I will need some food and something to drink.\"";
- next;
- mes "\"So, if you really want to prove that you are sorry, bring me 5 Concentration Potions and 10 Snake Tongues.\"";
- next;
- menu
- "Ok, but those potions will not help with your mental concent...",-,
- "Sorry, but I can't help you right now.",L_canthelp;
- mes "[Miriam]";
- mes "\"ah, ah, ah... I know what I am doing! Now run and get what I asked.\"";
- set QUEST_MIRIAM, 2;
- close;
+ mes "You see a woman sitting in the hot sand with eyes wide open... But she does not seem to be looking at something in particular...";
+ next;
+ menu
+ "Ehr... Hi, my name is " +strcharinfo(0)+ ". Are you OK?",-;
+ next;
+ mes "[Miriam]";
+ mes "\"...";
+ next;
+ menu
+ "Hello?",-;
+ next;
+ mes "[Miriam]";
+ mes "\"Yes, I am. Why? Do you think I am not OK? I am OK. You interrupted my meditation. Now I will need hours to calm down and stay quiet! Yes, yes, I know, I'm a fast talker!\"";
+ next;
+ mes "\"In fact, I am fast in everything I do! I can kill a Mountain Snake before it even starts to think about attacking me! Yes my friend, in a battle, speed is power!";
+ next;
+ menu
+ "Wow! Very impressi...",-;
+ mes "[Miriam]";
+ mes "\"Yes, yes, I know. But if there is one thing I am NOT good at, it is meditation! My master said I need to meditate, but... Ohh! So difficult to stay quiet! And when you FINALLY do, someone INTERRUPTS you, asking if you are 'OK'...\"";
+ next;
+ menu
+ "Oh, I am sorry! I didn't know you were meditating...",-;
+ mes "[Miriam]";
+ mes "\"You are really sorry? Ok, but that is not enough... I need you to do something for me. As you can imagine, I will need a lot of time to concentrate and get back to the state I was when you interrupted me.\"";
+ next;
+ mes "\"But the problem is that I wasn't expecting to be here for so long, so I will need some food and something to drink.\"";
+ next;
+ mes "\"So, if you really want to prove that you are sorry, bring me 5 Concentration Potions and 10 Snake Tongues.\"";
+ next;
+ menu
+ "Ok, but those potions will not help with your mental concent...",-,
+ "Sorry, but I can't help you right now.",L_canthelp;
+ mes "[Miriam]";
+ mes "\"ah, ah, ah... I know what I am doing! Now run and get what I asked.\"";
+ set QUEST_MIRIAM, 2;
+ close;
L_canthelp:
- mes "[Miriam]";
- mes "\"Oh, really? So you better pray to not need my help in the future!\"";
- set QUEST_MIRIAM, 1;
- close;
+ mes "[Miriam]";
+ mes "\"Oh, really? So you better pray to not need my help in the future!\"";
+ set QUEST_MIRIAM, 1;
+ close;
L_canthelp2:
- mes "[Miriam]";
- mes "\"...\"";
- next;
- mes "\"...\"";
- next;
- mes "\"Well, if you don't have time to help, at least don't make things difficult for me!\"";
- close;
+ mes "[Miriam]";
+ mes "\"...\"";
+ next;
+ mes "\"...\"";
+ next;
+ mes "\"Well, if you don't have time to help, at least don't make things difficult for me!\"";
+ close;
L_ask1:
- mes "[Miriam]";
- mes "\"So, you are back... have you changed your mind about my request?\"";
- next;
- menu
- "Yes, I will get what you want!",-,
- "No, I have no time right now.",L_canthelp2;
- set QUEST_MIRIAM, 2;
- mes "\"Good. So, run and get it!\"";
- close;
+ mes "[Miriam]";
+ mes "\"So, you are back... have you changed your mind about my request?\"";
+ next;
+ menu
+ "Yes, I will get what you want!",-,
+ "No, I have no time right now.",L_canthelp2;
+ set QUEST_MIRIAM, 2;
+ mes "\"Good. So, run and get it!\"";
+ close;
L_ask2:
- mes "[Miriam]";
- mes "\"Did you get what I asked for?\"";
- next;
- menu
- "Yes, here it is!",L_getitems,
- "What was that again?", L_ask3,
- "No, not yet.",-;
- mes "\"So please hurry up!\"";
- close;
+ mes "[Miriam]";
+ mes "\"Did you get what I asked for?\"";
+ next;
+ menu
+ "Yes, here it is!",L_getitems,
+ "What was that again?", L_ask3,
+ "No, not yet.",-;
+ mes "\"So please hurry up!\"";
+ close;
L_ask3:
- mes "[Miriam]";
- mes "\"You have a small mind, haven't you? I am meditating here and I asked you to bring me stuff, so I can concentrate better.\"";
- next;
- mes "\"And stop asking such silly questions in the future.\"";
- next;
- mes "\"So, if you really want to help me now, bring me 5 Concentration Potions and 10 Snake Tongues.\"";
- close;
+ mes "[Miriam]";
+ mes "\"You have a small mind, haven't you? I am meditating here and I asked you to bring me stuff, so I can concentrate better.\"";
+ next;
+ mes "\"And stop asking such silly questions in the future.\"";
+ next;
+ mes "\"So, if you really want to help me now, bring me 5 Concentration Potions and 10 Snake Tongues.\"";
+ close;
L_getitems:
- if (countitem("SnakeTongue") < 10 || countitem("ConcentrationPotion") < 5) goto L_notenough;
- delitem "SnakeTongue", 10;
- delitem "ConcentrationPotion", 5;
- set QUEST_MIRIAM, 3;
- mes "[Miriam]";
- mes "\"Good job! Now I have enough food to stay in this desert for days!\"";
- next;
- mes "\"Now, since you helped me, maybe I can teach you a basic skill, but only if you prove yourself to be a fast runner! Come back and talk to me when you think you are prepared to learn.\"";
- close;
+ if (countitem("SnakeTongue") < 10 || countitem("ConcentrationPotion") < 5) goto L_notenough;
+ delitem "SnakeTongue", 10;
+ delitem "ConcentrationPotion", 5;
+ set QUEST_MIRIAM, 3;
+ mes "[Miriam]";
+ mes "\"Good job! Now I have enough food to stay in this desert for days!\"";
+ next;
+ mes "\"Now, since you helped me, maybe I can teach you a basic skill, but only if you prove yourself to be a fast runner! Come back and talk to me when you think you are prepared to learn.\"";
+ close;
L_notenough:
- mes "[Miriam]";
- mes "\"Hey, you don't have all that I asked. Come back when you have everything.\"";
- close;
+ mes "[Miriam]";
+ mes "\"Hey, you don't have all that I asked. Come back when you have everything.\"";
+ close;
L_teach:
- mes "[Miriam]";
- mes "\"Hmm... do you think you can learn the special Speed skill?\"";
- next;
- menu
- "Yes, I am prepared...", -,
- "I am already fast.", L_notfast;
-
- set @agi, readparam(bAgi);
- set @torso$, getitemname(getequipid(equip_torso));
- set @weight, MaxWeight/Weight;
- if (@weight < 3) goto L_heavyweight;
- if (@agi < 60) goto L_slow;
- if (baselevel < 60) goto L_lowlevel;
- if (countitem("SteelShield") > 0 || countitem("WarlordHelmet") > 0 || countitem("CrusadeHelmet") > 0 || countitem("WarlordPlate") > 0 || countitem("KnightsHelmet") > 0 || countitem("InfantryHelmet") > 0 || countitem("ChainmailShirt") > 0) goto L_heavymetal;
- goto L_offer;
+ mes "[Miriam]";
+ mes "\"Hmm... do you think you can learn the special Speed skill?\"";
+ next;
+ menu
+ "Yes, I am prepared...", -,
+ "I am already fast.", L_notfast;
+
+ set @agi, readparam(bAgi);
+ set @torso$, getitemname(getequipid(equip_torso));
+ set @weight, MaxWeight/Weight;
+ if (@weight < 3) goto L_heavyweight;
+ if (@agi < 60) goto L_slow;
+ if (baselevel < 60) goto L_lowlevel;
+ if (countitem("SteelShield") > 0 || countitem("WarlordHelmet") > 0 || countitem("CrusadeHelmet") > 0 || countitem("WarlordPlate") > 0 || countitem("KnightsHelmet") > 0 || countitem("InfantryHelmet") > 0 || countitem("ChainmailShirt") > 0) goto L_heavymetal;
+ goto L_offer;
L_heavyweight:
- mes "[Miriam]";
- mes "\"Wow... Why do you bring so many things with you? You must be carrying more than one third of your own weight! I won't teach you unless you get rid of some stuff... \"";
- close;
+ mes "[Miriam]";
+ mes "\"Wow... Why do you bring so many things with you? You must be carrying more than one third of your own weight! I won't teach you unless you get rid of some stuff... \"";
+ close;
L_heavymetal:
- mes "[Miriam]";
- mes "\"Hmm... I see... You want to be one of those lazy slow warriors... wasting all their strength carrying kilos of metal clothes... Why does no one see the great advantages of a beautiful, flexible, lightweight armor nowadays?\"";
- next;
- mes "\"Come back here when you get rid of this junk...\"";
- close;
+ mes "[Miriam]";
+ mes "\"Hmm... I see... You want to be one of those lazy slow warriors... wasting all their strength carrying kilos of metal clothes... Why does no one see the great advantages of a beautiful, flexible, lightweight armor nowadays?\"";
+ next;
+ mes "\"Come back here when you get rid of this junk...\"";
+ close;
L_slow:
- mes "[Miriam]";
- mes "Oh, wait, wait... " +@agi+ " Agility? Are you serious? What do you do with all your Character points? Put them all to 'Strength'? Really... I don't even want to know... Come back here when you have a decent character points distribution!\"";
- close;
+ mes "[Miriam]";
+ mes "Oh, wait, wait... " +@agi+ " Agility? Are you serious? What do you do with all your Character points? Put them all to 'Strength'? Really... I don't even want to know... Come back here when you have a decent character points distribution!\"";
+ close;
L_lowlevel:
- mes "[Miriam]";
- mes "\"Come back here when you are old enough. I even wonder how you could get here so unexperienced as you are.\"";
- close;
+ mes "[Miriam]";
+ mes "\"Come back here when you are old enough. I even wonder how you could get here so unexperienced as you are.\"";
+ close;
L_offer:
- mes "[Miriam]";
- mes "\"Hmm! You look great in these clothes! They look very comfortable too... And it seems like you are not carrying too much weight.\"";
- next;
- if (!(getskilllv(SKILL_POOL))) goto L_noskill;
- menu
- "Yes, I look really good in this " +@torso$+ ".",-;
- mes "[Miriam]";
- mes "\"I see. I like the way you distributed your Character Points too... " +@agi+ " points to Agility! You really know how to prepare yourself for a good fight!\"";
- next;
- mes "\"Well... Even if you have a potential to be a good fighter, moving the way you do will not help. You need to be fast to avoid the monsters. \"";
- next;
- mes "\"So, if you pass a small test I can teach you a skill that will increase your walking speed! You will not be as fast as I am, but I am sure it will be useful.\"";
- next;
- menu
- "I'm in! What kind of test is it?",-,
- "I don't think I need more speed right now",L_giveup;
+ mes "[Miriam]";
+ mes "\"Hmm! You look great in these clothes! They look very comfortable too... And it seems like you are not carrying too much weight.\"";
+ next;
+ if (!(getskilllv(SKILL_POOL))) goto L_noskill;
+ menu
+ "Yes, I look really good in this " +@torso$+ ".",-;
+ mes "[Miriam]";
+ mes "\"I see. I like the way you distributed your Character Points too... " +@agi+ " points to Agility! You really know how to prepare yourself for a good fight!\"";
+ next;
+ mes "\"Well... Even if you have a potential to be a good fighter, moving the way you do will not help. You need to be fast to avoid the monsters. \"";
+ next;
+ mes "\"So, if you pass a small test I can teach you a skill that will increase your walking speed! You will not be as fast as I am, but I am sure it will be useful.\"";
+ next;
+ menu
+ "I'm in! What kind of test is it?",-,
+ "I don't think I need more speed right now",L_giveup;
L_test:
- mes "[Miriam]";
- mes "\"Great! The test is simple. You need to run as fast as you can from the place where I am sitting to the mountains and talk to Pachua, the chief. When you get there and talk to Pachua, he will send a special smoke signal to me, so I can know how much time it took for you to get there.\"";
- next;
- mes "\"If you make it in a good time, I will teach you the special speeding skill. If not, you can always try again. So, are you ready?\"";
- next;
- menu
- "Yes, let's do it!",-,
- "No, I need to stretch my muscles first!",L_stretch;
-
- close2;
- message strcharinfo(0), "Miriam quickly grabs your arm and pull you to the place where she is sitting.";
- // Warp the player to the place where the NPC is defined, so he can't cheat.
- warp "032-1.gat",55,21;
- npctalk "Run " +strcharinfo(0)+ ", run!";
- set QUEST_MIRIAM, 5;
- set QUEST_MIRIAM_start, gettimetick(2);
- set QUEST_MIRIAM_cheat, 0;
- end;
+ mes "[Miriam]";
+ mes "\"Great! The test is simple. You need to run as fast as you can from the place where I am sitting to the mountains and talk to Pachua, the chief. When you get there and talk to Pachua, he will send a special smoke signal to me, so I can know how much time it took for you to get there.\"";
+ next;
+ mes "\"If you make it in a good time, I will teach you the special speeding skill. If not, you can always try again. So, are you ready?\"";
+ next;
+ menu
+ "Yes, let's do it!",-,
+ "No, I need to stretch my muscles first!",L_stretch;
+
+ close2;
+ message strcharinfo(0), "Miriam quickly grabs your arm and pull you to the place where she is sitting.";
+ // Warp the player to the place where the NPC is defined, so he can't cheat.
+ warp "032-1.gat",55,21;
+ npctalk "Run " +strcharinfo(0)+ ", run!";
+ set QUEST_MIRIAM, 5;
+ set QUEST_MIRIAM_start, gettimetick(2);
+ set QUEST_MIRIAM_cheat, 0;
+ end;
L_naked:
- mes "[Miriam]";
- mes "\"Hmmm?! Please put on some clothes before talking to me.\"";
- close;
+ mes "[Miriam]";
+ mes "\"Hmmm?! Please put on some clothes before talking to me.\"";
+ close;
L_notfast:
- mes "[Miriam]";
- mes "\"Hah! If you think so...\"";
- close;
+ mes "[Miriam]";
+ mes "\"Hah! If you think so...\"";
+ close;
L_noskill:
- mes "[Miriam]";
- mes "\"For a person like you, I could even teach a useful skill! Too bad you don't have the basic abillities to learn it...\"";
- close;
+ mes "[Miriam]";
+ mes "\"For a person like you, I could even teach a useful skill! Too bad you don't have the basic abillities to learn it...\"";
+ close;
L_giveup:
- mes "[Miriam]";
- mes "\"Oh, that is too bad... But if you change your mind, come back!\"";
- set QUEST_MIRIAM, 4;
- close;
+ mes "[Miriam]";
+ mes "\"Oh, that is too bad... But if you change your mind, come back!\"";
+ set QUEST_MIRIAM, 4;
+ close;
L_testoffer:
- mes "[Miriam]";
- mes "\"Are you ready for the test now?\"";
- next;
- menu
- "Yes!",L_test,
- "Not yet.",-;
- close;
+ mes "[Miriam]";
+ mes "\"Are you ready for the test now?\"";
+ next;
+ menu
+ "Yes!",L_test,
+ "Not yet.",-;
+ close;
L_warning:
- mes "[Miriam]";
- mes "\"I know very well what you tried to do. I will not teach you the speed skill if you keep trying this kind of trick!\"";
- next;
- goto L_testoffer;
+ mes "[Miriam]";
+ mes "\"I know very well what you tried to do. I will not teach you the speed skill if you keep trying this kind of trick!\"";
+ next;
+ goto L_testoffer;
L_stretch:
- mes "[Miriam]";
- mes "\"Ok. Good idea... Stretching exercises can increase your flexibility and even prevent injuries!\"";
- set QUEST_MIRIAM, 4;
- close;
+ mes "[Miriam]";
+ mes "\"Ok. Good idea... Stretching exercises can increase your flexibility and even prevent injuries!\"";
+ set QUEST_MIRIAM, 4;
+ close;
L_wasting:
- mes "[Miriam]";
- mes "\"Don't waste your time talking to me! RUN and talk to Pachua!\"";
- close;
+ mes "[Miriam]";
+ mes "\"Don't waste your time talking to me! RUN and talk to Pachua!\"";
+ close;
L_checktime:
- if (QUEST_MIRIAM_cheat != 0) goto L_warning;
- if (QUEST_MIRIAM_run > 210) goto L_tryagain;
- if (QUEST_MIRIAM_run <= 210) goto L_goodjob;
+ if (QUEST_MIRIAM_cheat != 0) goto L_warning;
+ if (QUEST_MIRIAM_run > 210) goto L_tryagain;
+ if (QUEST_MIRIAM_run <= 210) goto L_goodjob;
L_tryagain:
- mes "[Miriam]";
- mes "\"You needed " + QUEST_MIRIAM_run + " seconds to reach Pachua. It is not enough.\"";
- set QUEST_MIRIAM_run, 0;
- close;
+ mes "[Miriam]";
+ mes "\"You needed " + QUEST_MIRIAM_run + " seconds to reach Pachua. It is not enough.\"";
+ set QUEST_MIRIAM_run, 0;
+ close;
L_goodjob:
- mes "[Miriam]";
- mes "\"Great job! You needed " + QUEST_MIRIAM_run + " seconds to reach Pachua. Very impressive for a person like you.\"";
- next;
- mes "\"Now I need you to relax. Do NOT move. This teaching process can be painful sometimes.\"";
- next;
- mes "Miriam stares into your eyes and starts to scream some strange words very close to your ears.";
- next;
- mes "You feel dizzy and as soon as you move your head and look to the ground, Miriam pushes you hard, sending you meters away from her.";
- close2;
- warp "032-1.gat",55,22;
- // free all used player variables. This can be done, since there is a conditional on the speedskill at the beginning.
- set QUEST_MIRIAM_start, 0;
- set QUEST_MIRIAM_run, 0;
- set QUEST_MIRIAM, 0;
- message strcharinfo(0), "[You gain 2500 experience points]";
- message strcharinfo(0), "[You learned Speed Skill]";
- setskill SKILL_SPEED, 1;
- getexp 2500, 0;
- set QUEST_MIRIAM_cheat, 0; // reset just in case it is still set.
- close;
+ mes "[Miriam]";
+ mes "\"Great job! You needed " + QUEST_MIRIAM_run + " seconds to reach Pachua. Very impressive for a person like you.\"";
+ next;
+ mes "\"Now I need you to relax. Do NOT move. This teaching process can be painful sometimes.\"";
+ next;
+ mes "Miriam stares into your eyes and starts to scream some strange words very close to your ears.";
+ next;
+ mes "You feel dizzy and as soon as you move your head and look to the ground, Miriam pushes you hard, sending you meters away from her.";
+ close2;
+ warp "032-1.gat",55,22;
+ // free all used player variables. This can be done, since there is a conditional on the speedskill at the beginning.
+ set QUEST_MIRIAM_start, 0;
+ set QUEST_MIRIAM_run, 0;
+ set QUEST_MIRIAM, 0;
+ message strcharinfo(0), "[You gain 2500 experience points]";
+ message strcharinfo(0), "[You learned Speed Skill]";
+ setskill SKILL_SPEED, 1;
+ getexp 2500, 0;
+ set QUEST_MIRIAM_cheat, 0; // reset just in case it is still set.
+ close;
L_fast:
- mes "[Miriam]";
- mes "\"I hope you make a good use of your new skill... Take care!\"";
- set QUEST_MIRIAM_cheat, 0; // reset just in case it is still set.
- close;
+ mes "[Miriam]";
+ mes "\"I hope you make a good use of your new skill... Take care!\"";
+ set QUEST_MIRIAM_cheat, 0; // reset just in case it is still set.
+ close;
}