summaryrefslogtreecommitdiff
path: root/npc/013-1_Woodland_hills
diff options
context:
space:
mode:
authorFate <fate-tmw@googlemail.com>2008-12-27 22:22:21 -0700
committerFate <fate-tmw@googlemail.com>2008-12-27 22:22:21 -0700
commitaacf6527a0ae9d440f9271906400825c9722275f (patch)
tree10ec2d33e7d9bd4285227722f9fce410fa2abae6 /npc/013-1_Woodland_hills
parent562a0fdbaa002a49f4763bd07442e2ed32726ab9 (diff)
downloadserverdata-aacf6527a0ae9d440f9271906400825c9722275f.tar.gz
serverdata-aacf6527a0ae9d440f9271906400825c9722275f.tar.bz2
serverdata-aacf6527a0ae9d440f9271906400825c9722275f.tar.xz
serverdata-aacf6527a0ae9d440f9271906400825c9722275f.zip
Magic quests 0, 2, 4
Diffstat (limited to 'npc/013-1_Woodland_hills')
-rw-r--r--npc/013-1_Woodland_hills/_import.txt1
-rw-r--r--npc/013-1_Woodland_hills/sagatha.txt129
2 files changed, 130 insertions, 0 deletions
diff --git a/npc/013-1_Woodland_hills/_import.txt b/npc/013-1_Woodland_hills/_import.txt
index c4c325bc..899d3d7e 100644
--- a/npc/013-1_Woodland_hills/_import.txt
+++ b/npc/013-1_Woodland_hills/_import.txt
@@ -2,3 +2,4 @@ map: 013-1.gat
npc: npc/013-1_Woodland_hills/_mobs.txt
npc: npc/013-1_Woodland_hills/_warps.txt
npc: npc/013-1_Woodland_hills/monsters.txt
+npc: npc/013-1_Woodland_hills/sagatha.txt
diff --git a/npc/013-1_Woodland_hills/sagatha.txt b/npc/013-1_Woodland_hills/sagatha.txt
new file mode 100644
index 00000000..4295043a
--- /dev/null
+++ b/npc/013-1_Woodland_hills/sagatha.txt
@@ -0,0 +1,129 @@
+013-1.gat,131,24,0 script Sagatha#_M 167,{
+ set @has_magic, getskilllv(SKILL_MAGIC);
+ set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_SAGATHA;
+
+L_Main:
+ menu "What do you know about...", L_Question;
+ close;
+
+L_Question:
+ set @QQ_ELANORE, 1;
+ set @QQ_MANASEED, 2;
+ set @QQ_WYARA, 3;
+ set @QQ_AULDSBEL, 5;
+
+ setarray @choice$, "", "", "", "", "", "";
+ set @choices_nr, 0;
+ setarray @choice_idx, 0, 0, 0, 0, 0, 0;
+
+ set @choice$[@choices_nr], "...Elanore the Healer?";
+ set @choice_idx[@choices_nr], @QQ_ELANORE;
+ set @choices_nr, @choices_nr + 1;
+
+ if (!(MAGIC_FLAGS & (MFLAG_KNOWS_MANASEED | MFLAG_MANASEED_RUMOUR)))
+ goto L_Q_post_manaseed;
+ set @choice$[@choices_nr], "...the Mana Seed?";
+ set @choice_idx[@choices_nr], @QQ_MANASEED;
+ set @choices_nr, @choices_nr + 1;
+L_Q_post_manaseed:
+
+ if (!(MAGIC_FLAGS & MFLAG_KNOWS_MANAPOTION))
+ goto L_Q_post_manapotion;
+ set @choice$[@choices_nr], "...Mana Potions?";
+ set @choice_idx[@choices_nr], @QQ_MANAPOTION;
+ set @choices_nr, @choices_nr + 1;
+L_Q_post_manapotion:
+
+ if (!(MAGIC_FLAGS & MFLAG_KNOWS_WYARA))
+ goto L_Q_post_wyara;
+ set @choice$[@choices_nr], "...Wyara the Witch?";
+ set @choice_idx[@choices_nr], @QQ_WYARA;
+ set @choices_nr, @choices_nr + 1;
+L_Q_post_wyara:
+
+ if (!(MAGIC_FLAGS & MFLAG_KNOWS_SAGATHA))
+ goto L_Q_post_sagatha;
+ set @choice$[@choices_nr], "...Sagatha the Witch?";
+ set @choice_idx[@choices_nr], @QQ_SAGATHA;
+ set @choices_nr, @choices_nr + 1;
+L_Q_post_sagatha:
+
+ if (!(MAGIC_FLAGS & MFLAG_KNOWS_AULDSBEL))
+ goto L_Q_post_auldsbel;
+ set @choice$[@choices_nr], "...Auldsbel the Wizard?";
+ set @choice_idx[@choices_nr], @QQ_AULDSBEL;
+ set @choices_nr, @choices_nr + 1;
+L_Q_post_auldsbel:
+
+ set @choice$[@choices_nr], "...never mind.";
+ set @choice_idx[@choices_nr], 0;
+ set @choices_nr, @choices_nr + 1;
+
+ menu @choice$[0], -,
+ @choice$[1], -,
+ @choice$[2], -,
+ @choice$[3], -,
+ @choice$[4], -;
+
+ set @menu, @menu - 1;
+
+ if (@menu >= @choices_nr)
+ set @menu, 0;
+
+ set @c, @choice_idx[@menu];
+
+ if (@c == 0) goto L_Main;
+ if (@c == @QQ_ELANORE) goto L_Q_elanore;
+ if (@c == @QQ_MANASEED) goto L_Q_manaseed;
+ if (@c == @QQ_MANAPOTION) goto L_Q_manapotion;
+ if (@c == @QQ_WYARA) goto L_Q_wyara;
+ if (@c == @QQ_AULDSBEL) goto L_Q_auldsbel;
+ close;
+
+L_Q_elanore:
+ mes "[Sagatha the Witch]";
+ mes "\"FIXME.\"";
+ next;
+ goto L_Main;
+
+L_Q_manaseed:
+ mes "[Sagatha the Witch]";
+ if (!@has_magic && (MAGIC_FLAGS & MFLAG_TOUCHED_MANASEED))
+ goto L_Q_manaseed_unabsorbed;
+ if (@has_magic)
+ goto L_Q_manaseed_m;
+ mes "\"arimasu\"";
+ next;
+ goto L_Main;
+
+L_Q_manaseed_unabsorbed:
+ mes "[Sagatha the Witch]";
+ mes "\"...unattuned.\"";
+ next;
+ goto L_Main;
+
+L_Q_manaseed_m:
+ mes "[Sagatha the Witch]";
+ mes "\"...\"";
+ next;
+ goto L_Main;
+
+L_Q_manapotion:
+ mes "[Sagatha the Witch]";
+ mes "\"Can't make one without a cauldron.\"";
+ next;
+ goto L_Main;
+
+L_Q_wyara:
+ mes "[Sagatha the Witch]";
+ mes "\"\"";
+ next;
+ goto L_Main;
+
+L_Q_auldsbel:
+ mes "[Sagatha the Witch]";
+ mes "\"\"";
+ next;
+ goto L_Main;
+
+}