summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--npc/005-6/morgan.txt59
1 files changed, 57 insertions, 2 deletions
diff --git a/npc/005-6/morgan.txt b/npc/005-6/morgan.txt
index 0f825d24e..f5fa6a7a2 100644
--- a/npc/005-6/morgan.txt
+++ b/npc/005-6/morgan.txt
@@ -25,10 +25,10 @@ L_Who:
next;
mesq l("I really hope that nothing major happens, though. I would hate to see blood being spilled.");
next;
- if (!#MAGIC_LVL)
+ if (!MAGIC_LVL)
mesq l("If you train hard enough, and get access to a Mana Stone, I could teach you a trick or two. But right now, I don't sense magic compatibility in you.");
else
- mesq l("I see you are a mage too. Have you joined a class already? Luca and Colin are always recruiting on Tulimshar Magic Council.");
+ goto L_Magic;
close;
L_Shop:
@@ -40,6 +40,61 @@ L_Shop:
closedialog;
close;
+// Magic Subsystem
+L_Magic:
+ mesn;
+ mesq l("I see you are a mage too. Have you joined a class already? Luca and Colin are always recruiting on Tulimshar Magic Council.");
+
+L_MagicCore:
+ select
+ l("What is an class?"),
+ l("How difficult it is to obtain a class?"),
+ rif(!getskilllv(TMW2_KALMURK), l("Can you teach me a spell?"),
+ l("How magic works on this world?");
+ mes "";
+ switch (@menu) {
+ case 1:
+ mesn;
+ mesq l("We have two main groups, entitled classes: The Magic Warriors, and the Wizard Mages.");
+ next;
+ mesn;
+ mesq l("I don't think you can be part of more than one class, but you can accumulate subclasses. These will only unlock at tier 2, though.");
+ case 2:
+ mesn;
+ mesq l("You know the Tulimshar Magic Council? The big building on Tulimshar North? There you can obtain a class.");
+ next;
+ mesn;
+ mesq l("Getting in a class is easy, difficult is mastering it. But the more you advance, more powerful skills are unlocked.");
+ next;
+ mesn;
+ mesq l("Of course, if you don't ask from the Mana Stone for more magic, that means nothing...");
+ case 3:
+ mesn;
+ mesq l("Sure! But that is Mana Magic. Just bring me a mug of beer, I'm thristy. And I'll teach you a basic skill.");
+ next;
+ if (askyesno() == ASK_YES) {
+ if (!countitem(Beer)) goto L_Lie;
+ delitem Beer, 1;
+ skill(TMW2_KALMURK,1,0);
+ mesn;
+ mesq l("You can use @@ to summon some maggots. That depends on your magic level, of course.", "##B@sk-kalmurk##b");
+ next;
+ mesn;
+ mesq l("That's a Mana Magic. It is very different from regular magic. For example, it have an experience meter and an alias you can say.");
+ next;
+ mesn;
+ mesq l("Unless you have an @@, it'll be difficult to track progress on Mana Magic, and you won't really gain any mana experience for a while.", getitemlink(JesusalvaGrimorium));
+ next;
+ mesn;
+ mesq l("By the way, you need a couple of @@ to try the skill. Fail rate is pretty high, but that book will teach you how to reduce it.", getitemlink(MaggotSlime));
+ }
+ default:
+ close;
+ }
+ next;
+ goto L_MagicCore;
+
+
OnInit:
tradertype(NST_MARKET);