summaryrefslogtreecommitdiff
path: root/world/map/npc/013-2/wizard.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/013-2/wizard.txt')
-rw-r--r--world/map/npc/013-2/wizard.txt144
1 files changed, 0 insertions, 144 deletions
diff --git a/world/map/npc/013-2/wizard.txt b/world/map/npc/013-2/wizard.txt
deleted file mode 100644
index f4e81a72..00000000
--- a/world/map/npc/013-2/wizard.txt
+++ /dev/null
@@ -1,144 +0,0 @@
-013-2,66,39,0|script|Old Wizard#_W|116
-{
- set @has_magic, getskilllv(SKILL_MAGIC);
- set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_OLD_WIZARD;
-
- set @run, ((QUEST_NorthTulimshar & TWOBIT_8_MASK) >> TWOBIT_8_SHIFT);
- if ((@run == 2) && (QL_KYLIAN == 13))
- goto L_Deliver;
- goto L_Start;
-
-L_Deliver:
- menu
- "I have a delivery for you", L_Delivery;
-
-L_Delivery:
- mes "[Old Wizard]";
- mes "\"Good now I can get to work on some stronger brew..\"";
- set QL_KYLIAN, 14;
- goto L_Close;
-
-L_Start:
- 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!", L_Thanks,
- "Can you teach me magic?", L_TeachRude,
- "Oh, shut up!", L_ShutUp;
-
-L_TeachRude:
- mes "[Old Wizard]";
- mes "\"I certainly could, but I already have an apprentice.\"";
- goto L_Close;
-
-L_ShutUp:
- mes "[Old Wizard]";
- mes "\"That attitude isn't going to get you very far, my dear.\"";
- goto L_Close;
-
-L_Thanks:
- mes "[Old Wizard]";
- mes "\"Behind this door, my apprentice will serve you.\"";
- next;
- if (@has_magic)
- menu
- "Alright.", L_Agree,
- "I am studying magic, can you help?", L_NewStudent,
- "Your apprentice? ... No thanks.", L_Decline;
- menu
- "Alright.", L_Agree,
- "Your apprentice? ... No thanks.", L_Decline;
-
-L_Decline:
- mes "[Old Wizard]";
- mes "\"Goodbye, then!\"";
- goto L_Close;
-
-L_NewStudent:
- 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) && (getskilllv(SKILL_MAGIC_ASTRAL) < 1) || (getskilllv(SKILL_ASTRAL_SOUL) == 0))
- 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!", L_Decline;
- menu
- "That would be very kind of you!", L_TeachSpell,
- "No, but thank you!", L_Decline;
-
-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 '" + get(.invocation$, "spell-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 pronounce 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)
- goto L_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.\"";
- goto L_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.", L_Next,
- "Ok be right back. I'll get them", L_Decline;
-
-L_Next:
- if (countitem("Pearl") < 1 || countitem("Acorn") < 100) goto L_NotEnough;
- 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;
- if (countitem("Pearl") < 1 || countitem("Acorn") < 100) goto L_NotEnough;
- delitem "Pearl", 1;
- delitem "Acorn", 100;
- 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.\"";
- goto L_Close;
-
-L_NotEnough:
- mes "[Old Wizard]";
- mes "\"Please learn to count.\"";
- next;
- mes "\"When you are done with that, come back again.\"";
- goto L_Close;
-
-L_Agree:
- 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.\"";
- goto L_Close;
-
-L_Close:
- set @has_magic, 0;
- close;
-}