Tanker & Auldsbel Prototype.

1 files changed, 28 insertions, 1 deletions

diff --git a/npc/003-0/audsbel.txt b/npc/003-0/audsbel.txt
index ca5edecbb..3568a12c7 100644
--- a/npc/003-0/audsbel.txt
+++ b/npc/003-0/audsbel.txt
@@ -3,13 +3,40 @@
 //    Jesusalva
 // Description:
 //    One of the Mana Magic Leaders
+//    Planned, there are only Auldsbel and Sagratha as Mana Wizards.
+
 //    Gives #parum
 
-003-0,34,37,0	script	Audsbel	NPC_AULDSBEL,{
+003-0,34,37,0	script	Auldsbel	NPC_AULDSBEL,{
+    if (MAGIC_LVL < 2)
+        goto L_Cheat;
+    mesn l("Auldsbel the Wizard");
+    mesq l("Welcome back, Padric!");
+    mesq l("Do you believe I've lost my @@? I can't see anything well without that! %%a", getitemlink(Googles));
+    next;
+    mesn l("Auldsbel the Wizard");
+    mesq l("Anyway, I am one of the few Mana Wizard, and I love Transmutation!");
+    next;
+    select
+        l("What's the difference from a Mana Wizard and a Mage?"),
+        l("Where are you from?"),
+        l("Do you still need help with your experiments?"),
+        l("Can you teach me Mana Magic?"),
+        l("What do you know about Sagratha?"),
+        l("Actually, I gotta go, see ya!");
+
     goodbye;
     closedialog;
     close;
 
+L_Cheat:
+    atcommand "@jail "+strcharinfo(0);
+    setparam(MaxHp, readparam(MaxHp)/2); // testing
+    setparam(Karma, -1); // testing
+    setparam(Manner, -10); // testing
+    dispbottom l("You are not allowed on this building, and was caught by Jesusalva's Police!!");
+    end;
+
 OnInit:
     .sex=G_MALE;
     .distance=5;