Full npc folder reorganization. (I hope I didn't break anything D:)

-Now common scripts goes to the main npc folder, and pre-re-only/re-only ones goes to their respective folders.
-NPCs with practically the same script but little differences have been left in the main folder and uses the command checkre() for the differences.
-For those NPCs with different coordinates but same script, the script has been left in the main folder but the NPCs splitted as duplicates.
-All pre-renewal files has been reverted back to their pre-renewal behavior.

TODO:
-Correct pre-re quest rewards.
-Check for pre-re/re differences in mapflags.

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16545 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 0 insertions, 3670 deletions

diff --git a/npc/re/quests/quests_prontera.txt b/npc/re/quests/quests_prontera.txt
deleted file mode 100644
index b5a3dd705..000000000
--- a/npc/re/quests/quests_prontera.txt
+++ /dev/null
@@ -1,3670 +0,0 @@
-//===== rAthena Script ======================================= 
-//= Quest NPCs related to Prontera
-//===== By: ================================================== 
-//= kobra_k88; L0ne_W0lf
-//===== Current Version: ===================================== 
-//= 2.7
-//===== Compatible With: ===================================== 
-//= rAthena SVN
-//===== Description: ========================================= 
-//= Collection of Prontera-based quests.
-//= * Culvert Access
-//= * Ph.D Hat Quest
-//= * Gaebolg Family Curse
-//===== Comments: ============================================
-//= Culvert Access:
-//= - [Aegis Conversion]
-//= - Variable in use: MISC_QUEST (bit 8)
-//= Ph.D Hat Quest:
-//= - [Aegis Conversion]
-//= - n/a
-//= Gaebolg Family Curse:
-//= - [Aegis Conversion]
-//= - Variable in use: prt_curse (max 61)
-//===== Additional Comments: ================================= 
-//= Fixed flower name Dreamy -> Illusion
-//= 1.2 Fixed exploit [Lupus]
-//= 1.3 Removed Duplicates [Silent]
-//= 1.4 Moved Culvert from cities/prontera.txt [Evera]
-//= 1.5 Culvert has been rescripted from the ground up. [L0ne_W0lf]
-//= 1.6 Added Gaebolg Family Curse quest. [L0ne_W0lf]
-//= 1.6a Fixed a couple spelling mistakes. [L0ne_W0lf]
-//= 1.7 Updated "Ph.D Quest" Dialogs. [Samuray22]
-//= 1.7b Fixed some minor typos. [SinSloth]
-//= 1.7c replaced item "names" with item id. [Lupus]
-//= 1.8 Fixed experience gains to match upcoming rate adjustments. [SinSloth]
-//= 1.9 Fixed "him" -> "her" in Ph.D hat quest. THansk to yyCC. [L0ne_W0lf]
-//= 2.0 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
-//= 2.0a Corrected a Typo error ";;". [Samuray22]
-//= 2.0b Corrected a Typo error. (bugreport:950) [Samuray22]
-//= 2.1 Added missing checkweights. [L0ne_W0lf]
-//= 2.2 Added Nameless Island quest addition. [L0ne_W0lf]
-//= 2.3 Bamph will now talk to those who failed the Gaebolg quest. [L0ne_W0lf]
-//= 2.3a Touch up to Bamph fo other fail-points. [L0ne_W0lf]
-//= 2.3b Hopefully the last change needed for Nameless quest. [L0ne_W0lf]
-//= 2.4 Updated Headgear Quest. [L0ne_W0lf]
-//= 2.5 Fixed requirements for PH D. Hat. [L0ne_W0lf]
-//= 2.5a Fixed requirements for PH D. Hat agian lol. [L0ne_W0lf]
-//= 2.6 Replaced effect numerics with constants. [L0ne_W0lf]
-//= 2.7 Corrected 'IProntera' typo. (bugreport:4522) [L0ne_W0lf]
-//============================================================ 
-
-// Prontera Culvert
-//============================================================ 
-prt_in,88,105,2	script	Recruiter	105,{
-	if (MISC_QUEST & 8) {
-		mes "[Recruiter]";
-		mes "Ah...";
-		mes "I know those eyes.";
-		mes "Full of compassion";
-		mes "...and courage.";
-		next;
-		mes "[Recruiter]";
-		mes "Of course you're a volunteer for campaign to reclaim the Prontera Culvert. Would you let me warp you there?";
-		next;
-		if (select("Warp to Culvert Entrance.:Quit.") == 1) {
-			warp "prt_fild05",274,208;
-			end;
-		}
-		close;
-	}
-	mes "[Recruiter]";
-	mes "Ah, let me inform you that the Capital Defense Headquarter of the Rune-Midgarts Kingdom has now decided to recruit a punitive force due to the Prontera Culvert's situation.";
-	next;
-	switch(select("Volunteer.:Situation...?:Quit.")) {
-	case 1:
-		callsub S_Volunteer;
-		mes "[Recruiter]";
-		mes "Are you ready, hero?";
-		mes "I will now warp you";
-		mes "to the Culvert.";
-		next;
-		warp "prt_fild05",274,208;
-		end;
-	case 2:
-		mes "[Recruiter]";
-		mes "Haven't you heard...?";
-		mes "The Prontera Culvert is infested with all kinds of filthy vermin!";
-		next;
-		mes "[Recruiter]";
-		mes "Due to the serious risk of water contamination, and the safety of Rune-Midgardians, the Culvert has been quarantined by royal decree.";
-		next;
-		mes "[Recruiter]";
-		mes "Needless to say, this has caused shortages in the water supply in our kingdom. Indeed, such a crisis in these dark times...";
-		next;
-		mes "[Recruiter]";
-		mes "Our people";
-		mes "thirst for water...";
-		mes "But they thirst";
-		mes "even more...";
-		mes "For a hero!";
-		next;
-		mes "[Recruiter]";
-		mes "Will you stand idly as the children of Rune-Midgarts suffer from parched throats and shed tears of dryness?! Would you bury our children?!";
-		next;
-		mes "[Recruiter]";
-		mes "Warriors! Rune-Midgarts is calling you! Cleanse this land's pestilence and cast out the vermin in the Culvert! Only you... Can make a difference.";
-		next;
-		if (select("Volunteer.:Quit.") == 1) {
-			callsub S_Volunteer;
-			mes "[Recruiter]";
-			mes "Adventurer...";
-			mes "I will now warp you";
-			mes "to the Prontera Culvert.";
-			next;
-			warp "prt_fild05",274,208;
-			end;
-		}
-		mes "[Recruiter]";
-		mes "Hmpf. Well. The next time you take a drink of water, just remember that an average of nine and a half children just died... ^990000Of thirst^000000.";
-		close;
-
-	case 3:
-		close;
-	}
-
-S_Volunteer:
-	set MISC_QUEST,MISC_QUEST | 8;
-	mes "[Recruiter]";
-	mes "Your registration...";
-	mes "is now complete.";
-	next;
-	mes "[Recruiter]";
-	mes "I would like to thank you for volunteering to do your part for our great kingdom. Here, take these provisions for your battles against the forces of darkness.";
-	next;
-	mes "[Recruiter]";
-	mes "3 Red Potions, 1 Milk,";
-	mes "and 1 Orange Potion";
-	mes "...to give you hope.";
-	getitem 501,3; //Red_Potion
-	getitem 519,1; //Milk
-	getitem 502,1; //Orange_Potion
-	next;
-	return;
-}
-
-prt_fild05,270,212,5	script	Culvert Guardian	105,{
-	if(MISC_QUEST & 8) {
-		mes "[Culvert Guardian]";
-		mes "Ah, you're one of our volunteers. This is the entrance of the Prontera Culvert.";
-		mes "Do you wish to";
-		mes "go inside?";
-		next;
-		if (select("Sure.:Quit.") == 1) {
-			warp "prt_sewb1",131,247;
-			end;
-		}
-		close;
-	}
-	mes "[Culvert Guardian]";
-	mes "I'm sorry, but we can only allow volunteers for the Culvert Campaign to enter.";
-	next;
-	mes "[Culvert Guardian]";
-	mes "If you'd like to volunteer, please visit the ^000077Culvert Registrar^000000 located in the 11 O'clock direction of Prontera.";
-	close;
-}
-
-// Ph.D Hat Quest
-//============================================================ 
-prt_in,38,108,4	script	Teacher	53,{
-	if ((countitem(710) > 0) && (countitem(703) > 0) && (countitem(704) > 0) && (countitem(708) > 0)) {
-		mes "[Teacher]";
-		mes "Oh...";
-		mes "Those Flowers in your hand are...";
-		next;
-		switch(select("Show Flowers:Present Flowers:Cancel")) {
-		case 1:
-			mes "[Teacher]";
-			mes "Ah...";
-			mes "Those are definitely the 4 kinds of Flowers I was looking for! Would you give them to me?";
-			next;
-			mes "[Teacher]";
-			mes "If you would...";
-			mes "I'll give you my precious item.";
-			close;
-		case 2:
-			if ((countitem(710) > 0) && (countitem(703) > 0) && (countitem(704) > 0) && (countitem(708) > 0)) {
-				delitem 710,1;  //Illusion_Flower
-				delitem 703,1;  //Hinalle
-				delitem 704,1;  //Aloe
-				delitem 708,1;  //Ment
-				getitem 5012,1;	//Ph.D_Hat
-				mes "[Teacher]";
-				mes "I really really appreciate you what you've done for me. I'm truly grateful. I will give my precious item to you as promised.";
-				next;
-				mes "[Teacher]";
-				mes "This is the Hat I've worn on my Graduation from my University. It reminds me of my happy school days. Please take this...";
-				close;
-			}
-			else {
-				mes "[Teacher]";
-				mes "... Oh, I'm Sorry.";
-				mes "But that's not what I'm looking for. Maybe you need to study flowers a little bit?";
-				close;
-			}
-		}
-	}
-	else {
-		mes "[Teacher]";
-		mes "Don't you think...";
-		mes "Flowers are pretty?";
-		next;
-		switch(select("Talk:Quit")) {
-		case 1:
-			mes "[Teacher]";
-			mes "When I was young,";
-			mes "I had no friends and";
-			mes "studied all the time.";
-			next;
-			mes "[Teacher]";
-			mes "Sometimes I regret what I did when I was younger, but it's not a big deal now. Through hard study, I finished entire educational courses earlier than all the other students.";
-			next;
-			mes "[Teacher]";
-			mes "However...";
-			mes "I was sad and sometimes lonely. Whenever the studying got too hard, I needed someone who would listen to me. Finally, one day, I met my best friend.";
-			next;
-			mes "[Teacher]";
-			mes "When I saw a Pretty Flower blooming in the abandoned Garden, I realized It was my friend which shared my fate.";
-			next;
-			mes "[Teacher]";
-			mes "Although it is a Common and Normal Flower to others, she gave me the reason to study again. I could achieve my goals because of her.";
-			next;
-			mes "[Teacher]";
-			mes "So recently...";
-			mes "I am trying to pay her back. Now I am studying Flowers, and plan to over the whole world with them.";
-			next;
-			mes "[Teacher]";
-			mes "To accomplish my work...";
-			mes "I need bunches of flowers. But for someone who rarely goes outside, it is really hard to find all the flowers I need.";
-			next;
-			mes "[Teacher]";
-			mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000. If you can bring them to me, I'd give you my treasure...";
-			close;
-		case 2:
-			mes "[Teacher]";
-			mes "One of these days I will cover this whole world with Flowers.";
-			close;
-		}
-	}
-}
-
-// Gaebolg Family Curse
-//============================================================ 
-prontera,248,212,3	script	Busy Boy#prt	706,3,3,{
-	callsub S_CheckWeight; //Check Player's weight
-	if (BaseLevel > 59) {
-		if (prt_curse == 0) {
-			mes "[Busy-Looking Boy]";
-			mes "Aw nuts...";
-			mes "What am I gonna do?";
-			mes "I have to deliver these";
-			mes "books, but... I... Oh man,";
-			mes "I can't get scared now!";
-			close;
-		}
-		else if (prt_curse == 1) {
-			mes "[Busy-Looking Boy]";
-			mes "Aw nuts...";
-			mes "What am I gonna do?";
-			mes "I have to deliver these";
-			mes "books, but... I... Oh man,";
-			mes "I can't get scared now!";
-			next;
-			if (select("Speak with him:Ignore him") == 1) {
-				mes "["+strcharinfo(0)+"]";
-				mes "Say, what seems";
-				mes "to be the problem?";
-				next;
-				mes "[Busy-Looking Boy]";
-				mes ".........?";
-				next;
-				mes "[Busy-Looking Boy]";
-				if (sex) {
-					mes "Ack! You're that clumsy";
-					mes "dude who made me drop";
-				}
-				else {
-					mes "Ack! You're that ditzy";
-					mes "chick who made me drop";
-				}
-				mes "all of those books earlier!";
-				mes "Wait, you ditched me before,";
-				mes "so why act all concerned now?";
-				Emotion e_gasp;
-			}
-			else {
-				mes "[Busy-Looking Boy]";
-				mes "Okay, okay...";
-				mes "Don't even think";
-				mes "about floating in";
-				mes "the sky. You're like,";
-				mes "so stable. Don't think...";
-				mes "Just... Just board that ship...";
-				close;
-			}
-			next;
-			select("Well, I, um...");
-			mes "[Busy-Looking Boy]";
-			if (sex) {
-				mes "Yeah... A real";
-				mes "man wouldn't have";
-				mes "ditched back then";
-				mes "without helping me.";
-				mes "You're a real creepo,";
-				mes "you know that?";
-			}
-			else {
-				mes "Yeah... If you were";
-				mes "a graceful and considerate";
-				mes "lady, you woulda helped me";
-				mes "out before. I'm right, huh?";
-			}
-			next;
-			mes "^3355FFYou instinctively";
-			mes "kick over one of the";
-			mes "piles of books next";
-			mes "to the young boy.";
-			mes "You couldn't help it:";
-			mes "it was a natural reflex!^000000";
-			next;
-			Specialeffect EF_HITDARK;
-			Emotion e_omg;
-			mes "^3355FF*BAM!*^000000";
-			next;
-			Emotion e_omg;
-			mes "[Busy-Looking Boy]";
-			mes "Ack! Those books...!";
-			mes "It took me so long to";
-			mes "stack all of those!";
-			next;
-			mes "["+strcharinfo(0)+"]";
-			mes "Oh no, what a mess!";
-			mes "Here, let me help you";
-			mes "arrange these nicely";
-			mes "out of the bottom of";
-			mes "my freakin' heart.";
-			Emotion e_lv,1;
-			next;
-			mes "[Busy-Looking Boy]";
-			mes "...";
-			mes "......";
-			mes ".........";
-			Emotion e_dots;
-			next;
-			mes "[Busy-Looking Boy]";
-			mes "Huh...?";
-			mes "Oh, thanks for";
-			mes "helping me out here.";
-			mes "I really appreciate it.";
-			next;
-			select("Are these all yours?");
-			mes "[Busy-Looking Boy]";
-			mes "These? Oh, I'm supposed";
-			mes "to deliver these for my job.";
-			mes "I need to take these to Juno";
-			mes "from the Prontera Library";
-			mes "for a client. However, um...";
-			next;
-			mes "[Busy-Looking Boy]";
-			mes "Well...";
-			mes "I get motion sick really";
-			mes "easily, so it scares me to";
-			mes "death to ride the Airship";
-			mes "all the way to Juno.";
-			Emotion e_dots;
-			next;
-			mes "[Busy-Looking Boy]";
-			mes "Now I'm in trouble!";
-			mes "I'm never late, but this";
-			mes "time I just can't help it.";
-			mes "There's nothing I can do!";
-			mes "Oh, I'm gonna lose this job!";
-			Emotion e_sob;
-			next;
-			mes "[Busy-Looking Boy]";
-			mes "Wait... You adventurers";
-			mes "do a lot of traveling, right?";
-			mes "If you're traveling to Juno,";
-			mes "would you please deliver this";
-			mes "for me? I'll be in real trouble";
-			mes "if I don't send these books...";
-			next;
-			callsub S_GetBooks;
-			mes "[Busy-Looking Boy]";
-			mes "I-I understand.";
-			mes "It's none of your ";
-			mes "business, I know, but";
-			mes "I'm just so desperate...";
-			Emotion e_sob;
-			set prt_curse,2;
-			close;
-		}
-		else if (prt_curse == 2) {
-			mes "[Busy-Looking Boy]";
-			mes "Oh, hello again.";
-			mes "Sorry, but I'm trying to";
-			mes "concentrate here. Gonna...";
-			mes "Summon all my courage...";
-			mes "and b-board that Airship!";
-			mes "Argh! No, I can't do it!";
-			Emotion e_dots;
-			next;
-			callsub S_GetBooks;
-			mes "[Busy-Looking Boy]";
-			mes "^333333*Sob...*^000000";
-			mes "What am I gonna do?";
-			mes "That guy's been waiting";
-			mes "for me to deliver his books";
-			mes "for quite a while now...";
-			Emotion e_sob;
-			close;
-		}
-		else if (prt_curse == 3) {
-			mes "[Busy-Looking Boy]";
-			mes "Oh, please deliver";
-			mes "those books I gave";
-			mes "you to ^FF0000Mr. Karlomoff^000000, who";
-			mes "should be waiting around";
-			mes "the Juno Library. Thanks";
-			mes "again for your help~";
-			close;
-		}
-		mes "[Busy-Looking Boy]";
-		mes "Ack! Would you leave";
-		mes "me alone and let me work?";
-		mes "I've got something important";
-		mes "to do! When I finish arranging";
-		mes "these books,  need to... I need to make some preparations!";
-		close;
-	}
-	mes "[Busy-Looking Boy]";
-	mes "Ack! Would you leave";
-	mes "me alone and let me work?";
-	mes "I've got something important";
-	mes "to do! When I finish arranging";
-	mes "these books, I need to... I need to make some preparations!";
-	close;
-
-OnTouch:
-	callsub S_CheckWeight; //Check Player's weight
-	if (BaseLevel > 59) {
-		if (prt_curse == 0) {
-			Specialeffect EF_HITDARK;
-			mes "^3355FF*BAM!*^000000";
-			next;
-			mes "[Busy Looking Boy]";
-			mes "Hey, look out!";
-			mes "Can't you be more";
-			mes "careful?! Geeeeez!";
-			Emotion e_ag;
-			next;
-			mes "["+strcharinfo(0)+"]";
-			mes "Oops, I'm so sorry.";
-			mes "Are you alright?";
-			next;
-			mes "[Busy Looking Boy]";
-			mes "Yeah, no thanks to you!";
-			mes "Oh... Don't worry, I'm fine.";
-			next;
-			mes "^3355FFYou notice that the boy";
-			mes "dropped many hardcover";
-			mes "books that are probably about";
-			mes "ruins and their legends, based";
-			mes "on their titles. The boy dusted";
-			mes "himself off and began to";
-			mes "carefully pile the books.^000000";
-			next;
-			if (select("Leave:Help him pile the books") == 1) {
-				mes "[Busy-Looking Boy]";
-				mes "Next time, look";
-				mes "where you're going,";
-				mes "alright? I mean, you";
-				mes "might really break";
-				mes "something if you're";
-				mes "always that careless!";
-				set prt_curse,1;
-				close;
-			}
-			mes "[Busy-Looking Boy]";
-			mes "Huh...?";
-			mes "Oh, thanks for";
-			mes "helping me out here.";
-			mes "I really appreciate it.";
-			next;
-			select("Are these all yours?");
-			mes "[Busy-Looking Boy]";
-			mes "These? Oh, I'm supposed";
-			mes "to deliver these for my job.";
-			mes "I need to take these to Juno";
-			mes "from the Prontera Library";
-			mes "for a client. However, um...";
-			next;
-			mes "[Busy-Looking Boy]";
-			mes "Well...";
-			mes "I get motion sick really";
-			mes "easily, so it scares me to";
-			mes "death to ride the Airship";
-			mes "all the way to Juno.";
-			Emotion e_dots;
-			next;
-			mes "[Busy-Looking Boy]";
-			mes "Now I'm in trouble!";
-			mes "I'm never late, but this";
-			mes "time I just can't help it.";
-			mes "There's nothing I can do!";
-			mes "Oh, I'm gonna lose this job!";
-			Emotion e_sob;
-			next;
-			mes "[Busy-Looking Boy]";
-			mes "Wait... You adventurers";
-			mes "do a lot of traveling, right?";
-			mes "If you're traveling to Juno,";
-			mes "would you please deliver this";
-			mes "for me? I'll be in real trouble";
-			mes "if I don't send these books...";
-			next;
-			callsub S_GetBooks;
-			mes "[Busy-Looking Boy]";
-			mes "I-I understand.";
-			mes "It's none of your ";
-			mes "business, I know, but";
-			mes "I'm just so desperate...";
-			Emotion e_sob;
-			set prt_curse,2;
-			close;
-		}
-		else if (prt_curse == 3) {
-			mes "[Busy-Looking Boy]";
-			mes "Oh, please deliver";
-			mes "those books I gave";
-			mes "you to ^FF0000Mr. Karlomoff^000000, who";
-			mes "should be waiting around";
-			mes "the Juno Library. Thanks";
-			mes "again for your help~";
-			close;
-		}
-	}
-	end;
-
-S_GetBooks:
-	if (select("Help him:Don't help him") == 1) {
-		mes "[Busy-Looking Boy]";
-		mes "Oh, thank you so much!";
-		mes "You don't understand how";
-		mes "much I dread those Airships.";
-		mes "Now, would you please deliver";
-		mes "these books to ^FF0000Mr. Karlomoff^000000";
-		mes "near the Juno Library?";
-		next;
-		mes "[Busy-Looking Boy]";
-		mes "I know these books are";
-		mes "pretty heavy, but be really";
-		mes "careful with them! Anyway,";
-		mes "thanks for doing this for me.";
-		mes "I was really at my wit's end...";
-		set prt_curse,3;
-		getitem 7431,1; //Books
-		close;
-	}
-	return;
-
-S_CheckWeight:
-	if ((MaxWeight-Weight) < 2000 || checkweight(1201,1) == 0) {
-		mes "^3355FFWait a second!";
-		mes "Right now, you're carrying";
-		mes "too many things with you.";
-		mes "Please come back after";
-		mes "using the Kafra Service";
-		mes "to store some of your items.^000000";
-		close;
-	}
-	return;
-}
-
-yuno,311,195,3	script	Historian#prt01	754,{
-	if ((MaxWeight-Weight) < 2000 || checkweight(1201,1) == 0) {
-		mes "^3355FFWait a second!";
-		mes "Right now, you're carrying";
-		mes "too many things with you.";
-		mes "Please come back after";
-		mes "using the Kafra Service";
-		mes "to store some of your items.^000000";
-		close;
-	}
-	if (prt_curse < 3) {
-		mes "[Historian]";
-		mes "Juno's mysterious past";
-		mes "holds some great secret.";
-		mes "I'm sure of it! It excites me";
-		mes "to know that my research";
-		mes "brings me that much closer";
-		mes "to finally unveiling it!";
-		next;
-		mes "[Historian]";
-		mes "But I'll admit that even I don't know how much digging I'll";
-		mes "have to do to learn what I want. It's our duty as historians to";
-		mes "find out the truth of the past, but it definitely won't be easy.";
-		next;
-		mes "[Historian]";
-		mes "To understand, to see the";
-		mes "truth of the past with my";
-		mes "own eyes... I'd even sell";
-		mes "my soul for the opportunity.";
-		close;
-	}
-	else if (prt_curse == 3) {
-		mes "^3355FFAs you approached, this";
-		mes "historian suddenly closed";
-		mes "the book that he was reading,";
-		mes "looked to the heavens and";
-		mes "let out a deep breath in a vain";
-		mes "attempt to relieve his tension.^000000";
-		next;
-		mes "[Historian]";
-		mes "GRRRRRRRRR!";
-		mes "Where are my books?!";
-		Emotion e_ag;
-		next;
-		select("Are you alright?");
-		mes "[Historian]";
-		mes "Er? Oh. I'm sorry you";
-		mes "had to see that. I'm just";
-		mes "extremely upset. You see,";
-		mes "I'm expecting a delivery of";
-		mes "research books from Prontera,";
-		mes "but they haven't arrived yet.";
-		next;
-		mes "[Historian]";
-		mes "In fact, the delivery boy is";
-		mes "very late. This will delay my";
-		mes "research considerably since";
-		mes "I cannot proceed without more";
-		mes "new material to study.";
-		next;
-		if (countitem(7431) > 0) {
-			select("Excuse me, but what's your name?");
-			mes "[Historian]";
-			mes "Hm? I'm Karlomoff, the";
-			mes "1st scholar of the Rekenber";
-			mes "Historical Research Group.";
-			mes "Did you need something, or";
-			mes "were you looking around here";
-			mes "for somebody in particular?";
-			next;
-		}
-		else {
-			select("Oh, I'm delivering the books for him.");
-			Emotion e_what;
-			mes "[Historian]";
-			mes "Ah, really?";
-			mes "Great, you're here!";
-			mes "So, where are the books?";
-			next;
-			mes "["+strcharinfo(0)+"]";
-			mes "I...";
-			mes "I don't have";
-			mes "them right now.";
-			next;
-			mes "[Historian]";
-			mes "What...?";
-			mes "Don't tell me that";
-			mes "you lost them! Those";
-			mes "books were priceless!";
-			mes "Did you come all this";
-			mes "way just to tell me that?";
-			next;
-			mes "[Historian]";
-			mes "Well, I suppose you'll";
-			mes "have to report the loss of";
-			mes "the books and get some new";
-			mes "copies of those books that";
-			mes "you were supposed to deliver.";
-			mes "Now hurry, I need to research!";
-			close;
-		}
-		select("Right, I brought your books.");
-		mes "[Historian]";
-		mes "What? But you're not the";
-		mes "delivery boy. Well, let me see";
-		mes "the books you've brought. Hm...";
-		mes "Just as I thought: the Rune-";
-		mes "Midgarts Kingdom has a great";
-		mes "wealth of ancient information.";
-		next;
-		mes "[Historian]";
-		mes "Ah, thank you so much for";
-		mes "bringing these. However, by";
-		mes "your mode of dress, I can tell";
-		mes "that you are an adventurer.";
-		mes "What happened to the delivery boy that was supposed to bring these?";
-		next;
-		mes "[Historian]";
-		mes "..........?";
-		mes "Afraid to ride the Airship?";
-		mes "Motion sickness? Well, that's";
-		mes "quite understandable. The poor";
-		mes "boy should have contacted me";
-		mes "about that beforehand.";
-		next;
-		mes "[Historian]";
-		mes "Goodness, it's been ";
-		mes "a while since I've had";
-		mes "a visitor. Would you like";
-		mes "to stay and chat for a bit?";
-		mes "Just give me a minute to get";
-		mes "a cool drink of water first~";
-		set prt_curse,4;
-		delitem 7431,1; //Books
-		close;
-	}
-	else if (prt_curse == 4) {
-		mes "[Historian]";
-		mes "Ah, that glass of";
-		mes "water was just what";
-		mes "I needed to refresh";
-		mes "myself. Let me tell you";
-		mes "a little bit about my work.";
-		next;
-		mes "[Historian]";
-		mes "I might have it mentioned before, but my name is Karlomoff and";
-		mes "I work in the Rekenber Historical Research as its 1st scholar. We";
-		mes "recently finished our project on the Schwaltzvalt Republic.";
-		next;
-		mes "[Historian]";
-		mes "Now, we're trying to learn";
-		mes "more about the Rune-Midgarts";
-		mes "Kingdom's history. We believe";
-		mes "it's linked to our Schwaltzvalt";
-		mes "Republic because they share the";
-		mes "continent. Makes sense, right?";
-		next;
-		mes "[Historian]";
-		mes "Ultimately, we hope that";
-		mes "new information from our";
-		mes "research of Rune-Midgarts will";
-		mes "shed some new light on our";
-		mes "current understanding of the";
-		mes "Schwaltzvalt Republic's past.";
-		next;
-		mes "[Historian]";
-		mes "Including myself, there are";
-		mes "^3131FF3 members of the Rekenber";
-		mes "Historical Research Group^000000";
-		mes "that are studying the Rune-";
-		mes "Midgarts Kingdom's history.";
-		next;
-		select("Rekenber Historical Research Group?");
-		mes "[Historian]";
-		mes "You adventurers from Rune-";
-		mes "Midgarts may not know it, but";
-		mes "the Rekenber Corporation has";
-		mes "unofficial control over our";
-		mes "Schwaltzvalt Republic. Some";
-		mes "hate it, others don't care.";
-		next;
-		mes "[Historian]";
-		mes "Anyway, Rekenber has its own";
-		mes "Historical Research Group since";
-		mes "rediscovering ancient technologies has been key to its success, well,";
-		mes "so far as I can tell. Personally, I enjoy the pursuit of knowledge.";
-		next;
-		mes "[Historian]";
-		mes "Oh, here's an interesting";
-		mes "fact! Did you know that the";
-		mes "title of ruler of Rune-Midgarts";
-		mes "isn't always passed down";
-		mes "through the same family?";
-		next;
-		mes "[Historian]";
-		mes "Actually, there are several";
-		mes "royal families that hold a";
-		mes "special competition to decide";
-		mes "which prince becomes the";
-		mes "next king. Fascinating...";
-		next;
-		select("Several royal families?");
-		mes "[Historian]";
-		mes "Yes, I'll try to explain it";
-		mes "briefly. There are a total";
-		mes "of 7 royal families. Each";
-		mes "family is descended from one";
-		mes "of the 7 warriors that founded";
-		mes "the Rune-Midgarts Kingdom.";
-		next;
-		mes "[Historian]";
-		mes "According to the records,";
-		mes "Jormungand, the snake of the";
-		mes "earth, appeared and brought";
-		mes "chaos to the entire continent.";
-		mes "7 warriors appeared and drove the serpent away, saving the world.";
-		next;
-		mes "[Historian]";
-		mes "With the return of peace,";
-		mes "the 7 warriors established";
-		mes "the Rune-Midgarts Kingdom,";
-		mes "choosing Tristram Gaebolg III";
-		mes "as the kingdom's first ruler. ";
-		next;
-		mes "[Historian]";
-		mes "Knowing that their descendents";
-		mes "may not always be deserving of";
-		mes "ruling the kingdom, the 7 warriors agreed to hold a contest amongst";
-		mes "their families each generation to prevent royal corruption.";
-		next;
-		Emotion e_swt2;
-		mes "[Historian]";
-		mes "Oh... Not too excited";
-		mes "about history, huh? Well,";
-		mes "maybe if I sing the ancient";
-		mes "song of this myth, you'd be";
-		mes "better able to understand...";
-		next;
-		mes "[Historian]";
-		mes "^FF0000*The great serpent*^000000";
-		mes "^FF0000*swallowed the sea.*^000000";
-		mes "^FF0000*The eagle of the rainbow*^000000";
-		mes "^FF0000*swallowed the serpent.*^000000";
-		mes "^FF0000*Then the eagle built its nest.*^000000";
-		mes "^FF0000*A nest upon the swallowed sea.*^000000";
-		next;
-		mes "[Historian]";
-		mes "^333333*Ahem*^000000 As you see, I'm";
-		mes "quite tone deaf. But the";
-		mes "point is that people still";
-		mes "praise the 7 warriors' exploits";
-		mes "through this song. Isn't that";
-		mes "interesting to know about?";
-		set prt_curse,5;
-		close;
-	}
-	else if (prt_curse == 5) {
-		mes "[Historian]";
-		mes "I'm sorry that I let my";
-		mes "mouth run while talking at";
-		mes "great length about Rune-";
-		mes "Midgart's history. Still,";
-		mes "I hope you found that tale";
-		mes "at least a little enjoyable.";
-		next;
-		mes "[Historian]";
-		mes "Oh! Will you be returning to";
-		mes "the Rune-Midgarts Kingdom?";
-		mes "If so, then I have a favor to";
-		mes "ask you. Would you please";
-		mes "deliver this report I've written to my colleague in Morroc?";
-		next;
-		mes "[Historian]";
-		mes "It would be a great help";
-		mes "to me if you could get this";
-		mes "report to her right away.";
-		mes "Ah, her name is Rodafrian.";
-		mes "I'm certain you can find her";
-		mes "somewhere in that desert town.";
-		set prt_curse,6;
-		getitem 7342,1; //File01
-		close;
-	}
-	else if (prt_curse == 6) {
-		mes "[Historian]";
-		mes "Please find my colleague,";
-		mes "Rodafrian, in Morroc and";
-		mes "deliver my report to her.";
-		mes "You should be able to find";
-		mes "her there doing research.";
-		next;
-		if (select("I will:Can I listen to that song again?") == 1) {
-			mes "[Historian]";
-			mes "Once again, thank";
-			mes "you for your help.";
-			mes "It will really speed the";
-			mes "progress of my research,";
-			mes "especially since those books";
-			mes "were delivered fairly late...";
-		}
-		else {
-			mes "[Historian]";
-			mes "Song? Oh, you mean the";
-			mes "one praising the 7 who";
-			mes "founded the Rune-Midgarts";
-			mes "Kingdom? Sure, let's see now...";
-			next;
-			mes "[Historian]";
-			mes "^FF0000*The great serpent*^000000";
-			mes "^FF0000*swallowed the sea.*^000000";
-			mes "^FF0000*The eagle of the rainbow*^000000";
-			mes "^FF0000*swallowed the serpent.*^000000";
-			mes "^FF0000*Then the eagle built its nest.*^000000";
-			mes "^FF0000*A nest upon the swallowed sea.*^000000";
-			next;
-			mes "[Historian]";
-			mes "You must be more interested";
-			mes "in history than I suspected.";
-			mes "If you'd like, I'll write you a";
-			mes "letter or recommendation";
-			mes "for the Rekenber Historical";
-			mes "Research Group. Ha ha ha~";
-		}
-		close;
-	}
-	else if (prt_curse > 55) {
-		mes "[Historian]";
-		mes "Ah, it's been a while";
-		mes "since the last time I saw";
-		mes "you. Rodafrian actually came";
-		mes "to visit me a few days ago.";
-		mes "I believe she came here";
-		mes "to gloat or threaten me...";
-		next;
-		mes "[Historian]";
-		mes "It was very surreal.";
-		mes "She kept raving about";
-		mes "some incredible revelation,";
-		mes "and about finally putting me";
-		mes "in my place. I didn't know she";
-		mes "could be so competitive!";
-		close;
-	}
-	else {
-		mes "[Historian]";
-		mes "ZzzzZZz....";
-		mes "ZzzzZZz....ZZZzzzz...";
-		close;
-	}
-}
-
-morocc_in,45,126,3	script	Historian#prt02	702,{
-	if ((MaxWeight-Weight) < 2000 || checkweight(1201,1) == 0) {
-		mes "^3355FFWait a second!";
-		mes "Right now, you're carrying";
-		mes "too many things with you.";
-		mes "Please come back after";
-		mes "using the Kafra Service";
-		mes "to store some of your items.^000000";
-		close;
-	}
-	if (prt_curse == 6) {
-		if (countitem(7342) < 0) {
-			mes "^3355FFYou seem to have lost";
-			mes "Karlomoff's Report. You";
-			mes "needed to deliver here to";
-			mes "one of his colleagues...";
-			close;
-		}
-		mes "[Historian Rodafrian]";
-		mes "Oh, how does this place";
-		mes "have to be so hot? This";
-		mes "can't be good for my skin...";
-		mes "Ooh, I wish I were back home";
-		mes "in the Schwaltzvalt Republic~";
-		Emotion e_sob;
-		next;
-		mes "[Historian Rodafrian]";
-		mes "Hello there.";
-		mes "E-excuse me, but,";
-		mes "um, may I help you?";
-		next;
-		select("Mr. Karlomoff has sent me.");
-		mes "[Historian Rodafrian]";
-		mes "Karlomoff...?";
-		mes "Him? Alright...";
-		mes "What did he send";
-		mes "you to me for?";
-		next;
-		mes "^3355FFYou hand Karlomoff's";
-		mes "report to Rodafrian.^000000";
-		next;
-		mes "[Historian Rodafrian]";
-		mes "A report? What does he";
-		mes "want to show off this time?";
-		mes "^333333*Sigh*^000000 Ah well, thanks for";
-		mes "the trouble. I'll look at it,";
-		mes "though I'm not expecting";
-		mes "much if Karlomoff wrote it.";
-		next;
-		if (select("Ask her about her research:End conversation") == 1) {
-			mes "[Historian Rodafrian]";
-			mes "Oh, you know about the";
-			mes "Rekenber Historical Research";
-			mes "Group? Ah, right. Karlomoff";
-			mes "must have told you already.";
-			mes "Currently we're researching";
-			mes "the Rune-Midgarts Kingdom.";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "Now, while I understand the";
-			mes "value of ancient books and";
-			mes "records, I think Karlomoff";
-			mes "relies on them too much.";
-			mes "I prefer more active research";
-			mes "in the vein of archaelogy.";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "Right now, I'm spending";
-			mes "time in Morroc to visit the";
-			mes "Sphinx and Pyramids and see";
-			mes "if I can excavage some relics.";
-			mes "Hopefully I can uncover some new historical evidence that way.";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "If you're interested in";
-			mes "learning more about Morroc's";
-			mes "history, please go ahead and";
-			mes "talk to my assistance. He's very passionate about studying this";
-			mes "town's culture and background.";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "Actually, the people of";
-			mes "Morroc also appreciate their";
-			mes "town's history, and pass down";
-			mes "songs about ancient times";
-			mes "through the generations. Let's";
-			mes "see, how did that one go?";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "^FF0000*The great serpent*^000000";
-			mes "^FF0000*swallowed the sea.*^000000";
-			mes "^FF0000*The eagle of the rainbow*^000000";
-			mes "^FF0000*swallowed the serpent, and*^000000";
-			mes "and... and... Um. Oh dear.";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "I can't remember the next";
-			mes "line! Actually, have you";
-			mes "heard this song before?";
-			next;
-			switch(select("Yes, I have.:Yes, but it is different.:No, sorry.")) {
-			case 1:
-				mes "[Historian Rodafrian]";
-				mes "Oh, that's great!";
-				mes "Would you provide";
-				mes "me with the line that";
-				mes "follows these lyrics?";
-				next;
-				mes "^FF0000*The great serpent*^000000";
-				mes "^FF0000*swallowed the sea.*^000000";
-				mes "^FF0000*The eagle of the rainbow*^000000";
-				mes "^FF0000*swallowed the serpent.*^000000";
-				mes "......................";
-				next;
-				input .@answer$;
-				if (.@answer$ == "Then the eagle built its nest.") {
-					mes "[Historian Rodafrian]";
-					mes "Really? That makes";
-					mes "sense, but those lyrics";
-					mes "sound different than the";
-					mes "ones I had heard. Hmmmm...";
-					mes "If you don't mind, would you";
-					mes "please tell me your name?";
-					callsub S_GiveName,1;
-				}
-				else {
-					mes "[Historian Rodafrian]";
-					mes "Huh...?";
-					mes "That doesn't sound";
-					mes "right at all. Are you sure";
-					mes "that's the lyric you heard?";
-					delitem 7342,1; //File01
-					set prt_curse,7;
-					close;
-				}
-
-			case 2:
-				mes "[Historian Rodafrian]";
-				mes "What was that?";
-				mes "The song is different?";
-				mes "Hmm. Then, would you";
-				mes "please sing the version";
-				mes "that you know to me?";
-				next;
-				mes "^3355FFYou clear your throat";
-				mes "and begin to sing the song";
-				mes "that you heard from Karlomoff.^000000";
-				next;
-				mes "["+strcharinfo(0)+"]";
-				input .@line$;
-				if (.@line$ == "The great serpent swallowed the sea.") {
-					set .@total,.@total+1;
-					mes "*The great serpent*";
-					mes "*swallowed the sea.*";
-				}
-				else mes "* "+.@line$+"*";
-
-				input .@line$;
-				if (.@line$ == "The eagle of the rainbow swallowed the serpent.") {
-					set .@total,.@total+1;
-					mes "*The eagle of the rainbow*";
-					mes "*swallowed the serpent.*";
-				}
-				else mes "*"+.@line$+"*";
-
-				input .@line$;
-				if (.@line$ == "Then the eagle built its nest.") {
-					set .@total,.@total+1;
-					mes "*Then the eagle built its nest.*";
-				}
-				else mes "*"+.@line$+"*";
-
-				input .@line$;
-				if (.@line$ == "A nest upon the swallowed sea.") {
-					set .@total,.@total+1;
-					mes "*A nest upon the swallowed sea.*";
-				}
-				else mes "*"+.@line$+"*";
-				next;
-				if (.@total == 4) {
-					mes "[Historian Rodafrian]";
-					mes "Really? That makes";
-					mes "sense, but those lyrics";
-					mes "sound different than the";
-					mes "ones I had heard. Hmmmm...";
-					mes "If you don't mind, would you";
-					mes "please tell me your name?";
-					callsub S_GiveName,1;
-				}
-				else {
-					mes "[Historian Rodafrian]";
-					mes "Huh...?";
-					mes "That doesn't sound right";
-					mes "at all. Are you sure those";
-					mes "are the lyrics you heard?";
-					delitem 7342,1; //File01
-					set prt_curse,7;
-					close;
-				}
-
-			case 3:
-				mes "[Historian Rodafrian]";
-				mes "............";
-				mes "........................";
-				mes "Well then. Would you";
-				mes "mind if I ask you for";
-				mes "your name, adventurer?";
-				callsub S_GiveName,1;
-			}
-		}
-		mes "[Historian]";
-		mes "Although I love doing my";
-		mes "research and uncovering";
-		mes "new information regarding";
-		mes "history, I feel a little lonely";
-		mes "sometimes. Not many people";
-		mes "share my interests, you know...";
-		close;
-	}
-	else if (prt_curse == 7) {
-		mes "^3355FFArms folded, Rodafrian";
-		mes "seems to be deep in thought.";
-		mes "Then, as if making making";
-		mes "an important decision, she";
-		mes "looks directly into your eyes";
-		mes "and begins to speak.^000000";
-		next;
-		mes "[Historian Rodafrian]";
-		mes "Adventurer...";
-		mes "I want to know your name.";
-		callsub S_GiveName,0;
-	}
-	else if (prt_curse > 7 && prt_curse < 30) {
-		mes "[Historian Rodafrian]";
-		mes "As I recall, Mondo should";
-		mes "be at Mount Mjolnir, located";
-		mes "in the northern region of the";
-		mes "Rune-Midgarts Kingdom. Ask";
-		mes "him for the lyrics of the song that I can't seem to remember...";
-		close;
-	}
-	else if (prt_curse == 30 || prt_curse == 55) {
-		mes "[Historian Rodafrian]";
-		mes "Oh, you've returned.";
-		mes "Have you met with Mondo";
-		mes "and figured out the lyrics of";
-		mes "that song I was looking for?";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "^FF0000*The great serpent*^000000";
-		mes "^FF0000*swallowed the sea.*^000000";
-		mes "^FF0000*The eagle of the rainbow*^000000";
-		mes "^FF0000*swallowed the serpent.*^000000";
-		mes "^FF0000*Then snake scales grew on*^000000";
-		mes "^FF0000*the eagle, and it slowly died.*^000000";
-		next;
-		mes "[Historian Rodafrian]";
-		mes "Oh, yes!";
-		mes "Yes, that was it! Now";
-		mes "I remember, thank you";
-		mes "so much! Ah, back to work...";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "^333333(As a historian, Rodafrian";
-		mes "might be able to help me in";
-		mes "investigating the curse of the";
-		mes "Gaebolgs. The priests told me";
-		mes "not to tell anybody, though.";
-		mes "Should I take this risk?)^000000";
-		next;
-		if (select("Tell her about Jormungand's curse:Don't tell her") == 1) {
-			mes "^3355FFYou explain everything";
-			mes "that you have learned to";
-			mes "Rodafrian, choosing not";
-			mes "to withhold any secrets.^000000";
-			Emotion e_ic;
-			next;
-			mes "[Historian Rodafrian]";
-			mes ".....................!";
-			Emotion e_gasp;
-			next;
-			mes "[Historian Rodafrian]";
-			mes "Thank you for sharing that";
-			mes "with me. I hope you realize";
-			mes "how precious that information";
-			mes "is. I had no idea the royal";
-			mes "family was keeping that kind";
-			mes "of secret. Goodness, me...";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "You know, I don't really";
-			mes "know much about poison, but";
-			mes "I do know that, aside from our";
-			mes "own Assassins, there are poison";
-			mes "experts living in some strange";
-			mes "land located to the west.";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "Anyway, your report about";
-			mes "the Gaebolg family will be";
-			mes "greatly appreciated by the";
-			mes "Rekenber Historical Research";
-			mes "Group. But first, I need to";
-			mes "finish this Morroc project...";
-			next;
-			mes "[Historian Rodafrian]";
-			mes "Anyway, keep this information";
-			mes "a secret between me and you";
-			mes "for now. Then, when I reveal the secret curse of the Gaebolg royal";
-			mes "family, I'll finally outshine that Karlomoff! Bwahahahahaha!";
-			next;
-			mes "["+strcharinfo(0)+"]";
-			mes "^333333(Drat, she didn't give me";
-			mes "any help... All I did was";
-			mes "reveal a huge secret to her";
-			mes "that she might spread around!";
-			mes "Oh well, I guess I better head";
-			mes "back to the priests...)^000000";
-			if (prt_curse == 30) 
-				set prt_curse,31;
-			else 
-				set prt_curse,60;
-			close;
-		}
-
-		mes "[Historian Rodafrian]";
-		mes "Oh, let me thank you";
-		mes "once again for going";
-		mes "through the trouble of";
-		mes "getting that lyric for me~";
-		mes "I put my assistant through";
-		mes "enough trouble already...";
-		next;
-		mes "[Historian Rodafrian]";
-		mes "I also better not forget";
-		mes "to go through Karlomoff's";
-		mes "report. I'll have to have a";
-		mes "debate with him sooner or";
-		mes "later, and I really want to";
-		mes "put that guy in his place!";
-		next;
-		mes "^3355FFRodafrian seemed very";
-		mes "happy and began to read";
-		mes "through Karlomoff's report.";
-		mes "For now, it would be best";
-		mes "to return to Father Bamph.^000000";
-		if (prt_curse == 30)
-			set prt_curse,40;
-		else
-			set prt_curse,56;
-		close;
-	}
-	else if (prt_curse == 31 || prt_curse == 40) {
-		mes "^3355FFRodafrian seemed very";
-		mes "happy and began to read";
-		mes "through Karlomoff's report.";
-		mes "For now, it would be best";
-		mes "to return to Father Bamph.^000000";
-		close;
-	}
-	else if (prt_curse == 56) {
-		Emotion e_an;
-		mes "[Historian Rodafrian]";
-		mes "I just paid a visit to";
-		mes "Karlomoff and gave him";
-		mes "a piece of my mind! I think...";
-		mes "I think I put him in his place.";
-		mes "But I can never really tell";
-		mes "with that sneaky guy...";
-		close;
-	}
-	else if (prt_curse == 60) {
-		Emotion e_an;
-		mes "[Historian Rodafrian]";
-		mes "I just aid a visit to";
-		mes "Karlomoff and gave him";
-		mes "a piece of my mind! I think...";
-		mes "I think I put him in his place.";
-		mes "But I can never really tell";
-		mes "with that sneaky guy...";
-		next;
-		mes "It doesn't look like";
-		mes "Rodafrian can offer you";
-		mes "any more information. For";
-		mes "now, it would be best to";
-		mes "go to ^3355FFProntera Church.^000000";
-		close;
-	}
-	else {
-		mes "[Historian Rodafrian]";
-		mes "I'm sorry, but I'm";
-		mes "really very busy with my";
-		mes "research at the moment.";
-		mes "Perhaps we can talk later";
-		mes "once I've completed this?";
-		close;
-	}
-
-S_GiveName:
-	next;
-	select("My name is "+strcharinfo(0)+".");
-	mes "[Historian Rodafrian]";
-	mes "Ah "+strcharinfo(0)+", eh?";
-	mes "Do you mind if I ask you a favor? I really need to verify the true";
-	mes "lyrics for this song. However,";
-	mes "I need to stay here in Morroc";
-	mes "to complete my research.";
-	next;
-	mes "[Historian Rodafrian]";
-	mes "Would you please find my";
-	mes "colleague Mondo and ask him";
-	mes "for this song's lyrics? You can";
-	mes "find him in the ancient ruins";
-	mes "in Mount Mjolnir, north in the";
-	mes "Rune-Midgarts Kingdom.";
-	next;
-	mes "[Historian Rodafrian]";
-	mes "I apologize for asking";
-	mes "you to do what sounds like";
-	mes "a silly errand, but I actually";
-	mes "need to know this song's lyrics";
-	mes "for the sake of my research...";
-	if (getarg(0) == 1) delitem 7342,1; //File01
-	set prt_curse,8;
-	close;
-}
-
-mjolnir_01,135,168,3	script	Historian#prt03	754,{
-	if ((MaxWeight-Weight) < 2000 || checkweight(1201,1) == 0) {
-		mes "^3355FFWait a second!";
-		mes "Right now, you're carrying";
-		mes "too many things with you.";
-		mes "Please come back after";
-		mes "using the Kafra Service";
-		mes "to store some of your items.^000000";
-		close;
-	}
-	if (prt_curse == 8) {
-		mes "[Historian Mondo]";
-		mes "Excuse me...";
-		mes "But if you don't have";
-		mes "anything important for";
-		mes "me, then would you";
-		mes "please leave? I have";
-		mes "research to attend to...";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "I'm sorry, but Ms. Rodafrian";
-		mes "wanted me to ask you for the";
-		mes "lyrics of some song describing";
-		mes "the Rune-Midgarts Kingdom's";
-		mes "founding. Would you tell";
-		mes "them to me for her?";
-		next;
-		mes "[Historian Mondo]";
-		mes "Rodafrian? Oh, she must";
-		mes "mean that old children's";
-		mes "song. How did it go now?";
-		mes "Ah, now I remember...";
-		next;
-		mes "[Historian Mondo]";
-		mes "^FF0000*The great serpent*^000000";
-		mes "^FF0000*swallowed the sea.*^000000";
-		mes "^FF0000*The eagle of the rainbow*^000000";
-		mes "^FF0000*swallowed the serpent.*^000000";
-		mes "^FF0000*Then snake scales grew on*^000000";
-		mes "^FF0000*the eagle, and it slowly died.*^000000";
-		next;
-		select("...........?");
-		mes "[Historian Mondo]";
-		mes "Yes, I know: the song";
-		mes "is rather morbid, despite";
-		mes "the fact that it's sung like";
-		mes "such a happy song. Sometimes";
-		mes "these little songs are supposed";
-		mes "to scare kids into doing good.";
-		next;
-		select("Excuse me...");
-		mes "[Historian Mondo]";
-		mes "Hm? You look confused.";
-		mes "Did you have a question";
-		mes "to ask me about the song?";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Actually, I heard";
-		mes "a different version";
-		mes "of this song, so I was";
-		mes "wondering why the lyrics";
-		mes "would be different...";
-		next;
-		mes "[Historian Mondo]";
-		mes "Really now?";
-		mes "Well then, let me";
-		mes "hear the version that";
-		mes "you've heard, starting";
-		mes "from the beginning.";
-		next;
-		callsub S_Song;
-	}
-	else if (prt_curse == 9) {
-		mes "[Historian Mondo]" ;
-		mes "Ah, would you tell me";
-		mes "the lyrics of the version of";
-		mes "the Rune-Midgarts Kingdom";
-		mes "founding myth song that";
-		mes "you happened to hear?";
-		next;
-		callsub S_Song;
-	}
-	else if (prt_curse == 10) {
-		mes "[Historian Mondo]";
-		mes "Interesting...";
-		mes "The version you heard";
-		mes "from Karlomoff is different";
-		mes "than the one I know. It's";
-		mes "possible that his version";
-		mes "is the most authentic.";
-		next;
-		mes "[Historian Mondo]";
-		mes "After all, I learned";
-		mes "the version I know";
-		mes "by listening to a";
-		mes "little kid sing it.";
-		next;
-		select("A kid?");
-		mes "[Historian Mondo]";
-		mes "Yeah. My guess? The version";
-		mes "that the kid sang might have";
-		mes "changed as it was transmitted";
-		mes "by mouth through the generations. If you want to learn more, you";
-		mes "should probably find that kid.";
-		next;
-		mes "[Historian Mondo]";
-		mes "Anyway, Karlomoff may have";
-		mes "the most accurate version of";
-		mes "the song since he's very good";
-		mes "at procuring and authenticating";
-		mes "historical written records and";
-		mes "documents. It's his specialty.";
-		next;
-		mes "[Historian Mondo]";
-		mes "Ah, if you want to learn more,";
-		mes "then you should try to find the";
-		mes "kid that was singing the song.";
-		mes "Hmm, he might be around ^3131DDthe";
-		mes "river near here^000000. Hopefully it";
-		mes "won't be too hard to find him.";
-		next;
-		mes "[Historian Mondo]";
-		mes "Once you're able to talk";
-		mes "to that kid, go ahead and";
-		mes "report back to Rodafrian.";
-		mes "She probably needs to know";
-		mes "soon, and I can talk to that";
-		mes "little kid at my leisure, so...";
-		next;
-		mes "[Historian Mondo]";
-		mes "Well then, I hope you";
-		mes "find what you're looking";
-		mes "for. Good luck in your";
-		mes "travels, adventurer.";
-		set prt_curse,11;
-		close;
-	}
-	else {
-		mes "[Historian Mondo]";
-		mes "Isn't this such";
-		mes "a beautiful place?";
-		mes "It's no wonder that";
-		mes "ancient peoples chose";
-		mes "to live around here...";
-		close;
-	}
-
-
-S_Song:
-	mes "["+strcharinfo(0)+"]";
-	input .@line$;
-	if (.@line$ == "The great serpent swallowed the sea.") {
-		set .@total,.@total+1;
-		mes "*The great serpent*";
-		mes "*swallowed the sea.*";
-	}
-	else mes "*"+.@line$+"*";
-
-	input .@line$;
-	if (.@line$ == "The eagle of the rainbow swallowed the serpent.") {
-		set .@total,.@total+1;
-		mes "*The eagle of the rainbow*";
-		mes "*swallowed the serpent.*";
-	}
-	else mes "*"+.@line$+"*";
-
-	input .@line$;
-	if (.@line$ == "Then the eagle built its nest.") set .@total,.@total+1;
-	mes "*"+.@line$+"*";
-
-	input .@line$;
-	if (.@line$ == "A nest upon the swallowed sea.") set .@total,.@total+1;
-	mes "*"+.@line$+"*";
-
-	if (.@total == 4) set prt_curse,10;
-	else {
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Wait, wait...";
-		mes "I think I messed up!";
-		mes "(Those weren't the";
-		mes "correct lyrics...)";
-		set prt_curse,9;
-	}
-	close;
-}
-
-mjolnir_01,298,302,0	script	#prt_poem01	-1,2,2,{
-OnTouch:
-	if (prt_curse == 11) {
-		mes "^FF0000*The great serpent*^000000";
-		mes "^FF0000*swallowed the sea.*^000000";
-		close;
-	}
-	end;
-}
-
-mjolnir_01,300,297,0	script	#prt_poem02	-1,2,2,{
-OnTouch:
-	if (prt_curse == 11) {
-		mes "^FF0000*The great serpent*^000000";
-		mes "^FF0000*swallowed the sea.*^000000";
-		close;
-	}
-	end;
-}
-
-mjolnir_01,292,288,0	script	#prt_poem03	-1,2,2,{
-OnTouch:
-	if (prt_curse == 11) {
-		mes "^FF0000*The eagle of the rainbow*^000000";
-		mes "^FF0000*swallowed the serpent.*^000000";
-		close;
-	}
-	end;
-}
-
-mjolnir_01,302,286,0	script	#prt_poem04	-1,2,2,{
-OnTouch:
-	if (prt_curse == 11) {
-		mes "^FF0000*Then snake scales*^000000";
-		mes "^FF0000*grew on the eagle...*^000000";
-		close;
-	}
-	end;
-}
-
-mjolnir_01,313,279,0	script	#prt_poem05	-1,2,2,{
-OnTouch:
-	if (prt_curse == 11) {
-		mes "^FF0000*And it slowly died...*^000000";
-		close;
-	}
-	end;
-}
-
-mjolnir_01,312,269,5	script	Dog#prt	81,{
-	mes "[Dog]";
-	mes "Bow Wow!";
-	close;
-}
-
-mjolnir_01,313,269,5	script	Dazed Boy#prt	706,{
-	if (prt_curse == 11) {
-		mes "[Absent-Minded Boy]";
-		mes "The great serpent";
-		mes "swallowed the sea.";
-		mes "The eagle of the rainbow";
-		mes "swallowed the serpent.";
-		mes "Then snake scales grew on";
-		mes "the eagle, and it slowly died.";
-		next;
-		mes "[Exhausted-Looking Woman]";
-		mes "Goodness...!";
-		mes "Will you please stop";
-		mes "singing that song?";
-		next;
-		mes "[Absent-Minded Boy]";
-		mes "..................";
-		next;
-		mes "^3355FFThe little boy quietly";
-		mes "stared at the woman for a";
-		mes "little bit, and then crouched";
-		mes "down and began petting a";
-		mes "dog sitting next to him.^000000";
-		next;
-		if (select("What did you just sing?:Ignore them") == 1) {
-			mes "[Absent-Minded Boy]";
-			mes "...";
-			mes "......";
-			mes ".........";
-			next;
-			mes "[Absent-Minded Boy]";
-			mes "Woof-woof, have you";
-			mes "heard this song? Mommy";
-			mes "taught me to sing it, you";
-			mes "know. She says it was sung";
-			mes "by people for a long time~";
-			next;
-			mes "^3355FFThe boy continued speaking";
-			mes "to the dog like an old friend,";
-			mes "ignoring your presence and";
-			mes "acting as if you didn't exist.^000000";
-			next;
-			mes "[Exhausted-Looking Woman]";
-			mes "Kaanu...";
-			mes "What did I tell";
-			mes "you about ignoring";
-			mes "people's questions!";
-			next;
-			mes "[Kaanu]";
-			mes ".........";
-			mes "..................";
-			mes "Uh oh, Woof-woof.";
-			mes "Mommy seems upset";
-			mes "for some reason.";
-			next;
-			mes "[Exhausted-Looking Woman]";
-			mes "I'm sorry, my kid is...";
-			mes "Look, did you want to know";
-			mes "more about that song? Try";
-			mes "not to worry about it: it's just an old children's tune.";
-			next;
-			if (select("Why are you here?:May I hear the song again?") == 1) {
-				mes "[Exhausted-Looking Woman]";
-				mes ".................";
-				next;
-				mes "^3355FFThe woman's lip tightens";
-				mes "with shame. It's obvious";
-				mes "that this topic makes her";
-				mes "feel very uncomfortable.^000000";
-				next;
-				mes "[Kaanu]";
-				mes "...";
-				mes "......";
-				mes ".........";
-				next;
-				mes "[Kaanu]";
-				mes "Woof-woof, do you know";
-				mes "why Mommy is always";
-				mes "so sad? I wish I knew";
-				mes "why Mommy never smiles...";
-				next;
-				mes "[Exhausted-Looking Woman]";
-				mes "........";
-				set prt_curse,12;
-				close;
-			}
-			mes "[Exhausted-Looking Woman]";
-			mes "..................";
-			next;
-			mes "[Exhausted-Looking Woman]";
-			mes "Okay. I can do this";
-			mes "simple thing for you.";
-			mes "Let me recite this song...";
-			next;
-			mes "[Exhausted-Looking Woman]";
-			mes "The great serpent";
-			mes "swallowed the sea.";
-			mes "The eagle of the rainbow";
-			mes "swallowed the serpent.";
-			mes "Then snake scales grew on";
-			mes "the eagle, and it slowly died.";
-			set prt_curse,12;
-			close;
-		}
-		mes "[Absent-Minded Boy]";
-		mes "...";
-		mes "......";
-		mes ".........";
-		close;
-	}
-	else if (prt_curse == 36) {
-		mes "^3355FFThe little boy looked";
-		mes "very worn and weary of";
-		mes "life, a look that is very";
-		mes "unsettling on the face";
-		mes "of a young child.^000000";
-		close;
-	}
-	else if (prt_curse == 45) {
-		mes "^3355FFThe little boy still";
-		mes "won't talk to you, but";
-		mes "he acknowledges your";
-		mes "presense by making eye";
-		mes "contact and smiling.^000000";
-		close;
-	}
-	else if (prt_curse > 54) {
-		mes "^3355FFThe little boy still";
-		mes "won't talk to you, but he";
-		mes "make you feel welcome";
-		mes "by giving you a warm smile.^000000";
-		close;
-	}
-	else {
-		mes "[Absent-Minded Boy]";
-		mes "...";
-		mes "......";
-		mes ".........";
-		next;
-		mes "^3355FFYou find it difficult";
-		mes "to ignore the little boy's";
-		mes "probing, wary eyes directed";
-		mes "at you. It's very clear that";
-		mes "he doesn't trust you.^000000";
-		close;
-	}
-}
-
-mjolnir_01,316,268,3	script	Exhausted-Looking Woman	879,{
-	if ((MaxWeight-Weight) < 2000 || checkweight(1201,1) == 0) {
-		mes "^3355FFWait a second!";
-		mes "Right now, you're carrying";
-		mes "too many things with you.";
-		mes "Please come back after";
-		mes "using the Kafra Service";
-		mes "to store some of your items.^000000";
-		close;
-	}
-	if (prt_curse == 11) {
-		mes "[Absent-Minded Boy]";
-		mes "The great serpent";
-		mes "swallowed the sea.";
-		mes "The eagle of the rainbow";
-		mes "swallowed the serpent.";
-		mes "Then snake scales grew on";
-		mes "the eagle, and it slowly died.";
-		next;
-		mes "[Exhausted-Looking Woman]";
-		mes "Goodness...!";
-		mes "Will you please stop";
-		mes "singing that song?";
-		next;
-		mes "[Absent-Minded Boy]";
-		mes "..................";
-		next;
-		mes "^3355FFThe little boy quietly";
-		mes "stared at the woman for a";
-		mes "little bit, and then crouched";
-		mes "down and began petting a";
-		mes "dog sitting next to him.^000000";
-		next;
-		if (select("What did you just sing?:Ignore them") == 1) {
-			mes "[Absent-Minded Boy]";
-			mes "...";
-			mes "......";
-			mes ".........";
-			next;
-			mes "[Absent-Minded Boy]";
-			mes "Woof-woof, have you";
-			mes "heard this song? Mommy";
-			mes "taught me to sing it, you";
-			mes "know. She says it was sung";
-			mes "by people for a long time~";
-			next;
-			mes "^3355FFThe boy continued speaking";
-			mes "to the dog like an old friend,";
-			mes "ignoring your presence and";
-			mes "acting as if you didn't exist.^000000";
-			next;
-			mes "[Exhausted-Looking Woman]";
-			mes "Kaanu...";
-			mes "What did I tell";
-			mes "you about ignoring";
-			mes "people's questions!";
-			next;
-			mes "[Kaanu]";
-			mes ".........";
-			mes "..................";
-			mes "Uh oh, Woof-woof.";
-			mes "Mommy seems upset";
-			mes "for some reason.";
-			next;
-			mes "[Exhausted-Looking Woman]";
-			mes "I'm sorry, my kid is...";
-			mes "Look, did you want to know";
-			mes "more about that song? Try";
-			mes "not to worry about it: it's just an old children's tune.";
-			next;
-			if (select("Why are you here?:May I hear the song again?") == 1) {
-				mes "[Exhausted-Looking Woman]";
-				mes ".................";
-				next;
-				mes "^3355FFThe woman's lip tightens";
-				mes "with shame. It's obvious";
-				mes "that this topic makes her";
-				mes "feel very uncomfortable.^000000";
-				next;
-				mes "[Kaanu]";
-				mes "...";
-				mes "......";
-				mes ".........";
-				next;
-				mes "[Kaanu]";
-				mes "Woof-woof, do you know";
-				mes "why Mommy is always";
-				mes "so sad? I wish I knew";
-				mes "why Mommy never smiles...";
-				next;
-				mes "[Exhausted-Looking Woman]";
-				mes "........";
-				set prt_curse,12;
-				close;
-			}
-			mes "[Exhausted-Looking Woman]";
-			mes "..................";
-			next;
-			mes "[Exhausted-Looking Woman]";
-			mes "Okay. I can do this";
-			mes "simple thing for you.";
-			mes "Let me recite this song...";
-			next;
-			mes "[Exhausted-Looking Woman]";
-			mes "The great serpent";
-			mes "swallowed the sea.";
-			mes "The eagle of the rainbow";
-			mes "swallowed the serpent.";
-			mes "Then snake scales grew on";
-			mes "the eagle, and it slowly died.";
-			set prt_curse,12;
-			close;
-		}
-		mes "[Exhausted-Looking Woman]";
-		mes "...........";
-		close;
-	}
-	else if (prt_curse == 12) {
-		mes "[Exhausted-Looking Woman]";
-		mes "Not too many people";
-		mes "come to this remote area.";
-		mes "What brings you all the";
-		mes "way over here, I wonder?";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Actually, I'm just";
-		mes "trying to learn the";
-		mes "real lyrics of that";
-		mes "song that little boy";
-		mes "has been singing.";
-		next;
-		mes "[Exhausted-Looking Woman]";
-		mes ".........";
-		next;
-		mes "[Exhausted-Looking Woman]";
-		mes "That song's lyrics, and";
-		mes "its meaning, can change";
-		mes "from person to person as";
-		mes "time goes on. I suppose part";
-		mes "of the reason is because it's";
-		mes "been handed down orally...";
-		next;
-		mes "[Exhausted-Looking Woman]";
-		mes "It sounds like such a happy";
-		mes "song, but it's meaning had";
-		mes "changed for me ever since";
-		mes "the accident had happened...";
-		mes "It's been so long, but I don't";
-		mes "think the pain will ever heal.";
-		next;
-		select("Accident?");
-		mes "[Exhausted-Looking Woman]";
-		mes "I'm... I'm sorry.";
-		mes "I don't think I can talk";
-		mes "about it. If I try, I know I'll";
-		mes "relive the horror. Every day";
-		mes "is already a struggle to cope";
-		mes "with the sins I've committed.";
-		next;
-		mes "[Exhausted-Looking Woman]";
-		mes "I know it's selfish, but";
-		mes "I have a favor to ask of you.";
-		mes "I can't really leave this area,";
-		mes "and seldom do I receive visitors. Would you be so kind to deliver";
-		mes "something to Prontera for me?";
-		next;
-		mes "[Exhausted-Looking Woman]";
-		mes "I used to live in Prontera,";
-		mes "and ever since the accident,";
-		mes "Father Bamph has been so very";
-		mes "supportive of me. It's not enough to repay his kindness, but please";
-		mes "give these herbs to him for me.";
-		next;
-		mes "[Exhausted-Looking Woman]";
-		mes "You can find ^3131FFFather Bamph^000000";
-		mes "in ^3131FFProntera Church^000000. When you ";
-		mes "see him, please give him my";
-		mes "warmest regards. I would do it";
-		mes "myself, but because of what I did, I can't return to Prontera...";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "^333333(Alright then. I guess";
-		mes "I should deliver these";
-		mes "herbs to Prontera Church";
-		mes "before I talk to Rodafrian.)^000000";
-		getitem 7432,1;
-		set prt_curse,13;
-		close;
-	}
-	else if (prt_curse > 12 && prt_curse < 16) {
-		mes "[Exhausted-Looking Woman]";
-		mes "Father Bamph has helped";
-		mes "me so much. Please bring";
-		mes "that herb pouch to him in";
-		mes "Prontera Church, and give";
-		mes "him my warmest regards.";
-		close;
-	}
-	else if (prt_curse == 16) {
-		mes "[Bonnie Imbullea]";
-		mes "Oh, you've come back?";
-		mes "Were you able to deliver";
-		mes "that pouch of herbs that";
-		mes "I gave you to Father Bamph?";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Yes, I did. Actually,";
-		mes "Father Bamph sent me";
-		mes "here to ask you a few";
-		mes "things. You see, he told";
-		mes "me all about the royal secret";
-		mes "and, well, your exorcism.";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "Oh. I see.";
-		mes "You must think";
-		mes "me a monster...";
-		mes "Those poor children";
-		mes "are dead because of me...";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "N-no! Not at all!";
-		mes "I just wanted to ask if there";
-		mes "was a connection between";
-		mes "the song that Kaanu has been";
-		mes "singing and Jormungand's curse.";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "...";
-		mes "......";
-		mes ".........";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "After the exorcism failed,";
-		mes "I should have been punished";
-		mes "with death. But the royal family and the Prontera Church took";
-		mes "mercy on me, and allowed";
-		mes "me to live here in exile.";
-		Emotion e_dots;
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "I began to sing this song";
-		mes "to keep myself distracted,";
-		mes "even if it was related to";
-		mes "the Jormungand curse.";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "You know, now that I think";
-		mes "about it, I do remember hearing";
-		mes "that after the exorcism failed,";
-		mes "a maid found a fragment of a";
-		mes "Red Gemstone while cleaning";
-		mes "the secret ceremonial grounds.";
-		Emotion e_gasp,1;
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "I always thought it";
-		mes "was a little strange.";
-		mes "I wanted to investigate";
-		mes "it, but then I was discharged";
-		mes "from the Prontera Church";
-		mes "after my failure...";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "A fragment from";
-		mes "a Red Gemstone?";
-		mes "Maybe... maybe it's";
-		mes "evidence that someone";
-		mes "sabotaged the exorcism!";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "What happened was tragic,";
-		mes "but it would make me feel";
-		mes "so much better if that were";
-		mes "really the truth. Even if the";
-		mes "exorcism was sabotaged,";
-		mes "we can't turn back time...";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "^333333(Hmm...";
-		mes "I better head back";
-		mes "to Prontera Church";
-		mes "and let Father Bamph";
-		mes "know about this information.)^000000";
-		set prt_curse,17;
-		close;
-	}
-	else if (prt_curse == 17) {
-		mes "[Bonnie Imbullea]";
-		mes "It's really very";
-		mes "difficult to live";
-		mes "with this guilt.";
-		mes "I was trained to help";
-		mes "people, not kill them!";
-		next;
-		mes "^3355FFYou tried to comfort";
-		mes "Bonnie Imbullea for a";
-		mes "little while before you";
-		mes "return to Prontera Church.";
-		close;
-	}
-	else if (prt_curse == 35 || prt_curse == 44 || prt_curse == 54) {
-		mes "^3355FFYou tell Bonnie Imbullea";
-		mes "that the deaths of the princes";
-		mes "were not her fault and that the exorcism was probably sabotaged.";
-		mes "However, you keep specifics, like the use of poison, to yourself.^000000";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "Is that really true...?";
-		mes "Oh, I'm so happy! I really";
-		mes "thought I'd have to live the";
-		mes "rest of my in seclusion with";
-		mes "this horrible shame. Oh, thank";
-		mes "you so much for your help!";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "Kaanu will be able to";
-		mes "meet other kids his own";
-		mes "age... We can finally live";
-		mes "a normal life. How wonderful...";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "But wait...";
-		mes "How exactly did the";
-		mes "princes die, then?";
-		mes "There weren't any";
-		mes "wounds on the bodies";
-		mes "from what I remember...";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Well, um, I wouldn't know";
-		mes "anything about that, but";
-		mes "Father Bamph and Father";
-		mes "Biscuss are handling the";
-		mes "investigation, and they're";
-		mes "doing their best to find out.";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "I see. Well, I believe in";
-		mes "them: they're great priests,";
-		mes "after all. Although I may be";
-		mes "forgiven for my failure, I still fear for the royal family...";
-		mes "All I can do for now is pray.";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "Anyway, I promise that";
-		mes "I won't reveal what I know";
-		mes "about this incident to the";
-		mes "public. And if you ever come";
-		mes "by the mountain again, I hope";
-		mes "you stop by to visit us.";
-		next;
-		mes "[Bonnie Imbullea]";
-		mes "You don't understand";
-		mes "how much the news you've";
-		mes "brought really means to me.";
-		mes "I can finally free myself from";
-		mes "this burdensome guilt...";
-		mes "Thank you, kind adventurer~";
-		if (prt_curse == 35) set prt_curse,36;
-		else if (prt_curse == 44) set prt_curse,45;
-		else {
-			next;
-			mes "^3355FFNow, you can return to";
-			mes "Rodafrian, the historian";
-			mes "stationed in Morroc.^000000";
-			set prt_curse,55;
-		}
-
-		close;
-	}
-	else if (prt_curse == 36) {
-		mes "[Bonnie Imbullea]";
-		mes "By your grace and mercy,";
-		mes "please pity the poor souls";
-		mes "and protect the royal family...";
-		mes "Bless us with your light and";
-		mes "may your wisdom guide us...";
-		close;
-	}
-	else if (prt_curse == 45) {
-		mes "[Bonnie Imbullea]";
-		mes "I guess we've gotten";
-		mes "too used to the peace";
-		mes "and serenity of Mount";
-		mes "Mjolnir. It won't be easy";
-		mes "to leave, even if we're welcome to return to Prontera...";
-		close;
-	}
-	else if (prt_curse > 54) {
-		mes "[Bonnie Imbullea]";
-		mes "Thank you so much";
-		mes "for helping out in the";
-		mes "investigation of the";
-		mes "princes. I'd never know";
-		mes "happiness again if it";
-		mes "weren't for your efforts.";
-		close;
-	}
-	else {
-		mes "[Bonnie Imbullea]";
-		mes "^333333*Sigh...*^000000";
-		close;
-	}
-}
-
-
-prt_church,115,122,0	warp	#sazekan	1,1,prt_church,168,106
-prt_church,166,106,0	warp	#prtchhall	1,1,prt_church,112,122
-
-prt_church,185,106,3	script	Father Bamph	60,{
-	if (prt_curse == 13) {
-		mes "[Father Bamph]";
-		mes "Welcome to";
-		mes "Prontera Church.";
-		mes "Please relax, and";
-		mes "let your mind and";
-		mes "spirit find rest in";
-		mes "these hallowed halls.";
-		next;
-		select("Give him the herb pouch.");
-		if (countitem(7432) < 1) {
-			mes "["+strcharinfo(0)+"]";
-			mes "Ack!";
-			mes "Now, where did I put";
-			mes "that pouch with the herbs?";
-			close;
-		}
-		mes "[Father Bamph]";
-		mes "May I ask...";
-		mes "Why are you giving";
-		mes "me this pouch of herbs?";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Well, there was this";
-		mes "lady living on Mount";
-		mes "Mjolnir who wanted me";
-		mes "to give this to you. Um, she";
-		mes "has a son named Kaanu?";
-		next;
-		mes "[Father Bamph]";
-		mes "Oh, you must have met";
-		mes "Bonnie Imbullea. It's";
-		mes "been a long time since";
-		mes "I've seen her. How is";
-		mes "she doing, may I ask?";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Oh...";
-		mes "I guess she's fine.";
-		mes "But she seems really...";
-		mes "I dunno, tormented...";
-		next;
-		mes "[Father Biscuss]";
-		mes "Good! If she were happy";
-		mes "and relaxed after what she";
-		mes "did, not even God would forgive";
-		mes "her! She deserves to live the";
-		mes "rest of her life in agony!";
-		next;
-		mes "[Father Bamph]";
-		mes "Father Biscuss, how can";
-		mes "you say something like that?";
-		mes "She did her best to stop what";
-		mes "had happened! We should pity";
-		mes "her for the suffering she must be feeling. Where is your compassion?";
-		next;
-		mes "[Father Biscuss]";
-		mes "Bah! Don't speak to me";
-		mes "about compassion! Weren't";
-		mes "you the one who recommended";
-		mes "her to perform the exorcism in";
-		mes "the first place? You didn't";
-		mes "forget that, did you?";
-		next;
-		mes "[Father Bampf]";
-		mes "......";
-		mes ".........";
-		mes "............";
-		next;
-		mes "[Father Biscuss]";
-		mes "Hah!";
-		next;
-		select("About Bonnie Imbullea");
-		mes "[Father Bamph]";
-		mes "Well...";
-		mes "I don't...";
-		mes "I don't know if";
-		mes "I should be telling ";
-		mes "you about that incident...";
-		next;
-		mes "[Father Biscuss]";
-		mes "You know what? If Bonnie";
-		mes "sent this adventurer here";
-		mes "for a favor, it probably means";
-		mes "she trusts this person. Besides, we need somebody to carry out";
-		if (sex)
-			mes "this task for us. Why not him?";
-		else
-			mes "this task for us. Why not her?";
-		next;
-		mes "[Father Bamph]";
-		mes "Your words have the ring";
-		mes "of truth, Father Biscuss.";
-		mes "Well then, adventurer, give";
-		mes "me the opportunity to tell you";
-		mes "something very important. But, you must not tell anyone else...";
-		set prt_curse,14;
-		delitem 7432,1; //Leather_Pouch
-		close;
-	}
-	else if (prt_curse == 14) {
-		mes "[Father Bamph]";
-		mes "What I am about to tell";
-		mes "you must be kept secret.";
-		mes "Now, do you know about";
-		mes "Jormungand, the great serpent";
-		mes "born from the god Loki and";
-		mes "the giantess, Angrboda?";
-		next;
-		mes "[Father Bamph]";
-		mes "Jormungand was an evil";
-		mes "beast that, after the thousand";
-		mes "year war between the gods and";
-		mes "demons, began to attack humans.";
-		mes "It brought great chaos and much";
-		mes "suffering around the world...";
-		next;
-		mes "[Father Bamph]";
-		mes "Finally, the first Tristram of";
-		mes "the Gaebolg family defeated";
-		mes "Jormungand together with 6";
-		mes "other warriors, but only after";
-		mes "it killed his beloved father.";
-		next;
-		mes "[Father Bamph]";
-		mes "Tristram would become the";
-		mes "first king of the Rune-Midgarts";
-		mes "Kingdom, but his family would";
-		mes "suffer from the curse placed";
-		mes "by Jormungand before its defeat. ";
-		next;
-		mes "[Father Bamph]";
-		mes "To this day...";
-		mes "^FF0000Every first prince of";
-		mes "the Gaebolg family dies";
-		mes "at a young age^000000. That is";
-		mes "Jormungand's curse and";
-		mes "the royal family's secret.";
-		Emotion e_omg,1;
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "What...?!";
-		mes "Is this really true?!";
-		mes "Isn't there any way to";
-		mes "counter this horrible curse?!";
-		next;
-		mes "[Father Bamph]";
-		mes "Please lower your voice.";
-		mes "Yes, it's a shame that the";
-		mes "royal family must suffer like";
-		mes "this. But all the exorcisms";
-		mes "that have been attempted";
-		mes "over the years have failed...";
-		next;
-		mes "[Father Bamph]";
-		mes "Although the situation";
-		mes "appeared hopeless, King";
-		mes "Tristram III tried once again to exorcise the curse. Following";
-		mes "his orders, the greatest priests and exorcists were all summoned.";
-		next;
-		mes "[Father Bamph]";
-		mes "A series of tests was";
-		mes "performed to select the";
-		mes "best priests and exorcists";
-		mes "to remove this curse. In the end, ^3131FFBonnie Imbullea^000000 was chosen to";
-		mes "lead the exorcism ceremony.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Wait, but you mentioned";
-		mes "samething about an accident.";
-		mes "Does that mean that she failed";
-		mes "in performing the exorcism?";
-		next;
-		mes "[Father Bamph]";
-		mes "Yes, unfortunately.";
-		mes "After the priests and";
-		mes "exorcists gathered in the";
-		mes "secret ceremonial grounds,";
-		mes "three princes were killed";
-		mes "instead of just the first.";
-		next;
-		mes "[Father Biscuss]";
-		mes "Although we all swore to";
-		mes "keep that incident a secret,";
-		mes "Bonnie Imbullea took full";
-		mes "responsibility for the deaths.";
-		mes "That is why she is in self";
-		mes "imposed exile from the kingdom.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "What...?";
-		mes "That's...";
-		mes "That's crazy!";
-		next;
-		mes "[Father Biscuss]";
-		mes "I know that this";
-		mes "is a very long story,";
-		mes "and that it's a little";
-		mes "complicated. Please";
-		mes "listen to what we have";
-		mes "to ask from here on...";
-		Emotion e_dots;
-		set prt_curse,15;
-		close;
-	}
-	else if (prt_curse == 15) {
-		mes "[Father Bamph]";
-		mes "Now, you should know that";
-		mes "all of the princes that were";
-		mes "killed that day bore strange";
-		mes "looking marks on their bodies.";
-		mes "It almost looked as if they";
-		mes "were growing snake scales.";
-		Emotion e_gasp,1;
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Wait, they grew snake";
-		mes "scales? That sounds just";
-		mes "like one of the versions of";
-		mes "this song I'm investigating.";
-		mes "I think it was the song about the Rune-Midgarts Kingdom's origin.";
-		next;
-		mes "[Father Bamph]";
-		mes "Wait, that song?";
-		mes "Hm, I don't see how";
-		mes "it's related. Let's see";
-		mes "now, how did it go?";
-		mes "Rainbows... Eagles...";
-		mes "Ah! Now I remember!";
-		next;
-		mes "[Father Bamph]";
-		mes "The great serpent";
-		mes "swallowed the sea.";
-		mes "The eagle of the rainbow";
-		mes "swallowed the serpent.";
-		mes "Then the eagle built its nest.";
-		mes "A nest upon the swallowed sea.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Hmm...";
-		mes "Well, I heard a";
-		mes "different version";
-		mes "of the same song.";
-		mes "It goes like...";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "The great serpent";
-		mes "swallowed the sea.";
-		mes "The eagle of the rainbow";
-		mes "swallowed the serpent.";
-		mes "Then snake scales grew on";
-		mes "the eagle, and it slowly died.";
-		next;
-		mes "[Father Bamph]";
-		mes "Oh, my. I learned the song";
-		mes "when I was a young boy from";
-		mes "my father. However, your version seems to reveal the secret curse";
-		mes "of the Gaebolgs. Please tell me, where did you hear that song?";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Well, I first heard this";
-		mes "version from a historian,";
-		mes "and then I found out that";
-		mes "Bonnie Imbullea knows it as";
-		mes "well. Um, is there a problem?";
-		next;
-		mes "[Father Bamph]";
-		mes "If those song lyrics are";
-		mes "spread, the secret of the";
-		mes "royal family curse could be";
-		mes "revealed to the public. Would";
-		mes "you please help us by speaking";
-		mes "to Bonnie Imbullea once again?";
-		next;
-		mes "[Father Bamph]";
-		mes "If you can, please try to";
-		mes "see if you can learn of any";
-		mes "connection between the curse";
-		mes "and the song, or if she can";
-		mes "remember anything that happened";
-		mes "after the exorcism failed...";
-		set prt_curse,16;
-		close;
-	}
-	else if (prt_curse == 16) {
-		mes "[Father Bamph]";
-		mes "Please visit Bonnie";
-		mes "Imbullea in Mount Mjolnir";
-		mes "to see if you can learn more";
-		mes "about that song, or about what";
-		mes "happened after the attempted exorcism of the Jormungand curse.";
-		close;
-	}
-	else if (prt_curse == 17) {
-		mes "[Father Bamph]";
-		mes "Ah, have you spoken";
-		mes "to Bonnie Imbullea?";
-		mes "Please tell me if you";
-		mes "have learned anything new.";
-		next;
-		mes "^3355FFYou related everything";
-		mes "that Bonnie Imbullea spoke";
-		mes "about, including the discovery";
-		mes "of a fragment of Red Gemstone";
-		mes "in the secret ceremonial grounds. ";
-		next;
-		mes "[Father Bamph]";
-		mes "Red Gemstone? There's";
-		mes "no reason for that to be in";
-		mes "a holy place. Hmm. There's";
-		mes "more to this case than meets";
-		mes "the eye. We better investigate";
-		mes "the truth, starting now.";
-		next;
-		mes "[Father Bamph]";
-		mes "Come with me, adventurer,";
-		mes "to the secret ceremonial";
-		mes "grounds for the royal family.";
-		mes "Just use the switch hidden";
-		mes "within the bookshelf and";
-		mes "I will meet you there.";
-		set prt_curse,18;
-		close;
-	}
-	else if (prt_curse > 17 && prt_curse < 22) {
-		mes "[Father Bamph]";
-		mes "Come with me to the";
-		mes "secret ceremonial grounds";
-		mes "so that we can investigate";
-		mes "the possibility of sabotage";
-		mes "with the exorcism that";
-		mes "Bonnie Imbullea performed.";
-		next;
-		mes "[Father Bamph]";
-		mes "There is a hidden switch";
-		mes "in the bookshelf that you";
-		mes "can use to transport yourself";
-		mes "there. Go, and I will meet";
-		mes "you in the ceremonial grounds.";
-		close;
-	}
-	else if (prt_curse == 22) {
-		mes "[Father Bamph]";
-		mes "This is a matter of grave";
-		mes "importance, but we can't";
-		mes "alert the royal family yet and";
-		mes "cause a panic. It would be";
-		mes "best to fully investigate this";
-		mes "first and collect proof.";
-		next;
-		mes "[Father Bamph]";
-		mes "Brave adventurer, would";
-		mes "you please visit the Assassin";
-		mes "Guild in Morroc and see if you";
-		mes "can learn anything about how";
-		mes "we can verify whether poison";
-		mes "was used to kill the princes?";
-		set prt_curse,23;
-		close;
-	}
-	else if (prt_curse == 23) {
-		mes "[Father Bamph]";
-		mes "Please see if you can";
-		mes "learn anything about testing";
-		mes "for the use of poison from";
-		mes "a member of the Assassin";
-		mes "Guild in Morroc.";
-		close;
-	}
-	else if (prt_curse == 31) {
-		mes "[Father Bamph]";
-		mes "Ah, you've returned~";
-		mes "Have you managed to learn";
-		mes "anything about poison from";
-		mes "the Assassin Guild? I know";
-		mes "their members must be";
-		mes "very difficult to find...";
-		next;
-		mes "^3355FFYou relate all of the";
-		mes "information you learned";
-		mes "about poison to Father Bamph,";
-		mes "including the method to test";
-		mes "for the use of poison in murder. ";
-		next;
-		mes "[Father Bamph]";
-		mes "Ah, I see. Then, would";
-		mes "you please bring 1 Yellow";
-		mes "Gemstone and 1 Green Potion";
-		mes "to the secret ceremonial grounds as soon as you can? I will wait";
-		mes "over there for you once again.";
-		set prt_curse,32;
-		close;
-	}
-	else if (prt_curse == 32 || prt_curse == 33 || prt_curse == 41 || prt_curse == 42 || prt_curse == 51 || prt_curse == 52) {
-		mes "[Father Bamph]";
-		mes "You can use the hidden";
-		mes "switch in the bookshelf to";
-		mes "enter the secret ceremonial";
-		mes "grounds. Don't forget that we";
-		mes "need^3131FF 1 Yellow Gemstone^000000 and ^3131FF1 Green Potion^000000 to test for poison.";
-		close;
-	}
-	else if (prt_curse == 34) {
-		mes "[Father Bamph]";
-		mes "I can't believe it!";
-		mes "If poison was used, then";
-		mes "the second and third princes";
-		mes "were murdered! Unbelievable...";
-		mes "How can anyone kill children?";
-		next;
-		mes "[Father Bamph]";
-		mes "At the very least, we now";
-		mes "know that their deaths were";
-		mes "not Bonnie Imbullea's fault.";
-		mes "Now I must discuss with Father";
-		mes "Biscuss and decide how to tell";
-		mes "the royal family about this...";
-		next;
-		mes "[Father Bamph]";
-		mes "Once again, let me remind";
-		mes "you that everything that has";
-		mes "transpired here must be kept";
-		mes "secret. The public cannot know";
-		mes "of Jormungand's curse! It would cause political turmoil and chaos!";
-		next;
-		mes "[Father Bamph]";
-		mes "Still, that does not mean";
-		mes "that I cannot personally thank";
-		mes "you for all of your help. I'm very grateful for what you have done,";
-		mes "adventurer. May safety accompany you on all of your journeys.";
-		set prt_curse,35;
-		close;
-	}
-	else if (prt_curse > 34 && prt_curse < 40 && !aru_monas) {
-		mes "[Father Bamph]";
-		mes "I'm at a loss at what";
-		mes "to do. Sometimes, even";
-		mes "I have doubts and believe";
-		mes "that Odin has abandoned us...";
-		close;
-	}
-	else if (prt_curse == 40) {
-		mes "[Father Bamph]";
-		mes "Ah, you've returned~";
-		mes "Have you managed to learn";
-		mes "anything about poison from";
-		mes "the Assassin Guild? I know";
-		mes "their members must be";
-		mes "very difficult to find...";
-		next;
-		mes "^3355FFYou relate all of the";
-		mes "information you learned";
-		mes "about poison to Father Bamph,";
-		mes "including the method to test";
-		mes "for the use of poison in murder. ";
-		next;
-		mes "[Father Bamph]";
-		mes "Ah, I see. Then, would";
-		mes "you please bring^3131FF 1 Yellow";
-		mes "Gemstone^000000 and ^3131FF1 Green Potion^000000";
-		mes "to the secret ceremonial grounds as soon as you can? I will wait";
-		mes "over there for you once again.";
-		set prt_curse,41;
-		close;
-	}
-	else if (prt_curse == 43 || prt_curse == 53) {
-		mes "[Father Bamph]";
-		mes "I can't believe it!";
-		mes "If poison was used, then";
-		mes "the second and third princes";
-		mes "were murdered! Unbelievable...";
-		mes "How can anyone kill children?";
-		next;
-		mes "[Father Bamph]";
-		mes "At the very least, we now";
-		mes "know that their deaths were";
-		mes "not Bonnie Imbullea's fault.";
-		mes "Now I must discuss with Father";
-		mes "Biscuss and decide how to tell";
-		mes "the royal family about this...";
-		next;
-		mes "[Father Bamph]";
-		mes "Oh, and would you please";
-		mes "inform ^3131FFBonnie Imbullea^000000 that";
-		mes "the deaths of the princes were";
-		mes "not her fault? I'm sure that news would bring her great relief";
-		mes "from her burden of guilt...";
-		next;
-		mes "[Father Bamph]";
-		mes "Once again, let me remind";
-		mes "you that everything that has";
-		mes "transpired here must be kept";
-		mes "secret. The public cannot know";
-		mes "of Jormungand's curse! It would cause political turmoil and chaos!";
-		next;
-		mes "[Father Bamph]";
-		mes "Still, that does not mean";
-		mes "that I cannot personally thank";
-		mes "you for all of your help. I'm very grateful for what you have done,";
-		mes "adventurer. May safety accompany you on all of your journeys.";
-		if (prt_curse == 43) set prt_curse,44;
-		else set prt_curse,54;
-		getexp 160000,0;
-		close;
-	}
-	else if (prt_curse > 43 && prt_curse < 50 && !aru_monas) {
-		mes "[Father Bamph]";
-		mes "Have you spoken to";
-		mes "Bonnie Imbullea yet?";
-		mes "Try not to worry about the";
-		mes "news about the princes'";
-		mes "murder. Father Biscuss";
-		mes "and I will handle it.";
-		close;
-	}
-	else if (prt_curse == 50) {
-		mes "[Father Bamph]";
-		mes "Ah, you've returned~";
-		mes "Have you managed to learn";
-		mes "anything about poison from";
-		mes "the Assassin Guild? I know";
-		mes "their members must be";
-		mes "very difficult to find...";
-		next;
-		mes "You relate all of the";
-		mes "information you learned";
-		mes "about poison to Father Bamph,";
-		mes "including the method to test";
-		mes "for the use of poison in murder. ";
-		next;
-		mes "[Father Bamph]";
-		mes "Ah, I see. Then, would";
-		mes "you please bring ^3131FF1 Yellow";
-		mes "Gemstone^000000 and ^3131FF1 Green Potion^000000";
-		mes "to the secret ceremonial grounds as soon as you can? I will wait";
-		mes "over there for you once again.";
-		set prt_curse,51;
-		close;
-	}
-	else if (prt_curse == 60) {
-		mes "[Father Bamph]";
-		mes "Oh, "+strcharinfo(0)+"~";
-		mes "Long time, no see.";
-		mes "Have you spoken to";
-		mes "Bonnie yet? Ah, and";
-		mes "how may I help you today?";
-		next;
-		mes "^3355FFYou tell Father Bamph";
-		mes "that rare herbs grow in";
-		mes "a land to the west, although";
-		mes "you do not mention that you";
-		mes "told Rodafrian about the curse.^000000";
-		next;
-		mes "[Father Biscuss]";
-		mes "Land to the west?";
-		mes "That place is rumored to";
-		mes "be populated by fanatics.";
-		mes "Father Bamph, I think they";
-		mes "may be prime suspects for";
-		mes "the murder of the princes...";
-		next;
-		mes "[Father Bamph]";
-		mes "Well, I'll admit that it's";
-		mes "possible, but we haven't had";
-		mes "contact with anyone from the";
-		mes "land to the west for so long...";
-		mes "It's still far too early to make those kinds of assumptions.";
-		next;
-		select("Land to the west?");
-		mes "[Father Bamph]";
-		mes "Not much is known about";
-		mes "the land to the west. We";
-		mes "did send several priests";
-		mes "there once to spread our";
-		mes "faith. However, they failed...";
-		next;
-		mes "[Father Bamph]";
-		mes "From what I can tell,";
-		mes "almost everyone there";
-		mes "is a strong adherent of";
-		mes "that region's native religion.";
-		mes "Anyway, thank you for informing";
-		mes "us. We'll handle it from here.";
-		next;
-		mes "[Father Bamph]";
-		mes "Ah, to preserve the secrets";
-		mes "of the royal family, I ask that";
-		mes "you refrain from entering the";
-		mes "secret ceremonial grounds";
-		mes "from now on. Thanks again for your help, "+strcharinfo(0)+".";
-		set prt_curse,61;
-		close;
-	}
-	else {
-		if (prt_curse == 36 || prt_curse == 45 || prt_curse == 56 || prt_curse == 61) {
-// Begin Nameless Island Access Quest Addition
-			if (aru_monas == 1) {
-				mes "[Father Bamph]";
-				mes "Oh, I've been waiting for";
-				mes "you, adventurer. I'm sorry";
-				mes "for giving you such short";
-				mes "notice, but it seems that";
-				mes "you've grown much stronger";
-				mes "since the last time we met.";
-				next;
-				mes "[Father Bamph]";
-				mes "The Church has received";
-				mes "a request from Prontera";
-				mes "Palace, but we don't have";
-				mes "the resources to handle it.";
-				mes "I believe you'd be well suited";
-				mes "to this task if you'll help us.";
-				next;
-				mes "[Father Bamph]";
-				mes "A man of high rank suddenly";
-				mes "disappeared a while ago.";
-				mes "Although Prontera Palace";
-				mes "asked us to find him, I can";
-				mes "only tell you who he is later.";
-				next;
-				mes "[Father Bamph]";
-				mes "All we know is that he was";
-				mes "last seen in Comodo. Please";
-				mes "speak to our informant, ^6B8E23Larjes^000000,";
-				mes "and he will assist you in your";
-				mes "search for the lost official.";
-				set aru_monas,2;
-				close;
-			}
-			else if (aru_monas == 2 || aru_monas == 3) {
-				mes "[Father Bamph]";
-				mes "Please go to Comodo and";
-				mes "find our informant, ^6B8E23Larjes^000000,";
-				mes "in the Casino. He will help";
-				mes "you in your search for the";
-				mes "official who disappeared.";
-				close;
-			}
-			else if (aru_monas == 4) {
-				mes "[Father Bamph]";
-				mes "Ah, so you found Larjes?";
-				mes "How has your investigation of";
-				mes "that official's disappearance";
-				mes "progressing? I hope that he";
-				mes "is still safe and sound";
-				mes "when you find him.";
-				next;
-				select("Tell him what Larjes said.");
-				mes "[Father Bamph]";
-				mes "I see. We've detected some";
-				mes "disquieting activity from";
-				mes "Arunafeltz lately, but I didn't";
-				mes "think they would make";
-				mes "their move so soon. Hmm...";
-				mes "Give me a moment to think.";
-				set aru_monas,5;
-				close;
-			}
-			else if (aru_monas == 5) {
-				if (rand(1,10) == 10) {
-					mes "[Father Bamph]";
-					mes "Well, I've considered all";
-					mes "possible scenarios. I think";
-					mes "it would work best if you";
-					mes "continue your investigation";
-					mes "on our behalf. That is, if";
-					mes "you're willing to do it.";
-					next;
-					mes "[Father Bamph]";
-					mes "We don't want to provoke";
-					mes "an international conflict";
-					mes "with our official involvement,";
-					mes "but I also can't force you to";
-					mes "work for us. Whether you";
-					mes "can help is your choice.";
-					next;
-					if (select("Let me think about it.:Of course, I'll help.") == 1) {
-						mes "[Father Bamph]";
-						mes "I hope that you decide";
-						mes "to help us. The safety of";
-						mes "our nation depends on the";
-						mes "success of this investigation.";
-						mes "We could really use your help.";
-						close;
-					}
-					mes "[Father Bamph]";
-					mes "Thank you. I'm glad to hear";
-					mes "that you'll help us. You may";
-					mes "take the airship in Izlude to";
-					mes "travel to Arunafeltz, where you";
-					mes "must continue your investigation.";
-					next;
-					mes "[Father Bamph]";
-					mes "I believe that you should";
-					mes "be able to learn more if you";
-					mes "investigate the city of ^9370DBRachel^000000.";
-					mes "Please accept this money";
-					mes "to cover your Airship fee.";
-					mes "Thank you, and good luck.";
-					set zeny,zeny+1500;
-					set aru_monas,6;
-					close;
-				}
-				else {
-					mes "[Father Bamph]";
-					mes "Hmm... What's the best way";
-					mes "for us to handle this? Let";
-					mes "me think about our options.";
-					mes "We can--no. That wouldn't";
-					mes "work. This will be difficult.";
-					close;
-				}
-			}
-			else if (aru_monas == 6) {
-				// Anyone else see the irony in this?
-				mes "[Father Bamph]";
-				mes "You might have problems";
-				mes "in Rachel since the culture";
-				mes "there is much different than";
-				mes "our own. Their ways of doing";
-				mes "things, their government...";
-				mes "Everything is tied to religion.";
-				close;
-			}
-			else if (aru_monas > 6 && aru_monas < 24) {
-				mes "[Father Bamph]";
-				mes "Thank you so much for all";
-				mes "of your hard work. Our agents";
-				mes "will contact you whenever they";
-				mes "uncover any new information.";
-				mes "Remember that no one can";
-				mes "know what we've been doing.";
-				close;
-			}
-			else if (aru_monas == 24) {
-				mes "[Father Bamph]";
-				mes "Thank you for bring us such";
-				mes "important information. With";
-				mes "your help, we were able to";
-				mes "clear a few unsolved cases.";
-				mes "We expected something like";
-				mes "this, but not this soon.";
-				next;
-				mes "[Father Bamph]";
-				mes "I fear that the Royal Court";
-				mes "has been bickering over their";
-				mes "own selfish needs. I pray that";
-				mes "it does not grow worse, devolve";
-				mes "into chaos. ^666666*Sigh*^000000 We'll see...";
-				set aru_monas,25;
-				close;
-			}
-			else if (aru_monas >= 25) {
-				mes "[Father Bamph]";
-				mes "Thank you for bring us such";
-				mes "important information. With";
-				mes "your help, we were able to";
-				mes "clear a few unsolved cases.";
-				mes "We expected something like";
-				mes "this, but not this soon.";
-				next;
-				mes "[Father Bamph]";
-				mes "I fear that the Royal Court";
-				mes "has been bickering over their";
-				mes "own selfish needs. I pray that";
-				mes "it does not grow worse, devolve";
-				mes "into chaos. ^666666*Sigh*^000000 We'll see...";
-				close;
-			}
-// End Nameless Island Access Quest Addition
-			else {
-				mes "[Father Bamph]";
-				mes "I'm sorry, but would it";
-				mes "be alright if we talked";
-				mes "later? I have to handle";
-				mes "a very important task now...";
-				close;
-			}
-		}
-	}
-}
-
-prt_church,184,110,3	script	Father Biscuss	60,{
-	if (prt_curse == 54) {
-		mes "[Father Biscuss]";
-		mes "Hmm, I still suspect that";
-		mes "someone from the Assassin";
-		mes "Guild may have killed the";
-		mes "princes. Just in case, I'm";
-		mes "going to send a spy. Keep";
-		mes "that information secret.";
-		next;
-		mes "[Father Biscuss]";
-		mes "So yes. You didn't learn";
-		mes "or hear anything from us,";
-		mes "and you don't know anything";
-		mes "about the royal family's curse.";
-		mes "From here on, Father Bamph";
-		mes "and I will handle this issue.";
-		close;
-	}
-	else if (prt_curse == 35) {
-		mes "[Father Biscuss]";
-		mes "I've never seen Father";
-		mes "Bamph this way before, but";
-		mes "I can understand how he feels.";
-		mes "As one of the leaders of this";
-		mes "church, he feels responsible";
-		mes "for these princes' deaths.";
-		next;
-		mes "[Father Biscuss]";
-		mes "I'm sure he'll feel";
-		mes "better in a few days,";
-		mes "but right now, he's in no";
-		mes "condition to compile the";
-		mes "valuable info that you've";
-		mes "provided, so I'll do it.";
-		next;
-		mes "[Father Biscuss]";
-		mes "Personally, I feel that";
-		mes "what happened was tragic,";
-		mes "but it should be avenged.";
-		mes "Perhaps that why I've held";
-		mes "a grudge against Imbullea";
-		mes "for all this time. Anyway...";
-		next;
-		mes "[Father Biscuss]";
-		mes "Although we can't";
-		mes "acknowledge it publicly,";
-		mes "on behalf of the Prontera";
-		mes "Church, I want to thank";
-		mes "you for all of your help.";
-		set prt_curse,36;
-		getexp 160000,0;
-		close;
-	}
-	else if (prt_curse == 36) {
-		mes "[Father Biscuss]";
-		mes "No one can know light";
-		mes "without experiencing";
-		mes "darkness. Peace has";
-		mes "no meaning until it is";
-		mes "contrasted with chaos.";
-		next;
-		mes "[Father Biscuss]";
-		mes "Religion becomes even";
-		mes "more important during times";
-		mes "of chaos, and times of need.";
-		mes "I must remain calm, especially";
-		mes "when Father Bamph feels so bad about this whole incident...";
-		close;
-	}
-	else {
-		mes "[Father Biscuss]";
-		mes "Please observe";
-		mes "silence within the";
-		mes "Priest Room. Thank";
-		mes "you for cooperating.";
-		close;
-	}
-}
-
-prt_church,177,113,3	script	#gototomb	111,{
-	if (prt_curse > 17 && prt_curse < 23 || prt_curse > 31 && prt_curse < 35 || prt_curse == 41 || prt_curse == 42 || prt_curse == 44 || prt_curse == 51 || prt_curse == 52) {
-		warp "prt_church",21,91;
-	}
-	end;
-}
-
-prt_church,23,89,3	script	Father Biscuss#tomb	60,{
-	mes "[Father Biscuss]";
-	mes "Hm...?";
-	mes "Are you ready to";
-	mes "head back upstairs?";
-	next;
-	if (select("Yes:No") == 1) {
-		mes "[Father Biscuss]";
-		mes "Please follow me.";
-		next;
-		warp "prt_church",178,111;
-		end;
-	}
-	mes "[Father Biscuss]";
-	mes "Please take your time";
-	mes "and investigate this as";
-	mes "thoroughly as you can.";
-	close;
-}
-
-prt_church,16,114,4	script	Father Bamph#tomb	60,{
-	if (prt_curse == 18) {
-		mes "[Father Bamph]";
-		mes "There are the bodies";
-		mes "of the Gaebolg princes";
-		mes "that were killed during";
-		mes "the exorcism. Please take";
-		mes "a look at the body to the left.";
-		set prt_curse,19;
-		close;
-	}
-	else if (prt_curse == 19) {
-		mes "[Father Bamph]";
-		mes "Please take a look";
-		mes "at the body to the";
-		mes "far left, the first prince.";
-		close;
-	}
-	else if (prt_curse == 20) {
-		mes "["+strcharinfo(0)+"]";
-		mes "That weird mark looked";
-		mes "just like snake scales.";
-		mes "Is... Is that the mark left";
-		mes "behind by Jormungand's curse?";
-		next;
-		mes "[Father Bamph]";
-		mes "That's right.";
-		mes "Now, let's examine the";
-		mes "body of the second prince,";
-		mes "located in the middle.";
-		close;
-	}
-	else if (prt_curse == 21) {
-		mes "[Father Bamph]";
-		mes "Now...";
-		mes "Now we should";
-		mes "examine the third prince.";
-		close;
-	}
-	else if (prt_curse == 22) {
-		mes "[Father Bamph]";
-		mes "Let's go upstairs where we";
-		mes "can continue this conversation.";
-		mes "Ah, you might want to ask";
-		mes "Father Biscuss to lead you.";
-		close;
-	}
-	else if (prt_curse == 32 || prt_curse == 41 || prt_curse == 51) {
-		mes "[Father Bamph]";
-		mes "Do you have a ^3131FFYellow";
-		mes "Gemstone^000000 and ^3131FFGreen Potion^000000";
-		mes "ready? If so, you should begin";
-		mes "testing on the body of the third prince before the others.";
-		close;
-	}
-	else if (prt_curse == 33 || prt_curse == 42 || prt_curse == 52) {
-		mes "[Father Bamph]";
-		mes "The mark disappeared?";
-		mes "Oh, this is just horrible!";
-		mes "That would mean that poison";
-		mes "was used to murder the other";
-		mes "princes! I almost... can't...";
-		next;
-		mes "[Father Bamph]";
-		mes "I... I need some time";
-		mes "to recover from the shock";
-		mes "and to think about all of";
-		mes "this carefully. For now,";
-		mes "let's go back upstairs.";
-		if (prt_curse == 33) set prt_curse,34;
-		else if (prt_curse == 42) set prt_curse,43;
-		else set prt_curse,53;
-		close;
-	}
-	else if (prt_curse == 43 || prt_curse == 53) {
-		mes "[Father Bamph]";
-		mes "We've disturbed the";
-		mes "bodies of these poor";
-		mes "souls enough. We should";
-		mes "go back upstairs now...";
-		close;
-	}
-	end;
-}
-
-prt_church,19,111,5	script	#prince1	887,{
-	if (prt_curse == 19) {
-		mes "[Father Bamph]";
-		mes "This is the body of";
-		mes "the king's first son, the";
-		mes "crown prince. Just as it has";
-		mes "happened for generations,";
-		mes "the curse took the life of";
-		mes "the first born prince...";
-		next;
-		mes "^3355FFBeneath one of the";
-		mes "prince's sleeves, you";
-		mes "notice a dark mark. Upon";
-		mes "pulling up the sleeve, you";
-		mes "note that the mark resembles";
-		mes "the scales of a serpent.^000000";
-		set prt_curse,20;
-		close;
-	}
-	else if (prt_curse == 33 || prt_curse > 41 && prt_curse < 51 || prt_curse == 52) {
-		mes "^3355FFYou poured a little bit";
-		mes "of the solution made from";
-		mes "Yellow Gemstone and Green";
-		mes "Potion on the mark on the skin.";
-		mes "You waited a while, but there was no reaction from the solution.^000000";
-		close;
-	}
-	else {
-		mes "^3355FFIt's the body of a male";
-		mes "dressed in luxurious robes.";
-		mes "Although deceased, the color";
-		mes "of life has not yet left the body. ";
-		close;
-	}
-}
-
-prt_church,21,111,5	script	#prince2	887,{
-	if (prt_curse == 20) {
-		mes "[Father Bamph]";
-		mes "This is the body of the";
-		mes "second prince. The curse";
-		mes "is only supposed to kill";
-		mes "the firstborn prince, but";
-		mes "all three princes of this";
-		mes "generation were killed...";
-		next;
-		mes "[Father Bamph]";
-		mes "Despite our great efforts";
-		mes "to exorcise this powerful";
-		mes "curse, we all failed. Those";
-		mes "involved have begun to believe";
-		mes "that Odin may have abandoned us... ";
-		Emotion e_omg,1;
-		next;
-		mes "^3355FFYou examine the body of";
-		mes "the second prince and notice";
-		mes "that the scale marks on his";
-		mes "skin are fainter, and slightly";
-		mes "different in color, than the";
-		mes "marks on the first prince.^000000";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Father Bamph...!";
-		mes "Look, these marks are";
-		mes "different on the second";
-		mes "prince than on the first";
-		mes "prince! See? They're different";
-		mes "in darkness and coloration.";
-		next;
-		mes "[Father Bamph]";
-		mes "Goodness, you're right!";
-		mes "How did we overlook this?";
-		mes "Hm, this supports the idea";
-		mes "that a conspiracy may be";
-		mes "involved. Let's go check";
-		mes "the body of the third prince.";
-		set prt_curse,21;
-		close;
-	}
-	else if (prt_curse == 33 || prt_curse > 41 && prt_curse < 51 || prt_curse == 52) {
-		specialeffect EF_POISONATTACK;
-		specialeffect EF_POISONHIT;
-		specialeffect EF_BUBBLE;
-		mes "^3355FFYou poured a little of the";
-		mes "solution made from Green";
-		mes "Potion and Yellow Gemstone";
-		mes "on the body's scale marks. The";
-		mes "scale marks grow fainter and";
-		mes "the solution bubbles on contact. ";
-		close;
-	}
-	else {
-		mes "^3355FFIt's the body of a male";
-		mes "dressed in luxurious robes.";
-		mes "Although deceased, the color";
-		mes "of life has not yet left the body. ";
-		close;
-	}
-}
-
-prt_church,24,111,5	script	#prince3	887,{
-	if (prt_curse == 21) {
-		mes "^3355FFYou and Father Bamph";
-		mes "hurriedly inspect the third";
-		mes "prince's body and find that the";
-		mes "scale marks on his skin are";
-		mes "a little darker than the marks";
-		mes "on the second prince's skin.^000000";
-		next;
-		mes "[Father Bamph]";
-		mes "This is very suspicious...";
-		mes "The deaths of the second and";
-		mes "third princes might have been";
-		mes "caused by murder, rather than";
-		mes "the curse. However, what could";
-		mes "possibly be used to kill them?";
-		next;
-		while(1) {
-			if (select("A weapon!:Poison!") == 1) {
-				mes "[Father Bamph]";
-				mes "Hmm... But none of the";
-				mes "bodies had any wounds";
-				mes "or scarring. If that were the";
-				mes "case, I'm sure the king would";
-				mes "have declared war on someone.";
-				mes "It couldn't have been a weapon.";
-				next;
-			}
-			else  break;
-		}
-		mes "[Father Bamph]";
-		mes "Poison...?";
-		mes "Oh dear! No one in the";
-		mes "Prontera Church would know";
-		mes "the first thing about that. But";
-		mes "maybe poison was used.";
-		mes "How can we find out for sure?";
-		next;
-		mes "[Father Biscuss]";
-		mes "I say, you go straight to";
-		mes "the experts. Someone in the";
-		mes "^FF0000Assassin Guild in Morroc^000000";
-		mes "ought to know. I hear they";
-		mes "can make poison that can kill";
-		mes "a man with just one drop!";
-		next;
-		mes "[Father Bamph]";
-		mes "Ah, that's a good idea!";
-		mes "Hmm, but first, let's go";
-		mes "continue this conversation";
-		mes "outside, shall we? I'd prefer";
-		mes "not to disturb these bodies...";
-		set prt_curse,22;
-		close;
-	}
-	else if (prt_curse == 22) {
-		mes "[Father Bamph]";
-		mes "Let's go upstairs where we";
-		mes "can continue this conversation.";
-		mes "Ah, you might want to ask";
-		mes "Father Biscuss to lead you.";
-		close;
-	}
-	else if (prt_curse == 32 || prt_curse == 41 || prt_curse == 51) {
-		if (countitem(506) > 0 && countitem(715) > 0) {
-			mes "^3355FFYou open a bottle of";
-			mes "Green Potion and insert a";
-			mes "Yellow Gemstone. The gem";
-			mes "quickly dissolves, conveniently";
-			mes "forming a solution to test for the presense of poison. You pour";
-			mes "it on the prince's scale marks.^000000";
-			next;
-			specialeffect EF_POISONATTACK;
-			specialeffect EF_POISONHIT;
-			specialeffect EF_BUBBLE;
-			mes "^3355FF*Pssssssssh*^000000";
-			next;
-			mes "^3355FFThe solution bubbles";
-			mes "once it touches the skin,";
-			mes "and the serpent scale marks";
-			mes "on the prince's body slowly";
-			mes "fade until they disappear.^000000";
-			delitem 506,1; //Green_Potion
-			delitem 715,1; //Yellow_Gemstone
-			if (prt_curse == 32) set prt_curse,33;
-			else if (prt_curse == 41) set prt_curse,42;
-			else set prt_curse,52;
-			close;
-		}
-		mes "^3355FFYou'll need to have";
-		mes "a Green Potion and";
-		mes "a Yellow Gemstone in";
-		mes "order to test and confirm";
-		mes "whether poison killed the";
-		mes "second and third princes.^000000";
-		close;
-	}
-	else if (prt_curse == 33 || prt_curse == 42 || prt_curse == 52) {
-		mes "^3355FFThe serpent scale marks";
-		mes "on this prince's body have";
-		mes "vanished after you applied";
-		mes "the Green Potion and Yellow";
-		mes "Gemstone solution to the skin.^000000";
-		close;
-	}
-	else {
-		mes "^3355FFIt's the body of a male";
-		mes "dressed in luxurious robes.";
-		mes "Although deceased, the color";
-		mes "of life has not yet left the body. ";
-		close;
-	}
-}
-
-moc_fild16,201,295,5	script	Assassin Guildsman#poiso	884,{
-	if (prt_curse == 23) {
-		mes "[Assassin Guildsman]";
-		mes "What business";
-		mes "brings you here?";
-		next;
-		if (select("Poison:Nothing") == 1) {
-			mes "["+strcharinfo(0)+"]";
-			mes "I need to talk to";
-			mes "a poison specialist.";
-			mes "I'm investigating";
-			mes "something for the";
-			mes "Prontera Church,";
-			mes "possibly a murder.";
-			next;
-			mes "[Assassin Guildsman]";
-			mes "...";
-			mes "......";
-			mes ".........";
-			next;
-			mes "[Assassin Guildsman";
-			mes "Listen carefully.";
-			mes "I will only tell this";
-			mes "to you one time.";
-			next;
-			mes "[Assassin Guildsman]";
-			mes "There is an";
-			mes "Assassin's Private Pub";
-			mes "in the 7 o'clock direction";
-			mes "in Morroc. Go find someone";
-			mes "named ^3131FFMarjana^000000 inside.";
-			set prt_curse,24;
-			close;
-		}
-		mes "[Assassin Guildsman]";
-		mes "No. That look in";
-		mes "your eyes. I'm sure";
-		mes "there is a reason that";
-		mes "you have come here...";
-		close;
-	}
-	else {
-		mes "[Assassin Guildsman]";
-		mes "It's very dry and";
-		mes "windy today. I like this";
-		mes "weather. It feels like it";
-		mes "perfectly matches the soul";
-		mes "of a true Assassin, the loner";
-		mes "that hides in the shadows.";
-		close;
-	}
-}
-
-que_job01,10,16,5	script	Marjana#poison	885,{
-	if (prt_curse == 24) {
-		mes "[Marjana]";
-		mes "What business brings";
-		mes "you here? I'm giving";
-		mes "you 4 minutes to speak";
-		mes "with me, so be direct.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "I want to learn";
-		mes "more about poison";
-		mes "and confirm if it was";
-		mes "used to kill someone.";
-		next;
-		mes "[Marjana]";
-		mes "Poison? You've come";
-		mes "to just the right person.";
-		mes "If I don't know the answer,";
-		mes "I doubt you'll find anyone";
-		mes "else that would. Ask away.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Is it true that an";
-		mes "Assassin's poison";
-		mes "can be so powerful,";
-		mes "that just one drop";
-		mes "can kill a person?";
-		next;
-		mes "[Marjana]";
-		mes "It's true that such powerful";
-		mes "poison exists, but such deadly";
-		mes "poison is usually only used by";
-		mes "Assassin Crosses. Generally,";
-		mes "normal Assassins use poisons";
-		mes "that are much less potent.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Alright. Can you make";
-		mes "a poison that leaves a";
-		mes "specific mark on the body?";
-		next;
-		mes "[Marjana]";
-		mes "Sure. There's all kinds of";
-		mes "poisons that exist that I'm";
-		mes "sure you can't even imagine.";
-		mes "However, poisons that leave";
-		mes "specific marks are difficult to";
-		mes "use, and few can handle them.";
-		next;
-		mes "[Marjana]";
-		mes "The types of marks";
-		mes "that are left behind all";
-		mes "depend on the materials";
-		mes "used to create the poison.";
-		mes "Since some materials are";
-		mes "exclusive to certain areas...";
-		next;
-		mes "[Marjana]";
-		mes "Well, the type of mark";
-		mes "that was left behind could";
-		mes "actually serve as some kind";
-		mes "of clue. What was the mark";
-		mes "on the victim's body?";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "We're not sure if";
-		mes "poison was used yet,";
-		mes "but there are marks that";
-		mes "look like snake scales";
-		mes "left on the bodies.";
-		next;
-		mes "[Marjana]";
-		mes "Hmm. You know, if I had";
-		mes "to guess, I would say that";
-		mes "poison was probably used.";
-		mes "But the poison would have";
-		mes "to originate from outside of";
-		mes "the Rune-Midgarts Kingdom...";
-		next;
-		mes "[Marjana]";
-		mes "Yeah...";
-		mes "The materials used to";
-		mes "make those snake scale";
-		mes "marks... Some of them can't";
-		mes "even be found here on the";
-		mes "Rune-Midgard continent.";
-		next;
-		mes "[Marjana]";
-		mes "We're running out of time.";
-		mes "Listen, you can confirm whether";
-		mes "poison was used to kill someone";
-		mes "by mixing a Yellow Gemstone with a Green Potion, and sprinkling";
-		mes "the solution on the body.";
-		next;
-		mes "[Marjana]";
-		mes "If poison was used, the";
-		mes "solution with react with";
-		mes "the body. But this method";
-		mes "won't work if too much time";
-		mes "has passed after the murder.";
-		mes "You better try this soon...";
-		set prt_curse,25;
-		close;
-	}
-
-OnInit:
-	disablenpc "Marjana#poison";
-	end;
-
-OnEnable:
-	enablenpc "Marjana#poison";
-	end;
-}
-
-morocc,45,103,0	script	#prtcurse	-1,2,2,{
-OnTouch:
-	if (prt_curse == 25) {
-		mes "["+strcharinfo(0)+"]";
-		mes "Hm. I'd better review";
-		mes "the facts I've learned so";
-		mes "that I can better focus on";
-		mes "this investigation. Let's see~";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Long ago, the giant serpent";
-		mes "Jormungand threatened mankind.";
-		mes "7 warriors defeated Jormungand, led by Tristram III of the Gaebolg";
-		mes "family, but Jormungand cursed the Gaebolg bloodline in its defeat.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Ever since, the curse kills";
-		mes "the first born prince of the";
-		mes "Gaebolg family at an early age.";
-		mes "However, all of the princes of";
-		mes "this generation were killed.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "According to what I've";
-		mes "learned from that assassin,";
-		mes "the first prince died from the";
-		mes "curse, and the other two may";
-		mes "have died from poisoning.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "It's most likely that if";
-		mes "poison was used, then the";
-		mes "person who used it was an";
-		mes "assassin from outside of the";
-		mes "Rune-Midgarts Kingdom. Yes,";
-		mes "that's about everything I know.";
-		next;
-		mes "["+strcharinfo(0)+"]";
-		mes "Now, that historian Rodafrian";
-		mes "has been waiting for me to tell";
-		mes "her the lyrics of that song, but Father Bamph is also waiting";
-		mes "for the info I've learned from the Assassin Guild. What should I do?";
-		next;
-		if (select("Go to Rodafrian:Go to Father Bamph") == 1) {
-			mes "["+strcharinfo(0)+"]";
-			mes "Well, it's easier for me";
-			mes "to visit Rodafrian now.";
-			mes "She's much closer than";
-			mes "Father Bamph, so I guess";
-			mes "that I'll go talk to her first.";
-			set prt_curse,30;
-			close;
-		}
-		mes "["+strcharinfo(0)+"]";
-		mes "Well, it's more important";
-		mes "that I go see Father Bamph";
-		mes "and investigate the princes'";
-		mes "bodies. I better head over";
-		mes "to Prontera right away.";
-		set prt_curse,50;
-		close;
-	}
-}
-
-prt_in,162,99,4	script	Librarian#curse	67,{
-	if (checkweight(1201,1) == 0) {
-		mes "^3355FFWait a second!";
-		mes "Right now, you're carrying";
-		mes "too many things with you.";
-		mes "Please come back after";
-		mes "using the Kafra Service";
-		mes "to store some of your items.";
-		close;
-	}
-	if (prt_curse == 3) {
-		if (countitem(7431) < 1) {
-			mes "[Librarian]";
-			mes "Please make sure to return";
-			mes "library books to the correct";
-			mes "place after you use them.";
-			mes "We don't have enough staff";
-			mes "to organize all these books...";
-			next;
-			if (select("Report the loss of the books:End Conversation") == 1) {
-				mes "[Librarian]";
-				mes "Oh, you lost some books?";
-				mes "Please write down the book";
-				mes "titles and pay the 700 zeny";
-				mes "penalty charge. Aftewards,";
-				mes "we will provide you with";
-				mes "replacement copies.";
-				next;
-				if (zeny > 699) {
-					mes "[Librarian]";
-					mes "Ah, here you are.";
-					mes "Please take these";
-					mes "replacement copies,";
-					mes "and try not to lose";
-					mes "them again. Thank you.";
-					set zeny,zeny-700;
-					getitem 7431,1; //Books
-					close;
-				}
-				mes "[Librarian]";
-				mes "Hmm...";
-				mes "Come back as soon";
-				mes "as you can with the";
-				mes "700 zeny to pay the";
-				mes "lost book penalty charge.";
-				close;
-			}
-			mes "[Librarian]";
-			mes "Please keep silent";
-			mes "while inside the library.";
-			mes "Thank you for cooperating.";
-			close;
-		}
-		else {
-			mes "[Librarian]";
-			mes "Being a librarian can";
-			mes "be pretty rough. People";
-			mes "just leave the books all";
-			mes "scattered, but expect them";
-			mes "to be organized. Ooh, books";
-			mes "are always getting lost too...";
-			next;
-			mes "[Librarian]";
-			mes "When you have";
-			mes "to clean up their";
-			mes "messes, you get to";
-			mes "realize how sloppy";
-			mes "people can really be.";
-			close;
-		}
-	}
-	else {
-		mes "[Librarian]";
-		mes "Being a librarian can";
-		mes "be pretty rough. People";
-		mes "just leave the books all";
-		mes "scattered, but expect them";
-		mes "to be organized. Ooh, books";
-		mes "are always getting lost too...";
-		next;
-		mes "[Librarian]";
-		mes "When you have";
-		mes "to clean up their";
-		mes "messes, you get to";
-		mes "realize how sloppy";
-		mes "people can really be.";
-		close;
-	}
-}