diff options
Diffstat (limited to 'world/map/npc/013-2/wizard.txt')
| -rw-r--r-- | world/map/npc/013-2/wizard.txt | 217 |
1 files changed, 105 insertions, 112 deletions
diff --git a/world/map/npc/013-2/wizard.txt b/world/map/npc/013-2/wizard.txt index 927ddfc4..31b783dc 100644 --- a/world/map/npc/013-2/wizard.txt +++ b/world/map/npc/013-2/wizard.txt @@ -1,130 +1,123 @@ -013-2.gat,66,39,0 script Old Wizard#_W 116,{ - set @has_magic, getskilllv(SKILL_MAGIC); - set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_OLD_WIZARD; - - mes "[Old Wizard]"; - mes "\"Welcome, dear wanderer! Come into my humble home. Take a rest, eat and drink.\""; - next; - - menu - "Thanks, that's very kind of you!",thanks, - "Can you teach me magic?", L_teach_rude, - "Oh, shut up!",shutup; - close; +013-2.gat,66,39,0|script|Old Wizard#_W|116,{ + set @has_magic, getskilllv(SKILL_MAGIC); + set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_OLD_WIZARD; + + mes "[Old Wizard]"; + mes "\"Welcome, dear wanderer! Come into my humble home. Take a rest, eat and drink.\""; + next; + menu + "Thanks, that's very kind of you!",thanks, + "Can you teach me magic?", L_teach_rude, + "Oh, shut up!",shutup; + close; L_teach_rude: - mes "[Old Wizard]"; - mes "\"I certainly could, but I already have an apprentice.\""; - close; + mes "[Old Wizard]"; + mes "\"I certainly could, but I already have an apprentice.\""; + close; shutup: - mes "[Old Wizard]"; - mes "\"That attitude isn't going to get you very far, my dear.\""; - close; + mes "[Old Wizard]"; + mes "\"That attitude isn't going to get you very far, my dear.\""; + close; + thanks: - mes "[Old Wizard]"; - mes "\"Behind this door, my apprentice will serve you.\""; - next; - if (@has_magic) - menu - "Alright.",ok, - "I am studying magic, can you help?", L_new_student, - "Your apprentice? ... No thanks.",nothx; - if (!@has_magic) - menu - "Alright.",ok, - "Your apprentice? ... No thanks.",nothx; + mes "[Old Wizard]"; + mes "\"Behind this door, my apprentice will serve you.\""; + next; + if (@has_magic) + menu + "Alright.",ok, + "I am studying magic, can you help?", L_new_student, + "Your apprentice? ... No thanks.",nothx; + if (!@has_magic) + menu + "Alright.",ok, + "Your apprentice? ... No thanks.",nothx; + nothx: - mes "[Old Wizard]"; - mes "\"Goodbye, then!\""; - close; + mes "[Old Wizard]"; + mes "\"Goodbye, then!\""; + close; L_new_student: - mes "[Old Wizard]"; - mes "\"Studying is always an excellent use of one's mind! I fear that I can't offer too much assistance to you, however. But if you are interested, I could perhaps teach you a simple spell?\""; - next; + mes "[Old Wizard]"; + mes "\"Studying is always an excellent use of one's mind! I fear that I can't offer too much assistance to you, however. But if you are interested, I could perhaps teach you a simple spell?\""; + next; - // check if the player has the knowledge of any skill - if (!(getskilllv(SKILL_POOL))) - menu - "That would be very kind of you!", L_teachspell, - "No, but thank you!", nothx; - - if (getskilllv(SKILL_POOL)) - menu - "That would be very kind of you!", L_teachspell, - "Actually I am looking for someone teaching me some more magic skills.", L_astralsoul, - "No, but thank you!", nothx; + // check if the player has the knowledge of any skill + if (!(getskilllv(SKILL_POOL))) + menu + "That would be very kind of you!", L_teachspell, + "No, but thank you!", nothx; + if (getskilllv(SKILL_POOL)) + menu + "That would be very kind of you!", L_teachspell, + "Actually I am looking for someone teaching me some more magic skills.", L_astralsoul, + "No, but thank you!", nothx; L_teachspell: - mes "[Old Wizard]"; - mes "\"This one may not seem too powerful, but it can be quite handy; it's the 'hide' spell. It will shield you from some forms of detection magic.\""; - next; - - mes "[Old Wizard]"; - mes "\"Put a piece of cotton cloth on your head, and speak out '" + getspellinvocation("hide") + "', loudly and clearly. The protection lasts quite long, but you may have to renew it on occasion.\""; - next; - - mes "[Old Wizard]"; - mes "\"You can also cast it on others, of course. Just speak their name after you prononuce the invocation.\""; - next; - - mes "[Old Wizard]"; - mes "\"You may find it useful for getting a little peace and quiet at times, but it can also get in the way of friends trying to find you, so use it with care.\""; - next; - - if (getskilllv(SKILL_MAGIC_ASTRAL) >= 2) - close; - - mes "[Old Wizard]"; - mes "\"I'm not sure if you are experienced enough to cast it yet, though. You may need to first learn astral magic.\""; + mes "[Old Wizard]"; + mes "\"This one may not seem too powerful, but it can be quite handy; it's the 'hide' spell. It will shield you from some forms of detection magic.\""; + next; + mes "[Old Wizard]"; + mes "\"Put a piece of cotton cloth on your head, and speak out '" + getspellinvocation("hide") + "', loudly and clearly. The protection lasts quite long, but you may have to renew it on occasion.\""; + next; + mes "[Old Wizard]"; + mes "\"You can also cast it on others, of course. Just speak their name after you prononuce the invocation.\""; + next; + mes "[Old Wizard]"; + mes "\"You may find it useful for getting a little peace and quiet at times, but it can also get in the way of friends trying to find you, so use it with care.\""; + next; + if (getskilllv(SKILL_MAGIC_ASTRAL) >= 2) close; + mes "[Old Wizard]"; + mes "\"I'm not sure if you are experienced enough to cast it yet, though. You may need to first learn astral magic.\""; + close; L_astralsoul: - mes "[Old Wizard]"; - mes "\"Oh yes, there are lots of ways to improve your magic. Skills -some people say mental focus for that- are another way to improve your magic. Of course learning more and more spells is also a need for good mages.\""; - next; - mes "\"I can teach you the ability to focus on magical stuff.\""; - next; - mes "\"To do so, I am in need of a pearl and about 100 acorns.\""; - - menu "Here we go.", -, - "Ok be right back. I'll get them", nothx; - - if (countitem("Pearl") < 1 || countitem("Acorn") < 100) goto L_NotEnough; - delitem "Pearl", 1; - delitem "Acorn", 100; - - mes "[Old Wizard]"; - mes "\"Okay, listen:\""; - next; - mes "\"Some parts of your brain is still unused. These parts will now get the ability to get focused to magic.\""; - next; - mes "\"To do so, think of a magic spell!\""; - next; - mes "The old wizard mumbles some invocations"; - next; - set @SUP_lvl, 1; - set @SUP_id, SKILL_ASTRAL_SOUL; - set @SUP_name$, "Astral Soul"; - set @SUP_xp, 2500; - callfunc "SkillUp"; - mes "\"Now go and try to find someone who can actually activate that focus.\""; - next; - mes "\"You have the powers to focus on magic, but you need to get magic focused now.\""; - close; + mes "[Old Wizard]"; + mes "\"Oh yes, there are lots of ways to improve your magic. Skills -some people say mental focus for that- are another way to improve your magic. Of course learning more and more spells is also a need for good mages.\""; + next; + mes "\"I can teach you the ability to focus on magical stuff.\""; + next; + mes "\"To do so, I am in need of a pearl and about 100 acorns.\""; + menu + "Here we go.", -, + "Ok be right back. I'll get them", nothx; + if (countitem("Pearl") < 1 || countitem("Acorn") < 100) goto L_NotEnough; + delitem "Pearl", 1; + delitem "Acorn", 100; + mes "[Old Wizard]"; + mes "\"Okay, listen:\""; + next; + mes "\"Some parts of your brain is still unused. These parts will now get the ability to get focused to magic.\""; + next; + mes "\"To do so, think of a magic spell!\""; + next; + mes "The old wizard mumbles some invocations"; + next; + set @SUP_lvl, 1; + set @SUP_id, SKILL_ASTRAL_SOUL; + set @SUP_name$, "Astral Soul"; + set @SUP_xp, 2500; + callfunc "SkillUp"; + mes "\"Now go and try to find someone who can actually activate that focus.\""; + next; + mes "\"You have the powers to focus on magic, but you need to get magic focused now.\""; + close; L_NotEnough: - mes "[Old Wizard]"; - mes "\"Please learn to count.\""; - next; - mes "\"When you are done with that, come back again.\""; - close; + mes "[Old Wizard]"; + mes "\"Please learn to count.\""; + next; + mes "\"When you are done with that, come back again.\""; + close; + ok: - mes "[Old Wizard]"; - mes "\"Beware the flying notes though, some of them are really dangerous. I haven't been able to persuade them to get back into their book. And avoid the mirror, it's been acting strange lately.\""; - next; - mes "\"Oh, and please don't take my apprentice too seriously. He still has a lot to learn.\""; - close; + mes "[Old Wizard]"; + mes "\"Beware the flying notes though, some of them are really dangerous. I haven't been able to persuade them to get back into their book. And avoid the mirror, it's been acting strange lately.\""; + next; + mes "\"Oh, and please don't take my apprentice too seriously. He still has a lot to learn.\""; + close; } - |