* Implemented rewrite of the quest "The Sign".

- Attempts to save player progress when quest npcs are talked too. This is Untested.
- Talking to any quest related NPC will remove all out-dated quest vars.
* Fixed incorrect sprite ID used in some Niflheim quest npcs.

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

2 files changed, 14540 insertions, 9009 deletions

diff --git a/npc/quests/The_Sign_Quest.txt b/npc/quests/The_Sign_Quest.txt
index 474a7ae8c..6e3e5ad7d 100644
--- a/npc/quests/The_Sign_Quest.txt
+++ b/npc/quests/The_Sign_Quest.txt
@@ -3,2392 +3,3235 @@
 //===== By: ================================================== 
 //= SinSloth(Most of the NPCs), MasterOfMuppets(Some of the NPCs + bug fixes) & Kargha(The quiz NPCs)
 //===== Current Version: ===================================== 
-//= 2.9
+//= 3.0
 //===== Compatible With: ===================================== 
-//= eAthena SVN 3422+(Requires jA Script System)
+//= eAthena SVN
 //===== Description: ========================================= 
-//= - Quest for opening the doors to Geffenia.
-//===== Comments: ============================================
+//= [Aegis Conversion]
+//= Quest for opening the doors to Geffenia.
 //= This script uses sign_01.bmp - sign_04.bmp, these will be
 //= found in the language of your client.
 //===== Additional Comments: ================================= 
-//= 1.0 First version, beware of potential nasty bugs :x [MasterOfMuppets]
-//= 1.1 Finalized for stable, might still contain bugs though. [MasterOfMuppets]
-//= 1.1a moved #aldesignwarp to fix enless warp [Lupus]
-//= 1.2 Fixed a minor bug that prevented people from advancing [MasterOfMuppets]
-//= 	quest at one point.
-//= 1.3 Removed duplicates [Toms]
-//= 1.4 Fixed a bug in Dearles script where it was checking for the wrong items.
-//=     Fixed a major bug that was allowing players to continue before
-//=     getting all the Sobbing Starlight pieces.
-//=     Also moved the Alberta sign since another NPC was on top of it. [Llyr]
-//= 1.5 Fixed exploits and bugs. Plus add a removal of exttra sobbing pieces
-//= 	as suggested Tantarian, to let people Reborn [Lupus]
-//= 1.6 Minor fix, thanks to theultramage for pointing it out. [MasterOfMuppets]
-//= 1.7 Fixed exploit [KarLaeda]
-//= 1.7a Fixed wrong dialogue [Lupus]
-//= 1.7b Fixed possible exploit [Lupus]
-//= 1.7c Reformatted for future bughunt. WIP [Lupus]
-//= 1.8 Fixed some bugs and exploit which allowed players helping in the final
-//= fight to finish the quest as well. Completely revamped quiz system. [SinSloth]
-//= 1.9 Made some changes in last event to reflect recent bug exploit fix. [SinSloth]
-//= 2.0 Fixed some various minor bugs. [SinSloth]
-//= 2.1 Fixed experience gains to match upcoming rate adjustments. [SinSloth]
-//= 2.2 Fixed a small bug which occured when people had to return The Sign around midnight. [SinSloth]
-//= 2.3 Made some adjustments in last event with dialogs/summoning and fixed a possible exploit earlier. [SinSloth]
-//= 2.4 Optimized/simplified some poorly written code; fixed wrong quiz answers [ultramage]
-//= 2.5 Updated to fall within proper name restrictions. [L0ne_W0lf]
-//= 2.5a Corrected a Typo error ";;". [Samuray22]
-//= 2.6 Fixed Engel giving back 7 Sobbing Starlight on failing to refine it, bugreport:1473 [Brainstorm]
-//= 2.7 Replaced effect numerics with constants. [Samuray22]
-//= 2.8 Fixed some bugs with itemids and leftover questitems [Fish0r]
-//= 2.9 Made a delitem causing script to fault use countitem when deleting. [L0ne_W0lf]
-//= 2.9a Added a check for Sign_Branch8A before attempting to run a delitem on items not needed based on Path taken. [Paradox924X]
+//= 3.0 Rewritten based on most recent Aegis script. [L0ne_W0lf]
+//=     Due to the incompatabity of the old script with this
+//=     version, variables will attmept to be translated to the
+//=     new version, however it is untested.
 //============================================================ 
-//===== Configuration : ======================================
-prontera,1,1,1	script	TheSignConfig	-1,{
-OnInit:
-//= This string will be used to show which timezone your server
-//= is located in, it's necessary for the quest, so please change it.
 
-	set $timezonestring$,"^FF0000GMT^000000";
-
-//= This variable determines whether the "sign_xx.bmps" will be used or
-//= if raw text will be used in the 'Sign::GeffeniaSigns' script.
-//= Set it to 0 if you want to use text.
-//= The bmp's are in the language of your client. If you are using a
-//= kRO Client, you may want to download the English bmp's available in
-//= the Texture.rar at http://mrmagoo.psiblade.net/translation/index.php?section=downloads
+//============================================================ 
+// The Sign (Part 1)
+//============================================================ 
+prontera,147,305,0	script	Sign#prontera::TheSign	111,{
+	callfunc "F_UpdateSignVars";
+	cutin "sign_01",4;
+	mes "^3355FFNext^000000";
+	next;
+	cutin "sign_01",255;
+	cutin "sign_02",4;
+	mes "^3355FFNext^000000";
+	next;
+	cutin "sign_02",255;
+	cutin "sign_03",4;
+	mes "^3355FFNext^000000";
+	next;
+	cutin "sign_03",255;
+	cutin "sign_04",4;
+	if (!sign_q) set sign_q,1;
+	mes "^3355FFClose^000000";
+	close2;
+	cutin "sign_04",255;
+	end;
 
-	set $signbmps,1;
-}
-//============================================================
-
-alberta,34,241,1	script	Sign::GeffeniaSigns	111,{
-    if (signquest < 1)set signquest,1;
-    if ($signbmps) {
-        cutin "sign_01",4;
-        mes "^3355FFNext";
-        next;
-        cutin "",255;
-        cutin "sign_02",4;
-        mes "^3355FFNext";
-        next;
-        cutin "",255;
-        cutin "sign_03",4;
-        mes "^3355FFNext";
-        next;
-        cutin "",255;
-        cutin "sign_04",4;
-        mes "^3355FFClose";
-        close2;
-        cutin "",255;
-        end;
-    } else {
-        mes "^3355FFTo the talented and";
-        mes "experienced adventurers who";
-        mes "have dreams of achieving true";
-        mes "greatness...";
-        next;
-        mes "^3355FFI present a once in a";
-        mes "lifetime opportunity to the one";
-        mes "who proves most worthy. You must";
-        mes "have the courage to risk peril,";
-        mes "the wisdowm to perforum right";
-        mes "action and the strength to be";
-        mes "victorious in combat.";
-        next;
-        mes "^3355FFThe way will be fraught";
-        mes "with danger and only the most";
-        mes "adept adventurers may have a";
-        mes "chance of surviving. But if we";
-        mes "can succeed, I promies on my";
-        mes "good name that power beyond";
-        mes "imagining will become yours.";
-        next;
-        mes "^3355FFThose of you who are interested,";
-        mes "come to me and I will test";
-        mes "your abilities. The one who";
-        mes "can manage to pass this testing";
-        mes "just might be capable of helping";
-        mes "me prove a forgotten legend";
-        mes "and uncover a long lost power";
-        next;
-        mes "^3355FFI shall be waiting.";
-        mes "";
-        mes "^000000-Metz Brayde";
-        close;
-    }
+OnInit:
+	// Remove old depreciated settings.
+	set $signbmps,0;
+	set $signmazemonster,0;
+	
+	// Set the time zone of the server.
+	// - Not official but seemed like a nice way to handle it.
+	set $timezonestring$,"^FF0000GMT^000000";
+	end;
 }
 
-morocc,168,264,1	duplicate(GeffeniaSigns)	Sign#2	111
-payon,160,183,1	duplicate(GeffeniaSigns)	Sign#3	111
-prontera,147,305,1	duplicate(GeffeniaSigns)	Sign#4	111
-geffen,168,175,1	duplicate(GeffeniaSigns)	Sign#5	111
-aldebaran,54,223,1	duplicate(GeffeniaSigns)	Sign#6	111
-
-prt_in,228,26,4	script	Steward	55,{
-
-    if (signquest > 22) goto L_Situation;
-    if (signquest == 14) goto L_Artisan;
-    if (signquest > 1) {
-        mes "[Vendez]";
-        mes "Ah, master " + strcharinfo(0) + ".";
-        mes "Welcome. How may I be";
-        mes "of service today?";
-        next;
-        menu "Who is Arian?",s_Arian,"What is Metz doing?",-,"How is Elle?",s_Elle;
-
-        mes "[Vendez]";
-        mes "Althought I've served";
-        mes "the Brayde family for years";
-        mes "I'm unfamiliar with Master";
-        mes "Metz's work. My appologies, but";
-        mes "I simply cannot even begin to";
-        mes "fathom his research...";
-        close;
-s_Arian:
-        mes "[Vendez]";
-        mes "Ah yes, Arian.";
-        mes "I consider him to be";
-        mes "a man of few words. The";
-        mes "words he does choose to";
-        mes "use are rather harsh and";
-        mes "brutish, you might say.";
-        close;
-s_Elle:
-        mes "[Vendez]";
-        mes "Ah, Mistress Elle";
-        mes "has been working here";
-        mes "since she was a very young";
-        mes "girl. She is almost like";
-        mes "a granddaughter to me.";
-        mes "Ha ha-^222222*Ahem*";
-        close;
-
-    } else {
-        mes "[Vendez]";
-        mes "Welcome to the";
-        mes "Brayde Estate. How";
-        mes "may I be of service?";
-        next;
-        menu "Nothing",-,"I'm here to see Metz",s_Metz,"Gimmie your cash!",s_Cash;
-
-        mes "[Vendez]";
-        mes "If you do not have";
-        mes "any business to conduct";
-        mes "with Master Metz, please";
-        mes "leave immediately";
-        close;
-
-s_Metz:
-        mes "[Vendez]";
-        mes "Very good, sir.";
-        mes "Please wait a moment";
-        mes "while I consult with";
-        mes "the master in his study.";
-        close;
-
-s_Cash:
-        mes "[Vendez]";
-        mes "My apologies,";
-        mes "but I insist that";
-        mes "you leave the premises";
-        mes "^FF0000immediately^000000.";
-        close2;
-        warp "prontera",150,150;
-        end;
-    }
-
-L_Artisan:
-    mes "[Vendez]";
-    mes "Oh, congratulations~";
-    mes "You finally passed all";
-    mes "of the tests. I know they";
-    mes "must have been incredibly";
-    mes "taxing and challenging.";
-    next;
-    mes "[Vendez]";
-    mes "Master Metz has informed";
-    mes "me that he wishes for you";
-    mes "to find someone";
-    mes "to restore the Sobbing";
-    mes "Starlight. I wish you luck";
-    mes "in that endeavor.";
-    close;
-
-L_Situation:
-    mes "[Vendez]";
-    mes "There will always";
-    mes "be situations where";
-    mes "you won't be getting";
-    mes "any second chances.";
-    mes "Anyways remember that.";
-    close;
-
+geffen,168,175,0	duplicate(TheSign)	Sign#geffen	111
+morocc,168,265,0	duplicate(TheSign)	Sign#morroc	111
+payon,160,183,0	duplicate(TheSign)	Sign#payon	111
+aldebaran,54,223,0	duplicate(TheSign)	Sign#aldebaran	111
+alberta,35,241,0	duplicate(TheSign)	Sign#alberta	111
+
+prt_in,227,45,0	script	Archeologist#sign	804,{
+	callfunc "F_UpdateSignVars";
+	cutin "mets_alpha",2;
+	if (sign_q < 1) {
+		mes "[Metz]";
+		mes "Although you need everlasting patience in an archaeological excavation, the feeling you get when you find something makes";
+		mes "all those long hours of study and research worth it.";
+	}
+	else if (sign_q < 4) {
+		switch(sign_q) {
+		case 1:
+			mes "[Metz]";
+			mes "Hm...?";
+			mes "Can I help you?";
+			next;
+			switch(select("I've been following these signs and...:I was just passing by...")) {
+			case 1:
+				mes "[Metz]";
+				mes "Great...!";
+				mes "Welcome to my";
+				mes "humble lodgings.";
+				mes "Hmm, let me see...";
+				next;
+				if (BaseLevel < 50) {
+					mes "[Metz]";
+					mes "Uh, it pains me to say this, but I don't think you qualified to help me out. Once you gain enough experience though, I'll be happy to have you on board~";
+					break;
+				}
+				else {
+					mes "[Metz]";
+					mes "Hey, I think you might";
+					mes "be well suited for the job!";
+					mes "But do you think you could come back later? I've got my hands full with some other business.";
+					next;
+					mes "[Metz]";
+					mes "Oh right, would you tell";
+					mes "me your name? "+ strcharinfo(0) +"?";
+					mes "Okay then, I'll remember that.";
+					mes "Talk to you later, alright?";
+					set sign_q,2;
+					break;
+				}
+			case 2:
+				mes "[Metz]";
+				mes "Oh really?";
+				mes "I see, I thought you";
+				mes "were an applicant for";
+				mes "the position I'm offering";
+				mes "to brave adventurers.";
+				break;
+			}
+			break;
+		case 2:
+			mes "[Metz]";
+			mes "I'm sorry I made you wait,";
+			mes "but I had some research to finish and it took longer than I expected. Now, before I tell you more about the job, I want to test your competency.";
+			next;
+			mes "[Metz]";
+			mes "The job I'm offering is";
+			mes "pretty risky and not just";
+			mes "anybody can handle it.";
+			mes "You'll actually go through";
+			mes "a series of tests conducted";
+			mes "by my trusted friends.";
+			next;
+			mes "[Metz]";
+			mes "Now, the first person";
+			mes "you must visit is ^FF0000Arian^000000";
+			mes "in Morroc. Please speak";
+			mes "to him and he'll give you";
+			mes "all the details about his";
+			mes "examination... I hope.";
+			next;
+			mes "[Metz]";
+			mes "Once you're finished with";
+			mes "the test, Arian will tell you";
+			mes "what to do next. Afterwards,";
+			mes "come back to me so that we";
+			mes "can finally talk business.";
+			next;
+			mes "[Metz]";
+			mes "Ah, almost forgot.";
+			mes "Arian won't talk to anybody";
+			mes "unless he knows them or";
+			mes "receives a message from me.";
+			mes "So if he's snubbed you in the past, just understand that's his way.";
+			set sign_q,3;
+			break;
+		case 3:
+			mes "[Metz]";
+			mes "Hm...?";
+			mes "Shouldn't you leave";
+			mes "for Morroc to see Arian?";
+			mes "You better hurry in case";
+			mes "somebody else applies";
+			mes "for this little job.";
+			break;
+		}
+	}
+	else if (sign_q < 13) {
+		mes "[Metz]";
+		mes "I don't know if you realize";
+		mes "it, but I'm offering a golden";
+		mes "opportunity for the adventurer";
+		mes "who works for me. So don't";
+		mes "hesitate to see Arian.";
+		next;
+		mes "[Metz]";
+		mes "And just so you know,";
+		mes "it's not a good idea to";
+		mes "judge Arian by his looks.";
+		mes "He's more than meets";
+		mes "the eye, you know.";
+	}
+	else if (sign_q < 15) {
+		mes "[Metz]";
+		mes "I'm impressed that";
+		mes "you managed to get";
+		mes "Arian's approval! Oh,";
+		mes "and how's Daewoon?";
+		mes "He's a character, isn't he?";
+	}
+	else if (sign_q < 20) {
+		mes "[Metz]";
+		mes "I'm not surprised";
+		mes "that Daewoon likes";
+		mes "you. Ah, but Jore is";
+		mes "always busy. Still, if you";
+		mes "know his schedule, you";
+		mes "should be alright.";
+	}
+	else if (sign_q < 25) {
+		mes "[Metz]";
+		mes "Jesqurienne is";
+		mes "a brilliant woman.";
+		mes "Although I worry a";
+		mes "little bit about her";
+		mes "overconfidence, she's";
+		mes "a good friend of mine.";
+	}
+	else if (sign_q < 35) {
+		mes "[Metz]";
+		mes "Dearles...?";
+		mes "Ah yes, he's one";
+		mes "of my shadier friends.";
+		mes "He's difficult to find";
+		mes "and he's only truly kind";
+		mes "to a select few, so...";
+		next;
+		mes "[Metz]";
+		mes "It certainly doesn't";
+		mes "help that he's hopelessly";
+		mes "addicted to gambling...";
+	}
+	else if (sign_q < 53) {
+		mes "[Metz]";
+		mes "Ah, Bakerlan~";
+		mes "I've heard that he's";
+		mes "been quite busy lately.";
+		mes "But that's how all big";
+		mes "businessmen are, I suppose.";
+	}
+	else if (sign_q == 53) {
+		mes "[Metz]";
+		mes "Congratulations~";
+		mes "You managed to pass";
+		mes "all of the tests! You seem";
+		mes "to be the perfect person";
+		mes "to carry out this special";
+		mes "assignment!";
+		next;
+		mes "[Metz]";
+		mes "By now, you must have";
+		mes "six Sobbing Starlight pieces.";
+		mes "I'm sure that you want to know";
+		mes "more about these fragments.";
+		next;
+		mes "[Metz]";
+		mes "I remember last summer,";
+		mes "I found the wholly formed";
+		mes "Sobbing Starlight north";
+		mes "of Mount Mjolnir during";
+		mes "one of my expeditions...";
+		next;
+		mes "[Metz]";
+		mes "Although it was in perfect";
+		mes "shape, once it was exposed";
+		mes "to the air, it began to crack";
+		mes "and shattered into the pieces";
+		mes "you now hold in your hand.";
+		next;
+		mes "[Metz]";
+		mes "Now, an ordinary artisan";
+		mes "can't put the Sobbing Starlight";
+		mes "back together. This mysterious stone has some strange properties. But it's imperative for me to get this stone reassembled.";
+		next;
+		mes "[Metz]";
+		mes "Once restored, a strange";
+		mes "pattern can be seen within";
+		mes "the Sobbing Starlight. I guess";
+		mes "that the pattern is a message";
+		mes "written in an ancient language.";
+		next;
+		mes "[Metz]";
+		mes "Would you let me borrow";
+		mes "the pieces for a second?";
+		mes "I'll show you something";
+		mes "quite interesting...";
+		next;
+		mes "^3355FFOnce you hand the pieces";
+		mes "of the Sobbing Starlight to";
+		mes "Metz, he pulls out a seventh";
+		mes "piece. Once gathered, they";
+		mes "begin to emit a strange light.^000000";
+		specialeffect EF_TELEPORTATION2;
+		next;
+		mes "[Metz]";
+		mes "Since the pieces still";
+		mes "respond to each other,";
+		mes "I believe that it's possible";
+		mes "for the Sobbing Starlight";
+		mes "to be restored to its";
+		mes "original form.";
+		next;
+		mes "[Metz]";
+		mes "We're still seeking";
+		mes "an artisan of great";
+		mes "skill for this task. Once";
+		mes "know right away. For now,";
+		mes "please hold on to these pieces.";
+		set sign_q,54;
+		getitem 7177,1; //Part_Of_Star's_Sob
+	}
+	else if (sign_q == 54) {
+		if (rand(1,5) == 4) {
+			mes "[Metz]";
+			mes "Ah, you've come";
+			mes "just in the nick of time!";
+			mes "I just found someone who";
+			mes "may be capable of restoring";
+			mes "the Sobbing Starlight.";
+			next;
+			mes "[Metz]";
+			mes "His name is";
+			mes "^FF0000Engel Howard^000000,";
+			mes "a legendary Blacksmith";
+			mes "in Rune-Midgard. I don't";
+			mes "know where he is, but maybe";
+			mes "his family in Geffen may know.";
+			next;
+			mes "[Metz]";
+			mes "Unfortunately, that's all";
+			mes "the information that I have";
+			mes "to give you for now. You'll";
+			mes "have to investigate this lead";
+			mes "on your own, "+ strcharinfo(0) +".";
+		}
+		else {
+			mes "[Metz]";
+			mes "Although I've made";
+			mes "some progress, I still";
+			mes "haven't found an artisan";
+			mes "capable of restoring the";
+			mes "Sobbing Starlight. Please";
+			mes "give me a little more time.";
+		}
+	}
+	else if (sign_q < 71) {
+		mes "[Metz]";
+		mes "Keep up the good work.";
+		mes "I'm sorry that I don't have";
+		mes "have much information for";
+		mes "you to follow, but someone";
+		mes "with your abilities should";
+		mes "be able to find a way.";
+		next;
+		mes "[Metz]";
+		mes "While you work things";
+		mes "out with Engel Howard";
+		mes "and his family in Geffen,";
+		mes "I'll continue my research";
+		mes "on the Sobbing Starlight.";
+	}
+	else if (sign_q == 71) {
+		mes "[Metz]";
+		mes "Amazing...! You've";
+		mes "managed to restore";
+		mes "the Sobbing Starlight!";
+		mes "Now, I recently learned that";
+		mes "this stone can lead you to";
+		mes "an ancient place...";
+		next;
+		mes "[Metz]";
+		mes "That's why we need to";
+		mes "know what the message in";
+		mes "the Sobbing Starlight means.";
+		mes "First, we need a Wizard that";
+		mes "is skilled in unlocking the";
+		mes "messages stored in gems...";
+		next;
+		mes "[Metz]";
+		mes "Hmm. It would probably";
+		mes "be best to visit the Wizards";
+		mes "on the top floor of the Geffen";
+		mes "Tower. There's someone I know";
+		mes "there who might just be up for";
+		mes "this task...";
+		set sign_q,72;
+	}
+	else if (sign_q == 72) {
+		mes "[Metz]";
+		mes "Now that the";
+		mes "Sobbing Starlight";
+		mes "is restored, we need";
+		mes "to find someone who can";
+		mes "break the seal on the";
+		mes "gem's message...";
+		next;
+		mes "[Metz]";
+		mes "For now, please visit";
+		mes "the Wizards at the top";
+		mes "floor of the Geffen Tower.";
+		mes "I know that one of them is";
+		mes "capable of getting the gem's";
+		mes "text on to paper...";
+	}
+	else if (sign_q < 76) {
+		mes "[Metz]";
+		mes "The Wizard we're looking";
+		mes "for isn't in Geffen? Hm, at least we know he's near Comodo. Now,";
+		mes "while you investigate that lead, I'll continue to gather more";
+		mes "information on this gem...";
+	}
+	else if (sign_q == 76) {
+		mes "[Metz]";
+		mes "Great...!";
+		mes "You were able to get the";
+		mes "text in the gem printed on a";
+		mes "Record of Ancient Language?";
+		next;
+		mes "[Metz]";
+		mes "Just as I thought.";
+		mes "This language isn't";
+		mes "one I recognize. It's";
+		mes "probably ^333333too^000000 ancient.";
+		next;
+		mes "[Metz]";
+		mes "Fortunately, I know";
+		mes "one person who may";
+		mes "be able to translate this.";
+		mes "If he's not able to do it...";
+		mes "We'll have to give up.";
+		next;
+		mes "[Metz]";
+		mes "Bring this Record";
+		mes "of Ancient Language";
+		mes "to a man named Frank.";
+		mes "I hope he'll be able to";
+		mes "understand what it says...";
+		next;
+		while(1) {
+			switch(select("Who is Frank?:Where is he?:I see.")) {
+			case 1:
+				mes "[Metz]";
+				mes "Frank Franklin has lived";
+				mes "in seclusion and only a few";
+				mes "people are aware of his skill.";
+				mes "But I can assure you that his";
+				mes "knowledge of ancient languages";
+				mes "is unrivaled by any mortal.";
+				next;
+				mes "[Metz]";
+				mes "I suppose his interest";
+				mes "in history is what drives";
+				mes "him in work. Still, I've";
+				mes "heard that he doesn't like";
+				mes "meeting people. I hope you";
+				mes "can convince him to help us...";
+				next;
+				break;
+			case 2:
+				mes "[Metz]";
+				mes "It's said that";
+				mes "Frank Franklin lives";
+				mes "on the Alberta Sunken Ship";
+				mes "where he devotes his time";
+				mes "to his research. He may not";
+				mes "always be home though...";
+				set sign_q,77;
+				next;
+				break;
+			case 3:
+				mes "[Metz]";
+				mes "Good luck, then.";
+				mes "I hope that you can";
+				mes "find a way to get Frank";
+				mes "Franklin to help us...";
+				close2;
+				cutin "mets_alpha",255;
+				end;
+			}
+		}
+	}
+	else if (sign_q < 80) {
+		mes "[Metz]";
+		mes "Frank Franklin has lived";
+		mes "in seclusion and only a few";
+		mes "people are aware of his skill.";
+		mes "But I can assure you that his";
+		mes "knowledge of ancient languages";
+		mes "is unrivaled by any mortal.";
+		next;
+		mes "[Metz]";
+		mes "I suppose his interest";
+		mes "in history is what drives";
+		mes "him in work. Still, I've";
+		mes "heard that he doesn't like";
+		mes "meeting people. I hope you";
+		mes "can convince him to help us...";
+	}
+	else if (sign_q < 82) {
+		mes "[Metz]";
+		mes "So far, I've learned";
+		mes "from my research that";
+		mes "the gem's message has";
+		mes "details about a certain";
+		mes "location and an item that";
+		mes "serves as some kind of key...";
+		next;
+		mes "[Metz]";
+		mes "While I investigate,";
+		mes "please try to have Frank";
+		mes "Franklin translate the";
+		mes "message in the Record of";
+		mes "Ancient Language. Keep up";
+		mes "the good work, "+ strcharinfo(0) +".";
+	}
+	else if (sign_q == 82) {
+		mes "[Metz]";
+		mes "I get it now!";
+		mes "The 'skyscraper'";
+		mes "in this text refers to";
+		mes "the Geffen Tower!";
+		mes "Alright, let's see...";
+		next;
+		mes "[Metz]";
+		mes "Hmm...";
+		mes "''The town where the";
+		mes "rejected are left behind.''";
+		mes "What does that mean";
+		mes "and where could it be...?";
+	}
+	else if (sign_q < 98) {
+		mes "[Metz]";
+		mes "I'm sure the town";
+		mes "where the rejected";
+		mes "live means something,";
+		mes "but I'm unable to figure";
+		mes "out the answer to this";
+		mes "little riddle...";
+	}
+	else if ((sign_q > 100) && (sign_q < 105)) {
+		mes "[Metz]";
+		mes "Angrboda...?!";
+		mes "According to legend,";
+		mes "her soul was split into";
+		mes "pieces and placed behind";
+		mes "seals created by the gods!";
+		next;
+		mes "[Metz]";
+		mes "You'll need a stout,";
+		mes "heavy or really sharp";
+		mes "weapon. Of course, I'm";
+		mes "told that such weapons";
+		mes "are truly rare...";
+		next;
+		mes "[Metz]";
+		mes "Supposedly, normal";
+		mes "Blacksmiths can't even";
+		mes "forge those kinds of rare";
+		mes "weapons. But if you manage";
+		mes "to get one, you might have a";
+		mes "chance of breaking the seals.";
+		next;
+		mes "[Metz]";
+		mes "Of course, I'm worried";
+		mes "that may be violating the";
+		mes "will of the gods by releasing";
+		mes "Angrboda, but we've already";
+		mes "gone this far...";
+	}
+	else if (sign_q < 137) {
+		mes "[Metz]";
+		mes "I think you're";
+		mes "almost there. All";
+		mes "of our efforts will";
+		mes "soon come to fruition!";
+	}
+	else if (sign_q == 137) {
+		mes "[Metz]";
+		mes "This is it...!";
+		mes "You've brought me,";
+		mes "'The Sign!' I've finally";
+		mes "proven its existence!";
+		mes "Please let me handle";
+		mes "this and come back later~";
+		delitem 7314,1; //The_Sign
+		set sign_q,138;
+		set .@stime_s,gettime(3);
+		if (.@stime_s < 1) {
+			set sign_sq,1;
+		}
+		else if (.@stime_s < 3) {
+			set sign_sq,2;
+		}
+		else if (.@stime_s < 5) {
+			set sign_sq,3;
+		}
+		else if (.@stime_s < 7) {
+			set sign_sq,4;
+		}
+		else if (.@stime_s < 9) {
+			set sign_sq,5;
+		}
+		else if (.@stime_s < 11) {
+			set sign_sq,6;
+		}
+		else if (.@stime_s < 13) {
+			set sign_sq,7;
+		}
+		else if (.@stime_s < 15) {
+			set sign_sq,8;
+		}
+		else if (.@stime_s < 17) {
+			set sign_sq,9;
+		}
+		else if (.@stime_s < 19) {
+			set sign_sq,10;
+		}
+		else if (.@stime_s < 21) {
+			set sign_sq,11;
+		}
+		else {
+			set sign_sq,12;
+		}
+	}
+	else if (sign_q == 138) {
+		set .@stime_s1,gettime(3);
+		if (.@stime_s1 < 1) {
+			if (sign_sq == 11) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 3) {
+			if (sign_sq == 12) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 5) {
+			if (sign_sq == 1) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 7) {
+			if (sign_sq == 2) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 9) {
+			if (sign_sq == 3) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 11) {
+			if (sign_sq == 4) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 13) {
+			if (sign_sq == 5) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 15) {
+			if (sign_sq == 6) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 17) {
+			if (sign_sq == 7) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 19) {
+			if (sign_sq == 8) {
+				set .@pass_s,1;
+			}
+		}
+		else if (.@stime_s1 < 21) {
+			if (sign_sq == 9) {
+				set .@pass_s,1;
+			}
+		}
+		else {
+			if (sign_sq == 10) {
+				set .@pass_s,1;
+			}
+		}
+		if (.@pass_s == 1) {
+			mes "[Metz]";
+			mes "Fascinating...";
+			mes "This was made with";
+			mes "a material outside of";
+			mes "Rune-Midgard! See this";
+			mes "blue lens? That must be";
+			mes "its incredible power source!";
+			next;
+			mes "[Metz]";
+			mes "I've found that the runes";
+			mes "around the lens control some";
+			mes "kind of seals placed at the Geffen Tower and Geffen Fountain. But with this in your hands, the seals should be broken...";
+			next;
+			mes "[Metz]";
+			mes "I... I think";
+			mes "you can even use this";
+			mes "to enter Valhalla. There";
+			mes "may be even other applications";
+			mes "using the power of this item...";
+			next;
+			mes "[Metz]";
+			mes "I can only think of";
+			mes "one person who can";
+			mes "handle working with";
+			mes "this: Engel Howard,";
+			mes "Rune-Midgard's best";
+			mes "Blacksmith.";
+			set sign_q,139;
+			set sign_sq,0;
+			getitem 7314,1; //The_Sign
+		}
+		else {
+			mes "[Metz]";
+			mes "I'm sorry, but I'm";
+			mes "still examining the";
+			mes "artifact you've lent to";
+			mes "me. Would you please";
+			mes "give me some more time?";
+		}
+	}
+	else if (sign_q < 141) {
+		mes "[Metz]";
+		mes "Have you visited";
+		mes "Engel Howard yet?";
+		mes "He's the only one";
+		mes "who can unlock the";
+		mes "the Sign's power for you...";
+	}
+	else if (sign_q == 141) {
+		if (countitem(2644) == 1) {
+			mes "[Metz]";
+			mes "Ah, you're finally";
+			mes "here. I've been waiting";
+			mes "to speak with you. First,";
+			mes "let me thank you again";
+			mes "for all of your help.";
+			next;
+			mes "[Metz]";
+			mes "Thanks to you, my wish";
+			mes "of proving the existence";
+			mes "of the Sign has finally been";
+			mes "fulfilled. Its power is now";
+			mes "yours to do as you wish.";
+			next;
+			mes "[Metz]";
+			mes "You may have had your doubts,";
+			mes "but I'm happy enough to confirm that the Sign really exists. Thanks again, and I hope you stop by and chat from time to time.";
+			set sign_q,142;
+			getexp 2000000,0;
+		}
+		else {
+			mes "[Metz]";
+			mes "Have you visited";
+			mes "Engel Howard yet?";
+			mes "He's the only one";
+			mes "who can unlock the";
+			mes "the Sign's power for you...";
+		}
+	}
+	else if (sign_q == 201) {
+		mes "[Metz]";
+		mes "You failed?";
+		mes "It's disappointing,";
+		mes "but I know that you";
+		mes "did your best. Let";
+		mes "me thank you for";
+		mes "all your work.";
+		next;
+		mes "[Metz]";
+		mes "Although I need to";
+		mes "take back the Sobbing";
+		mes "Starlight, I hope you";
+		mes "accept this as a token";
+		mes "of my gratitude. Good luck";
+		mes "on your travels, adventurer.";
+		delitem 7178,1; //Star's_Sob
+		set sign_q,202;
+		getexp 100000,0;
+		getitem 617,1; //Old_Violet_Box
+	}
+	else if (sign_q > 201) {
+		if (countitem(7178) == 1) {
+			mes "[Metz]";
+			mes "I'm sorry...";
+			mes "But I'm taking";
+			mes "back the Sobbing";
+			mes "Starlight from you.";
+			mes "Apparently, you weren't";
+			mes "worthy of the task...";
+			next;
+			mes "[Metz]";
+			mes "......";
+			mes "Farewell.";
+			delitem 7178,1; //Star's_Sob
+		}
+		else {
+			mes "[Metz]";
+			mes "I guess I can't";
+			mes "really blame you";
+			mes "since I didn't provide";
+			mes "you with that much help...";
+		}
+	}
+	else {
+		mes "[Metz]";
+		mes "Thank you so much";
+		mes "for helping me make";
+		mes "my dream come true.";
+		mes "can work on another";
+		mes "project together.";
+		next;
+		mes "[Metz]";
+		mes "Well then...";
+		mes "Good luck on";
+		mes "your journeys,";
+		mes "brave "+ strcharinfo(0) +".";
+	}
+	close2;
+	cutin "mets_alpha",255;
+	end;
 }
 
-prt_in,227,45,4	script	Archaeologist	804,{
-    cutin "mets_alpha",2;
-    if (sign_fail) goto L_Stop;
-    if (signquest)goto s_Cont;
-    mes "[Metz]";
-    mes "Although you need everlasting";
-    mes "patience in an archaeological";
-    mes "excavation, the feeling you get";
-    mes "when you find something makes";
-    mes "all those long hours of study and";
-    mes "research worth it.";
-    close2;
-    cutin "",255;
-    end;
-
-s_Cont:
-    if (signquest == 1) {
-        mes "[Metz]";
-        mes "Hm...?";
-        mes "Can I help you?";
-        next;
-        menu "I've been following these signs and...",s_Sign,"I was just passing by",-;
-
-        mes "[Metz]";
-        mes "Oh really?";
-        mes "I see, I though you";
-        mes "were an applicant for";
-        mes "the position I'm offering";
-        mes "to brave adventurers.";
-        close2;
-        cutin "",255;
-        end;
-
-s_Sign:
-        mes "[Metz]";
-        mes "Great...!";
-        mes "Welcome to my";
-        mes "humble lodgings.";
-        mes "Hmm, let me see...";
-        next;
-        if (BaseLevel < 70) {
-            mes "[Metz]";
-            mes "Uh, it pains me to say this, but I";
-            mes "don't think you qualify to help";
-            mes "me out. Once you gain enough";
-            mes "experience though, I'll be happy";
-            mes "to have you on board~";
-            close2;
-            cutin "",255;
-            end;
-        }
-        mes "[Metz]";
-        mes "Hey, I think you might";
-        mes "be well suited for the job!";
-        mes "But do you think you could come";
-        mes "back later? I've got my hands full";
-        mes "with some other business.";
-        next;
-        mes "[Metz]";
-        mes "Oh right, would you tell";
-        mes "me your name? " + strcharinfo(0) + "?";
-        mes "Okay then, I'll remember that.";
-        mes "Talk to you later, alright?";
-        set signquest,2;
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 2) {
-        mes "[Metz]";
-        mes "I'm sorry I made you wait,";
-        mes "but I had some research to finish";
-        mes "and it took longer than I";
-        mes "expected. Now, before I tell you";
-        mes "more about the job, I want to";
-        mes "test your competency";
-        next;
-        mes "[Metz]";
-        mes "The job I'm offering is";
-        mes "pretty risky and not just";
-        mes "anybody can handle it.";
-        mes "You'll actually go through";
-        mes "a series of tests conducted";
-        mes "by my trusted friends.";
-        next;
-        mes "[Metz]";
-        mes "Now, the first person";
-        mes "you must visit is ^FF0000Arian^000000";
-        mes "in Morroc. Please speak";
-        mes "to him and he'll give you";
-        mes "all the details about his";
-        mes "examination... I hope";
-        next;
-        mes "[Metz]";
-        mes "Once you're finished with";
-        mes "the test, Arian will tell you";
-        mes "what to do next. Afterwards,";
-        mes "come back to me so that we";
-        mes "can finally talk business.";
-        next;
-        mes "[Metz]";
-        mes "Ah, almost forgot.";
-        mes "Arian won't talk to anybody";
-        mes "unless he knows them or";
-        mes "receives a message from me.";
-        mes "So if he's snubbed you in the past,";
-        mes "just understand that's his";
-        mes "way.";
-        set signquest,3;
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 3 || signquest == 4) {
-        mes "[Metz]";
-        mes "Hm...?";
-        mes "Shouldn't you leave";
-        mes "for Morroc to see Arian?";
-        mes "You better hurrty in case";
-        mes "somebody else applies";
-        mes "for this little job.";
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 13) {
-        mes "[Metz]";
-        mes "Congratulations~";
-        mes "You managed to pass";
-        mes "all of the tests! You seem";
-        mes "to be the perfect person";
-        mes "to carry out this special";
-        mes "assignment!";
-        next;
-        mes "[Metz]";
-        mes "By now, you must have";
-        mes "six Sobbing Starlight pieces.";
-        mes "I'm sure that you want to know";
-        mes "more about those fragments.";
-        next;
-        mes "[Metz]";
-        mes "I remember last summer,";
-        mes "I found the wholly formed";
-        mes "Sobbing Starlight north";
-        mes "of Mount Mjolnir during";
-        mes "one of my expeditions.";
-        next;
-        mes "[Metz]";
-        mes "Although it was in perfect";
-        mes "shape, once it was exposed";
-        mes "to the air, it began to crack";
-        mes "and shattered into the pieces";
-        mes "you now hold in your hands.";
-        next;
-        mes "[Metz]";
-        mes "Now, an ordinary artisan";
-        mes "can't put the Sobbing Starlight";
-        mes "back together. This mysterious";
-        mes "stone has some strange properties.";
-        mes "But it's imperative to me to get";
-        mes "this stone reassembled.";
-        next;
-        mes "[Metz]";
-        mes "Once restored, a strange";
-        mes "pattern can be seen within";
-        mes "the Sobbing Starlight. I guess";
-        mes "that the pattern is a message";
-        mes "written in an ancient language.";
-        next;
-        mes "[Metz]";
-        mes "Would you let me borrow";
-        mes "the pieces for a second ?";
-        mes "I'll show you something";
-        mes "quite interesting...";
-        next;
-        mes "^0066CCOnce you hand the pieces";
-        mes "of the Sobbing Starlight to";
-        mes "Metz, he pulls out a seventh";
-        mes "piece. Once gathered, they";
-        mes "begin to emit a strange light.";
-        misceffect 34;
-        next;
-        mes "[Metz]";
-        mes "Since the pieces still";
-        mes "respond to each other,";
-        mes "I believe that it's possible";
-        mes "for the Sobbing Starlight";
-        mes "to be restored to its";
-        mes "original form.";
-        next;
-        mes "[Metz]";
-        mes "We're still seeking";
-        mes "an artisan of great";
-        mes "skill for this task. Once";
-        mes "know right away. For now,";
-        mes "please hold on these pieces.";
-        getitem 7177,1;
-        set signquest,14;
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 14) {
-        mes "[Metz]";
-        if (rand(5)){
-        	mes "Although I've made";
-        	mes "some progress, I still";
-        	mes "haven't found an artisan";
-        	mes "capable of restoring the";
-        	mes "Sobbing Starlight. Please";
-        	mes "give me a little more time.";
-        	close2;
-        	cutin "",255;
-        	end;
-		}
-        mes "Ah, you've come just";
-        mes "just in the nick of time!";
-        mes "I just found someone who";
-        mes "may be capable of restoring";
-        mes "the Sobbing Starlight.";
-        next;
-        mes "[Metz]";
-        mes "His name is";
-        mes "^FF0000Engel Howard^000000,";
-        mes "a legendary Blacksmith";
-        mes "in Rune Midgard. I don't";
-        mes "know where he is, but maybe";
-        mes "his family in Geffen may know.";
-        next;
-        mes "[Metz]";
-        mes "Unfortunately, that's all";
-        mes "the information that I have";
-        mes "to give you for now. You'll";
-        mes "have to investigate this lead";
-        mes "on your own, "+ strcharinfo(0) +".";
-        set signquest,15;
-        close2;
-        cutin "",255;
-        end;
-
-    } else if (signquest == 23) {
-        mes "[Metz]";
-        mes "Amazing...! You've";
-        mes "managed to restore";
-        mes "the Sobbing Starlight!";
-        mes "Now, I recently learned that";
-        mes "this stone can lead you to";
-        mes "an ancient place...";
-        next;
-        mes "[Metz]";
-        mes "That's why we need to";
-        mes "know what the message in";
-        mes "the Sobbing Starlight means.";
-        mes "First, we need a Wizard that";
-        mes "is skilled in unlocking the";
-        mes "messages stored in gems...";
-        next;
-        mes "[Metz]";
-        mes "Hmm. It would probably";
-        mes "be best to visit the Wizards";
-        mes "on the top floor of the Geffen";
-        mes "Tower. There's someone I know";
-        mes "there who might just be up for";
-        mes "this task...";
-        set signquest,24;
-        close2;
-        cutin "",255;
-        end;
-
-    } else if (signquest == 24) {
-        mes "[Metz]";
-        mes "Now that the";
-        mes "Sobbing Starlight";
-        mes "is restored, we need";
-        mes "to find someone who can";
-        mes "break the seal on the";
-        mes "gem's message...";
-        next;
-        mes "[Metz]";
-        mes "For now, please visit";
-        mes "the Wizards at the top";
-        mes "floor of the Geffen Tower.";
-        mes "I know that one of them is";
-        mes "capable of getting the gem's";
-        mes "text on a paper...";
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 28) {
-        mes "[Metz]";
-        mes "Great...!";
-        mes "You were able to get the";
-        mes "text in the gem printed on a";
-        mes "Record of Ancient Language?";
-        next;
-        mes "[Metz]";
-        mes "Just as I thought.";
-        mes "This language isn't";
-        mes "one I recognize. It's";
-        mes "probably too ancient.";
-        next;
-        mes "[Metz]";
-        mes "Fortunately, I know";
-        mes "one person who may";
-        mes "be able to translate this.";
-        mes "If he's not able to do it...";
-        mes "We'll have to give up.";
-        next;
-        mes "[Metz]";
-        mes "Bring this Record";
-        mes "of Ancient Language";
-        mes "to a man named Frank.";
-        mes "I hope he'll be able to";
-        mes "understand what it says.";
-L_Frank:
-        next;
-        menu "Who is Frank?",L_Who,"Where is he?",L_Where,"I see.",-;
-        mes "[Metz]";
-        mes "Good luck, then.";
-        mes "I hope that you can";
-        mes "find a way to get Frank";
-        mes "Franklin to help us.";
-        set signquest,29;
-        close2;
-        cutin "",255;
-        end;
-
-L_Who:
-        mes "[Metz]";
-        mes "Frank Franklin has lived";
-        mes "in seclusion and only a few";
-        mes "people are aware of his skill.";
-        mes "But I can assure you that his";
-        mes "knowledge of ancient languages";
-        mes "isn't rivaled by any mortal.";
-        next;
-        mes "[Metz]";
-        mes "I suppose his interest";
-        mes "in history is what drives";
-        mes "him in work. Still, I've";
-        mes "heard that he doesn't like";
-        mes "meeting people. I hope you";
-        mes "can convince him to help us...";
-        goto L_Frank;
-
-L_Where:
-        mes "[Metz]";
-        mes "It's said that";
-        mes "Frank Franklin lives";
-        mes "on the Alberta Sunken Ship";
-        mes "where he devotes his time";
-        mes "to his researches. He may not";
-        mes "always be home though...";
-        goto L_Frank;
-
-    } else if (signquest == 29) {
-        mes "[Metz]";
-        mes "So far, I've learned";
-        mes "from my research that";
-        mes "the gem's message has";
-        mes "details about a certain";
-        mes "location and an item that";
-        mes "serves as some kind of key...";
-        next;
-        mes "[Metz]";
-        mes "While I investigate,";
-        mes "please try to have Frank";
-        mes "Franklin translate the";
-        mes "message in the Record of";
-        mes "Ancient Language. Keep up";
-        mes "the good work," + strcharinfo(0) + ".";
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 53) {
-        mes "[Metz]";
-        mes "Angrboda...?!";
-        mes "According to legend,";
-        mes "her soul was split into";
-        mes "pieces and placed behind";
-        mes "seals created by the gods!";
-        next;
-        mes "[Metz]";
-        mes "You'll need a stout,";
-        mes "heavy or really sharp";
-        mes "weapon. Of course, I'm";
-        mes "told that such weapons";
-        mes "are truly rare...";
-        next;
-        mes "[Metz]";
-        mes "Supposedly, normal";
-        mes "Blacksmiths can't even";
-        mes "forge those kinds of rare";
-        mes "weapons. But if you manage";
-        mes "to get one, you might have a";
-        mes "chance of breaking the seals.";
-        next;
-        mes "[Metz]";
-        mes "Of course, I'm worried";
-        mes "that may be violating the";
-        mes "will of the gods by releasing";
-        mes "Angrboda, but we've already";
-        mes "gone this far...";
-        close2;
-        cutin "",255;
-        end;
-    } else if ( (signquest > 54 && signquest < 59) || (signquest == 59 && !countitem(7314))) {
-        mes "[Metz]";
-        mes "I think you're";
-        mes "almost there. All";
-        mes "of our efforts will";
-        mes "soon come to fruition!";
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 59 && countitem(7314)) {
-        mes "[Metz]";
-        mes "This is it...!";
-        mes "You've brought me,";
-        mes "'The Sign'! I've finally";
-        mes "proven its existence!";
-        mes "Please let me handle";
-        mes "this and come back later~";
-        delitem 7314,1;
-        set @metzhour,gettime(3);
-        set @metzmin,gettime(2);
-        if (@metzmin > 29) set @metzhour,@metzhour +1;
-        set signmetzhour,@metzhour + rand(2,4);
-        if (signmetzhour > 23) set signmetzhour,signmetzhour - 24;
-        set signquest,60;
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 60) {
-        if (gettime(3) == signmetzhour || gettime(3) == signmetzhour +1 || gettime(3) == signmetzhour +2 || (signmetzhour +1 == 24 && gettime(3) == 0) || (signmetzhour +2 == 24 && gettime(3) == 0) || (signmetzhour +2 == 25 && gettime(3) == 1)) {
-            mes "[Metz]";
-            mes "Fascinating...";
-            mes "This was made with";
-            mes "a material outside of";
-            mes "Rune-Midgard! See this";
-            mes "blue lens? That must be";
-            mes "its incredible power source!";
-            next;
-            mes "[Metz]";
-            mes "I've found that the runes";
-            mes "around the lens control some";
-            mes "kind of seals placed at the Geffen";
-            mes "Tower and Geffen Fountain. But with";
-            mes "this in your hands, the seals";
-            mes "should be broken...";
-            next;
-            mes "[Metz]";
-            mes "I... I think";
-            mes "you can even use this";
-            mes "to enter Valhalla. There";
-            mes "may be even other applications";
-            mes "using the power of this item...";
-            next;
-            getitem 7314,1;
-            set signquest,61;
-            mes "[Metz]";
-            mes "I can only think of";
-            mes "one person who can";
-            mes "handle working with";
-            mes "this: Engel Howard,";
-            mes "Rune-Midgard's best";
-            mes "Blacksmith.";
-            close2;
-            cutin "",255;
-            end;
-        } else {
-            mes "[Metz]";
-            mes "I'm sorry, but I'm";
-            mes "still examinating the";
-            mes "artifact you've lent to";
-            mes "me. Would you please";
-            mes "give me some more time?";
-            close2;
-            cutin "",255;
-            end;
-        }
-
-    } else if (signquest == 61) {
-        mes "[Metz]";
-        mes "Have you visited";
-        mes "Engel Howard yet?";
-        mes "He's the only one";
-        mes "who can unlock the";
-        mes "Sign's power for you...";
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest == 63) {
-        set signquest,64;
-        mes "[Metz]";
-        mes "Ah, you're finally";
-        mes "here. I've been waiting";
-        mes "to speak with you. First,";
-        mes "let me thank you again";
-        mes "for all of your help.";
-        next;
-        mes "[Metz]";
-        mes "Thanks to you, my wish";
-        mes "of proving the existence";
-        mes "of the Sign has finally been";
-        mes "fulfilled. Its power is now";
-        mes "yours to do as you wish.";
-        next;
-        mes "[Metz]";
-        mes "You may have had your doubts,";
-        mes "but I'm happy enough to confirm";
-        mes "that the Sign really exists. Thanks";
-        mes "again, and I hope you stop by and";
-        mes "chat from time to time.";
-        getexp 1823951,0;
-        close2;
-        cutin "",255;
-        end;
-    } else if (signquest >= 64) {
-        mes "[Metz]";
-        mes "Thank you so much";
-        mes "for helping me make";
-        mes "my dream come true.";
-        mes "I hope we can work on";
-        mes "another project together.";
-        next;
-        mes "[Metz]";
-        mes "Well then...";
-        mes "Good luck on";
-        mes "your journeys,";
-        mes "brave " + strcharinfo(0) + ".";
-        close2;
-        cutin "",255;
-        end;
-    } else {
-        mes "[Metz]";
-        mes "How are going your";
-        mes "researches about";
-        mes "the Sobbing Starlight?";
-        mes "I wish you to come";
-        mes "back to me when you";
-        mes "have passed all tests.";
-        close2;
-        cutin "",255;
-        end;
-    }
-
-L_Stop:
-    if (sign_fail != 3) {
-        mes "[Metz]";
-        mes "What...?";
-        mes "Were you really lacking";
-        mes "that much courage...?";
-        mes "Does it mean I'll never";
-        mes "see that legendary artifact";
-        mes "with my own eyes?";
-        next;
-        mes "[Metz]";
-        mes "So much work for nothing...";
-        mes "Oh, excuse me. I should feel";
-        mes "honored to just have been";
-        mes "able to hold that Sobbing";
-        mes "Starlight in my own hands.";
-        mes "May I please take one last";
-        mes "look at it?";
-        next;
-        getitem 617,1;
-        getexp 876543,0;
-    }
-    set sign_fail,3;
-    mes "[Metz]";
-    mes "Thanks for your help. My dream";
-    mes "might never come true but I've";
-    mes "seen things that some people";
-    mes "will never see in their whole lives.";
-    close2;
-    cutin "",255;
-    end;
+prt_in,228,26,5	script	Steward#sign	55,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 3) {
+		mes "[Vandez]";
+		mes "Welcome to the";
+		mes "Brayde Estate. How";
+		mes "may I be of service?";
+		next;
+		switch(select("Nothing.:I'm here to see Metz.:Gimmie your cash!")) {
+		case 1:
+			mes "[Vandez]";
+			mes "If you do not have";
+			mes "any business to conduct";
+			mes "with Master Metz, please";
+			mes "leave immediately.";
+			close;
+		case 2:
+			mes "[Vandez]";
+			if (Sex == 1) {
+				mes "Very good, sir.";
+			}
+			else {
+				mes "Very good, madam.";
+			}
+			mes "Please wait a moment";
+			mes "while I consult with";
+			mes "the master in his study.";
+			close;
+		case 3:
+			mes "[Vandez]";
+			mes "My apologies,";
+			mes "but I insist that";
+			mes "you leave the premises";
+			mes "^FF0000immediately^000000.";
+			close2;
+			percentheal -30,0;
+			warp "prontera",150,150;
+			end;
+		}
+	}
+	else if (sign_q < 14) {
+		mes "[Vandez]";
+		mes "Ah, Master "+ strcharinfo(0) +".";
+		mes "Welcome. How may I be";
+		mes "of service today?";
+		next;
+		switch(select("Who is Arian?:What is Metz doing?:How is Elle?")) {
+		case 1:
+			mes "[Vandez]";
+			mes "Ah yes, Arian.";
+			mes "I consider him to be";
+			mes "a man of few words. The";
+			mes "words he does choose to";
+			mes "use are rather harsh and";
+			mes "brutish, you might say.";
+			close;
+		case 2:
+			mes "[Vandez]";
+			mes "Although I've served";
+			mes "the Brayde family for years,";
+			mes "I'm unfamiliar with Master";
+			mes "Metz's work. My apologies, but";
+			mes "I simply cannot even begin to fathom his research...";
+			close;
+		case 3:
+			mes "[Vandez]";
+			mes "Ah, Mistress Elle";
+			mes "has been working here";
+			mes "since she was a very young";
+			mes "girl. She is almost like";
+			mes "a granddaughter to me.";
+			mes "Ha ha-^333333*Ahem*^000000";
+			close;
+		}
+	}
+	else if (sign_q < 13) {
+		mes "[Vandez]";
+		mes "I recall that";
+		mes "Master Arian visited";
+		mes "the master a while ago.";
+		mes "They spent all night";
+		mes "discussing something";
+		mes "related to the master's work.";
+		next;
+		mes "[Vandez]";
+		mes "Goodness, it sounded";
+		mes "dreadfully serious. The";
+		mes "term, 'ancient power' is";
+		mes "usually not mentioned";
+		mes "quite often in conversation.";
+		close;
+	}
+	else if (sign_q < 15) {
+		mes "[Vandez]";
+		mes "Sometimes I worry";
+		mes "about Mistress Elle.";
+		mes "She's one of the most";
+		mes "beautiful girls in Prontera,";
+		mes "but does not have a boyfriend.";
+		next;
+		mes "[Vandez]";
+		mes "Many men have given her";
+		mes "a great deal of attention, but";
+		mes "she always manages to reject";
+		mes "every single suitor...";
+		close;
+	}
+	else if (sign_q < 20) {
+		mes "[Vandez]";
+		mes "Many travellers have";
+		mes "begun to visit the master";
+		mes "lastly. Apparently, they've";
+		mes "been led here by the sign";
+		mes "boards we've posted.";
+		next;
+		mes "[Vandez]";
+		mes "Take heed and";
+		mes "do not let anyone";
+		mes "else take the opportunity";
+		mes "the master has presented";
+		mes "away from you.";
+		close;
+	}
+	else if (sign_q < 25) {
+		mes "[Vandez]";
+		mes "It's most curious,";
+		mes "but Elle seems to";
+		mes "consider that unrefined";
+		mes "Jesqurienne as her rival.";
+		mes "Women are truly difficult";
+		mes "for me to understand...";
+		close;
+	}
+	else if (sign_q < 35) {
+		mes "[Vandez]";
+		mes "Avarice knows no bounds.";
+		mes "The pastime of gambling";
+		mes "seems to best represent";
+		mes "mankind's greed.";
+		next;
+		mes "[Vandez]";
+		mes "Winning or losing, some";
+		mes "gamblers always seem to find";
+		mes "some reason to continue when";
+		mes "it's smarter to stop. Then again, the mind usually doesn't take precedence over the heart...";
+		close;
+	}
+	else if (sign_q < 54) {
+		mes "[Vandez]";
+		mes "Bakerlan is a young,";
+		mes "brilliant man. Although";
+		mes "he inherited his company,";
+		mes "it takes talent to continue";
+		mes "his father's successes.";
+		next;
+		mes "[Vandez]";
+		mes "It's amazing that Bakerlan";
+		mes "is also managing to expand";
+		mes "his business even further.";
+		mes "Of course, Master Metz has";
+		mes "had a role in Bakerlan's";
+		mes "success...";
+		close;
+	}
+	else if (sign_q == 54) {
+		mes "[Vandez]";
+		mes "Oh, congratulations~";
+		mes "You finally passed all";
+		mes "of the tests. I know they";
+		mes "must have been incredibly";
+		mes "taxing and challenging.";
+		next;
+		mes "[Vandez]";
+		mes "Master Metz has informed";
+		mes "me that he wishes for you";
+		mes "to restore find someone";
+		mes "to restore the Sobbing";
+		mes "Starlight. I wish you luck";
+		mes "in that endeavor.";
+		close;
+	}
+	else if (sign_q == 97 || sign_q == 98) {
+		mes "[Vandez]";
+		mes "Although humans make";
+		mes "mistakes, there are those";
+		mes "times when failing cannot";
+		mes "be an option.";
+		next;
+		mes "[Vandez]";
+		mes "There will always";
+		mes "be situations where";
+		mes "you won't be getting";
+		mes "any second chances.";
+		mes "Anyways remember that.";
+		close;
+	}
+	else {
+		mes "[Vandez]";
+		mes "There will always";
+		mes "be situations where";
+		mes "you won't be getting";
+		mes "any second chances.";
+		mes "Anyways remember that.";
+		close;
+	}
 }
 
-prt_in,248,23,4	script	Maid#2	1275,{
-
-end;
-
+prt_in,248,23,3	script	Maid#sign	1275,{
+	end;
+}
+prt_in,248,23,0	script	Maid#sign2	111,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 3) {
+		mes "[Elle]";
+		mes "Wh-what are you";
+		mes "doing in Master Metz's";
+		mes "room? Please leave";
+		mes "immediately!";
+		close;
+	}
+	else if (sign_q < 14) {
+		mes "[Elle]";
+		mes "Oh...?";
+		mes ""+ strcharinfo(0) +"?";
+		mes "Is there anything that";
+		mes "I can help you with?";
+		next;
+		if (Sex == 1) {
+			switch(select("You wanna have coffee sometime?:Tell me about Metz.")) {
+			case 1:
+				mes "[Elle]";
+				mes "...?";
+				mes "*Blush~*";
+				mes "Oh~ A-are you";
+				mes "asking me out";
+				mes "on a date?";
+				next;
+				mes "[Elle]";
+				mes "Weeeell~";
+				mes "Do I have the time";
+				mes "to go out with you or";
+				mes "not? Hm, maybe if";
+				mes "you're really nice";
+				mes "to me, , "+ strcharinfo(0) +".";
+				close;
+			case 2:
+				mes "[Elle]";
+				mes "Umm....";
+				mes "I don't know";
+				mes "what to say?";
+				next;
+				mes "[Elle]";
+				mes "He's my employer and";
+				mes "I have an opinion of him,";
+				mes "but if I told you, it might";
+				mes "look unprofessional. But";
+				mes "if you have time later, I just";
+				mes "might tell you. Ho ho~";
+				close;
+			}
+		}
+		else {
+			switch(select("You have nice skin, Miss Elle.:Tell me about Metz.")) {
+			case 1:
+				mes "[Elle]";
+				mes "Eh...?";
+				mes "Why, thank you!";
+				mes "Maybe it's because";
+				mes "I don't go out too";
+				mes "often. You have nice";
+				mes "I don't go out too, "+ strcharinfo(0) +"~";
+				close;
+			case 2:
+				mes "[Elle]";
+				mes "Umm....";
+				mes "I don't know";
+				mes "what to say?";
+				next;
+				mes "[Elle]";
+				mes "He's my employer and";
+				mes "I have an opinion of him,";
+				mes "but if I told you, it might";
+				mes "look unprofessional. But";
+				mes "if you have time later, I just";
+				mes "might tell you.";
+				close;
+			}
+		}
+	}
+	else if (sign_q < 13) {
+		mes "[Elle]";
+		mes "I'm not so busy";
+		mes "nowadays, but I was";
+		mes "working hard for a while";
+		mes "so my body aches. Oh, what";
+		mes "am I saying? Please ignore";
+		mes "that--! Ho ho ho~";
+		emotion e_swt2;
+		close;
+	}
+	else if (sign_q < 15) {
+		mes "[Elle]";
+		mes "Guys never understand";
+		mes "what a girl really wants!";
+		mes "They're always too afraid";
+		mes "of showing their interest~";
+		next;
+		mes "[Elle]";
+		mes "Well, even when they";
+		mes "do ask me on dates, I never";
+		mes "accept their proposals that";
+		mes "easily. Hmph, there's not";
+		mes "too many boys I like out";
+		mes "there, anyway.";
+		emotion e_pif;
+		close;
+	}
+	else if (sign_q < 20) {
+		mes "[Elle]";
+		mes "^333333*Phew....*^000000";
+		mes "I'm so tired, even";
+		mes "though I didn't work";
+		mes "that much today. Some";
+		mes "days I feel exhausted";
+		mes "for no reason at all...";
+		next;
+		mes "[Elle]";
+		mes "I should take";
+		mes "the day off and";
+		mes "rest. If I had some";
+		mes "refreshment, that";
+		mes "would be perfect...";
+		close2;
+		if (countitem(504) > 0) {
+			switch(select("Why don't you take this?")) {
+			case 1:
+				mes "[Elle]";
+				mes "Oh, you didn't";
+				mes "need to do this,";
+				mes "but that you soooo";
+				mes "much! Ahhhhhhh~";
+				delitem 504,1; //White_Potion
+				close2;
+				emotion e_kis2;
+				end;
+			}
+		}
+		end;
+	}
+	else if (sign_q < 25) {
+		mes "[Elle]";
+		mes "Jesqurienne?";
+		mes "Well, she's beautiful";
+		mes "and talented. She's actually";
+		mes "really great. That's why...";
+		next;
+		mes "[Elle]";
+		mes "I consider her";
+		mes "my rival! She might";
+		mes "be smarter than me,";
+		mes "but maybe I can become";
+		mes "more beautiful than her...";
+		emotion e_dots;
+		close;
+	}
+	else if (sign_q < 35) {
+		mes "[Elle]";
+		mes "Have you been";
+		mes "in Comodo before?";
+		mes "It's such a beautiful";
+		mes "place with so many";
+		mes "things to do!";
+		next;
+		mes "[Elle]";
+		mes "I like gambling in";
+		mes "Comodo, but I think";
+		mes "it's a little addictive.";
+		mes "I've even seen people";
+		mes "who seem to live for it...";
+		close;
+	}
+	else if (sign_q < 54) {
+		mes "[Elle]";
+		mes "I remember that";
+		mes "there was a lady";
+		mes "working for Master";
+		mes "Bakerlan named Seylin.";
+		mes "I hear she's from some";
+		mes "distant country...";
+		next;
+		mes "[Elle]";
+		mes "I've seen her";
+		mes "once and I think";
+		mes "she has a unique";
+		mes "style of beauty. Well,";
+		mes "different than mine or";
+		mes "Jesquienne's anyway...";
+		close;
+	}
+	else if (sign_q == 54) {
+		emotion e_ho;
+		mes "[Elle]";
+		mes "La la la~~";
+		mes "Oh, hello.";
+		mes "Long time no see.";
+		mes "La la la~~";
+		next;
+		switch(select("What's up?:What happened?")) {
+		case 1:
+			mes "[Elle]";
+			mes "Oh...?";
+			mes "Oops...!";
+			mes "Do I really";
+			mes "look that excited?";
+			next;
+			mes "[Elle]";
+			mes "I just started";
+			mes "going out with someone!";
+			mes "He's a tall handsome boy";
+			mes "and I'm so in love with";
+			mes "him and he's so....";
+			next;
+			mes "^3355FFElle continued";
+			mes "talking about how";
+			mes "much she loves her";
+			mes "new boyfriend, even";
+			mes "after you leave the room.^000000";
+			close;
+		case 2:
+			mes "[Elle]";
+			mes "Umm....";
+			mes "Yes, something";
+			mes "very good happened";
+			mes "to me. Ho ho ho ho!";
+			mes "But it's a secret~";
+			close;
+		}
+	}
+	else if (sign_q == 97) {
+		mes "[Elle]";
+		mes "Ah~ Hello!";
+		mes "Nice to see";
+		mes "you again~";
+		next;
+		mes "[Elle]";
+		mes "Er, I'm sorry, but I heard that something bad happened to you. But don't worry, maybe you'll have better luck next time~";
+		close;
+	}
+	else {
+		mes "[Elle]";
+		mes "^333333*Sigh...*^000000";
+		mes "Lately, there've";
+		mes "been too many guests";
+		mes "visiting Master Metz.";
+		mes "Why can't they leave their";
+		mes "dirt outside of the manor?";
+		emotion e_pif;
+		close;
+	}
 }
 
-morocc_in,114,162,4	script	Young Man#13	118,{
-
-    if (signquest == 5) {
-        mes "[Gaanan]";
-        mes "^444444*Sigh...*^000000";
-        mes "I wish the weather'd";
-        mes "cool down, even just a little.";
-        mes "While I'm asking for miracles,";
-        mes "I may as well wish for a billion";
-        mes "kajillion zeny. And maybe a yacht.";
-        close;
-    }
-    else if (arianstest == 8) {
-        if (gaanantest == 1) {
-            mes "[Gaanan]";
-            mes "Hm...?";
-            mes "Arian is the one";
-            mes "who's grading your";
-            mes "test. But I understand.";
-            mes "If you failed, I'd want";
-            mes "to avoid him too...";
-            close;
-        }
-        mes "[Gaanan]";
-        mes "Oh, Arian sent you to me,";
-        mes "right? I'm sorry, but he takes";
-        mes "a little time getting used to.";
-        mes "Even though I still have to get";
-        mes "used to his... mannerisms";
-        next;
-        mes "[Gaanan]";
-        mes "Anyway, since he thinks it's";
-        mes "boring, Arian put me in charge";
-        mes "of the quiz portion of your test.";
-        mes "Please carefully choose an";
-        mes "answer when I ask you a";
-        mes "question. Are you ready?";
-        next;
-        set gaananpoint,0;
-        mes "[Gaanan]";
-        mes "Now, the first question.";
-        mes "Let's say that you just";
-        mes "found yourself on a deserted";
-        mes "island. What is the very first";
-        mes "thing that you should do?";
-        next;
-        switch( select( "Look for fresh water","Just wait for rescue.","Forage for food.","Explore the island." ) )
-        {
-        	case 1: set gaananpoint,gaananpoint +7; break;
-        	case 2: set gaananpoint,gaananpoint +1; break;
-        	case 3: set gaananpoint,gaananpoint +4; break;
-        	case 4: set gaananpoint,gaananpoint +10; break;
-	}
-        mes "[Gaanan]";
-        mes "The second question is...";
-        mes "You happen to be stuck in";
-        mes "a narrow place inside some collapsed building. What";
-        mes "do you plan to do first?";
-        next;
-        switch( select( "Scream for help","Stay quiet.","Wait for death to come.","Find a way out." ) )
-        {
-        	case 1: set gaananpoint,gaananpoint +3; break;
-        	case 2: set gaananpoint,gaananpoint +7; break;
-        	case 3: set gaananpoint,gaananpoint +1; break;
-        	case 4: set gaananpoint,gaananpoint +7; break;
-        }
-        mes "[Gaanan]";
-        mes "Now, the third question.";
-        mes "You're on some dungeon";
-        mes "expedition with your friends,";
-        mes "but you got lost somehow.";
-        mes "How do you handle it?";
-        next;
-        switch( select( "Try to find my friends.","Find a way out.","Stay put.","Continue exploring the dungeon." ) )
-        {
-        	case 1: set gaananpoint,gaananpoint +0; break;
-        	case 2: set gaananpoint,gaananpoint +5; break;
-        	case 3: set gaananpoint,gaananpoint +10; break;
-        	case 4: set gaananpoint,gaananpoint +1; break;
-	}
-        mes "[Gaanan]";
-        mes "Here's the fourth question.";
-        mes "You're with your friends inside";
-        mes "a mansion with no exit. What do";
-        mes "you do first when a murder happens";
-        mes "inside the mansion?";
-        next;
-        switch( select( "Wait for the case to get solved.","Try to find my friends first.","Find a way out.","Solve the murder case on my own.","Kill the others before they kill me." ) )
-        {
-        	case 1: set gaananpoint,gaananpoint +7; break;
-        	case 2: set gaananpoint,gaananpoint +5; break;
-        	case 3: set gaananpoint,gaananpoint +3; break;
-        	case 4: set gaananpoint,gaananpoint +1; break;
-        	case 5: set gaananpoint,gaananpoint +1; break;
-  	}
-        mes "[Gaanan]";
-        mes "The fifth question is";
-        mes "You hear that the end of";
-        mes "the world is in one week.";
-        mes "So what do you do during";
-        mes "this final week?";
-        next;
-        switch( select( "Wait to see the end.","Plant an apple tree.","Look to move to a different world.","What else? Save the world.","What else? Go on a crime spree." ) )
-        {
-        	case 1: set gaananpoint,gaananpoint +5; break;
-        	case 2: set gaananpoint,gaananpoint +3; break;
-        	case 3: set gaananpoint,gaananpoint +7; break;
-        	case 4: set gaananpoint,gaananpoint +10; break;
-        	case 5: set gaananpoint,gaananpoint +1; break;
-	}
-        mes "[Gaanan]";
-        mes "Oh! We're done!";
-        mes "Okay, let me give";
-        mes "these answers to Arian.";
-        mes "Sooo... Talk to him and";
-        mes "he'll let you know how";
-        mes "you did.";
-        set gaanantest,1;
-        close;
-    }
-    else if (ariantest < 8) {
-
-        emotion e_swt2;
-        mes "[Gaanan]";
-        mes "The weather here in";
-        mes "Morroc is too hot for me.";
-        mes "I'm having a hard time just";
-        mes "trying to live here. Do you";
-        mes "know a nice and cool place";
-        mes "where I can work?";
-        close;
-    }
+morocc_in,115,154,5	script	Rogue#sign	810,{
+	callfunc "F_UpdateSignVars";
+	if (checkweight(1201,1) == 0) {
+		mes "^3355FFWait a second! Right now,";
+		mes "you have too many items in your inventory. Please come back after you've freed up more inventory space.^000000";
+		close;
+	}
+	if (sign_q < 3) {
+		emotion e_dots;
+		end;
+	}
+	else if (sign_q == 3) {
+		mes "[Arian]";
+		mes "...";
+		mes "Who the hell";
+		mes "are you, jerkface?";
+		next;
+		switch(select("Metz sent me here.:^0000FF"+ strcharinfo(0) +"^000000.:Who are you then?")) {
+		case 1:
+			mes "[Arian]";
+			mes "Oh yeah...?";
+			mes "Well, I'm sending you";
+			mes "back! No way I'm fallin'";
+			mes "for that trick, chump!";
+			close2;
+			warp "morocc",279,173;
+			end;
+		case 2:
+			mes "[Arian]";
+			mes "Wha...?";
+			mes "^0000FF"+ strcharinfo(0) +"^000000?";
+			mes "Yeah, okay. Metz did";
+			mes "mention something about";
+			mes "about you. You're here";
+			mes "for the test, right?";
+			next;
+			mes "[Arian]";
+			mes "Alright, this";
+			mes "test is simple.";
+			mes "I tell you to bring me";
+			mes "a bunch of items and";
+			mes "you go get them.";
+			next;
+			mes "[Arian]";
+			mes "I know you jerkward adventurers";
+			mes "are always talking and you share the answers for any test some dude is givin' out. 'Course, it doesn't help that I use the same test";
+			mes "every frickin' time...";
+			next;
+			mes "[Arian]";
+			mes "Now, you gotta bring and only";
+			mes "have the item I ask you for when you come to me. If you know that I'll be asking for something later and you happen to have it, I'll straight up ^FF0000jack it^000000.";
+			next;
+			mes "[Arian]";
+			mes "The first item?";
+			mes "Gimme ^FF0000100 Fluff^000000.";
+			mes "Bring that and I'll";
+			mes "tell you what to";
+			mes "bring next.";
+			set sign_q,4;
+			close;
+		case 3:
+			mes "[Arian]";
+			mes "...";
+			mes "......";
+			next;
+			mes "[Arian]";
+			mes "...";
+			mes "......";
+			mes "Your mom.";
+			mes "Now get the";
+			mes "hell outta here!";
+			specialeffect EF_FIREHIT;
+			percentheal -50,0;
+			close;
+		}
+	}
+	else if (sign_q < 15) {
+		switch(sign_q) {
+		case 4:
+			mes "[Arian]";
+			mes "...";
+			if (countitem(914) > 99) {
+				delitem 914,100; //Fluff
+				if (countitem(7033) > 49) {
+					delitem 7033,50; //Poison_Spore
+					if (countitem(904) > 29) {
+						delitem 904,30; //Scorpion's_Tail
+						if (countitem(930) > 19) {
+							delitem 930,20; //Rotten_Bandage
+							if (countitem(1038) > 14) {
+								delitem 1038,15; //Petite_DiablOfs_Horn
+								if (countitem(7013) > 9) {
+									delitem 7013,10; //Coral_Reef
+								}
+							}
+						}
+					}
+				}
+			}
+			else {
+				mes "Hey. What the hell's wrong";
+				mes "with you? Hurry and get me";
+				mes "^FF0000100 Fluff^000000, ya slacker.";
+				close;
+			}
+			mes "Alright, that looks like";
+			mes "enough Fluff. Now, go and";
+			mes "get me ^FF000050 Poison Spores^000000.";
+			set sign_q,5;
+			close;
+		case 5:
+			mes "[Arian]";
+			mes "...";
+			if (countitem(7033) > 49) {
+				delitem 7033,50; //Poison_Spore
+				if (countitem(904) > 29) {
+					delitem 904,30; //Scorpion's_Tail
+					if (countitem(930) > 19) {
+						delitem 930,20; //Rotten_Bandage
+						if (countitem(1038) > 14) {
+							delitem 1038,15; //Petite_DiablOfs_Horn
+							if (countitem(7013) > 9) {
+								delitem 7013,10; //Coral_Reef
+							}
+						}
+					}
+				}
+			}
+			else {
+				mes "Hey. What part of 'Get me";
+				mes "^FF000050 Poison Spores^000000 or I'll";
+				mes "kick your ass,' don't";
+				mes "you understand?";
+				close;
+			}
+			mes "It's about time you";
+			mes "got here with those";
+			mes "Poison Spores. Now, go";
+			mes "and get ^FF000030 Scorpion Tails^000000.";
+			set sign_q,6;
+			close;
+		case 6:
+			mes "[Arian]";
+			mes "...";
+			if (countitem(904) > 29) {
+				delitem 904,30; //Scorpion's_Tail
+				if (countitem(930) > 19) {
+					delitem 930,20; //Rotten_Bandage
+					if (countitem(1038) > 14) {
+						delitem 1038,15; //Petite_DiablOfs_Horn
+						if (countitem(7013) > 9) {
+							delitem 7013,10; //Coral_Reef
+						}
+					}
+				}
+			}
+			else {
+				mes "What, your mom drop you on the";
+				mes "head right after you were born?";
+				mes "Stop bein' stupid and get me";
+				mes "^FF000030 Scorpion Tails^000000, nimrod.";
+				close;
+			}
+			mes "Damn, you sure took your";
+			mes "sweet time bringing over this";
+			mes "over this crap. Okay, now bring";
+			mes "^FF000020 Rotten Bandages^000000.";
+			set sign_q,7;
+			close;
+		case 7:
+			mes "[Arian]";
+			mes "...";
+			if (countitem(930) > 19) {
+				delitem 930,20; //Rotten_Bandage
+				if (countitem(1038) > 14) {
+					delitem 1038,15; //Petite_DiablOfs_Horn
+					if (countitem(7013) > 9) {
+						delitem 7013,10; //Coral_Reef
+					}
+				}
+			}
+			else {
+				mes "Is it really that hard to get";
+				mes "^FF000020 Rotten Bandages^000000? Cuz if it";
+				mes "is, then you must really blow.";
+				mes "Now hustle it up, punk!";
+				close;
+			}
+			mes "You brought the bandages.";
+			mes "Okay short stuff, go and get";
+			mes "me ^FF000015 Little Evil Horn^000000. What";
+			mes "are you waiting for, a memo?";
+			mes "Get outta here~!";
+			set sign_q,8;
+			close;
+		case 8:
+			mes "[Arian]";
+			mes "...";
+			if (countitem(1038) > 14) {
+				delitem 1038,15; //Petite_DiablOfs_Horn
+				if (countitem(7013) > 9) {
+					delitem 7013,10; //Coral_Reef
+				}
+			}
+			else {
+				mes "I don't get it.";
+				mes "You don't have the";
+				mes "^FF000015 Little Evil Horn^000000";
+				mes "I told you to get.";
+				next;
+				mes "[Arian]";
+				mes "I see, so it's my";
+				mes "fault for not telling you";
+				mes "not to bring your crap face";
+				mes "back without 'em. ^333333*A-hem*^000000";
+				mes "Don't bring your crap face here without 15 Little Evil Horns!!";
+				close;
+			}
+			mes "My grandma coulda grown";
+			mes "out her beard in the time";
+			mes "it tookyou to come back.";
+			mes "Now hurry it up and get";
+			mes "me ^FF000010 Coral Reefs^000000!";
+			set sign_q,9;
+			close;
+		case 9:
+			mes "[Arian]";
+			if (countitem(7013) > 9) {
+				delitem 7013,10; //Coral_Reef
+			}
+			else {
+				mes "I don't care how pretty";
+				mes "they are or if you're ruining";
+				mes "the ecosystem! When I say";
+				mes "''bring ^FF000010 Coral Reefs^000000,'' you";
+				mes "better have them! All the";
+				mes "fish can die for all I care.";
+				close;
+			}
+			mes "Finally you're back.";
+			mes "Gimme a sec to count";
+			mes "all this stuff so I can make";
+			mes "sure you're not trying to";
+			mes "cheat. God help you if you";
+			mes "try to pull a fast one on me...!";
+			set sign_q,10;
+			close;
+		case 10:
+			mes "[Arian]";
+			mes "...";
+			mes "Alright. Go talk";
+			mes "to the guy to my left.";
+			mes "The dude at the counter.";
+			mes "What's-his-face, Ganaan.";
+			set sign_q,11;
+			close;
+		case 11:
+			mes "[Arian]";
+			mes "...";
+			mes "Alright. Go talk";
+			mes "to the guy to my left.";
+			mes "The dude at the counter.";
+			mes "What's-his-face, Ganaan.";
+			next;
+			mes "[Arian]";
+			mes "You wanna leave me";
+			mes "alone now and gimme";
+			mes "a little personal space?!";
+			mes "I need a break from looking";
+			mes "at your ugly mug, you know?";
+			close;
+		case 12:
+			mes "[Arian]";
+			mes "Let's see...";
+			mes "I'm looking at your";
+			mes "answers and they totally";
+			mes "suck. Take the test again";
+			mes "and do it right this time!";
+			next;
+			mes "[Arian]";
+			mes "Geez...";
+			mes "You're givin' Ganaan";
+			mes "a hard time. You hear";
+			mes "me? That's my job!";
+			set sign_q,11;
+			close;
+		case 13:
+			mes "[Arian]";
+			mes "Alright. The answers";
+			mes "you gave Ganaan tell me";
+			mes "you're not a total dumbass.";
+			mes "Now you're supposed to go see Daewoon in Payon. And don't forget to show him this Star thingee.";
+			if (BaseLevel < 60) {
+				getexp 3000,0;
+			}
+			else if (BaseLevel < 70) {
+				getexp 7500,0;
+			}
+			else if (BaseLevel < 80) {
+				getexp 10000,0;
+			}
+			else if (BaseLevel < 90) {
+				getexp 13000,0;
+			}
+			else if (BaseLevel < 99) {
+				getexp 18000,0;
+			}
+			set sign_q,14;
+			getitem 7177,1; //Part_Of_Star's_Sob
+			close;
+		case 14:
+			mes "[Arian]";
+			mes "...........";
+			mes "Payon...?";
+			mes "Daewoon?";
+			mes "Any of it ring a bell?";
+			mes "Cuz it really oughtta!";
+			close;
+		}
+	}
+	else {
+		mes "[Arian]";
+		mes "...";
+		mes "Shaddup and";
+		mes "lemme alone!";
+		mes "I'm thinking about";
+		mes "solving world hunger";
+		mes "here! Or somethin' like that.";
+		emotion e_dots;
+		close;
+	}
 }
 
+morocc_in,114,162,4	script	Young Man#sign	118,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 11) {
+		mes "[Gaanan]";
+		mes "The weather here in";
+		mes "Morocc is too hot for me.";
+		mes "I'm having a hard time just";
+		mes "trying to live here. Do you";
+		mes "know a nice and cool place";
+		mes "where I can work?";
+		emotion e_swt2;
+		close;
+	}
+	else if (sign_q == 11) {
+		mes "[Gaanan]";
+		mes "Oh, Arian sent you to me,";
+		mes "right? I'm sorry, but he takes";
+		mes "a little getting used to. Even";
+		mes "though I still have to get used";
+		mes "to his... mannerisms.";
+		next;
+		mes "[Gaanan]";
+		mes "Anyway, since he thinks it's";
+		mes "boring, Arian put me in charge";
+		mes "of the quiz portion of your test. Please carefully choose an";
+		mes "answer when I ask you a";
+		mes "question. Are you ready?";
+		next;
+		mes "[Gaanan]";
+		mes "Now, the first question.";
+		mes "Let's say that you just";
+		mes "found yourself on a deserted";
+		mes "island. What is the very first";
+		mes "thing that you should do?";
+		next;
+		switch(select("Look for fresh water.:Just wait for rescue.:Forage for food.:Explore the island.")) {
+		case 1:
+			set .@point_s,.@point_s+7;
+			break;
+		case 2:
+			set .@point_s,.@point_s+1;
+			break;
+		case 3:
+			set .@point_s,.@point_s+4;
+			break;
+		case 4:
+			set .@point_s,.@point_s+10;
+			break;
+		}
+		mes "[Gaanan]";
+		mes "The second question is...";
+		mes "You happen to be stuck in";
+		mes "a narrow place inside some";
+		mes "collapsed building. What";
+		mes "do you plan to do first?";
+		next;
+		switch(select("Scream for help.:Stay quiet.:Wait for death to come.:Find a way out.")) {
+		case 1:
+			set .@point_s,.@point_s+3;
+			break;
+		case 2:
+			set .@point_s,.@point_s+7;
+			break;
+		case 3:
+			set .@point_s,.@point_s+1;
+			break;
+		case 4:
+			set .@point_s,.@point_s+7;
+			break;
+		}
+		mes "[Gaanan]";
+		mes "Now, the third question.";
+		mes "You're on some dungeon";
+		mes "expedition with your friends,";
+		mes "but you got lost somehow.";
+		mes "How do you handle it?";
+		next;
+		switch(select("Try to find my friends.:Find a way out.:Stay put.:Continue exploring the dungeon.")) {
+		case 1:
+			break;
+		case 2:
+			set .@point_s,.@point_s+5;
+			break;
+		case 3:
+			set .@point_s,.@point_s+10;
+			break;
+		case 4:
+			set .@point_s,.@point_s+1;
+			break;
+		}
+		mes "[Ganaan]";
+		mes "Here's the fourth question.";
+		mes "You're with your friends inside";
+		mes "a mansion with no exit. What do";
+		mes "you do first when a murder happens inside the mansion?";
+		next;
+		switch(select("Wait for the case to get solved.:Try to find my friends first.:Find a way out.:Solve the murder case on my own.:Kill the others before they kill me.")) {
+		case 1:
+			set .@point_s,.@point_s+5;
+			break;
+		case 2:
+			set .@point_s,.@point_s+7;
+			break;
+		case 3:
+			set .@point_s,.@point_s+3;
+			break;
+		case 4:
+			set .@point_s,.@point_s+1;
+			break;
+		case 5:
+			set .@point_s,.@point_s+1;
+			break;
+		}
+		mes "[Gaanan]";
+		mes "The fifth question is...";
+		mes "You hear that the end of";
+		mes "the world is in one week.";
+		mes "So what do you do during";
+		mes "this final week?";
+		next;
+		switch(select("Wait to see the end.:Plant an apple tree.:Look to move to a different world.:What else? Save the world.:What else? Go on a crime spree.")) {
+		case 1:
+			set .@point_s,.@point_s+5;
+			break;
+		case 2:
+			set .@point_s,.@point_s+3;
+			break;
+		case 3:
+			set .@point_s,.@point_s+7;
+			break;
+		case 4:
+			set .@point_s,.@point_s+10;
+			break;
+		case 5:
+			set .@point_s,.@point_s+1;
+			break;
+		}
+		mes "[Gaanan]";
+		mes "Oh! We're done!";
+		mes "Okay, let me give";
+		mes "these answers to Arian.";
+		mes "Sooo... Talk to him and";
+		mes "he'll let you know how";
+		mes "you did.";
+		if (.@point_s > 33) {
+			set sign_q,13;
+		}
+		else {
+			set sign_q,12;
+		}
+		close;
+	}
+	else if (sign_q < 14) {
+		mes "[Gaanan]";
+		mes "Hm...?";
+		mes "Arian is the one";
+		mes "who's grading your";
+		mes "test. But I understand.";
+		mes "If you failed, I'd want";
+		mes "to avoid him too...";
+		close;
+	}
+	else {
+		mes "[Gaanan]";
+		mes "^333333*Sigh...*^000000";
+		mes "I wish the weather'd";
+		mes "cool down, even just a little.";
+		mes "While I'm asking for miracles,";
+		mes "I may as well wish for a billion kajillion zeny. And maybe a yacht.";
+		close;
+	}
+}
 
-morocc_in,115,154,5	script	Rogue	810,{
-
-    if (signquest == 5) {
-        mes "[Arian]";
-        mes "..........";
-        mes "Payon...?";
-        mes "Daewooon?";
-        mes "Any of it ring a bell?";
-        mes "Cuz it really oughtta!";
-        close;
-    }
-    else if (signquest < 3 || signquest > 5) {
-        emotion e_dots;
-        end;
-    } else if (signquest == 3) {
-
-        mes "[Arian]";
-        mes "...";
-        mes "Who the hell";
-        mes "are you, jerkface?";
-        next;
-        menu "Metz sent me here.",s_Metz,"^0000FF" + strcharinfo(0) + "^000000",s_Name,"Who are you then?",-;
-
-        mes "[Arian]";
-        mes "...";
-        mes "......";
-        next;
-        percentheal -50,0;
-        mes "[Arian]";
-        mes "...";
-        mes "......";
-        mes "Your mom.";
-        mes "Now get the";
-        mes "hell outta here!";
-        close;
-
-s_Metz:
-
-        mes "[Arian]";
-        mes "Oh yeah...?";
-        mes "Well, I'm sending you";
-        mes "back! No way I'm fallin'";
-        mes "for that trick, chump!";
-        close2;
-        warp "morocc",279,173;
-        end;
-
-s_Name:
-
-        mes "[Arian]";
-        mes "Wha...?";
-        mes "^0000FF" + strcharinfo(0) + "^000000.";
-        mes "Yeah, okay. Metz did";
-        mes "mention something about";
-        mes "you. You're here for";
-        mes "the test, right?";
-        next;
-        mes "[Arian]";
-        mes "Aliright, this";
-        mes "test is simple.";
-        mes "I tell you to bring me";
-        mes "a bunch of items and";
-        mes "you go get them.";
-        next;
-        mes "[Arian]";
-        mes "I know you jerkward adventurers";
-        mes "are always talking and you share";
-        mes "the answers for any test some dude";
-        mes "is givin' out. 'Course, it doesn't";
-        mes "help that I use the same test";
-        mes "every frickin' time...";
-        next;
-        mes "[Arian]";
-        mes "Now, you gotta bring and only";
-        mes "have the item I ask you for when";
-        mes "you come to me. If you know that";
-        mes "I'll be asking for something later";
-        mes "and you happen to have it, I'll";
-        mes "straight up ^FF0000jack it^000000.";
-        next;
-        mes "[Arian]";
-        mes "The first item?";
-        mes "Gimme ^FF0000100 Fluff^000000.";
-        mes "Bring that and I'll";
-        mes "tell you what to";
-        mes "bring next.";
-        set signquest,4;
-        set arianstest,1;
-        close;
-    } else if (signquest == 4) {
-
-        if (arianstest == 1) {
-            if (countitem(914) < 100)goto s_Bringfluff;
-            delitem 914,100;
-            mes "[Arian]";
-            mes "What the hell took you so";
-            mes "long? Now bring me ^FF000050 Poison Spores^000000";
-            mes "or I'll kick your ass.";
-            set arianstest,2;
-            close2;
-            goto Verifyitems;
-
-s_Bringfluff:
-            mes "[Arian]";
-            mes "...";
-            mes "Hey. What the hell's wrong";
-            mes "with you? Hurry and get me";
-            mes "^FF0000100 Fluff^000000, ya slacker.";
-            close;
-        }
-        else if (arianstest == 2) {
-            if (countitem(7033) < 50)goto s_Bringspore;
-            delitem 7033,50;
-            mes "[Arian]";
-            mes "...";
-            mes "It's about time you";
-            mes "got here with those";
-            mes "Poison Spores. Now, go";
-            mes "and get ^FF000030 Scorpion Tails";
-            set arianstest,3;
-            close2;
-            goto Verifyitems;
-
-s_Bringspore:
-            mes "[Arian]";
-            mes "...";
-            mes "Hey. What part of 'Get me";
-            mes "^FF000050 Poison Spores^000000 or I'll";
-            mes "kick your ass, don't";
-            mes "you understand?";
-            close;
-        } else if (arianstest == 3) {
-            if (countitem(904) < 30)goto s_Bringtails;
-            delitem 904,30;
-            mes "[Arian]";
-            mes "...";
-            mes "Damn, you sure took your";
-            mes "sweet time bringing over this";
-            mes "crap. Okay, now bring";
-            mes "^FF000020 Rotten Bandages^000000.";
-            set arianstest,4;
-            close2;
-            goto Verifyitems;
-
-s_Bringtails:
-            mes "[Arian]";
-            mes "...";
-            mes "What, your mom drop you on the";
-            mes "head right after you were born?";
-            mes "Stop bein' stupid and get me";
-            mes "^FF000030 Scorpion Tails^000000, nimrod.";
-            close;
-        } else if (arianstest == 4) {
-            if (countitem(930) < 20)goto s_Bringbandages;
-            delitem 930,20;
-            mes "[Arian]";
-            mes "...";
-            mes "You brought the bandages.";
-            mes "Okay short stuff, go and get";
-            mes "me ^FF000015 Little Evil Horn^000000. What";
-            mes "are you waiting for, a memo?";
-            mes "Get outta here~!";
-            set arianstest,5;
-            close2;
-            goto Verifyitems;
-
-s_Bringbandages:
-            mes "[Arian]";
-            mes "...";
-            mes "Is it really that hard to get";
-            mes "^FF000020 Rotten Bandages^000000? Cuz if it";
-            mes "is, then you must really blow.";
-            mes "How hustle it up, punk!";
-            close;
-        } else if (arianstest == 5) {
-            if (countitem(1038) < 15)goto s_Bringhorns;
-            delitem 1038,15;
-            mes "[Arian]";
-            mes "...";
-            mes "My grandma coulda grown";
-            mes "out her beard in the time";
-            mes "it took you to come back.";
-            mes "Now hurry it up and get";
-            mes "me ^FF000010 Coral Reefs^000000!";
-            set arianstest,6;
-            close2;
-            goto Verifyitems;
-
-s_Bringhorns:
-            mes "[Arian]";
-            mes "...";
-            mes "I don't get it.";
-            mes "You don't have the";
-            mes "^FF000015 Little Evil Horn";
-            mes "I told you to get.";
-            next;
-            mes "[Arian]";
-            mes "I see, so it's my";
-            mes "fault for not telling you";
-            mes "not to bring your crap face";
-            mes "back without 'em. ^222222*A-hem*";
-            mes "Don't bring your crap face here";
-            mes "without 15 Little Evil Horns!!";
-            close;
-        } else if (arianstest == 6) {
-            if (countitem(7013) < 10)goto s_Bringcorals;
-            delitem 7013,10;
-            mes "[Arian]";
-            mes "Finally you're back";
-            mes "Gimme a sec to count";
-            mes "all this stuff so I can make";
-            mes "sure you're not trying to";
-            mes "cheat. God help you if you";
-            mes "try to pull a fast one on me...!";
-            set arianstest,7;
-            close;
-
-s_Bringcorals:
-            mes "[Arian]";
-            mes "I don't care how pretty";
-            mes "they are or if you're ruining";
-            mes "the ecosystem! When I say";
-            mes "'bring ^FF000010 Coral Reefs^000000',you";
-            mes "better have them! All the";
-            mes "fish can die for all I care.";
-            close;
-        } else if (arianstest == 7) {
-            mes "[Arian]";
-            mes "...";
-            mes "Alright. Go talk";
-            mes "to the guy to my left.";
-            mes "The dude at the counter.";
-            mes "What's-his-face, Ganaan.";
-            set arianstest,8;
-            close;
-        } else if (arianstest == 8) {
-            if (gaanantest == 1) {
-                if (gaananpoint < 3)goto s_Suck;
-                mes "[Arian]";
-                mes "Alright. The answers";
-                mes "you have Ganaan tell me";
-                mes "you're not a total dumbass.";
-                mes "Now you're supposed to go see";
-                mes "Daewoon in Payon. And don't forget";
-                mes "to show him this Star thingiee.";
-                getitem 7177,1;
-                set signquest,5;
-                close;
-s_Suck:
-                mes "[Arian]";
-                mes "Let's see...";
-                mes "I'm looking at your";
-                mes "answers and they totally";
-                mes "suck. Take the test again";
-                mes "and do it right this time!";
-                next;
-                mes "[Arian]";
-                mes "Geez...";
-                mes "You're givin' Ganaan";
-                mes "a hard time. You hear";
-                mes "me? That's my job!";
-                set gaananpoint,0;
-                set gaanantest,0;
-                close;
-            }
-            mes "[Arian]";
-            mes "You wanna leave me";
-            mes "alone now and gimme";
-            mes "a little personal space?!";
-            mes "I need a break from looking";
-            mes "at your ugly mug, you know?";
-            close;
-        }
-
-    }
-
-Verifyitems:
-
-    if (arianstest == 2 && countitem(7033) > 49) {
-        delitem 7033,countitem(7033);
-        mes "[Arian]";
-        mes "Hey! What did I tell you";
-        mes "about bringing stuff before";
-        mes "I asked you about it";
-        next;
-        mes "[Arian]";
-        mes "I'll confiscate those Poison Spores.";
-        close2;
-    } else if (arianstest == 3 && countitem(904) > 29) {
-        delitem 904,countitem(904);
-        mes "[Arian]";
-        mes "Hey! What did I tell you";
-        mes "about bringing stuff before";
-        mes "I asked you about it";
-        next;
-        mes "[Arian]";
-        mes "I'll take those Scorpion Tails.";
-        close2;
-    } else if (arianstest == 4 && countitem(930) > 19) {
-        delitem 930,countitem(930);
-        mes "[Arian]";
-        mes "Hey! What did I tell you";
-        mes "about bringing stuff before";
-        mes "I asked you about it";
-        next;
-        mes "[Arian]";
-        mes "I'll take those Rotten Bandages.";
-        close2;
-    } else if (arianstest == 5 && countitem(1038) > 14) {
-        delitem 1038,countitem(1038);
-        mes "[Arian]";
-        mes "Hey! What did I tell you";
-        mes "about bringing stuff before";
-        mes "I asked you about it";
-        next;
-        mes "[Arian]";
-        mes "I'll confiscate those Little Evil Horns.";
-        close2;
-    } else if (arianstest == 6 && countitem(7013) > 9) {
-        delitem 7013,countitem(7013);
-        mes "[Arian]";
-        mes "Hey! What did I tell you";
-        mes "about bringing stuff before";
-        mes "I asked you about it";
-        next;
-        mes "[Arian]";
-        mes "I'll confiscate those Coral Reefs.";
-        close2;
-    }
-    end;
+payon,154,170,3	script	Hagin#sign	78,{
+	mes "[Hagin]";
+	mes "Have you heard?";
+	mes "Payon's most eligible";
+	mes "bachelor is back home!";
+	next;
+	mes "[Hagin]";
+	mes "He was a little brat";
+	mes "back when he was a kid,";
+	mes "but now he's grown up to";
+	mes "be the manliest of men!";
+	mes "No wonder all the ladies";
+	mes "just can't resist him!";
+	next;
+	mes "[Hagin]";
+	mes "Heh heh...";
+	mes "With this beautiful";
+	mes "face and charming figure...";
+	mes "I'm gonna seduce him.";
+	next;
+	switch(select("Who are you talking about?:You're freaking me out!")) {
+	case 1:
+		mes "[Hagin]";
+		mes "You don't know";
+		mes "Daewoon, the most";
+		mes "beautiful man in all";
+		mes "of Payon and maybe";
+		mes "even the world?";
+		next;
+		mes "[Hagin]";
+		mes "He left home to become stronger";
+		mes "when he was just a boy. I had no idea he would come back as such ";
+		mes "a fine specimen of a man...";
+		next;
+		select("I'd like to meet this Daewoon.");
+		mes "[Hagin]";
+		mes "Oh, I see~";
+		if (Sex) {
+			mes "You plan to ask him";
+			mes "to show you some fighting";
+			mes "pointers, do you? You men";
+			mes "are all the same: not as";
+			mes "cool or tough as Daewoon!";
+		}
+		else {
+			mes "Interested, are you?";
+			mes "Well, you'll have to get";
+			mes "in line. So many women";
+			mes "and only one Daewoon...";
+			mes "^333333*Sigh*^000000";
+		}
+		next;
+		mes "[Hagin]";
+		mes "Anyway, Daewoon";
+		mes "is staying in the annex";
+		mes "to the Payon Castle. If you";
+		mes "want to see him for yourself,";
+		mes "why don't you go there?";
+		close;
+	case 2:
+		mes "[Hagin]";
+		mes "Freaking you out?";
+		mes "Excuuuuse me~!";
+		mes "I'll have you know that";
+		mes "a flower's life is brief.";
+		mes "I better snag Daewoon";
+		mes "while I still can~";
+		emotion e_an;
+		close;
+	}
 }
 
-payon_in03,81,16,8	script	Maid::Sohee	1170,{
+payon_in03,81,22,4	script	Maid#a1	1170,{
+	end;
+}
 
-end;
+payon_in03,81,22,4	script	Maid#a2	111,{
+	mes "[Maid]";
+	mes "Welcome to the";
+	mes "Payon Castle annex";
+	mes "where Master Daewoon";
+	mes "is staying.";
+	close;
+}
 
+payon_in03,79,22,4	script	Maid#b1	1404,{
+	end;
 }
 
-payon_in03,78,16,8	script	Maid::Miyabi	1404,{
+payon_in03,79,22,4	script	Maid#b2	111,{
+	mes "[Maid]";
+	mes "Welcome.";
+	mes "Are you another";
+	mes "visitor for Master";
+	mes "Daewoon?";
+	close;
+}
 
-end;
+payon_in03,81,15,1	script	Maid#c1	1170,{
+	end;
+}
 
+payon_in03,81,15,1	script	Maid#c2	111,{
+	mes "[Maid]";
+	mes "Greetings.";
+	mes "Welcome to the";
+	mes "Annex to Payon Castle.";
+	mes "Have you come here to";
+	mes "see Master Daewoon?";
+	close;
 }
 
-payon_in03,13,31,4	script	Maid::Nymph	1416,{
+payon_in03,79,15,1	script	Maid#d1	1404,{
+	end;
+}
 
-end;
+payon_in03,79,15,1	script	Maid#d2	111,{
+	mes "[Maid]";
+	mes "Welcome to the";
+	mes "Payon Castle Annex.";
+	mes "Master Daewoon is";
+	mes "currently lodging here.";
+	mes "Have you come to see him?";
+	close;
+}
 
+payon_in03,8,31,4	script	Maid#e1	1416,{
+	end;
 }
 
-payon_in03,81,21,4	duplicate(Sohee)	Maid::Sohee2	1170
-payon_in03,78,21,4	duplicate(Miyabi)	Maid::Miyabi2	1404
-payon_in03,8,31,4	duplicate(Nymph)	Maid::Nymph2	1416
-
-payon_in03,11,31,4	script	Daewoon	808,{
-
-    mes "[Daewoon]";
-    mes "Mwah ah hah!";
-    mes "Feasting and merriment,";
-    mes "wine, women and song!";
-    mes "I could ask for nothing more!";
-    next;
-    mes "[Daewoon]";
-    mes "The most scumptious";
-    mes "delicacies are all mine to";
-    mes "taste! And I'm not just talking";
-    mes "about the food. Mwah ah hah!";
-    mes "I'm the king of the world!";
-    next;
-
-    if (signquest < 4 || signquest > 6) {
-        mes "[Daewoon]";
-        mes "Mwah ah hah~!";
-        mes "I couldn't be happier!";
-        mes "What more do I need?";
-        mes "Gourmet food, find wine";
-        mes "nubile women...!";
-        close;
-    } else if (signquest == 5) {
-        mes "[Daewoon]";
-        mes "Oh, a visitor?";
-        mes "I'm sorry, but I believe";
-        mes "you're an uninvited guest~";
-        mes "You'll have to forgive me";
-        mes "if I wish to spend my time with";
-        mes "maidens as opposed to men";
-        next;
-        mes "[" + strcharinfo(0) + "]";
-        mes "Sure...";
-        mes "But first, would you";
-        mes "take a look at this?";
-        next;
-        mes "^3355FFYou carefully take";
-        mes "out the small, lucid";
-        mes "jewel that Arian gave";
-        mes "you and reveal it to";
-        mes "Daewoon's roving eyes.";
-        next;
-        emotion e_gasp;
-        mes "[Daewoon]";
-        mes "Eh? Why that's...";
-        mes "I see now, Arian must";
-        mes "have sent you! Oh you";
-        mes "should have said so";
-        mes "at the very beginning~";
-        next;
-        mes "[Daewoon]";
-        mes "My apologies~";
-        mes "Lately I've been attracting";
-        mes "all sorts of strange attention";
-        mes "like some kind of teen celebrity.";
-        mes "I've gotten used to being too";
-        mes "careful in screening out the";
-        mes "dangerous sort.";
-        next;
-        mes "[Daewoon]";
-        mes "Now then.";
-        mes "Do you have any";
-        mes "idea what that jewel";
-        mes "you're holding actually is?";
-        next;
-        menu "Kind of?",-,"How the hell would I know?",s_How,"No, but would you tell me?",s_Tell;
-
-        mes "[Daewoon]";
-        mes "Oh...!";
-        mes "You must be much";
-        mes "smarter than I expected.";
-        mes "So tell me, what do you";
-        mes "understand about this jewel?";
-        next;
-        menu "It's handy.",-,"I actually don't know...",s_Honest;
-
-        emotion e_dots;
-        mes "[Daewoon]";
-        mes "Mmm...?";
-        mes "Handy? If you truly";
-        mes "understood, I don't";
-        mes "think you'd describe this";
-        mes "jewel as merely 'handy'.";
-        next;
-        goto s_Cont;
-s_Honest:
-        emotion e_pif;
-        mes "[Daewoon]";
-        mes "Really?";
-        mes "Mm. At least you";
-        mes "admit it ^000200*Sigh*";
-        next;
-        goto s_Cont;
-s_How:
-        emotion e_dots;
-        mes "[Daewoon]";
-        mes "...";
-        mes "A rather crass way";
-        mes "of speaking, but perhaps";
-        mes "you picked it up from Arian.";
-        mes "In any case, let me explain.";
-        next;
-        goto s_Cont;
-s_Tell:
-        mes "[Daewoon]";
-        mes "Didn't Arian tell you";
-        mes "anything? I appreciate";
-        mes "your honesty. And I don't";
-        mes "mind chatting a while, I much";
-        mes "prefer speaking to honest people";
-        mes "rather than foolish know-it-alls.";
-        next;
-s_Cont:
-        mes "[Daewoon]";
-        mes "That ^301A8ASobbing Starlight^000000";
-        mes "is no mere jewel. It is a key";
-        mes "item for unlocking some incredible";
-        mes "power. I believe Metz happened to";
-        mes "obtain a piece, though I am";
-        mes "unsure how...";
-        next;
-        mes "[Daewoon]";
-        mes "Metz has asked me and";
-        mes "some other friends who";
-        mes "hold the fragments of the";
-        mes "Sobbing Starlight to entrust";
-        mes "them to someone worthy of";
-        mes "finding the power it leads to.";
-        next;
-        mes "[Daewoon]";
-        mes "Of course, we all agreed";
-        mes "and now you're here for me";
-        mes "to judge whether or not you're";
-        mes "qualified for this task. Now,";
-        mes "are you ready for my test?";
-        next;
-        menu "I'M READY! YEEAH!",-,"I'll do my best!",s_Best,"To hell with this!",s_Rude,"Fine. Let's get it over with",s_GetOver;
-
-        mes "[Daewoon]";
-        mes "Ooh~";
-        mes "Such unbridled";
-        mes "enthusiasm usually";
-        mes "goes more good than harm.";
-        next;
-        goto s_Question;
-
-s_Best:
-        emotion e_ok;
-        mes "[Daewoon]";
-        mes "Mwah ah hah";
-        mes "That's exactly what";
-        mes "I wanted to hear! That";
-        mes "kind of quiet and careful";
-        mes "confidence will help you";
-        mes "in the future, you'll see~";
-        next;
-        goto s_Question;
-s_Rude:
-
-        mes "[Daewoon]";
-        mes "E...";
-        mes "Excuse me?";
-        next;
-        mes "[Daewoon]";
-        mes "How can you be";
-        mes "so ridiculous at";
-        mes "a time like this?";
-        mes "Either mind your manners";
-        mes "or don't take this test at";
-        mes "all! ^000200*SLAP--!!*";
-        next;
-        goto s_Question;
-
-s_GetOver:
-        emotion e_dots;
-        mes "[Daewoon]";
-        mes "Hmm. That kind of half-hearted";
-        mes "attitude won't get you very far on";
-        mes "your adventures. Still, so long as";
-        mes "you don't get overly negative, you";
-        mes "should have a decent chance of";
-        mes "surviving your challenges.";
-        next;
-s_Question:
-        emotion e_hmm;
-        set @DaewoonTest,0;
-        mes "[Daewoon]";
-        mes "Now, Metz expects me to ask";
-        mes "some rather serious questions,";
-        mes "but that really isn't my style.";
-        mes "For this test, why don't we just";
-        mes "talk? Just answer me honestly and";
-        mes "light heartedly, alright?";
-        next;
-        mes "[Daewoon]";
-        mes "So...";
-        mes "Do you have a lot";
-        mes "of friends that you can";
-        mes "constantly party with?";
-        next;
-        menu "Yes, I do",-,"I prefer soloing.",s_Solo,"I am lonely.",s_Lonely;
-
-        set @DaewoonTest,1;
-        emotion e_omg;
-        mes "[Daewoon]";
-        mes "Oh, that's great~!";
-        mes "To have many friends";
-        mes "is a priceless blessing.";
-        mes "Friends bring us joy and";
-        mes "aid when we find ourselves";
-        mes "suffering from difficulties.";
-        next;
-        mes "[Daewoon]";
-        mes "Wouldn't you";
-        mes "agree that being";
-        mes "really close friends";
-        mes "with someone can be";
-        mes "a life long benefit?";
-        next;
-        goto s_Mobtrain;
-
-s_Solo:
-
-        mes "[Daewoon]";
-        mes "Well, everybody";
-        mes "needs to be alone once";
-        mes "in a while. And there are";
-        mes "some battles you must";
-        mes "fight all on your own.";
-        next;
-        mes "[Daewoon]";
-        mes "Also, if you never";
-        mes "deal with other people,";
-        mes "you may grow selfish or";
-        mes "needy. It's better to go";
-        mes "out and meet people,";
-        mes "don't you think?";
-        next;
-        goto s_Mobtrain;
-
-s_Lonely:
-
-        mes "[Daewoon]";
-        mes "You don't have any";
-        mes "friends at all? Well,";
-        mes "you better learn how";
-        mes "to get along with others";
-        mes "as soon as you can...!";
-        next;
-s_Mobtrain:
-        mes "[Daewoon]";
-        mes "Now, what's your opinion";
-        mes "on purposely getting lots";
-        mes "of monsters to follow you";
-        mes "around. I believe this is";
-        mes "called 'Mob Training...'";
-        next;
-        menu "Awesome~!",-,"I hate people who do that.",s_Hate,"I do it sometime...",s_Sometimes;
-
-        emotion e_pif;
-        mes "[Daewoon]";
-        mes "But...";
-        mes "Wouldn't that be really";
-        mes "rude to anyone else hunting";
-        mes "on that same map? I think";
-        mes "it would even interfer with";
-        mes "someone else's gameplay...";
-        next;
-        mes "[Daewoon]";
-        mes "Perhaps you should try";
-        mes "to consider other people's";
-        mes "feelings. Mob training seems";
-        mes "to only be good at getting other";
-        mes "people angry with you...";
-        next;
-        goto s_Woe;
-s_Hate:
-        set @DaewoonTest,@DaewoonTest + 1;
-        mes "[Daewoon]";
-        mes "Really?";
-        mes "I do too!";
-        next;
-        mes "[Daewoon]";
-        mes "Just the other day, I've";
-        mes "heard some ruffians boasting";
-        mes "of their mob training activities.";
-        mes "But personally, I feel they were";
-        mes "compensating for their own";
-        mes "shortcomings.";
-        next;
-        mes "[Daewoon]";
-        mes "Such behaviour truly";
-        mes "bothers me. Although I have";
-        mes "spent years in developing an";
-        mes "unflappable personality, I find";
-        mes "myself irked when encountering";
-        mes "such troublemakers.";
-        next;
-        emotion e_no1;
-        mes "[Daewoon]";
-        mes "When you face obstacles";
-        mes "in your own training, never give in";
-        mes "to weakness. Assert yourself and";
-        mes "find the determination to overcome";
-        mes "your tribulations with honor!";
-        next;
-        goto s_Woe;
-s_Sometimes:
-        mes "[Daewoon]";
-        mes "At least you're honest.";
-        mes "But let me say that I cannot";
-        mes "condone that sort of weak willed";
-        mes "behavior. True strength can only";
-        mes "be found through honor.";
-        mes "Remember that.";
-        next;
-        mes "[Daewoon]";
-        mes "In the face of overwhelming";
-        mes "odds, do not despair. After all,";
-        mes "what is achievment if it is not";
-        mes "earned without difficulty? The";
-        mes "greater the challenge, the";
-        mes "greater the glory.";
-        next;
-        mes "[Daewoon]";
-        mes "Even if you are having a hard ";
-        mes "time, try to take a firm";
-        mes "stand. One day, you will realize";
-        mes "how strong you have become.";
-        next;
-        mes "[Daewoon]";
-        mes "And...";
-        mes "Don't ever partake in";
-        mes "mob training again, okay?";
-        next;
-s_Woe:
-        mes "[Daewoon]";
-        mes "Anyway, I'm sure you're";
-        mes "aware of the War of Emperium";
-        mes "in which might guilds all across";
-        mes "Rune-Midgard battle for guild";
-        mes "castle dominion. It's actually";
-        mes "quite popular, really.";
-        next;
-        mes "[Daewoon]";
-        mes "Now imagine that both of us";
-        mes "are in the midst of a heated guild";
-        mes "war. The sounds of explosions and";
-        mes "earth shaking magic spells are all";
-        mes "we can hear. At any time, we can";
-        mes "be lost in that mindless chaos.";
-        next;
-        mes "[Daewoon]";
-        mes "Finally, through incredibly";
-        mes "good fortune, we manage to";
-        mes "infiltrate the enemy guild castle";
-        mes "and reach their Emperium. If we";
-        mes "destroy that Emperium, that castle";
-        mes "will belong to our guild.";
-        next;
-        mes "[Daewoon]";
-        mes "However...! This is";
-        mes "no ordinary Emperium!";
-        mes "It is a masterful sculpture";
-        mes "of a gorgeous Priestess!";
-        mes "Answer me, adventurer!";
-        mes "Would you still destroy it?!";
-        next;
-        menu "Destroy it!",-,"I can't destroy such beauty...",s_Beauty,"I'd close my eyes, then destroy it.",s_Eyes;
-
-        mes "[Daewoon]";
-        mes "Hmm. You have a truly";
-        mes "strong will. Then again,";
-        mes "perhaps you lack a try";
-        mes "appreciation for beauty.";
-        mes "Even in Emperium form, how";
-        mes "could you harm a Priestess?";
-        next;
-        goto s_Guild2;
-s_Beauty:
-
-        set @DaewoonTest,@DaewoonTest + 1;
-        mes "[Daewoon]";
-        mes "Ah yes! I felt you would answer";
-        mes "that way! We must cherish and";
-        mes "protect what is beautiful in this";
-        mes "world. I would never be able to";
-        mes "harm a Priestess, even in";
-        mes "statue form...";
-        next;
-        goto s_Guild;
-s_Eyes:
-
-        mes "[Daewoon]";
-        mes "Interesting...!";
-        mes "Although you cherish";
-        mes "the beauty of the Priestess,";
-        mes "your loyalty to your guild";
-        mes "proves stronger. A most";
-        mes "admirable attitude!";
-        next;
-s_Guild2:
-        mes "[Daewoon]";
-        mes "But yes, if it was";
-        mes "me, I would protect that";
-        mes "Priestess-shaped Emperium";
-        mes "until the end of the guild war.";
-        mes "Mwah ah hah~!";
-        next;
-s_Guild:
-        mes "[Daewoon]";
-        mes "While we're on the topic";
-        mes "of guilds, let me present";
-        mes "another guild related scenario.";
-        mes "Let's say that you joined a very";
-        mes "popular guild with many allies,";
-        mes "as well as formidable enemies.";
-        next;
-        mes "[Daewoon]";
-        mes "Now, during one of your";
-        mes "hunts, you happen to meet";
-        mes "a member of one of your enemy";
-        mes "guilds. The two of you are the";
-        mes "only people on that map. Suddenly,";
-        mes "he finds himself in mortal danger!";
-        next;
-        mes "[Daewoon]";
-        mes "This enemy guild member";
-        mes "begins to yell for help. Now,";
-        mes "would you give your enemy";
-        mes "the help that he needs?";
-        next;
-        menu "Yes of course!",-,"I'd pretend not to hear anything.",s_Hear,"I'd make fun of him, then run off.",s_Fun;
-
-        set @DaewoonTest,@DaewoonTest + 1;
-        mes "[Daewoon]";
-        mes "Ah, you would help him!";
-        mes "Good, good. I'm glad to see";
-        mes "that you understand such";
-        mes "pettiness should not get in the way";
-        mes "of doing what is good and right.";
-        next;
-        goto s_Life;
-s_Hear:
-        set @DaewoonTest,@DaewoonTest + 1;
-        mes "[Daewoon]";
-        mes "True, you're not really";
-        mes "obligated to help your";
-        mes "enemy. Besides, you may";
-        mes "hurt his feelings once he";
-        mes "realizes that he's had to";
-        mes "depend on his rival for help.";
-        next;
-        goto s_Life;
-s_Fun:
-        mes "[Daewoon]";
-        mes "Even though he is";
-        mes "your enemy, I still";
-        mes "believe it's important";
-        mes "that you treat him with";
-        mes "respect. Where is your honor?";
-        next;
-s_Life:
-        mes "[Daewoon]";
-        mes "Well, there's one";
-        mes "last thing I want to";
-        mes "know about you. It's the";
-        mes "most important question";
-        mes "in the world once you";
-        mes "think about it.";
-        next;
-        mes "[Daewoon]";
-        mes "...";
-        mes "......";
-        mes "Do you enjoy life?";
-        next;
-        menu "Yes",-,"No",s_No;
-
-        set @DaewoonTest,@DaewoonTest + 1;
-        emotion e_heh;
-        mes "[Daewoon]";
-        mes "I'm glad.";
-        mes "When you don't live";
-        mes "with zeal, it's easy to";
-        mes "forget your goals and your";
-        mes "purpose for living. Don't have";
-        mes "any? Then make some up.";
-        next;
-        mes "[Daewoon]";
-        mes "I hope you always enjoy";
-        mes "life as much as you can.";
-        mes "As for me, I'm always happy";
-        mes "with my wine, women and song~";
-        mes "Mwah ah hah~!";
-        next;
-        goto s_Last;
-
-s_No:
-        mes "[Daewoon]";
-        mes "I understand.";
-        mes "People cannot be happy";
-        mes "all the time. Sometimes";
-        mes "it's easy to forget your";
-        mes "goals and purpose in life.";
-        next;
-        mes "[Daewoon]";
-        mes "But you know what? If you";
-        mes "have just one dream, one goal";
-        mes "to strive towards, things shall";
-        mes "get better. If you think you don'";
-        mes "have dreams, look back to your";
-        mes "past. What you remember may";
-        mes "surprise you.";
-        next;
-        mes "[Daewoon]";
-        mes "It's important to look forward,";
-        mes "but first you must find what is";
-        mes "truly precious to you before you";
-        mes "can define your happiness. That's";
-        mes "why I think it's good to";
-        mes "experience new things as wel";
-        mes "as reflect.";
-        next;
-        emotion e_no1;
-        mes "[Daewoon]";
-        mes "Now, what's precious to me?";
-        mes "Three things, actually...";
-        mes "Wine. Women. And song!";
-        mes "Though if I had to rank them,";
-        mes "women would top that list.";
-        mes "Mwah ah hah~!";
-        next;
-s_Last:
-        if (@DaewoonTest == 5) {
-            mes "[Daewoon]";
-            mes "You know, after talking with";
-            mes "you for a while, I now feel fairly";
-            mes "comfortable with leaving you this";
-            mes "piece of the Sobbing Starlight.";
-            mes "Somehow, I think you're strong";
-            mes "enough to get all the pieces.";
-            next;
-            mes "[Daewoon]";
-            mes "I hope you will pass the rest of";
-            mes "the tests and acquire the power.";
-            next;
-            mes "[Daewoon]";
-            mes "Oh yes! Your next test";
-            mes "examiner is ^FF0000Sir Jore^000000, also";
-            mes "known as the Ghost of Al de Baran.";
-            mes "Although he's always sick, he has";
-            mes "great passion for his research.";
-            getitem 7177,1;
-            set signquest,6;
-            next;
-            mes "[Daewoon]";
-            mes "Alright, then.";
-            mes "Good luck in";
-            mes "Al de Baran~!";
-            close;
-        } else {
-            mes "[Daewoon]";
-            mes "It pains me to say this,";
-            mes "but I do not think you're";
-            mes "worthy of holding my fragment";
-            mes "of the Sobbing Starlight. But";
-            mes "I am willing to give you";
-            mes "another chance~";
-            close;
-        }
-
-    }
-    else if (signquest == 6) {
-        mes "[Daewoon]";
-        mes "Mwah ah hah!";
-        mes "Feasting and merriment,";
-        mes "wine, women and song!";
-        mes "I could ask for nothing more!";
-        next;
-        mes "[Daewoon]";
-        mes "The most scrumptious";
-        mes "delicacies are all mine to";
-        mes "taste! And I'm not just talking";
-        mes "about the food. Mwah ah hah!";
-        mes "I'm the king of the world!";
-        next;
-        mes "[Daewoon]";
-        mes "Hm...?";
-        mes "Weren't you on";
-        mes "your way to find";
-        mes "^FF0000Sir Jore^000000 in Al de Baran?";
-        next;
-        mes "[Daewoon]";
-        mes "Oh, having trouble";
-        mes "finding him, are you?";
-        mes "Well, he's fairly shy, but";
-        mes "I'm sure he's hiding some";
-        mes "place in that town.";
-        close;
-    }
+payon_in03,8,31,4	script	Maid#e2	111,{
+	mes "[Chamberlain]";
+	mes "Please refrain";
+	mes "from attacking";
+	mes "the servants.";
+	next;
+	mes "[Chamberlain]";
+	mes "Although you may recognize";
+	mes "us as monsters, we have";
+	mes "all been properly hired and";
+	mes "faithfully serve our master,";
+	mes "Daewoon. So there's no";
+	mes "need to feel uneasy.";
+	close;
 }
 
-aldebaran,226,54,4	script	#aldesignwarp	45,2,2,{
-OnTouch:
-	set @aldesigncheck,0;
-	warp "aldeba_in",149,120;
+payon_in03,13,31,4	script	Maid#f1	1416,{
 	end;
+}
 
+payon_in03,13,31,4	script	Maid#f2	111,{
+	mes "[Chamberlain]";
+	mes "Master Daewoon~!";
+	mes "Please try this too!";
+	mes "It's Tiger Foot Skin soup,";
+	mes "boiled with nine kinds of";
+	mes "exotic, potent herbs.";
+	next;
+	mes "[Chamberlain]";
+	mes "It's famous for easing";
+	mes "sores and fatigure, preventing";
+	mes "cold and ^333333*Ahem*^000000 enhancing male vigor. Now, open wide, master~";
+	close;
 }
 
-aldeba_in,149,123,4	script	#aldesignwarp2	45,2,2,{
-OnTouch:
-	set @aldesigncheck,0;
-	warp "aldebaran",223,56;
-	end;
+payon_in03,11,31,4	script	Daewoon#sign	808,{
+	callfunc "F_UpdateSignVars";
+	mes "[Daewoon]";
+	mes "Mwah ah hah!";
+	mes "Feasting and merriment,";
+	mes "wine, women and song!";
+	mes "I could ask for nothing more!";
+	next;
+	mes "[Daewoon]";
+	mes "The most scrumptious";
+	mes "delicacies are all mine to";
+	mes "taste! And I'm not just talking about the food. Mwah ah hah!";
+	mes "I'm the king of the world!";
+	next;
+	if (sign_q == 14) {
+		mes "[Daewoon]";
+		mes "Oh, a visitor?";
+		mes "I'm sorry, but I believe";
+		mes "you're an uninvited guest~";
+		if (Sex) {
+			mes "You'll have to forgive me";
+			mes "if I wish to spend my time with maidens as opposed to men.";
+		}
+		else {
+			mes "No matter, a beauty is a beauty, whether or not I know her name.";
+			mes "Come and drink with me~";
+		}
+		next;
+		if (countitem(7177) > 0) {
+			set .@pay_point,1;
+			mes "["+ strcharinfo(0) +"]";
+			mes "Sure...";
+			mes "But first, would you";
+			mes "take a look at this?";
+			next;
+			mes "^3355FFYou carefully take";
+			mes "out the small, lucid";
+			mes "jewel that Arian gave";
+			mes "you and reveal it to";
+			mes "Daewoon's roving eyes.^000000";
+			next;
+			emotion e_gasp;
+			mes "[Daewoon]";
+			mes "Eh? Why that's...";
+			mes "I see now, Arian must";
+			mes "have sent you! Oh you";
+			mes "should have said so";
+			mes "at the very beginning~";
+			next;
+			mes "[Daewoon]";
+			mes "My apologies~";
+			mes "Lately I've been attracting";
+			mes "all sorts of strange attention like some kind of teen celebrity. I've gotten used to being too careful in screening out the dangerous sort.";
+			next;
+			mes "[Daewoon]";
+			mes "Now then.";
+			mes "Do you have any";
+			mes "idea what that jewel";
+			mes "you're holding actually is?";
+			next;
+			switch(select("Kind of?:How the hell would I know?:No, but would you tell me?")) {
+			case 1:
+				mes "[Daewoon]";
+				mes "Oh...!";
+				mes "You must be much";
+				mes "smarter than I expected.";
+				mes "So tell me, what do you";
+				mes "understand about this jewel?";
+				next;
+				switch(select("It's handy.:I actually don't know...")) {
+				case 1:
+					set .@pay_point,.@pay_point+2;
+					mes "[Daewoon]";
+					emotion e_dots;
+					mes "Mmm...?";
+					mes "Handy? If you truly";
+					mes "understood, I don't";
+					mes "think you'd describe this";
+					mes "jewel as merely 'handy.'";
+					next;
+					break;
+				case 2:
+					set .@pay_point,.@pay_point+4;
+					emotion e_pif;
+					mes "[Daewoon]";
+					mes "Really?";
+					mes "Mm. At least you";
+					mes "admit it. *Sigh*";
+					next;
+					break;
+				}
+				break;
+			case 2:
+				mes "[Daewoon]";
+				emotion e_dots;
+				mes "...";
+				mes "A rather crass way";
+				mes "of speaking, but perhaps";
+				mes "you picked it up from Arian.";
+				mes "In any case, let me explain.";
+				next;
+				break;
+			case 3:
+				set .@pay_point,.@pay_point+5;
+				mes "[Daewoon]";
+				mes "Didn't Arian tell you";
+				mes "anything? I appreciate";
+				mes "your honesty. And I don't";
+				mes "mind chatting a while, I much";
+				mes "prefer speaking to honest people rather than foolish know-it-alls.";
+				next;
+				break;
+			}
+			mes "[Daewoon]";
+			mes "That ^31009CSobbing Starlight^000000";
+			mes "is no mere jewel. It is a key";
+			mes "item for unlocking some incredible power. I believe Metz happened to obtain a piece, though I am";
+			mes "unsure how...";
+			next;
+			mes "[Daewoon]";
+			mes "Metz has asked me and";
+			mes "some other friends who";
+			mes "hold the fragments of the";
+			mes "Sobbing Starlight to entrust";
+			mes "them to someone worthy of";
+			mes "finding the power it leads to.";
+			next;
+			mes "[Daewoon]";
+			mes "Of course, we all agreed";
+			mes "and now you're here for me";
+			mes "to judge whether or not you're";
+			mes "qualified for this task. Now,";
+			mes "are you ready for my test?";
+			next;
+			switch(select("I'M READY! YEEAH!:I'll do my best!:To hell with this!:Fine. Let's get it over with.")) {
+			case 1:
+				set .@pay_point,.@pay_point+5;
+				mes "[Daewoon]";
+				mes "Ooh~";
+				mes "Such unbridled";
+				mes "enthusiasm usually";
+				mes "does more good than harm.";
+				next;
+				break;
+			case 2:
+				set .@pay_point,.@pay_point+7;
+				emotion e_ok;
+				mes "[Daewoon]";
+				mes "Mwah ah hah!";
+				mes "That's exactly what";
+				mes "I wanted to hear! That";
+				mes "kind of quiet and careful";
+				mes "confidence will help you";
+				mes "in the future, you'll see~";
+				next;
+				break;
+			case 3:
+				emotion e_an;
+				set .@pay_point,.@pay_point+2;
+				mes "[Daewoon]";
+				mes "E...";
+				mes "Excuse me?";
+				next;
+				emotion e_ag;
+				mes "[Daewoon]";
+				mes "How can you be";
+				mes "so ridiculous at";
+				mes "at time like this?";
+				mes "Either mind your manners";
+				mes "or don't take this test at";
+				mes "all! ^333333*SLAP--!!*^000000";
+				percentheal -10,0;
+				next;
+				break;
+			case 4:
+				set .@pay_point,.@pay_point+4;
+				emotion e_dots;
+				mes "[Daewoon]";
+				mes "Hmm. That kind of half-hearted";
+				mes "attitude won't get you very far on your adventures. Still, so long as you don't get overly negative, you should have a decent chance of surviving your challenges.";
+				next;
+				break;
+			}
+			mes "[Daewoon]";
+			mes "Now, Metz expects me to ask";
+			mes "some rather serious questions,";
+			mes "but that really isn't my style. For this test, why don't we just talk?";
+			mes "Just answer me honestly and";
+			mes "light heartedly, alright?";
+			emotion e_hmm;
+			next;
+			mes "[Daewoon]";
+			mes "So...";
+			mes "Do you have a lot";
+			mes "of friends that you can";
+			mes "constantly party with?";
+			next;
+			switch(select("Yes, I do.:I prefer soloing.:I am lonely.")) {
+			case 1:
+				set .@pay_point,.@pay_point+5;
+				emotion e_omg;
+				mes "[Daewoon]";
+				mes "Oh, that's great~!";
+				mes "To have many friends";
+				mes "is a priceless blessing.";
+				mes "Friends bring us joy and";
+				mes "aid when we find ourselves";
+				mes "suffering from difficulties.";
+				next;
+				mes "[Daewoon]";
+				mes "Wouldn't you";
+				mes "agree that being";
+				mes "really close friends";
+				mes "with someone can be";
+				mes "a life long benefit?";
+				next;
+				break;
+			case 2:
+				set .@pay_point,.@pay_point+4;
+				mes "[Daewoon]";
+				mes "Well, everybody";
+				mes "needs to be alone once";
+				mes "in a while. And there are";
+				mes "some battles you must";
+				mes "fight all on your own.";
+				next;
+				mes "[Daewoon]";
+				mes "Also, if you never";
+				mes "deal with other people,";
+				mes "you may grow selfish or";
+				mes "needy. It's better to go";
+				mes "out and meet people,";
+				mes "don't you think?";
+				next;
+				break;
+			case 3:
+				set .@pay_point,.@pay_point+3;
+				mes "[Daewoon]";
+				mes "You don't have any";
+				mes "friends at all? Well,";
+				mes "you better learn how";
+				mes "to get along with others";
+				mes "as soon as you can...!";
+				next;
+				break;
+			}
+			mes "[Daewoon]";
+			mes "Now, what's your opinion";
+			mes "on purposely getting lots";
+			mes "of monsters to follow you";
+			mes "around. I believe this is";
+			mes "called ''Mob Training...''";
+			next;
+			switch(select("Awesome~!:I hate people who do that.:I do it sometimes...")) {
+			case 1:
+				emotion e_an;
+				mes "[Daewoon]";
+				mes "But...";
+				mes "Wouldn't that be really";
+				mes "rude to anyone else hunting";
+				mes "on that same map? I think";
+				mes "it would even interfere with";
+				mes "someone else's gameplay...";
+				next;
+				emotion e_an;
+				mes "[Daewoon]";
+				mes "Perhaps you should try";
+				mes "to consider other people's";
+				mes "feelings. Mob Training seems";
+				mes "to only be good at getting other";
+				mes "people angry with you...";
+				next;
+				break;
+			case 2:
+				set .@pay_point,.@pay_point+5;
+				mes "[Daewoon]";
+				mes "Really?";
+				mes "I do too!";
+				next;
+				mes "[Daewoon]";
+				mes "Just the other day, I've";
+				mes "heard some ruffians boasting";
+				mes "of their mob training activities. But personally, I feel they were compensating for their own shortcomings. ";
+				next;
+				emotion e_an;
+				mes "[Daewoon]";
+				mes "Such behavior truly";
+				mes "bothers me. Although I have";
+				mes "spent years in developing an";
+				mes "unflappable personality, I find";
+				mes "myself irked when encountering";
+				mes "such troublemakers.";
+				next;
+				emotion e_no1;
+				mes "[Daewoon]";
+				mes "When you face obstacles";
+				mes "in your own training, never give in to weakness. Assert yourself and find the determination to overcome your tribulations with honor!";
+				next;
+				break;
+			case 3:
+				set .@pay_point,.@pay_point+3;
+				mes "[Daewoon]";
+				mes "At least you're honest.";
+				mes "But let me say that I cannot";
+				mes "condone that sort of weak willed behavior. True strength can only";
+				mes "be found through honor.";
+				mes "Remember that.";
+				next;
+				mes "[Daewoon]";
+				mes "In the face of overwhelming";
+				mes "odds, do not despair. After all, what is achievement if it is not earned without difficulty? The greater the challenge, the";
+				mes "greater the glory.";
+				next;
+				mes "[Daewoon]";
+				mes "Even if you are having hard time,";
+				mes "try to take a firm stand.";
+				mes "One day, you will realise how strong you have become.";
+				next;
+				mes "[Daewoon]";
+				mes "And...";
+				mes "Don't ever partake in";
+				mes "mob training again, okay?";
+				next;
+				break;
+			}
+			mes "[Daewoon]";
+			mes "Anyway, I'm sure you're";
+			mes "aware of the War of Emperium";
+			mes "in which mighty guilds all across Rune-Midgard battle for guild castle dominion. It's actually quite popular, really.";
+			next;
+			mes "[Daewoon]";
+			mes "Now imagine that both of us";
+			mes "are in the midst of a heated guild war. The sounds of explosions and earth shaking magic spells are all we can hear. At any time, we can";
+			mes "be lost in that mindless chaos.";
+			next;
+			mes "[Daewoon]";
+			mes "Finally, through incredible";
+			mes "good fortune, we manage to";
+			mes "infiltrate the enemy guild castle and reach their Emperium. If we destroy that Emperium, that castle will belong to our guild.";
+			next;
+			mes "[Daewoon]";
+			mes "However...! This is";
+			mes "no ordinary Emperium!";
+			mes "It is a masterful sculpture";
+			mes "of a gorgeous Priestess!";
+			mes "Answer me, adventurer!";
+			mes "Would you still destroy it?!";
+			next;
+			switch(select("Destroy it!:I can't destroy such beauty...:I'd close my eyes, then destroy it.")) {
+			case 1:
+				set .@pay_point,.@pay_point+3;
+				mes "[Daewoon]";
+				mes "Hmm. You have a truly";
+				mes "strong will. Then again,";
+				if (Sex == 1) {
+					mes "perhaps you lack a true";
+					mes "appreciation for beauty.";
+					mes "Even in Emperium form, how";
+					mes "could you harm a Priestess?";
+				}
+				else {
+					mes "perhaps you cannot appreciate";
+					mes "a Priestess's beauty in the";
+					mes "way that a man would.";
+				}
+				break;
+			case 2:
+				set .@pay_point,.@pay_point+5;
+				mes "[Daewoon]";
+				mes "Ah yes! I felt you would answer that way! We must cherish and protect what is beautiful in this world. I would never be able to harm a Priestess, even in";
+				mes "statue form...";
+				break;
+			case 3:
+				set .@pay_point,.@pay_point+6;
+				mes "[Daewoon]";
+				mes "Interesting...!";
+				mes "Although you cherish";
+				mes "the beauty of the Priestess,";
+				mes "your loyalty to your guild";
+				mes "proves stronger. A most";
+				mes "admirable attitude!";
+				break;
+			}
+			next;
+			mes "[Daewoon]";
+			mes "But yes, if it were";
+			mes "me, I would protect that";
+			mes "Priestess shaped Emperium";
+			mes "until the end of the guild war.";
+			mes "Mwah ah hah~!";
+			next;
+			mes "[Daewoon]";
+			mes "While we're on the topic";
+			mes "of guilds, let me present";
+			mes "another guild related scenario. Let's say that you joined a very popular guild with many allies,";
+			mes "as well as formidable enemies.";
+			next;
+			mes "[Daewoon]";
+			mes "Now, during one of your.";
+			mes "hunts, you happen to meet";
+			mes "a member of one of your enemy guilds. The two of you are the only people on that map. Suddenly, he finds himself in mortal danger!";
+			next;
+			mes "[Daewoon]";
+			mes "This enemy guild member";
+			mes "begins to yell for help. Now,";
+			mes "would you give your enemy";
+			mes "the help that he needs?";
+			next;
+			switch(select("Yes, of course!:I'd pretend not to hear anything.:I'd make fun of him, then run off.")) {
+			case 1:
+				set .@pay_point,.@pay_point+6;
+				mes "[Daewoon]";
+				mes "Ah, you would help him!";
+				mes "Good, good. I'm glad to see";
+				mes "that you understand that such pettiness should not get in the way of doing what is good and right.";
+				break;
+			case 2:
+				set .@pay_point,.@pay_point+5;
+				mes "[Daewoon]";
+				mes "True, you're not really";
+				mes "obligated to help your";
+				mes "enemy. Besides, you may";
+				mes "hurt his feelings once he";
+				mes "realizes that he's had to";
+				mes "depend on his rival for help.";
+				break;
+			case 3:
+				set .@pay_point,.@pay_point+4;
+				mes "[Daewoon]";
+				mes "Even though he is";
+				mes "your enemy, I still";
+				mes "believe it's important";
+				mes "that you treat him with";
+				mes "respect. Where is your honor?";
+				break;
+			}
+			next;
+			mes "[Daewoon]";
+			mes "Well, there's one";
+			mes "last thing I want to";
+			mes "know about you. It's the";
+			mes "most important question";
+			mes "in the world once you";
+			mes "think about it.";
+			next;
+			mes "[Daewoon]";
+			mes "...";
+			mes "......";
+			mes "Do you enjoy life?";
+			next;
+			switch(select("Yes:No")) {
+			case 1:
+				mes "[Daewoon]";
+				emotion e_heh;
+				mes "I'm glad.";
+				mes "When you don't live";
+				mes "with zeal, it's easy to";
+				mes "forget your goals and your";
+				mes "purpose for living. Don't have";
+				mes "any? Then make some up.";
+				next;
+				mes "[Daewoon]";
+				mes "I hope you always enjoy";
+				mes "life as much as you can.";
+				mes "As for me, I'm always happy";
+				mes "with my wine, women and song~";
+				mes "Mwah ah hah~!";
+				next;
+				break;
+			case 2:
+				mes "[Daewoon]";
+				mes "I understand.";
+				mes "People cannot be happy";
+				mes "all the time. Sometimes";
+				mes "it's easy to forget your";
+				mes "goals and purpose in life.";
+				next;
+				mes "[Daewoon]";
+				mes "But you know what? If you";
+				mes "have just one dream, one goal";
+				mes "to strive towards, things shall get better. If you think you don't have dreams, look back to your past. What you remember may surprise you.";
+				next;
+				mes "[Daewoon]";
+				mes "It's important to look forward,";
+				mes "but first you must find what is truly precious to you before you can define your happiness. That's why I think it's good to experience new things as well as reflect.";
+				next;
+				emotion e_no1;
+				mes "[Daewoon]";
+				mes "Now, what's precious to me?";
+				mes "Three things, actually...";
+				mes "Wine. Women. And song!";
+				mes "Though, if I had to rank them,";
+				mes "women would top that list.";
+				mes "Mwah ah hah~!";
+				next;
+				break;
+			}
+			if (.@pay_point > 29) {
+				set sign_q,15;
+				getitem 7177,1; //Part_Of_Star's_Sob
+				if (BaseLevel < 60) {
+					getexp 3000,0;
+				}
+				else if (BaseLevel < 70) {
+					getexp 7000,0;
+				}
+				else if (BaseLevel < 80) {
+					getexp 10000,0;
+				}
+				else if (BaseLevel < 90) {
+					getexp 13000,0;
+				}
+				else if (BaseLevel < 99) {
+					getexp 18000,0;
+				}
+				emotion e_heh;
+				mes "[Daewoon]";
+				mes "Well, I must say that I've";
+				mes "grown quite fond of you. Of";
+				mes "course, it helps that we have so much in common. Mwah ah hah~!";
+				mes "It was an honor to meet you~";
+				next;
+				mes "[Daewoon]";
+				mes "Oh yes! Your next test";
+				mes "examiner is ^CE0000Sir Jore^000000, also";
+				mes "known as the Ghost of Al de Baran. Although he's always sick, he has great passion for his research.";
+				next;
+				mes "[Daewoon]";
+				mes "Alright, then.";
+				mes "Good luck in";
+				mes "Al de Baran~!";
+				close;
+			}
+			else if (.@pay_point < 20) {
+				mes "[Daewoon]";
+				mes "It pains me to say this,";
+				mes "but I do not think you're";
+				mes "worthy of holding my fragment";
+				mes "of the Sobbing Starlight. But";
+				mes "I am willing to give you";
+				mes "another chance~";
+				close;
+			}
+			else if ((.@pay_point > 26) && (.@pay_point < 30)) {
+				set sign_q,15;
+				getitem 7177,1; //Part_Of_Star's_Sob
+				if (BaseLevel < 60) {
+					getexp 3000,0;
+				}
+				else if (BaseLevel < 70) {
+					getexp 7000,0;
+				}
+				else if (BaseLevel < 80) {
+					getexp 10000,0;
+				}
+				else if (BaseLevel < 90) {
+					getexp 13000,0;
+				}
+				else if (BaseLevel < 99) {
+					getexp 18000,0;
+				}
+				mes "[Daewoon]";
+				mes "You know, after talking with";
+				mes "you for a while, I now feel fairly comfortable with leaving you this piece of the Sobbing Starlight. Somehow, I think you're strong enough to get all the pieces.";
+				next;
+				mes "[Daewoon]";
+				mes "I hope you will pass the rest of the test";
+				mes "and acquire the power.";
+				next;
+				mes "[Daewoon]";
+				mes "Oh yes! Your next test";
+				mes "examiner is ^CE0000Sir Jore^000000, also";
+				mes "known as the Ghost of Al de Baran. Although he's always sick, he has great passion for his research.";
+				next;
+				mes "[Daewoon]";
+				mes "Alright, then.";
+				mes "Good luck in";
+				mes "Al de Baran~!";
+				close;
+			}
+			else {
+				mes "[Daewoon]";
+				mes "It pains me to say this,";
+				mes "but I do not think you're";
+				mes "worthy of holding my fragment";
+				mes "of the Sobbing Starlight. But";
+				mes "I am willing to give you";
+				mes "another chance~";
+				close;
+			}
+			close;
+		}
+		else {
+			mes "[Daewoon]";
+			mes "I wonder...";
+			mes "Someone should have";
+			mes "passed Arian's test by now.";
+			mes "I can't wait to see who was";
+			mes "actually able to impress him...";
+			close;
+		}
+	}
+	else if (sign_q < 14) {
+		mes "[Daewoon]";
+		mes "Mwah ah hah~!";
+		mes "I couldn't be happier!";
+		mes "What more do I need?";
+		mes "Gourmet food, fine wine,";
+		mes "nubile women...!";
+		close;
+	}
+	else if (sign_q == 98) {
+		mes "[Daewoon]";
+		mes "I'm sorry, but ";
+		mes "no price can make";
+		mes "me change my mind.";
+		mes "You... You've failed.";
+		mes "I'm sorry, friend.";
+		close;
+	}
+	else if (sign_q == 99) {
+		emotion e_gasp;
+		mes "[Daewoon]";
+		mes "Oh~! It's you!";
+		mes "It has been a while since";
+		mes "we last conversed. Now that";
+		mes "you've accessed the power";
+		mes "behind the Sobbing Starlight,";
+		mes "do you like it?";
+		next;
+		switch(select("Yes:No")) {
+		case 1:
+			mes "[Daewoon]";
+			mes "Ah, how great~!";
+			mes "Just remember that";
+			mes "power can be addictive.";
+			mes "Even if you don't agree,";
+			mes "it's still wise to avoid";
+			mes "greedy tendencies, yes?";
+			next;
+			mes "[Daewoon]";
+			mes "Please make good use of";
+			mes "the power you have obtained.";
+			mes "I am counting on you to be";
+			mes "responsbile and to never lose";
+			mes "that smile on your face, okay?";
+			mes "Mwah ah hah~!";
+			close;
+		case 2:
+			emotion e_hmm;
+			mes "[Daewoon]";
+			mes "Eh...?";
+			mes "That's quite a surprise.";
+			mes "Perhaps Metz didn't know";
+			mes "enough about it? Still, I'm";
+			mes "sorry to hear you don't like it.";
+			next;
+			mes "[Daewoon]";
+			mes "But in the end, keep in mind";
+			mes "that you must have learned some great lesson from this experience. Anyway, please do your best to use the power responsibly, okay?";
+			mes "Mwah ah hah~!";
+			close;
+		}
+	}
+	else if (sign_q == 15) {
+		mes "[Daewoon]";
+		mes "Hm...?";
+		mes "Weren't you on";
+		mes "your way to find";
+		mes "^CE0000Sir Jore^000000 in Al de Baran?";
+		next;
+		mes "[Daewoon]";
+		mes "Oh, having trouble";
+		mes "finding him, are you?";
+		mes "Well, he's fairly shy, but";
+		mes "I'm sure he's hiding some";
+		mes "place in that town.";
+		close;
+	}
+	else {
+		mes "[Daewoon]";
+		mes "Ah, I feel so...";
+		mes "Satiated. The food was ";
+		mes "stupendous and the women";
+		mes "have been even more so.";
+		mes "Servants! Fan me please~";
+		next;
+		mes "[Daewoon]";
+		mes "^333333*Yawn...*";
+		mes "...z...z...Z....ZZzZZ^000000";
+		close;
+	}
+	close;
+}
 
+aldeba_in,139,103,5	script	Monograph#sign	111,{
+	mes "[Sir Jore]";
+	mes "Uwah~!";
+	mes "Stop reading my";
+	mes "research monograph!";
+	mes "Put that back now!";
+	close;
 }
 
-aldeba_in,147,104,1	script	PotionActivator	139,3,0,{
+aldeba_in,155,101,3	script	Sir Jore#sign	805,7,7,{
+	callfunc "F_UpdateSignVars";
+	if ((gettime(3) > 17) && (gettime(3) < 22)) {
+		if (sign_q == 15) {
+			mes "["+ strcharinfo(0) +"]";
+			mes "Excuse me...";
+			next;
+			emotion e_omg;
+			mes "^313FFF*Clink*^000000";
+			next;
+			mes "[Sir Jore]";
+			mes "...";
+			mes "......";
+			next;
+			emotion e_swt2;
+			mes "[Sir Jore]";
+			mes "...";
+			mes "......";
+			mes "...No!";
+			mes "Look what";
+			mes "made me do!";
+			next;
+			emotion e_sob;
+			mes "[Sir Jore]";
+			mes "I've been fiddling";
+			mes "with this sample for";
+			mes "five hours. And now";
+			mes "it's ruined! ^333333*Sob*^000000";
+			next;
+			emotion e_sob;
+			mes "[Sir Jore]";
+			mes "^333333*Sob*^000000";
+			mes "I came to this town";
+			mes "so I could focus on";
+			mes "my research without";
+			mes "any interruptions. So";
+			mes "why are you here?";
+			next;
+			switch(select("Daewoon sent me.:Oops, sorry. Later~")) {
+			case 1:
+				emotion e_swt;
+				mes "[Sir Jore]";
+				mes "O-oh!";
+				mes "That's right.";
+				mes "You're here to be";
+				mes "tested for the piece";
+				mes "of the Sobbing Starlight.";
+				next;
+				emotion e_swt2;
+				mes "[Sir Jore]";
+				mes "So...";
+				mes "Er. Then, what...";
+				mes "W-what's your name?";
+				next;
+				select(strcharinfo(0) +", thanks.");
+				mes "[Sir Jore]";
+				mes "N-nice to meet you.";
+				mes "My name is Jore. Just";
+				mes "a normal person who loves";
+				mes "research. S-sorry if I seem";
+				mes "a little nervous! I'm actually";
+				mes "quite... shy around people.";
+				next;
+				mes "[Sir Jore]";
+				mes "Oh no...!";
+				mes "If you were able to";
+				mes "find me, there will be";
+				mes "others! When would I get";
+				mes "the time to do my research?!";
+				mes "N-no! I h-h-hate people!!";
+				next;
+				mes "[Sir Jore]";
+				mes "Still, I did promise";
+				mes "M-M-Metz and he is my";
+				mes "friend. So I must accept";
+				mes "some guests. Even if hundreds";
+				mes "of them knock on my door...";
+				next;
+				mes "[Sir Jore]";
+				mes "But first of all,";
+				mes "I'm going to need";
+				mes "a new research sample.";
+				mes "I think it's only fair that";
+				mes "you get it for me since you";
+				mes "made me ruin the last one.";
+				next;
+				mes "[Sir Jore]";
+				mes "N-now, d-don't worry.";
+				mes "The items are actually";
+				mes "quite easy to get. It's";
+				mes "five hours part that's";
+				mes "hard. Now, let's see...";
+				next;
+				set sign_q,16;
+				mes "[Sir Jore]";
+				mes "Just bring";
+				mes "10 Empty Test Tube,";
+				mes "10 Green Herb and";
+				mes "2 Yggdrasil Leaf.";
+				next;
+				mes "[Sir Jore]";
+				mes "You see, l-lately I've";
+				mes "been studying Biology. ";
+				mes "I think the secret to life";
+				mes "can be found in the Leaf of";
+				mes "Yggdrasil. They can be used";
+				mes "to revive the dead, after all.";
+				next;
+				emotion e_swt;
+				mes "[Sir Jore]";
+				mes "Oh, and make sure to";
+				mes "bring those things to me";
+				mes "me before I go to bed at";
+				mes "precisely 10:00 PM PST.";
+				mes "I do have a regular sleeping";
+				mes "schedule, you know.";
+				close;
+			case 2:
+				emotion e_sob;
+				mes "[Sir Jore]";
+				mes "I spent five hours";
+				mes "observing the changes";
+				mes "in that research sample.";
+				mes "All of that hard work lost!";
+				mes "^333333*Wah~!*^000000";
+				close;
+			}
+		}
+		else if (sign_q == 16) {
+			if ((countitem(1092) > 9) && (countitem(610) > 1) && (countitem(511) > 9)) {
+				delitem 1092,10; //Empty_Cylinder
+				delitem 610,2; //Leaf_Of_Yggdrasil
+				delitem 511,10; //Green_Herb
+				set sign_q,17;
+				emotion e_thx;
+				mes "[Sir Jore]";
+				mes "Ah! Th-thank you for";
+				mes "bringing what I need.";
+				mes "Now I can continue my";
+				mes "research. Oh, and see if";
+				mes "you're worthy of obtaining";
+				mes "the Sobbing Starlight.";
+				next;
+				mes "[Sir Jore]";
+				mes "Now, for your assignment.";
+				mes "Have you ever heard about";
+				mes "the ^CE3131Stone of Sage^000000? Rumors about";
+				mes "it have been spreading around, but no one has confirmed the truth about it, "+ strcharinfo(0) +".";
+				next;
+				mes "[Sir Jore]";
+				mes "Although I have no clue";
+				mes "what the Stone of S-S-age";
+				mes "may actually be, I have a gut";
+				mes "feeling that I need it to bring";
+				mes "my Biology research to the next step. This is how you'll help me.";
+				next;
+				set sign_q,17;
+				mes "[Sir Jore]";
+				mes "I need you to investigate";
+				mes "this Stone of Sage by finding";
+				mes "a father and daughter who were";
+				mes "famous for being great Alchemists. They vanished deep into a forest, but I believe they know something.";
+				close;
+			}
+			else {
+				mes "[Sir Jore]";
+				mes "Please bring m-me";
+				mes "10 Empty Test Tube,";
+				mes "10 Green Herb and";
+				mes "2 Leaf of Yggdrasil";
+				mes "so that I can make a";
+				mes "new research sample.";
+				close;
+			}
+		}
+		else if (sign_q == 17) {
+			mes "[Sir Jore]";
+			mes "I want you to find two";
+			mes "Alchemists, a father and";
+			mes "daughter, who have gone into";
+			mes "seclusion deep in some forest";
+			mes "so that I can learn more about";
+			mes "the Stone of Sage.";
+			next;
+			mes "[Sir Jore]";
+			mes "Of course, this will";
+			mes "possibly further my";
+			mes "research, but it's also";
+			mes "how I'll judge whether or";
+			mes "not you're qualified for my";
+			mes "piece of the Sobbing Starlight.";
+			close;
+		}
+		else if (sign_q < 15) {
+			mes "[Sir Jore]";
+			mes "The mystery of life.";
+			mes "The desire to discover its";
+			mes "secrets drives me through";
+			mes "all the research and sacrifice.";
+			next;
+			mes "[Sir Jore]";
+			mes "I-I'm not that confident in";
+			mes "my abilities, but I do believe that everything in this world is created by certain rules. Still, would I be punished by God for trying to create life he did not intend?";
+			next;
+			mes "[Sir Jore]";
+			mes "But I can't stop now.";
+			mes "One of these days, someone";
+			mes "will reveal the secret of life.";
+			mes "Why not me? That knowledge";
+			mes "would make humans greater";
+			mes "than any other race...";
+			close;
+		}
+		else if (sign_q == 19) {
+			mes "[Sir Jore]";
+			mes "Ah, you've returned.";
+			mes "So, did you learn what";
+			mes "exactly is the Stone of Sage?";
+			next;
+			mes "["+ strcharinfo(0) +"]";
+			mes "Well, I'm not sure,";
+			mes "but I was told that it's";
+			mes "red and can cure people.";
+			mes "But it might be something";
+			mes "we're already familiar with.";
+			next;
+			mes "[Sir Jore]";
+			mes "That's all...?";
+			mes "Maybe it was nothing";
+			mes "but a rumor after all.";
+			mes "A-anyway, please tell me";
+			mes "what you think it might be.";
+			next;
+			input .@input$;
+			if (compare(.@input$,"red gemstone")) {
+				mes "[Sir Jore]";
+				mes "What...! Huh.";
+				mes "Perhaps I should just";
+				mes "forget about the Stone of";
+				mes "Sage and just research.";
+				mes "Still, I'm so ashamed of";
+				mes "relying on a rumor...";
+				next;
+				set sign_q,20;
+				getitem 7177,1; //Part_Of_Star's_Sob
+				mes "[Sir Jore]";
+				mes "Thank you very much";
+				mes "for helping me. Now I can";
+				mes "go back to my studies and";
+				mes "hope that nobody bothers me.";
+				mes "But that'll never happen.";
+				mes "^333333*Sigh...*^000000";
+				next;
+				mes "[Sir Jore]";
+				mes "W-well, you've earned this";
+				mes "piece of the Sobbing Starlight.";
+				mes "For the next piece, you must visit ^0063FFLady Jesqurienne^000000 in Geffen, the city of magic. Since she travels often, she's probably in the Inn.";
+				next;
+				mes "[Sir Jore]";
+				mes "O-o-okay then.";
+				mes "Good luck getting";
+				mes "all the pieces of ";
+				mes "Sobbing Starlight,";
+				mes ""+ strcharinfo(0) +". Farewell~";
+				close;
+			}
+			else {
+				mes "[Sir Jore]";
+				mes "Err...?";
+				mes "I don't think";
+				mes "I quite understood";
+				mes "you. What did you say?";
+				close;
+			}
+		}
+		else if (sign_q == 20) {
+			mes "[Sir Jore]";
+			mes "Now you must visit";
+			mes "^0063FFLady Jesqurienne^000000 in";
+			mes "Geffen. Good luck";
+			mes "passing her test.";
+			close;
+		}
+		else {
+			mes "[Sir Jore]";
+			mes "H-how is this supposed";
+			mes "to work? Like this? No!";
+			mes "No, that's not right!";
+			mes "Think, Jore, think...";
+			mes "What's the answer?!";
+			close;
+		}
+	}
+	else if ((gettime(3) > 6) && (gettime(3) < 17)) {
+		mes "^3355FFYou find a tense man";
+		mes "holding test tubes between";
+		mes "his fingers, standing in a pile";
+		mes "of books. He seems to be in";
+		mes "agony for some reason.";
+		next;
+		switch(select("Speak to him.:Ignore him.")) {
+		case 1:
+			mes "["+ strcharinfo(0) +"]";
+			mes "Excuse me...";
+			next;
+			mes "[Sir Jore]";
+			mes "...";
+			mes "......";
+			next;
+			mes "^3355FFToo preoccupied with";
+			mes "his thoughts, this strange";
+			mes "man is unable to hear you.^000000";
+			next;
+			switch(select("Try again.:Ignore him.")) {
+			case 1:
+				mes "["+ strcharinfo(0) +"]";
+				mes "EXCUSE ME!";
+				next;
+				mes "[Sir Jore]";
+				mes "...!";
+				mes "Oh, h-h-hello.";
+				mes "Sorry, but I'm kind of";
+				mes "busy right now. Yes, yes,";
+				mes "would you come back at";
+				mes "precisely 5:00 PM PST?";
+				next;
+				mes "[Sir Jore]";
+				mes "Let's see...";
+				mes "Now if I recalibrated";
+				mes "the faust exhaust, then";
+				mes "the bioneutron analyzer";
+				mes "would need to be adjusted";
+				mes "for cytoplasmic balance...";
+				close;
+			case 2:
+				mes "^3355FFYou decide to leave";
+				mes "him alone and let him";
+				mes "continue mumbling to";
+				mes "himself and playing";
+				mes "with his test tubes.^000000";
+				close;
+			}
+		case 2:
+			mes "^3355FFYou decide to leave";
+			mes "him alone and let him";
+			mes "continue mumbling to";
+			mes "himself and playing";
+			mes "with his test tubes.^000000";
+			close;
+		}
+	}
+	else {
+		mes "[Sir Jore]";
+		mes "...z...z...Z";
+		close;
+	}
+	close;
+
 OnTouch:
-	if(@aldesigncheck == 0){
-		donpcevent "Jore#SignAldeNpc::OnPotion";	
-		set @aldesigncheck,1;
+	if (rand(1,2) == 1) {
+		emotion e_ic;
+		specialeffect EF_PHARMACY_OK;
+	}
+	else {
+		emotion e_omg;
+		specialeffect EF_PHARMACY_FAIL;
 	}
 	end;
 }
-	
-aldeba_in,156,118,4	script	Piru Piru	700,{
-
-    emotion e_sob;
-    mes "[Piru Piru]";
-    mes "Oh, I'm sooo tired~";
-    mes "But we can't sleep yet.";
-    mes "^000200*Sob*^000000 Master, can't we";
-    mes "just call it a day already?";
-    next;
-    if (signquest != 7) {
-        menu "What do you do in here?",-;
-    } else {
-        menu "What do you do in here?",-,"About vanished Alchemists",s_Vanish,"What is the Stone of Sage?",s_SageStone;
-    }
-    mes "[Piru Piru]";
-    mes "My master, Sir Jore,";
-    mes "is researching a way to";
-    mes "create artificial life! Still,";
-    mes "it's not easy and we haven't";
-    mes "accomplished anything yet...";
-    next;
-    mes "[Piru Piru]";
-    mes "It doesn't help that my";
-    mes "master spends all of his";
-    mes "time on research. He hasn't";
-    mes "been taking care of himself";
-    mes "and is losing a lot of weight.";
-    mes "I'm really worried about him.";
-    close;
-
-s_Vanish:
-    mes "[Piru Piru]";
-    mes "Oh, the father and daughter";
-    mes "who were both Alchemists, right?";
-    mes "Did you know they vanished because";
-    mes "they invented the monster potion";
-    mes "summoning skill?";
-    next;
-    mes "[Piru Piru]";
-    mes "Their discovery caused";
-    mes "such great hysteria in the";
-    mes "scientific community. In the";
-    mes "end they had no choice but";
-    mes "to live in seclusion deep";
-    mes "in the ^FF0000forest to the south^000000.";
-    next;
-s_SageStone:
-    mes "[Piru Piru]";
-    mes "Hmm? Well, I wouldn't";
-    mes "know anything about that.";
-    mes "In fact, I'm always staying";
-    mes "in this lab, so I never hear";
-    mes "any rumors or news outside.";
-    close;
 
+aldeba_in,156,118,4	script	Piru Piru#sign	102,{
+	callfunc "F_UpdateSignVars";
+	if ((gettime(3) >= 12) && (gettime(3) <= 24)) { //235959
+		if (sign_q == 17) {
+			emotion e_sob;
+			mes "[Piru Piru]";
+			mes "Oh, I'm sooo tired~";
+			mes "But we can't sleep yet.";
+			mes "*Sob* Master, can't we";
+			mes "just call it a day already?";
+			next;
+			switch(select("What do you do in here?:About vanished Alchemists:What is the Stone of Sage?")) {
+			case 1:
+				mes "[Piru Piru]";
+				mes "My master, Sir Jore,";
+				mes "is researching a way to";
+				mes "create artificial life! Still,";
+				mes "it's not easy and we haven't";
+				mes "accomplished anything yet...";
+				next;
+				mes "[Piru Piru]";
+				mes "It doesn't help that my";
+				mes "master spends all of his";
+				mes "time on research. He hasn't";
+				mes "been taking care of himself";
+				mes "and is losing a lot of weight.";
+				mes "I'm really worried about him.";
+				close;
+			case 2:
+				mes "[Piru Piru]";
+				mes "Oh, the father and daughter";
+				mes "who were both Alchemists, right? Did you know they vanished because they invented the monster potion summoning skill?";
+				next;
+				mes "[Piru Piru]";
+				mes "Their discovery caused";
+				mes "such great hysteria in the";
+				mes "scientific community. In the";
+				mes "end they had no choice but";
+				mes "to live in seclusion deep";
+				mes "in the ^CE3131forest to the south^000000.";
+				next;
+				mes "[Piru Piru]";
+				mes "They devoted their lives";
+				mes "to their research, just like";
+				mes "my master. If he makes a major";
+				mes "breakthrough, we'll have to";
+				mes "disappear like they did...";
+				close;
+			case 3:
+				mes "[Piru Piru]";
+				mes "Hmm? Well, I wouldn't";
+				mes "know anything about that.";
+				mes "In fact, I'm always staying";
+				mes "in this lab, so I never hear";
+				mes "any rumors or news outside.";
+				close;
+			}
+		}
+		else {
+			emotion e_sob;
+			mes "[Piru Piru]";
+			mes "Oh, I'm sooo tired~";
+			mes "But we can't sleep yet.";
+			mes "*Sob* Master, can't we";
+			mes "just call it a day already?";
+			next;
+			select("What do you do in here?");
+			mes "[Piru Piru]";
+			mes "My master, Sir Jore,";
+			mes "is researching a way to";
+			mes "create artificial life! Still,";
+			mes "it's not easy and we haven't";
+			mes "accomplished anything yet...";
+			next;
+			mes "[Piru Piru]";
+			mes "It doesn't help that my";
+			mes "master spends all of his";
+			mes "time on research. He hasn't";
+			mes "been taking care of himself";
+			mes "and is losing a lot of weight.";
+			mes "I'm really worried about him.";
+			close;
+		}
+	}
+	else if ((gettime(3) >= 6) && (gettime(3) < 12)) {
+		mes "[Piru Piru]";
+		mes "Everyday we study and";
+		mes "take notes and test and";
+		mes "experiment and record";
+		mes "results and... Horrible!";
+		next;
+		mes "[Piru Piru]";
+		mes "Although my master and I are the only ones who use this lab, we do have a set working schedule. We work from 10 AM to 5 PM and have our free time from 5 PM to 10 PM, which is when Master goes to bed.";
+		next;
+		mes "[Piru Piru]";
+		mes "Of course, Master";
+		mes "is happy if he can";
+		mes "just do more research.";
+		mes "In any case, please visit";
+		mes "us after 5 PM if you have";
+		mes "any business with us.";
+		close;
+	}
+	else {
+		mes "[Piru Piru]";
+		mes "....Zzz...Zzz...";
+		mes "Zzz....Zzz......";
+		next;
+		switch(select("Wake her up:Leave her sleep")) {
+		case 1:
+			mes "[Piru Piru]";
+			mes "Wh-wha...?";
+			mes "Why do you gotta";
+			mes "wake me up? Come back";
+			mes "after 10:00 AM tomorrow, kay?";
+			close;
+		case 2:
+			mes "[Piru Piru]";
+			mes "Zzzz.....Zzzzz...";
+			close;
+		}
+	}
 }
 
-aldeba_in,155,101,2	script	Jore#SignAldeNpc	805,{
-
-    if (gettime(3) == 17 || gettime(3) == 18 || gettime(3) == 19 || gettime(3) == 20 || gettime(3) == 21) {
-        if (signquest == 7) {
-            mes "[Sir Jore]";
-            mes "I want you to find two";
-            mes "Alchemists, a father and";
-            mes "daughter, who have gone into";
-            mes "seclusion deep in some forest";
-            mes "so that I can learn more about";
-            mes "the Stone of Sage.";
-            next;
-            mes "[Sir Jore]";
-            mes "Of course, this will";
-            mes "possibly further my";
-            mes "research, but it's also";
-            mes "how I'll judge whether or";
-            mes "not you're qualified for my";
-            mes "piece of the Sobbing Starlight.";
-            close;
-        }
-        if (signquest == 8) {
-            mes "[Sir Jore]";
-            mes "Oh.. You're already back !";
-            mes "Then, let me hear everything you learn";
-            mes "about the Stone of Sage !";
-            next;
-            mes "[Sir Jore]";
-            mes "...";
-            next;
-            mes "[Sir Jore]";
-            mes "...";
-            mes "....";
-            next;
-            mes "[Sir Jore]";
-            mes "...";
-            mes "....";
-            mes ".....";
-            next;
-            mes "[Sir Jore]";
-            mes "I see..";
-            mes "I didn't think that mythic stone";
-            mes "could be that dangerous..";
-            mes "That's enough for me to know,";
-            mes "You did your work perfectly.";
-            next;
-            mes "[Sir Jore]";
-            mes "Just a last question";
-            mes "before I give you what you want.";
-            next;
-            mes "[Sir Jore]";
-            mes "What do you think the Stone of Sage is?";
-            next;
-            input @sign_jore$;
-
-            if (@sign_jore$ == "Red Gemstone") {
-
-                mes "[Sir Jore]";
-                mes "That's what I thought too,";
-                mes "but after all maybe it doesn't have";
-                mes "any power.";
-                next;
-                getitem 7177,1;
-                set signquest,9;
-                mes "[Sir Jore]";
-                mes "Take that starry fragment.";
-                mes "I'll inform my friend about you.";
-                mes "Look for ^FF0000Jesqurienne^000000.";
-                mes "She often spends her time";
-                mes "in the bars of Geffen.";
-                next;
-                mes "[Sir Jore]";
-                mes "I have to return to my researches..";
-                next;
-                mes "[Sir Jore]";
-                mes "Acid.....";
-                mes "............Basic..";
-                mes "...";
-                close;
-            } else {
-                mes "[Sir Jore]";
-                mes "The shape you are describing me";
-                mes "can't be the real shape of the";
-                mes "Stone of Sage.";
-                next;
-                mes "[Sir Jore]";
-                mes "It should look like";
-                mes "an oftenly used stone..";
-                mes "Come back when you will know";
-                mes "more about his shape.";
-                close;
-
-            }
-
-        }
-
-        if (signquest == 9) {
-            mes "[Sir Jore]";
-            mes "Can't you let me alone?";
-            mes "Stop disturbing me and";
-            mes "find ^FF0000Jesqurienne^000000 in Geffen.";
-            close;
-        }
-
-        if (SignJore == 1) {
-
-            if (countitem(1092) < 10 || countitem(511) < 10 || countitem(610) < 2) {
-                mes "[Sir Jore]";
-                mes "Please bring m-me";
-                mes "10 Empty Test Tube,";
-                mes "10 Green Herb and";
-                mes "2 Yggdrasil Leaf.";
-                mes "so that I can make a";
-                mes "new research sample.";
-                close;
-            } else {
-                delitem 1092,10;
-                delitem 511,10;
-                delitem 610,2;
-                set signquest,7;
-                set SignJore,0;
-                emotion e_thx;
-                mes "[Sir Jore]";
-                mes "Ah! Th-thank you for";
-                mes "bringing what I need.";
-                mes "Now I can continue my";
-                mes "research. Oh, and see if";
-                mes "you're worthy of obtaining";
-                mes "the Sobbing Starlight";
-                next;
-                mes "[Sir Jore]";
-                mes "Now, for your assignment.";
-                mes "Have you ever heard about";
-                mes "the ^FF0000Stone of Sage^000000? Rumors about";
-                mes "it have been spreading around, but";
-                mes "no one has confirmed the truth";
-                mes "about it, " + strcharinfo(0) + ".";
-                next;
-                mes "[Sir Jore]";
-                mes "Although I have no clue";
-                mes "what the Stone of S-S-age";
-                mes "may actually be, I have a gut";
-                mes "feeling that I need it to bring";
-                mes "my Biology research to the next";
-                mes "step. This is how you'll help me.";
-                next;
-                mes "[Sir Jore]";
-                mes "I need you to investigate";
-                mes "this Stone of Sage by finding";
-                mes "a father and daughter who were";
-                mes "famous for being great Alchemists.";
-                mes "They vanished deep into a forest,";
-                mes "but I believe they know something.";
-                close;
-            }
-
-        }
-        mes "[" + strcharinfo(0) + "]";
-        mes "Excuse me...";
-        next;
-        emotion e_omg;
-        mes "^3355FF*Clink*";
-        next;
-        mes "[Sir Jore]";
-        mes "...";
-        mes "......";
-        next;
-        mes "[Sir Jore]";
-        mes "...";
-        mes "......";
-        mes "...No!";
-        mes "Look what you";
-        mes "made me do!";
-        next;
-        emotion e_sob;
-        mes "[Sir Jore]";
-        mes "I've been fiddling";
-        mes "with this sample for";
-        mes "five hours. And now";
-        mes "it's ruined ^000200*Sob*";
-        if (signquest != 6)close;
-        next;
-        mes "[Sir Jore]";
-        mes "^000200*Sob*^000000";
-        mes "I came to this town";
-        mes "so I could focus on";
-        mes "my research without";
-        mes "any interuptions. So";
-        mes "why are you here?";
-        next;
-        menu "Daewoon sent me.",s_Daewoon,"Oops, sorry. Later~",-;
-
-        mes "[Sir Jore]";
-        mes "I spent five hours";
-        mes "observing the changes";
-        mes "in that research sample.";
-        mes "All of that hard work lost!";
-        mes "^000200*Wah~!*";
-        close;
-
-s_Daewoon:
-        emotion e_swt;
-        mes "[Sir Jore]";
-        mes "O-oh!";
-        mes "That's right.";
-        mes "You're here to be";
-        mes "tested for the piece";
-        mes "of the Sobbing Starlight.";
-        next;
-        mes "[Sir Jore]";
-        mes "So...";
-        mes "Er. Then, what...";
-        mes "W-what's your name?";
-        next;
-        menu strcharinfo(0) + ", thanks.",-;
-        mes "[Sir Jore]";
-        mes "N-nice to meet you.";
-        mes "My name is Jore. Just";
-        mes "a normal person who loves";
-        mes "research. S-sorry if I seem";
-        mes "a little nervous! I'm actually";
-        mes "quite... shy around people.";
-        next;
-        mes "[Sir Jore]";
-        mes "Oh no...!";
-        mes "if you were able to";
-        mes "find me, there will be";
-        mes "others! When would I get";
-        mes "the time to do my research?!";
-        mes "N-no! I h-h-hate people!!";
-        next;
-        mes "[Sir Jore]";
-        mes "Still, I did promise";
-        mes "M-M-Metz and he is my";
-        mes "friend. So I must accept";
-        mes "some guests. Even if hundreds";
-        mes "of them knock on my door...";
-        next;
-        mes "[Sir Jore]";
-        mes "But first of all,";
-        mes "I'm going to need";
-        mes "a new research sample.";
-        mes "I think it's only fair that";
-        mes "you get it for me since you";
-        mes "made me ruin the last one.";
-        next;
-        mes "[Sir Jore]";
-        mes "N-now, d-don't worry.";
-        mes "The items are actually";
-        mes "quite easy to get. It's";
-        mes "the five hours part that's";
-        mes "hard. Now, let's see...";
-        next;
-        mes "[Sir Jore]";
-        mes "Just bring";
-        mes "10 Empty Test Tube,";
-        mes "10 Green Herb and";
-        mes "2 Yggdrasil Leaf.";
-        next;
-        mes "[Sir Jore]";
-        mes "You see, l-lately I've";
-        mes "been studying Biology.";
-        mes "I think the secret to life";
-        mes "can be found in the Leaf of";
-        mes "Yggdrasil. They can be used";
-        mes "to revive the dead, after all.";
-        next;
-        emotion e_swt;
-        mes "[Sir Jore]";
-        mes "Oh, and make sure to";
-        mes "bring those things to me";
-        mes "before I go to bed at";
-        mes "precisely 10:00 PM " + $timezonestring$ + ".";
-        mes "I do have a regular sleeping";
-        mes "schedule, you know.";
-        set SignJore,1;
-        close;
-
-    } else {
-        mes "^3355FFYou find a tense man";
-        mes "holding test tubes between";
-        mes "his fingers, standing in a pile";
-        mes "of books. He seems to be in";
-        mes "agony for some reason.";
-        next;
-        menu "Speak to him.",s_Speak,"Ignore him.",-;
-
-        mes "^3355FFYou decided to leave";
-        mes "him alone and let him";
-        mes "continue mumbling to";
-        mes "himself and playing";
-        mes "with his test tubes.";
-        close;
-
-s_Speak:
-        mes "[" + strcharinfo(0) + "]";
-        mes "Excuse me...";
-        next;
-        mes "[Sire Jore]";
-        mes "...";
-        mes "......";
-        next;
-        mes "^3355FFToo preoccupied with";
-        mes "his thoughts, this strange";
-        mes "man is unable to hear you.";
-        next;
-        menu "Try again.",s_Again,"Ignore him.",-;
-
-        mes "^3355FFYou decided to leave";
-        mes "him alone and let him";
-        mes "continue mumbling to";
-        mes "himself and playing";
-        mes "with his test tubes.";
-        close;
-
-s_Again:
-        mes "[" + strcharinfo(0) + "]";
-        mes "EXCUSE ME!";
-        next;
-        mes "[Sire Jore]";
-        mes "...!";
-        mes "Oh, h-h-hello.";
-        mes "Sorry, but I'm kind of";
-        mes "busy right now. Yes, yes,";
-        mes "would you come back at";
-        mes "precisely 5:00 PM " + $timezonestring$ + "?";
-        next;
-        mes "[Sire Jore]";
-        mes "Let's see...";
-        mes "Now if I recalibrated";
-        mes "the faust exhaust, then";
-        mes "the bioneutron analyzer";
-        mes "would need to be adjusted";
-        mes "for cytoplasmic balance...";
-        close;
-    }
-
-OnPotion:
-    if (rand(2)) {
-        emotion e_ic;
-        misceffect 305;
-    } else {
-        emotion e_omg;
-        misceffect 306;
-    }
-    end;
+prt_maze02,57,151,1	script	Pleur#warp	91,{
+	mes "^3355FFYou catch a glimpse";
+	mes "of a girl heading directly";
+	mes "into a deep forest. You decide";
+	mes "to follow her and see if you can";
+	mes "learn more.^000000";
+	close2;
+	set .@warp_s,rand(1,10);
+	if (.@warp_s < 5) {
+		warp "prt_maze02",11,146;
+	}
+	if (.@warp_s > 7) {
+		warp "prt_maze03",55,8;
+	}
+	if ((.@warp_s > 4) && (.@warp_s < 8)) {
+		warp "prt_maze01",62,129;
+	}
+	end;
 }
 
-prt_maze02,57,152,1	script	Girl#11	91,{
-
+prt_maze02,58,150,0	script	#movesign	-1,5,5,{
+OnTouch:
 	mes "^3355FFYou catch a glimpse";
 	mes "of a girl heading directly";
 	mes "into a deep forest. You decide";
-	if(signquest != 7){
-		mes "to not follow her since you're";
-		mes "not interested where she's going.";
-		close;
-	}
 	mes "to follow her and see if you can";
-	mes "learn more.";
+	mes "learn more.^000000";
 	close2;
-	warp "prt_maze02",11,146;
+	set .@warp_s,rand(1,10);
+	if (.@warp_s < 5) {
+		warp "prt_maze02",11,146;
+	}
+	if (.@warp_s > 7) {
+		warp "prt_maze03",55,8;
+	}
+	if ((.@warp_s > 4) && (.@warp_s < 8)) {
+		warp "prt_maze01",62,129;
+	}
 	end;
 }
 
-function	script	Sign_Alch_Summon	{
-
-Loopback:
-	if($signmazemonster == 0){
-		set $signmazemonster,5;
-		monster "prt_maze02",14,177,"Flora",1118,1,"Gordon::OnMonsterDead";
-		monster "prt_maze02",17,171,"Flora",1118,1,"Gordon::OnMonsterDead";
-		monster "prt_maze02",24,173,"Flora",1118,1,"Gordon::OnMonsterDead";
-		monster "prt_maze02",17,175,"Marine Sphere",1142,1,"Gordon::OnMonsterDead";
-		monster "prt_maze02",17,168,"Marine Sphere",1142,1,"Gordon::OnMonsterDead";
-		return;
-	} else {
-		killmonster "prt_maze02","Gordon::OnMonsterDead";
-		set $signmazemonster,0;
-		goto Loopback;
-	}
+prt_maze02,18,126,0	script	#mazewarp	-1,3,3,{
+OnTouch:
+	warp "prt_maze02",90,170;
+	end;
 }
 
-prt_maze02,16,183,3	script	Pleur	91,{
-	mes "[Pleur]";
-	if(signquest == 7 || signquest == 8){
+//prt_maze02,25,161,0	script	#music	-1,7,7,{
+//OnTouch:
+//	soundeffect "effect\\¼®¾çÀÇ ¾î½Ø½Å.wav",1;
+//	end;
+//}
+
+prt_maze02,132,132,0	script	#skill	-1,{
+OnEnable:
+	monster "prt_maze02",14,177,"Flora",1118,1,"#skill::OnMyMobDead";
+	monster "prt_maze02",17,171,"Flora",1118,1,"#skill::OnMyMobDead";
+	monster "prt_maze02",24,173,"Flora",1118,1,"#skill::OnMyMobDead";
+	monster "prt_maze02",17,175,"Marine Sphere",1142,1,"#skill::OnMyMobDead";
+	monster "prt_maze02",17,168,"Marine Sphere",1142,1,"#skill::OnMyMobDead";
+	end;
+
+OnDisable:
+	killmonster "prt_maze02","#skill::OnMyMobDead";
+	end;
+
+OnMyMobDead:
+	end;
+}
+
+prt_maze02,16,183,3	script	Pleur#sign	91,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 19) {
+		mes "[Pleur]";
 		mes "La la la~";
 		mes "La la la~";
 		close;
-	} else {
-		mes "Oh, you're lost?";
-		mes "I'll help you find";
-		mes "your way back...";
-		close2;
-		warp "prt_maze02",61,149;
-		end;
 	}
+	else {
+		mes "[Pleur]";
+		mes "Hmmm...?";
+		mes "The Stone of Sage...";
+		close;
+	}
+
 OnHo:
 	emotion e_ho;
 	end;
 OnKis2:
 	emotion e_kis2;
 	end;
-OnExclamation:
+OnGasp:
 	emotion e_gasp;
 	end;
 OnOmg:
@@ -2396,4490 +3239,6866 @@ OnOmg:
 	end;
 }
 
-prt_maze02,14,183,3	script	Gordon	51,{
-
-    if (signquest == 7 || signquest == 8) {
-        if (ScareAlchSign == 1)goto s_Scared;
-        mes "[Gordon]";
-        mes "Hello darling.";
-        mes "What did you do today?";
-        next;
-        donpcevent "Pleur::OnHo";
-        mes "[Pleur]";
-        mes "I played Hide-and-Seek";
-        mes "with a white bear and a";
-        mes "blue bear, father.";
-        next;
-        emotion e_ho;
-        mes "[Gordon]";
-        mes "Darling...";
-        mes "Aren't you tired";
-        mes "of playing with the";
-        mes "animals? We've live";
-        mes "in this forest for so long...";
-        next;
-        donpcevent "Pleur::OnKis2";
-        mes "[Pleur]";
-        mes "Don't worry father, I understand.";
-        mes "For now, this is the only place";
-        mes "where we can relax and live";
-        mes "in peace. I think we deserve to rest";
-        mes "after accomplishing our goals...";
-        next;
-        emotion e_sob;
-        mes "[Gordon]";
-        mes "Thank you, Pluer.";
-        mes "I have no regrets about";
-        mes "our work, but sometimes";
-        mes "I do wish for a more";
-        mes "carefree life for you...";
-        next;
-        menu "Roar~!",-,"Excuse me.",s_Excuse;
-
-        callfunc "Sign_Alch_Summon";
-        emotion e_omg;
-        donpcevent "Pleur::OnOmg";
-        set ScareAlchSign,1;
-        mes "[Pleur]";
-        mes "No no no!";
-        mes "Summon Flora!";
-        next;
-        mes "[Gordon]";
-        mes "Great Schott!";
-        mes "Summon... Marine Sphere!";
-        close;
-
-s_Excuse:
-        emotion e_gasp;
-        donpcevent "Pleur::OnExclamation";
-        mes "[Gordon]";
-        mes "Eh?! Don't you know";
-        mes "how dangerous this place";
-        mes "is? What are you doing";
-        mes "here in the middle of";
-        mes "this forest?";
-        next;
-s_Back:
-        mes "[" + strcharinfo(0) + "]";
-        mes "Actually, I think";
-        mes "I've been looking for";
-        mes "you. I've been sent on";
-        mes "an errand to find these";
-        mes "two famous Alchemists.";
-        next;
-        mes "[Gordon]";
-        mes "Mm...?";
-        mes "Well, we're retired";
-        mes "now, but I suppose it'd";
-        mes "do no harm if you had";
-        mes "something to ask us...";
-        next;
-        menu "Ask about Stone of Sage",s_Sage,"Ask about Alchemy",s_Alch,"Quit",-;
-
-        mes "[Gordon]";
-        mes "Hah hah hah~";
-        mes "Did you forget";
-        mes "what you were";
-        mes "going to ask me?";
-        close;
-
-s_Sage:
-
-        mes "[Gordon]";
-        mes "Stone of Sage?";
-        mes "Huh. To be honest,";
-        mes "I don't know anything";
-        mes "about it at all. I guess";
-        mes "its existence is pretty";
-        mes "much just a rumor, really.";
-        next;
-        mes "[Gordon]";
-        mes "All I've heard is that";
-        mes "the Stone of Sage might";
-        mes "be a catalyst  to transmute";
-        mes "materials into gold. If it";
-        mes "really existed, it would be";
-        mes "the ultimate alchemic item.";
-        next;
-        mes "[Pleur]";
-        mes "However I've also heard";
-        mes "it's red, can make humans";
-        mes "immortal and can cure any";
-        mes "sort of disease or ailment";
-        mes "Just where do these rumors";
-        mes "come from? It's crazy...";
-        next;
-        mes "[Gordon]";
-        mes "Now, I even heard that some";
-        mes "people are working on trying";
-        mes "to create the stone themselves.";
-        mes "If they succeed, it'll have a huge";
-        mes "effect on the entire world!";
-        next;
-        mes "[Gordon]";
-        mes "I'm sorry that you've gone";
-        mes "through the trouble of finding";
-        mes "us for this kind of information.";
-        mes "We're retired after all, so we";
-        mes "may be out of the loop.";
-        next;
-        mes "[Pleur]";
-        mes "Although we're retired, we";
-        mes "would be much interested in";
-        mes "knowing if someone does manage";
-        mes "to create such a stone. If that";
-        mes "happens, would you tell us?";
-        next;
-        mes "[Gordon]";
-        mes "Now let me guide you";
-        mes "on a safe path back out";
-        mes "of this maze. I've lived here";
-        mes "quite a while, so I can find";
-        mes "the exit with my eyes close.";
-        mes "Farewell, adventurer~";
-        close2;
-        set signquest,8;
-        warp "mjolnir_12",44,23;
-        end;
-s_Alch:
-
-        mes "[Pleur]";
-        mes "I hope you understand that";
-        mes "my father and I devoted and";
-        mes "sacrificed so much for our work.";
-        mes "Finally, we discovered a way to";
-        mes "summon monsters using potions.";
-        next;
-        mes "[Pleur]";
-        mes "However, too many Alchemists";
-        mes "hounded us for our information";
-        mes "once we announced the results";
-        mes "of our research. Ir was more";
-        mes "than we could handle...";
-        next;
-        mes "[Gordon]";
-        mes "I'm sorry, but if you have any";
-        mes "questions about Alchemy, there";
-        mes "are many qualified researchers and";
-        mes "practitioners out there. We came to";
-        mes "this forest to find peace...";
-        close;
-
-s_Scared:
-        mes "[Gordon]";
-        mes "Oh...!";
-        mes "You scared us!";
-        mes "Roaring like some";
-        mes "animal! What do you";
-        mes "think you were doing?";
-        next;
-        goto s_Back;
-
-    } else {
-        mes "[Gordon]";
-        mes "Can't find your way back?";
-        mes "Don't worry... I'll help";
-        mes "you.";
-        close2;
-        warp "prt_maze02",61,149;
-        end;
-    }
-
-OnMonsterDead:
-	set $signmazemonster,$signmazemonster - 1;
-	end;
+prt_maze02,14,183,4	script	Gordon#sign	51,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 18) {
+		emotion e_ho;
+		mes "[Gordon]";
+		mes "Hello darling.";
+		mes "What did you do today?";
+		next;
+		donpcevent "Pleur#sign::OnHo";
+		mes "[Pleur]";
+		mes "I played Hide-and-Seek";
+		mes "with a white bear and a";
+		mes "blue bear, father.";
+		next;
+		emotion e_ho;
+		mes "[Gordon]";
+		mes "Darling...";
+		mes "Aren't you tired";
+		mes "of playing with the";
+		mes "animals? We've lived";
+		mes "in this forest for so long...";
+		next;
+		donpcevent "Pleur#sign::OnKis2";
+		mes "[Pleur]";
+		mes "Don't worry father, I understand. For now, this is the only place where we can relax and live inpeace. I think we deserve to rest after accomplishing our goals...";
+		next;
+		emotion e_sob;
+		mes "[Gordon]";
+		mes "Thank you, Pluer.";
+		mes "I have no regrets about";
+		mes "our work, but sometimes";
+		mes "I do wish for a more";
+		mes "carefree life for you...";
+		if (sign_q < 17) {
+			close;
+		}
+		else if (sign_q == 17) {
+			next;
+			switch(select("Roar~!:Excuse me.")) {
+			case 1:
+				set sign_q,18;
+				donpcevent "#skill::OnEnable";
+				emotion e_omg;
+				donpcevent "Pleur#sign::OnOMG";
+				mes "[Pleur]";
+				mes "No no no!";
+				mes "Summon Flora!";
+				next;
+				mes "[Gordon]";
+				mes "Great Schott!";
+				mes "Summon... Marine Sphere!";
+				close;
+			case 2:
+				emotion e_gasp;
+				donpcevent "Pleur#sign::OnGasp";
+				mes "[Gordon]";
+				mes "Eh?! Don't you know";
+				mes "how dangerous this place";
+				mes "is? What are you doing";
+				mes "here in the middle of";
+				mes "this forest?";
+				next;
+				mes "["+ strcharinfo(0) +"]";
+				mes "Actually, I think";
+				mes "I've been looking for";
+				mes "you. I've been sent on";
+				mes "an errand to find these";
+				mes "two famous Alchemists.";
+				next;
+				mes "[Gordon]";
+				mes "Mm...?";
+				mes "Well, we're retired";
+				mes "now, but I suppose it'd";
+				mes "do no harm if you had";
+				mes "something to ask us...";
+				next;
+				switch(select("Ask about Stone of Sage:Ask about Alchemy:Quit")) {
+				case 1:
+					set sign_q,19;
+					mes "[Gordon]";
+					mes "Stone of Sage?";
+					mes "Huh. To be honest,";
+					mes "I don't know anything";
+					mes "about it at all. I guess";
+					mes "its existence is pretty";
+					mes "much just a rumor, really.";
+					next;
+					mes "[Gordon]";
+					mes "All I've heard is that";
+					mes "the Stone of Sage might";
+					mes "be a catylst to transmute";
+					mes "materials into gold. If it";
+					mes "really existed, it would be";
+					mes "the ultimate alchemic item.";
+					next;
+					mes "[Pleur]";
+					mes "However, I've also heard";
+					mes "it's red, can make humans";
+					mes "immortal and can cure any";
+					mes "sort of disease or ailment.";
+					mes "Just where do these rumors";
+					mes "come from? It's crazy...";
+					next;
+					mes "[Gordon]";
+					mes "Now, I even hear that some";
+					mes "people are working on trying";
+					mes "to create the stone themselves.";
+					mes "If they succeed, it'll have a huge effect on the entire world!";
+					next;
+					mes "[Gordon]";
+					mes "I'm sorry that you've gone";
+					mes "through the trouble of finding";
+					mes "us for this kind of information. We're retired after all, so we";
+					mes "may be out of the loop.";
+					next;
+					mes "[Pleur]";
+					mes "Although we're retired, we";
+					mes "would be much interested in";
+					mes "knowing if someone does manage";
+					mes "to create such a stone. If that";
+					mes "happens, would you tell us?";
+					next;
+					mes "[Gordon]";
+					mes "Now let me guide you";
+					mes "on a safe path back out";
+					mes "of this maze. I've lived here";
+					mes "quite a while, so I can find";
+					mes "the exit with my eyes closed.";
+					mes "Farewell, adventurer~";
+					close2;
+					warp "mjolnir_12",44,23;
+					end;
+				case 2:
+					mes "[Pleur]";
+					mes "I hope you understand that";
+					mes "my father and I devoted and sacrificed so much for our work. Finally, we discovered a way to summon monsters using potions.";
+					next;
+					mes "[Pleur]";
+					mes "However, too many Alchemists";
+					mes "hounded us for our information";
+					mes "once we announced the results";
+					mes "of our research. It was more";
+					mes "than we could handle...";
+					next;
+					mes "[Gordon]";
+					mes "I'm sorry, but if you have any";
+					mes "questions about Alchemy, there";
+					mes "are many qualified researchers and practitioners out there. We came to this forest to find peace...";
+					close;
+				case 3:
+					mes "[Gordon]";
+					mes "Hah hah hah~";
+					mes "Did you forget";
+					mes "what you were";
+					mes "going to ask me?";
+					close;
+				}
+			}
+		}
+	}
+	else if (sign_q == 18) {
+		emotion e_pif;
+		mes "[Gordon]";
+		mes "Oh...!";
+		mes "You scared us!";
+		mes "Roaring like some";
+		mes "animal! What do you";
+		mes "think you were doing?";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "Actually, I think";
+		mes "I've been looking for";
+		mes "you. I've been sent on";
+		mes "an errand to find these";
+		mes "two famous Alchemists.";
+		next;
+		mes "[Gordon]";
+		mes "Mm...?";
+		mes "Well, we're retired";
+		mes "now, but I suppose it'd";
+		mes "do no harm if you had";
+		mes "something to ask us...";
+		next;
+		switch(select("Ask about Stone of Sage:Ask about Alchemy:Quit")) {
+		case 1:
+			set sign_q,19;
+			mes "[Gordon]";
+			mes "Stone of Sage?";
+			mes "Huh. To be honest,";
+			mes "I don't know anything";
+			mes "about it at all. I guess";
+			mes "its existence is pretty";
+			mes "much just a rumor, really.";
+			next;
+			mes "[Gordon]";
+			mes "All I've heard is that";
+			mes "the Stone of Sage might";
+			mes "be a catylst to transmute";
+			mes "materials into gold. If it";
+			mes "really existed, it would be";
+			mes "the ultimate alchemic item.";
+			next;
+			mes "[Pleur]";
+			mes "However, I've also heard";
+			mes "it's red, can make humans";
+			mes "immortal and can cure any";
+			mes "sort of disease or ailment.";
+			mes "Just where do these rumors";
+			mes "come from? It's crazy...";
+			next;
+			mes "[Gordon]";
+			mes "Now, I even hear that some";
+			mes "people are working on trying";
+			mes "to create the stone themselves.";
+			mes "If they succeed, it'll have a huge effect on the entire world!";
+			next;
+			mes "[Gordon]";
+			mes "I'm sorry that you've gone";
+			mes "through the trouble of finding";
+			mes "us for this kind of information. We're retired after all, so we";
+			mes "may be out of the loop.";
+			next;
+			mes "[Pleur]";
+			mes "Although we're retired, we";
+			mes "would be much interested in";
+			mes "knowing if someone does manage";
+			mes "to create such a stone. If that";
+			mes "happens, would you tell us?";
+			next;
+			mes "[Gordon]";
+			mes "Now let me guide you";
+			mes "on a safe path back out";
+			mes "of this maze. I've lived here";
+			mes "quite a while, so I can find";
+			mes "the exit with my eyes closed.";
+			mes "Farewell, adventurer~";
+			close2;
+			warp "mjolnir_12",44,23;
+			end;
+		case 2:
+			mes "[Pleur]";
+			mes "I hope you understand that";
+			mes "my father and I devoted and sacrificed so much for our work. Finally, we discovered a way to summon monsters using potions.";
+			next;
+			mes "[Pleur]";
+			mes "However, too many Alchemists";
+			mes "hounded us for our information";
+			mes "once we announced the results";
+			mes "of our research. It was more";
+			mes "than we could handle...";
+			next;
+			mes "[Gordon]";
+			mes "I'm sorry, but if you have any";
+			mes "questions about Alchemy, there";
+			mes "are many qualified researchers and practitioners out there. We came to this forest to find peace...";
+			close;
+		case 3:
+			mes "[Gordon]";
+			mes "Hah hah hah~";
+			mes "Did you forget";
+			mes "what you were";
+			mes "going to ask me?";
+			close;
+		}
+	}
+	else if (sign_q > 18) {
+		mes "[Gordon]";
+		mes "Sometimes I miss";
+		mes "being an alchemist.";
+		mes "But then again, a man";
+		mes "of my brilliance and genius";
+		mes "would put all those newbie";
+		mes "scientists to shame~";
+		next;
+		emotion e_swt;
+		mes "[Pleur]";
+		mes "D...";
+		mes "D...Daddy!!";
+		next;
+		emotion e_heh;
+		mes "[Gordon]";
+		mes "Heh heh~";
+		mes "Am I being";
+		mes "too arrogant?";
+		close;
+	}
 }
 
-geffen_in,59,74,3	script	Jesqurienne	803,{
-
-	mes "[Jesqurienne]";
-	if(signquest == 10) goto L_won;
-	if(signquest == 9) goto L_Sign_Jesq;
-	mes "Bartender~?";
-	mes "Give me another drink.";
-	close;
-
-L_Sign_Jesq:
-	mes "Bartender~?";
-	mes "Give me another drink.";
-	next;
-	mes "[Jesqurienne]";
-	mes "Ahhhhhh~";
-	mes "Hm? Why hello there,";
-	if(!Sex) goto L_female;
-	mes "You fine specimen of a man~";
-
-L_female:
-	mes "I'm Jesqurienne. You've heard";
-	mes "of me, haven't you? Aren't you";
-	mes "surprised to see me?";
-	next;
-	menu "I've never heard of you",-,"Oh gosh, it's Jesqurienne!",L_ohgosh;
-	mes "[Jesqurienne]";
-	mes "Ho ho ho~!";
-	mes "Surely you";
-	mes "must be joking~";
-	emotion 4;
-	next;
-	menu "You got me, you got me.",L_ohgosh,"Nope, doesn't ring a bell",-;
-
-	emotion 9;
-	mes "[Jesqurienne]";
-	mes "...";
-	mes "......";
-	mes "Now I undersand.";
-	mes "You've been living";
-	mes "under a rock for all";
-	mes "this time, haven't you?";
-	next;
-	mes "[Jesqurienne]";
-	mes "But I guess someone";
-	mes "as simple minded as you";
-	mes "wouldn't recognize a famous,";
-	mes "brilliant genius once you";
-	mes "saw her, wouldn't you?";
-
-L_ohgosh:
-	next;
-	mes "[Jesqurienne]";
-	mes "Anyway, I'm so proud";
-	mes "of my supreme intelligence!";
-	mes "I may be somewhat obsessive";
-	mes "about studying, but that's just";
-	mes "another reason to admire me~";
-	next;
-	mes "[Jesqurienne]";
-	mes "The Wizard and Sage";
-	mes "exams? No problem~";
-	mes "Even the Alchemist test";
-	mes "was fairly simple. So far";
-	mes "I haven't met anyone";
-	mes "smarter than me~";
-	next;
-	menu "Stuck-up chick.",L_stuckup,"Take it easy on the drinks...",-;
-
-	mes "[Jesqurienne]";
-	mes "Ho ho ho~";
-	mes "Plenty of people have";
-	mes "told me not to drink so";
-	mes "much. But once I start";
-	mes "I can't stop. I love to";
-	mes "drink that much!";
-	next;
-	mes "[Jesqurienne]";
-	mes "And...";
-	mes "Sometimes I'd rather";
-	mes "look at the world through";
-	mes "these haze eyes. See things";
-	mes "the way I want to see them...";
-	close;
+geffen_in,59,74,4	script	Jesqurienne#sign	803,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 21) {
+		mes "[Jesqurienne]";
+		mes "Bartender~?";
+		mes "Give me another drink.";
+		if (sign_q < 20) {
+			close;
+		}
+		else if (sign_q == 20) {
+			next;
+			mes "[Jesqurienne]";
+			mes "Ahhhhhh~";
+			mes "Hm? Why hello there,";
+			if (Sex == 1) {
+				mes "you fine speciman of a man~";
+			}
+			else {
+				mes "you precious, adorable girl~";
+			}
+			mes "I'm Jesqurienne. You've heard";
+			mes "of me, haven't you? Aren't you surprised to see me?";
+			next;
+			switch(select("I've never heard of you.:Oh gosh, it's Jesqurienne!")) {
+			case 1:
+				mes "[Jesqurienne]";
+				emotion e_swt;
+				mes "Ho ho ho~!";
+				mes "Surely you";
+				mes "must be joking~";
+				next;
+				switch(select("You got me, you got me.:Nope. Doesn't ring a bell.")) {
+				case 1:
+					emotion e_pif;
+					mes "[Jesqurienne]";
+					mes "Ohohohohoho~!";
+					mes "I knew it! I knew it!";
+					mes "Then again, there's little";
+					mes "that a famous genius like";
+					mes "myself does ^333333not^000000 know!";
+					next;
+					mes "[Jesqurienne]";
+					mes "Gah--!";
+					mes "My glass is";
+					mes "already empty?";
+					mes "Bartender, another";
+					mes "drink please~";
+					next;
+					break;
+				case 2:
+					emotion e_dots;
+					mes "[Jesqurienne]";
+					mes "...";
+					mes "......";
+					mes "Now I understand.";
+					mes "You've been living";
+					mes "under a rock for all";
+					mes "this time, haven't you?";
+					next;
+					mes "[Jesqurienne]";
+					mes "But I guess someone";
+					mes "as simple minded as you";
+					mes "wouldn't recognize a famous,";
+					mes "brilliant genius once you";
+					mes "saw her, wouldn't you?";
+					next;
+					break;
+				}
+				break;
+			case 2:
+				mes "[Jesqurienne]";
+				mes "Ohohohohoho~!";
+				mes "I knew it! I knew it!";
+				mes "Then again, there's little";
+				mes "that a famous genius like";
+				mes "myself does ^333333not^000000 know!";
+				next;
+				mes "[Jesqurienne]";
+				mes "Gah--!";
+				mes "My glass is";
+				mes "already empty?";
+				mes "Bartender, another";
+				mes "drink please~";
+				next;
+				break;
+			}
+			mes "[Jesqurienne]";
+			mes "Anyway, I'm so proud";
+			mes "of my supreme intelligence!";
+			mes "I may be somewhat obsessive";
+			mes "about studying, but that's just another reason to admire me~";
+			next;
+			mes "[Jesqurienne]";
+			mes "The Wizard and Sage";
+			mes "exams? No problem~";
+			mes "Even the Alchemist test";
+			mes "was fairly simple. So far";
+			mes "I haven't met anyone";
+			mes "smarter than me~";
+			next;
+			switch(select("^333333Stuck-up chick.^000000:Take it easy on the drinks...")) {
+			case 1:
+				emotion e_an;
+				mes "[Jesqurienne]";
+				mes "What...?";
+				mes "What did you say?";
+				mes "No one has ever";
+				mes "said anything like";
+				mes "that to me before!";
+				mes "H-how dare you...";
+				next;
+				emotion e_ag;
+				mes "[Jesqurienne]";
+				mes "Prove that you can";
+				mes "hold a candle to my";
+				mes "superior intellect and";
+				mes "I'll be willing to accept";
+				mes "your little insult! It's time";
+				mes "for a Quiz Challenge!";
+				next;
+				mes "["+ strcharinfo(0) +"]";
+				mes "Quiz... Challenge?";
+				mes "Like a trivia game?";
+				mes "But who's going to";
+				mes "ask us the questions?";
+				next;
+				donpcevent "Aaron#sign::onSmile";
+				emotion e_gasp;
+				emotion e_gasp,1;
+				mes "[Aaron]";
+				mes "Did someone say";
+				mes "''Quiz Challenge?''";
+				mes "I believe I can be";
+				mes "of assistance.";
+				next;
+				set sign_q,21;
+				emotion e_gg;
+				mes "[Jesqurienne]";
+				mes "Professor Aaron?";
+				mes "Ho ho~ If he's asking";
+				mes "the questions, it looks";
+				mes "like your chances of";
+				mes "beating me are zero!";
+				close;
+			case 2:
+				mes "[Jesqurienne]";
+				mes "Ho ho ho~";
+				mes "Plenty of people have";
+				mes "told me not to drink so";
+				mes "much. But once I start";
+				mes "I can't stop. I love to";
+				mes "drink that much!";
+				next;
+				mes "[Jesqurienne]";
+				mes "And...";
+				mes "Sometimes I'd rather";
+				mes "look at the world through";
+				mes "these hazy eyes. See things";
+				mes "the way I want to see them...";
+				close;
+			}
+		}
+	}
+	else if ((sign_q == 21) || (sign_q == 22)) {
+		mes "[Jesqurienne]";
+		mes "It amuses me that";
+		mes "you think that you'd";
+		mes "stand a chance against";
+		mes "me in a Quiz Challenge.";
+		mes "Ho ho ho ho ho~!";
+		next;
+		mes "[Jesqurienne]";
+		mes "Professor Aaron";
+		mes "is waiting for you";
+		mes "to ask him to begin.";
+		mes "And I'm waiting for the";
+		mes "moment when you realize";
+		mes "you have no hope of winning!";
+		close;
+	}
+	else if (sign_q == 23) {
+		mes "[Jesqurienne]";
+		mes "Bwahahahaha!";
+		mes "You should have known";
+		mes "from the beginning that you";
+		mes "never had a chance! Of course,";
+		mes "I did, but you know, I guess you had to learn for yourself.";
+		next;
+		emotion e_an;
+		mes "[Jesqurienne]";
+		mes "I'd insult you if it weren't for the fact that you embarassed yourself enough during the Quiz Challenge. As a matter of fact, I'll even forgive you for wounding my pride earlier.";
+		next;
+		emotion e_gg;
+		mes "[Jesqurienne]";
+		mes "Can you believe it?";
+		mes "Even drunk I can beat";
+		mes "you in a test of intelligence!";
+		mes "Bwahaha! I can't believe how";
+		mes "simple minded you are...!";
+		next;
+		switch(select("I can't let you win!:Darn it...")) {
+		case 1:
+			set sign_q,22;
+			mes "[Jesqurienne]";
+			mes "You're a slow learner,";
+			mes "aren't you? Well, I welcome";
+			mes "your ''challenge'' anytime!";
+			mes "Bwah hah hah hah hah~!";
+			close;
+		case 2:
+			mes "[Jesqurienne]";
+			mes "Just now you realize";
+			mes "how pitiful your intellect";
+			mes "is compared to mine? Ho ho ho!";
+			mes "There's hope for every fool!";
+			close;
+		}
+	}
+	else if (sign_q == 24) {
+		mes "[Jesqurienne]";
+		mes "What...?";
+		mes "I... I...";
+		mes "I don't b-believe it.";
+		next;
+		mes "[Jesqurienne]";
+		mes "I lost...";
+		mes "M-maybe you were right.";
+		mes "I am arrogant after all...";
+		mes "I should stop drinking so";
+		mes "much. Travel around and";
+		mes "broaden my knowledge...";
+		next;
+		mes "[Jesqurienne]";
+		mes "You're the only";
+		mes "one who has been";
+		mes "able to beat me in";
+		mes "a battle of minds.";
+		mes "W-who are you...?";
+		next;
+		input .@input$;
+		mes "[Jesqurienne]";
+		mes ""+.@input$+"...";
+		mes "I will remember that.";
+		next;
+		mes "[Jesqurienne]";
+		set sign_q,25;
+		getitem 7177,1; //Part_Of_Star's_Sob
+		mes "Here...";
+		mes "My old friend, Metz, told";
+		mes "me to give this to someone";
+		mes "who is worthy. I was going";
+		mes "to keep it, but I suppose";
+		mes "you're its true owner...";
+		next;
+		mes "[Jesqurienne]";
+		mes "If you want to know more about the Sobbing Starlight, find a man named ^3131CEDearles^000000. It may be hard to find him since he wanders from place to place, but it might help to know that he loves gambling...";
+		next;
+		mes "[Jesqurienne]";
+		mes "Good luck finding";
+		mes "Dearles. I'm taking";
+		mes "this loss pretty badly,";
+		mes "so I think I'll stay here";
+		mes "and have another drink.";
+		mes "Farewell, "+.@input$+".";
+		close;
+	}
+	else if (sign_q == 25) {
+		mes "[Jesqurienne]";
+		mes "Ooooh...";
+		mes "My head...";
+		mes "Oh...! It's you...!";
+		mes "So did you find Dearles?";
+		next;
+		mes "[Jesqurienne]";
+		mes "Hmm...";
+		mes "He's addicted to";
+		mes "gambling, so maybe you";
+		mes "can find him some place";
+		mes "where you can do that...";
+		close;
+	}
+	else {
+		mes "[Jesqurienne]";
+		mes "OoOooOhh~";
+		mes "Sooooo dizzy.";
+		mes "Maybe I drank";
+		mes "too much again~";
+		close;
+	}
 
-L_stuckup:
-	mes "[Jesqurienne]";
-	mes "What...?";
-	mes "What did you say?";
-	mes "No one has ever";
-	mes "said anything like";
-	mes "that to me before!";
-	mes "H-how dare you...";
-	next;
-	mes "[Jesqurienne]";
-	mes "Prove that you can";
-	mes "hold a candle to my";
-	mes "superior intellect and";
-	mes "I'll be willing to accept";
-	mes "your insult! It's time";
-	mes "for a Quiz Challenge!";
-	emotion 7;
-	next;
-	mes "["+strcharinfo(0)+"]";
-	mes "Quiz... Challenge?";
-	mes "Like a trivia game?";
-	mes "But who's going to";
-	mes "ask us the questions?";
-	next;
-	mes "[Aaron]";
-	mes "Did someone say";
-	mes "\"Quiz Challenge?\"";
-	mes "I believe I can be";
-	mes "of assistance.";
-	emotion 0;
-	donpcevent "Aaron2::OnHeh";
-	emotion 0,1;
-	next;
-	mes "[Jesqurienne]";
-	mes "Professor Aaron?";
-	mes "Ho ho~ If he's asking";
-	mes "the questions, it looks";
-	mes "like your chances of";
-	mes "beating me are zero!";
-	emotion 29;
-	next;
-	mes "[Jesqurienne]";
-	mes "It amuses me that";
-	mes "you think that you'd";
-	mes "stand a chance against";
-	mes "me in a Quiz Challenge.";
-	mes "Ho ho ho ho ho~!";
-	next;
-	mes "[Jesqurienne]";
-	mes "Professor Aaron";
-	mes "is waiting for you";
-	mes "to ask him to begin.";
-	mes "And I'm waiting for the";
-	mes "moment when you realize";
-	mes "you have no hope of winning!";
-	set @signquiz,1;
-	close;
+OnOmg:
+	emotion e_omg;
+	end;
 
-L_won:
-	mes "Ooooh...";
-	mes "My head...";
-	mes "Oh...! It's you...!";
-	mes "So did you find Dearles?";
-	next;
-	mes "[Jesqurienne]";
-	mes "Hmm...";
-	mes "He's addicted to";
-	mes "gambling, so maybe you";
-	mes "can find him some place";
-	mes "where you can do that...";
-	close;
+OnHo:
+	emotion e_ho;
+	end;
 }
 
-// ---------------------------------------------------------
-
-geffen_in,60,70,6	script	Aaron::Aaron2	754,{
-
-    if (signquest == 10) goto L_done;
-    if (@signquiz == 1) goto L_startquiz;
-    if (@signquiz == 2) goto L_quiztime;
-    emotion 23;
-    mes "[Aaron]";
-    mes "Goodness...!";
-    mes "Either these beer";
-    mes "goggles are on too tight,";
-    mes "or you're the most gorgeous";
-    mes "woman I've ever seen in my life!";
-    next;
-    if (!Sex) goto L_female;
-    menu "Um, I'm a dude...",-;
-    mes "[Aaron]";
-    mes "N-no...!";
-    mes "M-maybe I should";
-    mes "take it easy on the";
-    mes "alcohol. I do have classes";
-    mes "to teach tomorrow anyway...";
-    emotion 28;
-    close;
-
-L_female:
-    menu "Why, thank you~",-;
-    mes "[Aaron]";
-    mes "Ah, yes. Your";
-    mes "sense of style, your";
-    mes "magnificent body. Everything";
-    mes "about you is beautiful! Not just";
-    mes "that, but you're also intelligent!";
-    next;
-    mes "[Aaron]";
-    mes "I should know!";
-    mes "Not only do I teach";
-    mes "classes, but I'm also";
-    mes "a Quiz Challenge moderator";
-    mes "master in my spare time~";
-    mes "You're truly a jewel...";
-    emotion e_lv;
-    close;
-
-L_startquiz:
-    mes "[Aaron]";
-    mes "Alright, before";
-    mes "we begin, let me";
-    mes "tell you the rules...";
-    next;
-    mes "[Aaron]";
-    mes "I'm going to give you";
-    mes "ten multiple choice questions.";
-    mes "Since this is an impromptu";
-    mes "exhibition bout, I'm going to";
-    mes "use questions that I use";
-    mes "in teaching my class.";
-    emotion 19;
-    next;
-    mes "[Aaron]";
-    mes "Alright...";
-    mes "I'm almost finished";
-    mes "compiling the questions.";
-    mes "We're ready to go when";
-    mes "you're ready to begin!";
-    set @signquiz,2;
-    close;
-
-L_quiztime:
-	//NOTE:
-	// Officially, there are 10 sets of 2-3 possible questions each.
-	// One of the dialogues actually refers to the contents of one of them.
-	// Therefore the 'random' approach below is just an approximation.
-
-	set .@playerpoints,0;
-	set .@jesqpoints,0;
-	
-	// array holding the numbers of questions that haven't been asked yet
-	setarray .@signarray[1],1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26;
-	set .@size, 26;
-	
-	// 10 questions
-	for( set .@i,1; .@i <= 10; set .@i,.@i+1 )
-	{
-		// choose which question to ask next
-		set .@qpos, rand(1,.@size);
-		set .@qid, .@signarray[.@qpos];
-		
-		// remove the question from the array (reducing its size)
-		set .@signarray[.@qpos], .@signarray[.@size];
-		set .@signarray[.@size], 0;
-		set .@size, .@size - 1;
-		
-		// initialize data for this round
-		switch( .@qid )
-		{
-			case 1:
-				set .@question$, "Choose the monster that is a different size than the others.";
-				set .@answers$, "Giant Whisper:Marin:Cornutus:Kobold Archer";
-				set .@answer, 2;
+geffen_in,61,72,7	script	Aaron#sign	754,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q == 21) {
+		mes "[Aaron]";
+		mes "Alright, before";
+		mes "we begin, let me";
+		mes "tell you the rules...";
+		next;
+		emotion e_swt2;
+		mes "[Aaron]";
+		mes "I'm going to give you";
+		mes "ten multiple choice questions.";
+		mes "Since this is an impromptu";
+		mes "exhibition bout, I'm going to";
+		mes "use questions that I use";
+		mes "in teaching my class.";
+		next;
+		set sign_q,22;
+		mes "[Aaron]";
+		mes "Alright...";
+		mes "I'm almost finished";
+		mes "compiling the questions.";
+		mes "We're ready to go when";
+		mes "you're ready to begin!";
+		close;
+	}
+	else if (sign_q == 22) {
+		switch(rand(1,3)) {
+		case 1:
+			mes "[Aaron]";
+			mes "1. Which NPC is";
+			mes "not relevant to the";
+			mes "Blacksmith Job Quest?";
+			next;
+			if (select("Baisulist:Wickebine:Barcardi:Krongast") == 3) set .@user_p,.@user_p+1;
 			break;
-			case 2:
-				set .@question$, "What is the Bunny Band's DEF and its added ability?";
-				set .@answers$, "1 / LUK + 2:1 / LUK + 5:2 / LUK + 2:2 / LUK + 5";
-				set .@answer, 3;
+		case 2:
+			mes "[Aaron]";
+			mes "1. Which item is not";
+			mes "relevant to the creation";
+			mes "of a Counteragent?";
+			next;
+			if (select("Karvodailnirol:Detrimindexta:Alcohol") != 1) set .@user_p,.@user_p+1;
 			break;
-			case 3:
-				set .@question$, "Choose the correct name of the ruler of the Rune-Midgard Kingdom.";
-				set .@answers$, "Tristan III:Tristram III:Tristar III:Trust III";
-				set .@answer, 1;
+		case 3:
+			mes "[Aaron]";
+			mes "1. Choose the";
+			mes "monster that is";
+			mes "a different size";
+			mes "than the others.";
+			next;
+			if (select("Giant Whisper:Marine:Cornutus:Kobold Archer") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 4:
-				set .@question$, "Choose the monster which does not drop the 'Yggdrasil Leaf' item.";
-				set .@answers$, "Marduk:Baphomet Jr.:Angeling:Wanderer";
-				set .@answer, 1;
+		}
+		if (rand(1,10) < 9 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "Heh heh...";
+			mes "The first question";
+			mes "is always too easy!";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "Huh...?";
+			mes "How can I not know";
+			mes "the answer to this?!";
+		}
+		next;
+		switch(rand(1,3)) {
+		case 1:
+			mes "[Aaron]";
+			mes "2. Choose the skill";
+			mes "related to the Priest's";
+			mes "B.S. Sacramenti from the";
+			mes "ones displayed in the list.";
+			next;
+			if (select("Lex Divina:Gloria:Recovery:Sanctuary") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 5:
-				set .@question$, "What is the city closest to Turtle Island?";
-				set .@answers$, "Al De Baran:Alberta:Comodo:Izlude";
-				set .@answer, 2;
+		case 2:
+			mes "[Aaron]";
+			mes "2. Choose the material that";
+			mes "is not related to the creation";
+			mes "of a Condensed White Potion.";
+			next;
+			if (select("Medicine Bowl:Witch Starsand:Empty Bottle:Empty Potion Bottle") == 3) set .@user_p,.@user_p+1;
 			break;
-			case 6:
-				set .@question$, "Fifty-one multiplied by fifteen, divided by three, plus five is equal to...?";
-				set .@answers$, "250:255:260:265";
-				set .@answer, 3;
+		case 3:
+			mes "[Aaron]";
+			mes "2. Choose the item that is";
+			mes "necessary for a Blacksmith";
+			mes "to create a Gladius.";
+			next;
+			if (select("Sapphire:Zircon:Topaz:Cursed Ruby") == 1) set .@user_p,.@user_p+1;
 			break;
-			case 7:
-				set .@question$, "Choose the Hunter's Trap skill which does not inflict Property Damage.";
-				set .@answers$, "Claymore Trap:Freezing Trap:Shockwave Trap:Land Mine";
-				set .@answer, 3;
+		}
+		if (rand(1,10) < 8 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "Ho ho ho ho~!";
+			mes "I know the answer.";
+			mes "Any fool should know";
+			mes "this. But do you?";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "Oh...";
+			mes "I knew the answer";
+			mes "to this just yesterday!";
+			mes "Why can't I think of it now?!";
+		}
+		next;
+		switch(rand(1,3)) {
+		case 1:
+			mes "[Aaron]";
+			mes "3. Choose the";
+			mes "property that is";
+			mes "unrelated to the";
+			mes "Mage's Bolt type skills.";
+			next;
+			if (select("Water:Earth:Fire:Wind") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 8:
-				set .@question$, "Choose the monster on which the mage skill,\"Stone Curse\", is ineffective.";
-				set .@answers$, "Elder Willow:Evil Druid:Magnolia:Marc";
-				set .@answer, 2;
+		case 2:
+			mes "[Aaron]";
+			mes "3. What is the";
+			mes "Bunny Band's DEF";
+			mes "and its added ability?";
+			next;
+			if (select("1 / LUK +2:1 / LUK +5:2 / LUK +2:2 / LUK +5") == 3) set .@user_p,.@user_p+1;
 			break;
-			case 9:
-				set .@question$, "Choose the item that cannot be equipped by Novice class characters.";
-				set .@answers$, "Funeral Hat:Shackles:Wooden Mail:Pantie";
-				set .@answer, 3;
+		case 3:
+			mes "[Aaron]";
+			mes "3. Choose the prefix or";
+			mes "suffix that is incorrectly";
+			mes "matched with its Monster";
+			mes "Card name.";
+			next;
+			if (select("Hornet Card - Martyr:Requiem - Chaos:Wormtail - Clever:Golem - Immortal") == 4) set .@user_p,.@user_p+1;
 			break;
-			case 10:
-				set .@question$, "Which NPC is not relevant to the Blacksmith Job Quest?";
-				set .@answers$, "Baisulitst:Wickebine:Barcardi:Krongast";
-				set .@answer, 3;
+		}
+		if (rand(1,10) < 8 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "Ah...";
+			mes "That's another";
+			mes "point for me!";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "z...z...Z";
+			mes "W-what? Oh!";
+			mes "Well, I won't need";
+			mes "that point anyway...";
+		}
+		next;
+		mes "[Jesqurienne]";
+		mes "Let's check our";
+		mes "scores, shall we?";
+		mes ".................";
+		next;
+		if (.@npc_p > .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Heh heh...";
+			mes "It looks like";
+			mes "I'm beating you!";
+			mes "But you shouldn't";
+			mes "be surprised...";
+		}
+		else if (.@npc_p == .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Still, you're";
+			mes "smarter than";
+			mes "I thought you'd be...";
+		}
+		else {
+			mes "[Jesqurienne]";
+			mes "W-wait a minute!";
+			mes "H-how could you";
+			mes "have more points";
+			mes "than me?! I better";
+			mes "get serious!";
+		}
+		next;
+		mes "[Aaron]";
+		mes "^333333*Ahem!*^000000";
+		mes "Question";
+		mes "number four!";
+		next;
+		switch(rand(1,2)) {
+		case 1:
+			mes "[Aaron]";
+			mes "4. Choose the correct";
+			mes "name of the ruler of the";
+			mes "Rune-Midgarts Kingdom.";
+			next;
+			if (select("Tristan lll:Tristram lll:Tristar lll:Trust lll") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 11:
-				set .@question$, "Choose the Property that is unrelated to the Mage's Bolt type skills.";
-				set .@answers$, "Water:Earth:Fire:Wind";
-				set .@answer, 2;
+		case 2:
+			mes "[Aaron]";
+			mes "4. Choose the monster";
+			mes "that is a different type";
+			mes "than the others.";
+			next;
+			if (select("Penomena:Hatii:Pest:Explosion") == 1) set .@user_p,.@user_p+1;
 			break;
-			case 12:
-				set .@question$, "Choose the correct DEF for the Indian Filet item.";
-				set .@answers$, "0:1:2:3";
-				set .@answer, 4;
+		}
+		if (rand(1,10) < 8 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "That counts as";
+			mes "a question? You're";
+			mes "being too easy!";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "I know the";
+			mes "answer! W-why";
+			mes "can't I think of";
+			mes "it right now?!";
+		}
+		next;
+		if (.@npc_p > .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Heh heh~ It looks";
+			mes "like I have the lead.";
+			mes "But that's only natural for";
+			mes "someone as brilliant as me~";
+		}
+		else if (.@npc_p == .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Up till now";
+			mes "you've managed";
+			mes "to keep up with";
+			mes "me. Huh. So you're";
+			mes "not a total idiot...";
+		}
+		else {
+			mes "[Jesqurienne]";
+			mes "Heh heh~ It looks";
+			mes "like I have the lead.";
+			mes "But that's only natural for";
+			mes "someone as brilliant a--";
+			mes "Wait. How do you have";
+			mes "more points than me?!";
+		}
+		next;
+		switch(rand(1,3)) {
+		case 1:
+			mes "[Aaron]";
+			mes "5. Choose the monster";
+			mes "which does not drop the";
+			mes "'Yggdrasil Leaf' item.";
+			next;
+			if (select("Marduk:Baphomet Jr.:Angeling:Wanderer") == 1) set .@user_p,.@user_p+1;
 			break;
-			case 13:
-				set .@question$, "Which item is not relevant to the creation of a counteragent?";
-				set .@answers$, "Karvodailnirol:Detrimindexta:Alcohol";
-				set .@answer, 1;
+		case 2:
+			mes "[Aaron]";
+			mes "5. Choose the job class";
+			mes "that cannot equip Silk Robe.";
+			next;
+			if (select("Swordman:Merchant:Hunter:Mage") == 3) set .@user_p,.@user_p+1;
 			break;
-			case 14:
-				set .@question$, "Choose the level requirement for entering the PvP room.";
-				set .@answers$, "30:31:32:33";
-				set .@answer, 2;
+		case 3:
+			mes "[Aaron]";
+			mes "5. Choose the level";
+			mes "requirement for entering";
+			mes "the PvP Room.";
+			next;
+			if (select("30:31:32:33") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 15:
-				set .@question$, "Three thousand one hundred two added to five hundred, plus four, divided by 6 equals...";
-				set .@answers$, "600:601:602";
-				set .@answer, 2;
+		}
+		set zis_5,rand(1,10);
+		if (rand(1,10) < 9 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "I didn't have";
+			mes "to think very hard";
+			mes "to know the answer.";
+			mes "Are you still thinking?";
+			mes "I wouldn't think you'd know!";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "I...";
+			mes "Hold on,";
+			mes "I know this one...";
+			mes "(Oh craaaaaap!)";
+		}
+		next;
+		if (.@npc_p > .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Oh? What a surprise.";
+			mes "I'm in the lead. I know";
+			mes "the suspense must be";
+			mes "killing you, but I'm pretty";
+			mes "sure who the winner will";
+			mes "be. Me me me meee~";
+		}
+		else if (.@npc_p == .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Are you copying";
+			mes "my answers? Because";
+			mes "there's no way we can";
+			mes "be tied right now...";
+		}
+		else {
+			mes "[Jesqurienne]";
+			mes "I...";
+			mes "I must be more";
+			mes "drunk than I thought";
+			mes "if I'm losing right now...";
+		}
+		next;
+		switch(rand(1,3)) {
+		case 1:
+			mes "[Aaron]";
+			mes "6. What is the";
+			mes "correct weight";
+			mes "for 1 Empty Bottle?";
+			next;
+			if (select("1:2:3") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 16:
-				set .@question$, "Choose the building that is the closest to the Item Upgrade Place in Yuno.";
-				set .@answers$, "Tavern:Monster Library:Tool Shop:Weapon Shop";
-				set .@answer, 4;
+		case 2:
+			mes "[Aaron]";
+			mes "6. Choose the";
+			mes "correct DEF for";
+			mes "the Indian Filet item.";
+			next;
+			if (select("0:1:2:3") == 4) set .@user_p,.@user_p+1;
 			break;
-			case 17:
-				set .@question$, "What is the correct weight for 1 Empty Bottle?";
-				set .@answers$, "1:2:3";
-				set .@answer, 2;
+		case 3:
+			mes "[Aaron]";
+			mes "6. What is the";
+			mes "city closest to";
+			mes "Turtle Island?";
+			next;
+			if (select("Al De Baran:Alberta:Comodo:Izlude") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 18:
-				set .@question$, "Choose the NPC that looks different than all others.";
-				set .@answers$, "Prontera Hollengrhen:Prontera Doll Merchant:Izlude Meat Merchant:Morroc Tool Dealer";
-				set .@answer, 3;
+		}
+		if (rand(1,10) < 9 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "^333333*Sigh...*^000000";
+			mes "Simple questions,";
+			mes "simple answers.";
+			mes "Did you get it?";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "W-wait...!";
+			mes "I know the";
+			mes "answer to this";
+			mes "one! Just let me";
+			mes "th-think...!";
+		}
+		next;
+		if (.@npc_p > .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Oh, look at that.";
+			mes "I have more points";
+			mes "than you. I know, it";
+			mes "must be frustrating";
+			mes "trying to keep up.";
+		}
+		else if (.@npc_p == .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Mmm...?";
+			mes "How are you cheating?!";
+			mes "You having the same score";
+			mes "as me must be impossible!";
+		}
+		else {
+			mes "[Jesqurienne]";
+			mes "I don't understand.";
+			mes "You have a higher sco--";
+			mes "I don't-- How can yo--";
+			mes "Why is this happening?";
+		}
+		next;
+		switch(rand(1,3)) {
+		case 1:
+			mes "[Aaron]";
+			mes "7. Fifty-one multiplied";
+			mes "by fifteen, divided by three,";
+			mes "plus five is equal to...?";
+			next;
+			if (select("250:255:260:265") == 3) set .@user_p,.@user_p+1;
 			break;
-			case 19:
-				set .@question$, "Choose the material that is not related to the creation of a Condensed White Potion.";
-				set .@answers$, "Medicine Bowl:Witch Starsand:Empty Bottle:Empty Potion Bottle";
-				set .@answer, 3;
+		case 2:
+			mes "[Aaron]";
+			mes "7. Four thousand five hundred sixty divided by four, divided by two, plus three is equal to...?";
+			next;
+			if (select("573:574:575:576") == 1) set .@user_p,.@user_p+1;
 			break;
-			case 20:
-				set .@question$, "Choose the monster that is a different type than the others.";
-				set .@answers$, "Penomena:Hatii:Pest:Explosion";
-				set .@answer, 1;
+		case 3:
+			mes "[Aaron]";
+			mes "7. Three thousand one hundred";
+			mes "two added to five hundred, plus four, divided by six equals...";
+			next;
+			if (select("600:601:602") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 21:
-				set .@question$, "Choose the Job class that cannot equip Silk Robe.";
-				set .@answers$, "Swordman:Merchant:Hunter:Mage";
-				set .@answer, 3;
+		}
+		if (rand(1,10) < 9 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "Math?";
+			mes "My mind is";
+			mes "a veritable";
+			mes "calculator!";
+			mes "Ho ho ho~!";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "What the--?!";
+			mes "Why is all the math";
+			mes "written out in words";
+			mes "instead of the traditional";
+			mes "numerics and symbols?!";
+			mes "A-answer me--!!";
+		}
+		next;
+		if (.@npc_p > .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Ah. Did I tell you";
+			mes "I was in the lead";
+			mes "right now? Well, let";
+			mes "me remind you, in case";
+			mes "I forget. Ho ho ho ho~!";
+		}
+		else if (.@npc_p == .@user_p) {
+			mes "[Jesqurienne]";
+			mes "That's it.";
+			mes "I don't understand";
+			mes "how your score is";
+			mes "equal to mine. Are";
+			mes "you getting bonus";
+			mes "points somehow?!";
+		}
+		else {
+			mes "[Jesqurienne]";
+			mes "There's no other";
+			mes "explanation! You've";
+			mes "got to be using some";
+			mes "sort of crib sheet! But";
+			mes "where are you hiding it?";
+		}
+		next;
+		switch(rand(1,2)) {
+		case 1:
+			mes "[Aaron]";
+			mes "8. Choose the building";
+			mes "that is the closest to the";
+			mes "Item Upgrade Place in Juno.";
+			next;
+			if (select("Tavern:Monster Library:Tool Shop:Weapon Shop") == 4) set .@user_p,.@user_p+1;
 			break;
-			case 22:
-				set .@question$, "Four thousand five hundred sixty divided by four, divided by two, plus three is equal to...";
-				set .@answers$, "573:574:575:576";
-				set .@answer, 1;
+		case 2:
+			mes "[Aaron]";
+			mes "8. Choose the Hunter's";
+			mes "Trap skill which does not";
+			mes "inflict Property Damage.";
+			next;
+			if (select("Claymore Trap:Freezing Trap:Shockwave Trap:Land Mine") == 3) set .@user_p,.@user_p+1;
 			break;
-			case 23:
-				set .@question$, "Which monster would receive the most damage from a Fire Property Dagger?";
-				set .@answers$, "Dagger Goblin:Mace Goblin:Morningstar Goblin:Hammer Goblin";
-				set .@answer, 4;
+		}
+		if ( rand(1,10) < 9 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "Hah hah~!";
+			mes "That was a";
+			mes "piece of cake!";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "Grrr...";
+			mes "Why don't";
+			mes "I know this one?!";
+		}
+		next;
+		if (.@npc_p > .@user_p) {
+			mes "[Jesqurienne]";
+			mes "I know, you're wondering";
+			mes "how such an intelligent";
+			mes "person can exist. Well,";
+			mes "I guess my intellect sort";
+			mes "of balances the stupidity";
+			mes "of the rest of the world...";
+		}
+		else if (.@npc_p == .@user_p) {
+			mes "[Jesqurienne]";
+			mes "How can our scores";
+			mes "be equal? No... No...";
+			mes "Think, Jesqurienne...";
+			mes "Time travel isn't possible.";
+			mes "But why would you time travel";
+			mes "for the answers to a quiz?";
+		}
+		else {
+			mes "[Jesqurienne]";
+			mes "I... I don't";
+			mes "get it. H-how are";
+			mes "you w-winning? M-my";
+			mes "whole perception of";
+			mes "reality is starting t-to...";
+		}
+		next;
+		switch(rand(1,2)) {
+		case 1:
+			mes "[Aaron]";
+			mes "9. Which monster would";
+			mes "receive the most damage";
+			mes "from a Fire Property Dagger?";
+			next;
+			if (select("Dagger Goblin:Mace Goblin:Morning Star Goblin:Hammer Goblin") == 4) set .@user_p,.@user_p+1;
 			break;
-			case 24:
-				set .@question$, "Choose the skill related to the Priest's B.S. Sacramenti from the ones displayed in the list.";
-				set .@answers$, "Lex Divina:Gloria:Recovery:Sanctuary";
-				set .@answer, 2;
+		case 2:
+			mes "[Aaron]";
+			mes "9. Choose the monster";
+			mes "on which the Mage skill,";
+			mes "''Stone Curse,'' is ineffective. ^FFFFFFaaaaaa aaaaaaa aaaaaa aaaaaaa aaaaaaaaa^000000";
+			next;
+			if (select("Elder Willow:Evil Druid:Magnolia:Marc") == 2) set .@user_p,.@user_p+1;
 			break;
-			case 25:
-				set .@question$, "Choose the item that is necessary for a Blacksmith to create a Gladius.";
-				set .@answers$, "Sapphire:Zircon:Topaz:Cursed Ruby";
-				set .@answer, 1;
+		}
+		if ( rand(1,10) < 9 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "Ahhh...";
+			mes "I'm just breezing";
+			mes "through this Quiz Challenge!";
+			mes "Aren't you having a hard time?";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "Huh...?";
+			mes "I don't understand";
+			mes "why I don't know this...";
+		}
+		next;
+		if (.@npc_p > .@user_p) {
+			mes "[Jesqurienne]";
+			mes "Bwahahaha!";
+			mes "Only one question";
+			mes "left! You have to get";
+			mes "this one right or I'll";
+			mes "call you stupid forever!";
+		}
+		else if (.@npc_p == .@user_p) {
+			mes "[Jesqurienne]";
+			mes "We're tied?!";
+			mes "Oh no... I better";
+			mes "get this last question";
+			mes "right. (And I hope that";
+			mes "you get it wrong!)";
+		}
+		else {
+			mes "[Jesqurienne]";
+			mes "I'm losing?!";
+			mes "And we're at the";
+			mes "last question already?!";
+		}
+		next;
+		switch(rand(1,2)) {
+		case 1:
+			mes "[Aaron]";
+			mes "10. Choose the NPC";
+			mes "that looks different";
+			mes "than all the others.";
+			next;
+			if (select("Prontera Hollgrehenn:Prontera Doll Merchant:Izlude Meat Merchant:Morroc Meat Merchant") == 3) set .@user_p,.@user_p+1;
 			break;
-			case 26:
-				set .@question$, "Choose the prefix or suffix that is incorrectly matched with his Monster Card name.";
-				set .@answers$, "Hornet Card - Martyr:Requiem - Chaos:Wormtail - Clever:Golem - Immortal";
-				set .@answer, 4;
+		case 2:
+			mes "[Aaron]";
+			mes "10. Choose the item";
+			mes "that cannot be equipped";
+			mes "by Novice class characters.";
+			next;
+			if (select("Funeral Hat:Shackles:Wooden Mail:Pantie") == 3) set .@user_p,.@user_p+1;
 			break;
 		}
-		
+		if ( rand(1,10) < 9 ) {
+			donpcevent "Jesqurienne#sign::OnHo";
+			mes "[Jesqurienne]";
+			mes "As usual, I got";
+			mes "the last question";
+			mes "absolutely right~";
+			set .@npc_p,.@npc_p+1;
+		}
+		else {
+			donpcevent "Jesqurienne#sign::OnOmg";
+			mes "[Jesqurienne]";
+			mes "Huh...";
+			mes "Wh-what was";
+			mes "the question again?";
+			mes "Nooo, I missed it!";
+		}
+		next;
 		mes "[Aaron]";
-		mes .@i + ". " + .@question$;
+		mes "Okay, the quiz";
+		mes "is over! Now, I'll";
+		mes "reveal the results";
+		mes "of the competitors...";
 		next;
-		if( select(.@answers$) == .@answer )
-			set .@playerpoints, .@playerpoints + 1;
-		
-		// Jesqurienne answers correctly 80% of the time
-		mes "[Jesqurienne]";
-		if( rand(1,10) < 9 )
-		{
-			set .@jesqpoints, .@jesqpoints + 1;
-			emotion e_oh;
-			switch( .@i )
-			{
-				case 1:
-					mes "Heh heh...";
-					mes "The first question";
-					mes "is always too easy.";
-				break;
-				case 2:
-					mes "Ho ho ho ho~!";
-					mes "I know the answer.";
-					mes "Any fool should know";
-					mes "this. But do you?";
-				break;
-				case 3:
-					mes "Ah...";
-					mes "That's another";
-					mes "point for me!";
-				break;
-				case 4:
-					mes "That counts as";
-					mes "a question? You're";
-					mes "being too easy!";
-				break;
-				case 5:
-					mes "I didn't have";
-					mes "to think very hard";
-					mes "to know the answer.";
-					mes "Are you still thinking?";
-					mes "I wouldn't think you'd know!";
-				break;
-				case 6:
-					mes "^333333*Sigh...*^000000";
-					mes "Simple questions,";
-					mes "simple answers.";
-					mes "Did you get it?";
-				break;
-				case 7:
-					//NOTE: this one is custom
-					mes "Ah...";
-					mes "That's another";
-					mes "point for me!";
-				break;
-				case 8:
-					mes "Hah hah~!";
-					mes "That was a";
-					mes "piece of cake!";
-				break;
-				case 9:
-					mes "Ahhh...";
-					mes "I'm just breezing";
-					mes "through this Quiz Challenge!";
-					mes "Aren't you having a hard time?";
-				break;
-				case 10:
-					mes "As usual, I got";
-					mes "the last question";
-					mes "absolutely right~";
-				break;
+		mes "[Aaron]";
+		mes "Umm...";
+		mes ""+ strcharinfo(0) +":";
+		mes ""+.@user_p+" points!";
+		next;
+		mes "[Aaron]";
+		mes "Jesqurienne...";
+		mes ""+.@npc_p+" points!";
+		next;
+		if (.@npc_p > .@user_p) {
+			set sign_q,23;
+			emotion e_gg;
+			mes "[Jesqurienne]";
+			mes "Bwahahaha!";
+			mes "I win! I knew it!";
+			mes "Ho ho ho ho ho ho~";
+		}
+		else if (.@npc_p == .@user_p) {
+			set sign_q,24;
+			mes "[Jesqurienne]";
+			mes "Tied?! ";
+			mes "Alright, I'm impressed.";
+			mes "I'll admit, you're much";
+			mes "smarter than I thought...";
+		}
+		else {
+			set sign_q,24;
+			mes "[Jesqurienne]";
+			mes "No...!";
+			mes "I can't...";
+			mes "Believe this...";
+		}
+		next;
+		mes "[Aaron]";
+		mes "Thank you";
+		mes "for playing!";
+		mes ".......................";
+		mes "...........................";
+		mes "Alright, back to drinking!";
+		close;
+	}
+	else {
+		mes "[Aaron]";
+		emotion e_omg;
+		mes "Goodness...!";
+		mes "Either these beer";
+		mes "goggles are on too tight,";
+		mes "or you're the most gorgeous";
+		mes "woman I've seen in my life!";
+		next;
+		if (Sex == 1) {
+			select("Um, I'm a dude...");
+			emotion e_sob;
+			mes "[Aaron]";
+			mes "N-no...!";
+			mes "M-maybe I should";
+			mes "take it easy on the";
+			mes "alcohol. I do have classes";
+			mes "to teach tomorrow anyway...";
+		}
+		else {
+			select("Why, thank you~");
+			emotion e_no1;
+			mes "[Aaron]";
+			mes "Ah, yes. Your";
+			mes "sense of style, your";
+			mes "magnificent body. Everything";
+			mes "about you is beautiful! Not just that, but you're also intelligent!";
+			next;
+			emotion e_lv2;
+			mes "[Aaron]";
+			mes "I should know!";
+			mes "Not only do I teach";
+			mes "classes, but I'm also";
+			mes "a Quiz Challenge moderater";
+			mes "master in my spare time~";
+			mes "You're truly a jewel...";
+		}
+		close;
+	}
+OnSmile:
+	emotion e_heh;
+	end;
+}
+
+cmd_in02,88,51,4	script	Strange Guy#sign	806,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 25) {
+		mes "[Dearles]";
+		mes "No...! Damn it,";
+		mes "not again! When's";
+		mes "my lucky streak";
+		mes "gonna start?";
+		next;
+		mes "[Dearles]";
+		mes "Hey, you've got that look";
+		mes "like you want something from";
+		if (Zeny < 10000) {
+			mes "me. Hah! You are poor!";
+			emotion e_pif;
+			mes "It also looks like you're low on cash~! Well, this is what guys like me to do to shameless";
+			mes "moochers like you!";
+			percentheal -10,0;
+			close;
+		}
+		else {
+			mes "me. It also looks like you got zeny to spare! I think I'll help myself and borrow some of your cash!";
+			mes "^FF0000Yoink!^000000";
+			set zeny,zeny-10000;
+			specialeffect EF_COIN;
+			close;
+		}
+	}
+	else if (sign_q == 25) {
+		mes "[Dearles]";
+		mes "No...! Damn it,";
+		mes "not again! When's";
+		mes "my lucky streak";
+		mes "gonna start?";
+		next;
+		switch(select("Excuse me...:Just pass by.")) {
+		case 1:
+			mes "[Dearles]";
+			mes "What is it?!";
+			mes "I'm not in the mood";
+			mes "for chatting with complete";
+			mes "and total strangers, so";
+			mes "get to the point~!";
+			next;
+			switch(select("Oh, nothing.:I'm here for Metz...?")) {
+			case 1:
+				mes "[Dearles]";
+				mes "Wha...? You bother";
+				mes "me and make lose this";
+				mes "game for nothing? For that,";
+				mes "I'll freakin' beat you to near";
+				mes "freakin' death! Bam bam bam!";
+				close2;
+				percentheal -100,0;
+				soundeffect "effect\\sign_noise.wav",1;
+				percentheal -99,0;
+				warp "comodo",122,100;
+				end;
+			case 2:
+				mes "[Dearles]";
+				mes "Oh. You're here for";
+				mes "the Sobbing Starlight, huh? If you wanna take my test, there's *ahem* a fee of 30,000 zeny. So take it or leave it, capish?";
+				next;
+				mes "[Dearles]";
+				mes "I'll have nothing";
+				mes "to do with you if you";
+				mes "can't pay up. Just think";
+				mes "of the fee as a preliminary";
+				mes "for my test. You know, to";
+				mes "weed out the riffraff.";
+				set sign_q,26;
+				close;
 			}
+		case 2:
+			mes "[Dearles]";
+			mes "Crap...!";
+			mes "I'm almost broke!";
+			mes "But I gotta win all";
+			mes "my cash back! How can";
+			mes "I raise more money fast";
+			mes "without actually working...";
+			close;
 		}
-		else
-		{
-			emotion e_wah;
-			switch( .@i )
-			{
-				case 1:
-					mes "Huh...?";
-					mes "How can I not know";
-					mes "the answer to this?!";
-				break;
-				case 2:
-					mes "Oh...";
-					mes "I knew the answer";
-					mes "to this just yesterday!";
-					mes "Why can't I think of it now?!";
-				break;
-				case 3:
-					mes "z...z...Z";
-					mes "W-what? Oh!";
-					mes "Well, I won't need";
-					mes "that point anyway...";
-				break;
-				case 4:
-					mes "I know the";
-					mes "answer! W-why";
-					mes "can't I think of";
-					mes "it right now?!";
-				break;
-				case 5:
-					mes "I...";
-					mes "Hold on,";
-					mes "I know this one...";
-					mes "(Oh craaaaaap!)";
-				break;
-				case 6:
-					mes "W-wait...!";
-					mes "I know the";
-					mes "answer to this";
-					mes "one! Just let me";
-					mes "th-think...!";
-				break;
-				case 7:
-					//NOTE: this one is custom
-					mes "z...z...Z";
-					mes "W-what? Oh!";
-					mes "Well, I won't need";
-					mes "that point anyway...";
-				break;
-				case 8:
-					mes "Grrr...";
-					mes "Why don't";
-					mes "I know this one?!";
-				break;
-				case 9:
-					mes "Huh...?";
-					mes "I don't understand";
-					mes "why I don't know this...";
-				break;
-				case 10:
-					mes "Huh...";
-					mes "Wh-what was";
-					mes "the question again?";
-					mes "Nooo, I missed it!";
-				break;
+	}
+	else if (sign_q == 26) {
+		mes "[Dearles]";
+		mes "Eh heh heh~";
+		mes "Soooooo, did you";
+		mes "bring the money?";
+		next;
+		switch(select("Here you are...:Not yet...")) {
+		case 1:
+			mes "[Dearles]";
+			mes "Ummm.......";
+			if (Zeny < 30000) {
+				mes "When I say 30,000 zeny,";
+				mes "I mean 30,000 zeny! I'll let";
+				mes "you off on account of you looking like you're not smart enough to know how to count. But pull this";
+				mes "on me again and I'll...!";
 			}
+			else {
+				mes "Heh heh~";
+				mes "That's thirty grand,";
+				mes "alright! Okay, come back";
+				mes "to me tomorrow night and";
+				mes "we'll start your test...";
+				set sign_q,27;
+				set zeny,zeny-30000;
+			}
+			close;
+		case 2:
+			mes "[Dearles]";
+			mes "Huh...?";
+			mes "Alright, but you";
+			mes "better hurry. I can";
+			mes "change my mind at";
+			mes "any time, you know!";
+			close;
 		}
+	}
+	else if (sign_q == 27) {
+		if ((gettime(3) > 18) && (gettime(3) < 23)) {
+			mes "[Dearles]";
+			mes "Nice, you're here";
+			mes "just in time. Well,";
+			mes "all that matters is that";
+			mes "you come during the night.";
+			next;
+			mes "[Dearles]";
+			mes "You're wondering how";
+			mes "a guy like me is pals with";
+			mes "Metz, but that's none of your";
+			mes "business. I guess I gotta keep";
+			mes "this promise to him, so when";
+			mes "you're ready, say the word.";
+			set sign_q,28;
+			close;
+		}
+		else {
+			mes "[Dearles]";
+			mes "Hey... When I say";
+			mes "''tomorrow night,'' I mean,";
+			mes "come and talk to me at nighttime! Don't you know anything about shady dealings?! Pfft! Adventurers...";
+			close;
+		}
+	}
+	else if (sign_q== 28) {
+		mes "[Dearles]";
+		mes "Alright! I want you to";
+		mes "bring me a bunch of items!";
+		mes "Yeah, I know, you're a real";
+		mes "pro at this, but let me set";
+		mes "you straight before you blow";
+		mes "this off as a piece of cake...";
 		next;
-		
-		// starting from after the 3rd round, Jesqurienne will keep informing you about the current status
-		if( .@i == 3 )
-		{
-			mes "[Jesqurienne]";
-			mes "Let's check our";
-			mes "scores, shall we?";
-			mes ".................";
+		mes "[Dearles]";
+		mes "I'm not gonna give you an";
+		mes "exact list of items I want. Oh";
+		mes "no, what you gotta do is bring";
+		mes "me artsy crafts. This test is";
+		mes "gonna judge your appreciation";
+		mes "for... Craftsmanship~";
+		next;
+		mes "[Dearles]";
+		mes "Since I'm seeing whether";
+		mes "or not you got good taste,";
+		mes "variety is the important thing";
+		mes "here. So don't bring freakin'";
+		mes "a hundred of the same object.";
+		mes "Just one of each kind'll do.";
+		next;
+		mes "[Dearles]";
+		mes "What are you";
+		mes "standin' around";
+		mes "waiting for? Bring";
+		mes "those collection items!";
+		set sign_q,29;
+		close;
+	}
+	else if (sign_q < 35) {
+		switch(sign_q) {
+		case 29:
+			mes "[Dearles]";
+			mes "Ah, so is this";
+			mes "the stuff you brought?";
+			mes "Lemme take a look-see...";
+			if (countitem(734) > 0) {
+				set .@diaris_t,.@diaris_t+1;
+			}
+			if (countitem(735) > 0) {
+				set .@diaris_t,.@diaris_t+1;
+			}
+			if (countitem(736) > 0) {
+				set .@diaris_t,.@diaris_t+1;
+			}
+			if (countitem(7149) > 0) {
+				set .@diaris_t,.@diaris_t+1;
+			}
+			if (countitem(747) > 0) {
+				set .@diaris_t,.@diaris_t+2;
+			}
+			if (countitem(749) > 0) {
+				set .@diaris_t,.@diaris_t+4;
+			}
+			if (countitem(740) > 0) {
+				set .@diaris_t,.@diaris_t+1;
+			}
+			if (countitem(741) > 0) {
+				set .@diaris_t,.@diaris_t+1;
+			}
+			if (countitem(742) > 0) {
+				set .@diaris_t,.@diaris_t+2;
+			}
+			if (countitem(743) > 0) {
+				set .@diaris_t,.@diaris_t+3;
+			}
+			if (countitem(752) > 0) {
+				set .@diaris_t,.@diaris_t+3;
+			}
+			if (countitem(753) > 0) {
+				set .@diaris_t,.@diaris_t+4;
+			}
+			if (countitem(754) > 0) {
+				set .@diaris_t,.@diaris_t+4;
+			}
+			if (countitem(750) > 0) {
+				set .@diaris_t,.@diaris_t+7;
+			}
+			if (countitem(751) > 0) {
+				set .@diaris_t,.@diaris_t+7;
+			}
 			next;
-			mes "[Jesqurienne]";
-			if( .@playerpoints < .@jesqpoints ) {
-				mes "Heh heh...";
-				mes "It looks like";
-				mes "I'm beating you!";
-				mes "But you shouldn't";
-				mes "be suprised...";
-			} else
-			if( .@playerpoints == .@jesqpoints ) {
-				mes "Still, you're";
-				mes "smarter than";
-				mes "I thought you'd be...";
-			} else
-			{ //if( .@playerpoints > .@jesqpoints ) {
-				mes "W-wait a minute!";
-				mes "H-how could you";
-				mes "have more points";
-				mes "than me?! I better";
-				mes "get serious!";
+			if (.@diaris_t > 10) {
+				mes "[Dearles]";
+				mes "Nice, nice~";
+				mes "These'll sell for--";
+				mes "Er, I'm glad to say";
+				mes "that you pass for now.";
+				next;
+				mes "[Dearles]";
+				mes "I think you're ready";
+				mes "for the next step. Now,";
+				mes "I'm gonna send you to";
+				mes "Lamadin for Part Two";
+				mes "of my test. Yeah, I know...";
+				if (countitem(734) > 0) {
+					delitem 734,1; //Red_Frame
+				}
+				if (countitem(735) > 0) {
+					delitem 735,1; //Blue_Porcelain
+				}
+				if (countitem(736) > 0) {
+					delitem 736,1; //White_Platter
+				}
+				if (countitem(7149) > 0) {
+					delitem 7149,1; //Yellow_Plate
+				}
+				if (countitem(747) > 0) {
+					delitem 747,1; //Crystal_Mirror
+				}
+				if (countitem(749) > 0) {
+					delitem 749,1; //Frozen_Rose
+				}
+				if (countitem(740) > 0) {
+					delitem 740,1; //Stuffed_Doll
+				}
+				if (countitem(741) > 0) {
+					delitem 741,1; //Poring_Doll
+				}
+				if (countitem(742) > 0) {
+					delitem 742,1; //Chonchon_Doll
+				}
+				if (countitem(743) > 0) {
+					delitem 743,1; //Spore_Doll
+				}
+				if (countitem(752) > 0) {
+					delitem 752,1; //Grasshopper_Doll
+				}
+				if (countitem(753) > 0) {
+					delitem 753,1; //Monkey_Doll
+				}
+				if (countitem(754) > 0) {
+					delitem 754,1; //Raccoondog_Doll
+				}
+				if (countitem(750) > 0) {
+					delitem 750,1; //Baphomet_Doll
+				}
+				if (countitem(751) > 0) {
+					delitem 751,1; //Osiris_Doll
+				}
+				set sign_q,30;
+				if (BaseLevel < 60) {
+					getexp 3000,0;
+				}
+				else if (BaseLevel < 70) {
+					getexp 5000,0;
+				}
+				else if (BaseLevel < 80) {
+					getexp 8000,0;
+				}
+				else if (BaseLevel < 90) {
+					getexp 10000,0;
+				}
+				else if (BaseLevel < 99) {
+					getexp 13000,0;
+				}
+				next;
+				warp "cmd_in01",33,29;
+				end;
+			}
+			else if ((.@diaris_t > 0) && (.@diaris_t < 11)) {
+				mes "[Dearles]";
+				mes "Hmm... Some of this";
+				mes "stuff looks good, but";
+				mes "there isn't enough variety";
+				mes "here that proves your eye for";
+				mes "craftsmanship. Come back";
+				mes "with more stuff, alright?";
+				close;
 			}
+			else {
+				mes "[Dearles]";
+				mes "Hmm...";
+				mes "All the stuff you're";
+				mes "carrying? Worthless junk!";
+				mes "Go and find stuff that was";
+				mes "skillfully crafted, okay?";
+				next;
+				mes "[Dearles]";
+				mes "And by crafts I don't mean";
+				mes "potions, weapons, equipment,";
+				mes "none of that. Just think of, well, stuff you'd show off in your rooom and you'll be on the right track. Remember, variety!";
+				close;
+			}
+		case 30:
+		case 31:
+			mes "[Dearles]";
+			mes "Hey, you gotta";
+			mes "finish Part Two of";
+			mes "my test. I'm gonna send";
+			mes "you to Lamadin now...";
+			close2;
+			warp "cmd_in01",33,29;
+			end;
+		case 32:
+			mes "[Dearles]";
+			mes "You failed Part Two,";
+			mes "the rhythm portion of";
+			mes "my freakin' test?! If you";
+			mes "wanna try again, you're";
+			mes "welcome to another chance...";
 			next;
-			mes "[Aaron]";
-			mes "*Ahem!*";
-			mes "Question";
-			mes "number four!";
-			next;
-		} else
-		if( .@i == 4 || .@i == 5 || .@i == 6 || .@i == 7 || .@i == 8 )
-		{
-			//NOTE: rounds 5-8 should actually have their own dialogue!
-			mes "[Jesqurienne]";
-			if( .@playerpoints < .@jesqpoints ) {
-				mes "Heh heh~ It looks";
-				mes "like I have the lead.";
-				mes "But that's only natural for";
-				mes "someone as brilliant as me~";
-			} else
-			if( .@playerpoints == .@jesqpoints ) {
-				mes "Up till now";
-				mes "you've managed";
-				mes "to keep up with";
-				mes "me. Huh. So you're";
-				mes "not a total idiot...";
-			} else
-			{ //if( .@playerpoints > .@jesqpoints ) {
-				mes "Heh heh~ It looks";
-				mes "like I have the lead.";
-				mes "But that's only natural for";
-				mes "someone as brilliant a--";
-				mes "Wait. How do you have";
-				mes "more points than me?!";
-			}
-			next;
-		} else
-		if( .@i == 9 )
-		{
-			mes "[Jesqurienne]";
-			if( .@playerpoints < .@jesqpoints ) {
-				mes "Bwahahaha!";
-				mes "Only one question";
-				mes "left! You have to get";
-				mes "this one right or I'll";
-				mes "call you stupid forever!";
-			} else
-			if( .@playerpoints == .@jesqpoints ) {
-				mes "We're tied?!";
-				mes "Oh no... I better";
-				mes "get this last question";
-				mes "right. (And I hope that";
-				mes "you get it wrong!)";
-			} else
-			{ //if( .@playerpoints > .@jesqpoints ) {
-				mes "I'm losing?!";
-				mes "And we're at the";
-				mes "last question already?!";
+			switch(select("Yes.:Maybe later.")) {
+			case 1:
+				mes "[Dearles]";
+				mes "Okay...";
+				mes "Just keep in mind";
+				mes "that Part Two was ";
+				mes "supposed to be";
+				mes "the easy part...";
+				close2;
+				warp "cmd_in01",33,29;
+				end;
+			case 2:
+				mes "[Dearles]";
+				mes "What...?";
+				mes "Alright, but you";
+				mes "really shouldn't give";
+				mes "up. I mean, Part Two is";
+				mes "supposed to be ridiculously";
+				mes "easy. I made it that way...";
+				close;
+			}
+		case 33:
+			mes "[Dearles]";
+			mes "Alright, Lamadin";
+			mes "tells me you passed.";
+			mes "Not the best performance,";
+			mes "but it's good enough.";
+			next;
+			mes "[Dearles]";
+			mes "Alright, take this chunk";
+			mes "of Sobbing Starlight and";
+			mes "go find someone named,";
+			mes "um, ''Bakerlan'' in Alberta.";
+			set sign_q,35;
+			getitem 7177,1; //Part_Of_Star's_Sob
+			if (BaseLevel < 60) {
+				getexp 3000,0;
+			}
+			else if (BaseLevel < 70) {
+				getexp 7000,0;
 			}
+			else if (BaseLevel < 80) {
+				getexp 19000,0;
+			}
+			else if (BaseLevel < 90) {
+				getexp 12000,0;
+			}
+			else if (BaseLevel < 99) {
+				getexp 17000,0;
+			}
+			next;
+			mes "[Dearles]";
+			mes "Well, that's it.";
+			mes "There's no reason";
+			mes "for you to ever see";
+			mes "me again. But yeah,";
+			mes "good luck with that";
+			mes "Sobbing Starlight business.";
+			close;
+		case 34:
+			mes "[Dearles]";
+			mes "Lamadin tells me";
+			mes "you passed. Since you";
+			mes "did so good, I'm gonna";
+			mes "give you ^333333some^000000 of your money";
+			mes "back. Not all, but most of it.";
+			mes "Isn't that reward enough?";
 			next;
+			mes "[Dearles]";
+			mes "Alright, take this chunk";
+			mes "of Sobbing Starlight and";
+			mes "go find someone named,";
+			mes "um, ''Bakerlan'' in Alberta.";
+			set sign_q,35;
+			getitem 7177,1; //Part_Of_Star's_Sob
+			set zeny,zeny+20000;
+			if (BaseLevel < 60) {
+				getexp 3000,0;
+			}
+			else if (BaseLevel < 70) {
+				getexp 7000,0;
+			}
+			else if (BaseLevel < 80) {
+				getexp 10000,0;
+			}
+			else if (BaseLevel < 90) {
+				getexp 14000,0;
+			}
+			else if (BaseLevel < 99) {
+				getexp 19000,0;
+			}
+			next;
+			mes "[Dearles]";
+			mes "Well, that's it.";
+			mes "There's no reason";
+			mes "for you to ever see";
+			mes "me again. But yeah,";
+			mes "good luck with that";
+			mes "Sobbing Starlight business.";
+			close;
 		}
 	}
-	
-	mes "[Aaron]";
-	mes "Okay, the quiz";
-	mes "is over! Now, I'll";
-	mes "reveal the results";
-	mes "of the competitors...";
-	next;
-	mes "[Aaron]";
-	mes "Umm...";
-	mes ""+strcharinfo(0)+":";
-	mes .@playerpoints + " points!";
-	next;
-	mes "[Aaron]";
-	mes "Jesqurienne...";
-	mes .@jesqpoints + " points!";
-	next;
-	mes "[Jesqurienne]";
-	if( .@playerpoints < .@jesqpoints ) {
-		mes "Bwahahaha!";
-		mes "I win! I knew it!";
-		mes "Ho ho ho ho ho ho~";
-		set @takenquiz,1;
-	} else
-	if( .@playerpoints == .@jesqpoints ) {
-		mes "Tied?!";
-		mes "Alright, I'm impressed.";
-		mes "I'll admit, you're much";
-		mes "smarter than I thought...";
-		set @takenquiz,2;
-	} else
-	{ // if( .@playerpoints > .@jesqpoints ) {
-		mes "No...!";
-		mes "I can't...";
-		mes "Believe this...";
-		set @takenquiz,2;
+	else if (sign_q == 97) {
+		mes "[Dearles]";
+		mes "No...! Damn it,";
+		mes "not again! When's";
+		mes "my lucky streak";
+		mes "gonna start?";
+		next;
+		mes "[Dearles]";
+		mes "Hey, you've got that look";
+		mes "like you want something from";
+		if (Zeny < 10000) {
+			mes "me. It also looks like you're low on cash~! Well, this is what guys like me to do to shameless";
+			mes "moochers like you!";
+			emotion e_pif;
+			percentheal -10,0;
+			close;
+		}
+		else {
+			mes "me. It also looks like you got zeny to spare! I think I'll help myself and borrow some of your cash!";
+			mes "^FF0000Yoink!^000000";
+			mes "Giggle giggle..";
+			set zeny,zeny-10000;
+			close;
+		}
+	}
+	else if (sign_q == 98) {
+		mes "[Dearles]";
+		mes "Whaaaaaaaaaat are";
+		mes "you doing back here?";
+		if (Zeny > 9999) {
+			mes "Fine, since we know each";
+			mes "other, I'm borrowing some";
+			mes "cash. You know, for old";
+			mes "time's sake. ^FF0000Yoink!^000000";
+			emotion e_gg;
+			set zeny,zeny-10000;
+		}
+		else {
+			mes "I got nothin' for you and";
+			mes "you obviously have nothing";
+			mes "for me! Now lemme gamble!";
+			emotion e_pif;
+		}
+		close;
+	}
+	else {
+		mes "[Dearles]";
+		mes "Hey, why are you";
+		mes "still talkin' to me?";
+		mes "You finished my test.";
+		mes "It's over. Not get outta";
+		mes "here before I jack some";
+		mes "more of your cash!";
+		emotion e_gg;
+		next;
+		switch(select("Okay.:I want to take Part Two again.")) {
+		case 1:
+			mes "[Dearles]";
+			mes "Fine, fine.";
+			mes "Geez, why do";
+			mes "these guys always";
+			mes "come and bother me?";
+			emotion e_pif;
+			close;
+		case 2:
+			mes "[Dearles]";
+			mes "Wha...?";
+			mes "Part Two";
+			mes "was really";
+			mes "that fun? Fine,";
+			mes "knock yourself out.";
+			next;
+			warp "cmd_in01",33,29;
+			end;
+		}
 	}
-	next;
-    
-    mes "[Aaron]";
-    mes "Thank you";
-    mes "for playing!";
-    mes ".......................";
-    mes "............................";
-    mes "Alright, back to drinking!";
-    next;
-    if (@takenquiz == 2) {
-        mes "[Jesqurienne]";
-        mes "I lost...";
-        mes "M-maybe you were right.";
-        mes "I am arrogant after all...";
-        mes "I should stop drinking so";
-        mes "much. Travel around and";
-        mes "broaden my knowledge...";
-        next;
-        mes "[Jesqurienne]";
-        mes "You're the only";
-        mes "one who has been";
-        mes "able to beat me in";
-        mes "a battle of minds.";
-        mes "W-who are you...?";
-        next;
-        input @quizname$;
-        mes "[Jesqurienne]";
-        mes ""+@quizname$+"...";
-        mes "I'll remember that.";
-        next;
-        mes "[Jesqurienne]";
-        mes "Here...";
-        mes "My old friend, Metz, told";
-        mes "me to give this to someone";
-        mes "who is worthy. I was going";
-        mes "to keep it, but I suppose";
-        mes "you're its true owner...";
-        getitem 7177,1;
-        set signquest,10;
-        next;
-        mes "[Jesqurienne]";
-        mes "If you want to know more about the";
-        mes "Sobbing Starlight, find a man named";
-        mes "^0000FFDearles^000000. It may be hard to find him";
-        mes "since he wanders from place to";
-        mes "place, but it might help to know";
-        mes "that he loves gambling...";
-        next;
-        mes "[Jesqurienne]";
-        mes "Good luck finding";
-        mes "Dearles. I'm taking";
-        mes "this loss pretty badly,";
-        mes "so I think I'll stay here";
-        mes "and have another drink.";
-        mes "Farewell, " + @quizname$ + ".";
-        close;
-    }
-
-    if (@takenquiz == 1) {
-        mes "[Jesqurienne]";
-        mes "Bwahahahaha!";
-        mes "You should have known";
-        mes "from the beginning that you";
-        mes "never had a chance! Of course,";
-        mes "I did, but you know, I guess you";
-        mes "had to learn for yourself.";
-        next;
-        mes "[Jesqurienne]";
-        mes "I'd insult you if it weren't for";
-        mes "the fact that you embarassed";
-        mes "yourself enough during the Quiz";
-        mes "Challenge. As a matter of fact,";
-        mes "I'll even forgive you for wounding";
-        mes "my pride earlier.";
-        next;
-        mes "[Jesqurienne]";
-        mes "Can you believe it?";
-        mes "Even drunk I can beat";
-        mes "you in a test of intelligence!";
-        mes "Bwahaha! I can't believe how";
-        mes "simple minded you are...!";
-        emotion e_gg;
-        next;
-        menu "I can't let you win!",L_challenge,"Darn it...",-;
-        mes "[Jesqurienne]";
-        mes "Just now you realize";
-        mes "how pitiful your intellect";
-        mes "is compared to mine? Ho ho ho!";
-        mes "There's hope for every fool!";
-        close;
-    }
-
-L_challenge:
-    mes "[Jesqurienne]";
-    mes "You're a slow learner,";
-    mes "aren't you? Well, I welcome";
-    mes "your 'Challenge' anytime!";
-    mes "Bwah hah hah hah hah~!";
-    close;
-
-L_done:
-    mes "[Aaron]";
-    mes "Thank you";
-    mes "for playing!";
-    mes ".......................";
-    mes "............................";
-    mes "Alright, back to drinking!";
-    close;
-
-OnHeh:
-    emotion 18;
-
 }
 
-cmd_in02,88,51,3	script	Strange Man	806,{
-
-    if (signquest == 12) goto L_Ever;
-    if (signquest == 11) goto L_Test;
-    mes "[Dearles]";
-    mes "No...! Damn it,";
-    mes "not again! When's";
-    mes "my lucky streak";
-    mes "gonna start?";
-
-    if (signquest == 10) {
-        next;
-        if (@pay_dearles == 1) goto L_Pay;
-
-        menu "Excuse me...",L_Excuse,"Just pass by.",-;
-        mes "[Dearles]";
-        mes "Crap...!";
-        mes "I'm almost broke!";
-        mes "But i gotta win";
-        mes "all my cash back! How can";
-        mes "I raise more money fast";
-        mes "without actually working...";
-        close;
-
-L_Excuse:
-        mes "[Dearles]";
-        mes "What is it?!";
-        mes "I'm not in the mood";
-        mes "for chatting with complete";
-        mes "and total strangers, so";
-        mes "get to the point~!";
-        next;
-        menu "Oh nothing...",-,"I'm here for Metz...?",L_Metz;
-        mes "[Dearles]";
-        mes "Wha...? You bother";
-        mes "me and make me lose this";
-        mes "game for nothing? For that,";
-        mes "I'll freakin' beat you to near";
-        mes "freakin' death! Bam bam bam!";
-        close2;
-        set Hp,1;
-        warp "comodo",122,100;
-        end;
-
-L_Metz:
-        mes "[Dearles]";
-        mes "Oh. You're here for";
-        mes "the Sobbing Starlight, huh? If you";
-        mes "wanna take my test, there's *ahem*";
-        mes "a fee of 30.000 zeny. So take it or";
-        mes "leave it, capish?";
-        next;
-        mes "[Dearles]";
-        mes "I'll have nothing";
-        mes "to do with you if you";
-        mes "can't pay up. Just think";
-        mes "of the fee as a preliminary";
-        mes "for my test. You know, to";
-        mes "weed out the riffraff.";
-        set @pay_dearles,1;
-        close;
-
-L_Pay:
-        mes "[Dearles]";
-        mes "Eh heh heh~";
-        mes "Soooooo, did you";
-        mes "bring the money?";
-        next;
-        menu "Here you are...",L_Fee,"Not yet...",-;
-        mes "[Dearles]";
-        mes "Huh?";
-        mes "Alright but you";
-        mes "better hurry. I can";
-        mes "change my mind at";
-        mes "any time, you know!";
-        close;
-
-L_Fee:
-        if (Zeny < 30000) goto L_NotEnough;
-        set Zeny, Zeny - 30000;
-        mes "[Dearles]";
-        mes "Ummm.......";
-        mes "Heh heh~";
-        mes "That's thirty grand,";
-        mes "alright! Okay, come back";
-        mes "to me at night and";
-        mes "we'll start your test...";
-        set signquest,11;
-        close;
-    } else {
-        close;
-
-    }
-
-L_NotEnough:
-    mes "[Dearles]";
-    mes "Don't fool me!";
-    mes "You don't have";
-    mes "enough money to";
-    mes "pay the test fee.";
-    mes "Come back with 30.000 zeny.";
-    close;
-
-L_Test:
-    if (gettime(3) == 19 || gettime(3) == 20 || gettime(3) == 21 || gettime(3) == 22 || gettime(3) == 23) goto L_Time;
-    mes "[Dearles]";
-    mes "Don't you see";
-    mes "I'm busy right now?";
-    mes "Come back at night";
-    mes "And we'll see for";
-    mes "your test.";
-    close;
-
-L_Time:
-    if (SignDance == 3) goto L_Win;
-    if (SignDance == 2) goto L_Fail;
-    if (dearles_test == 2) goto L_Check;
-    if (dearles_test == 3) goto L_Dance;
-    if (dearles_test == 1) goto L_Test2;
-    mes "[Dearles]";
-    mes "Nice, you're here";
-    mes "just in time. Well,";
-    mes "all that matters is that";
-    mes "you come during the night.";
-    next;
-    mes "[Dearles]";
-    mes "You're wondering how";
-    mes "a guy like me is pals with";
-    mes "Metz, but that's none of your";
-    mes "business. I guess I gotta keep";
-    mes "this promise to him, so when";
-    mes "you're ready, say the word.";
-    set dearles_test,1;
-    close;
-
-L_Test2:
-    mes "[Dearles]";
-    mes "Alright! I want you to";
-    mes "bring me a bunch of items!";
-    mes "Yeah, I know, you're a real";
-    mes "pro at this, but let me set";
-    mes "you straight before you blow";
-    mes "this off as a piece of cake...";
-    next;
-    mes "[Dearles]";
-    mes "I'm not gonna give you an";
-    mes "exact list of items I want. Oh";
-    mes "no, what you gotta do is bring";
-    mes "me artsy crafts. This test is";
-    mes "gonna judge your appreciation";
-    mes "of... Craftsmanship~";
-    next;
-    mes "[Dearles]";
-    mes "Since I'm seeing whether";
-    mes "or not you got good taste,";
-    mes "variety is the important thing";
-    mes "here. So don't bring freakin'";
-    mes "a hundred of the same object.";
-    mes "Just one of each kind'll do.";
-    next;
-    mes "[Dearles]";
-    mes "What are you";
-    mes "standin' around";
-    mes "waiting for? Bring";
-    mes "those collection items!";
-    set dearles_test,2;
-    close;
-
-L_Check:
-    mes "[Dearles]";
-    mes "Ah! So this is";
-    mes "the stuff you brought?";
-    mes "Let me take a look-see...";
-    next;
-    if (countitem(740))set @dearles_check,@dearles_check+1;
-    if (countitem(741))set @dearles_check,@dearles_check+1;
-    if (countitem(742))set @dearles_check,@dearles_check+1;
-    if (countitem(743))set @dearles_check,@dearles_check+2;
-    // Was checking the wrong items here [Llyr]
-    // Script was checking for:
-    // Bouquet (ID: 744) instead of Red Frame (ID: 734)
-    // Wedding Bouquet (ID: 745) instead of Chung Jah (ID: 735)
-    // Glass Bead (ID: 746) instead of China (ID: 736)
-    if (countitem(734))set @dearles_check,@dearles_check+1;
-    if (countitem(735))set @dearles_check,@dearles_check+1;
-    if (countitem(736))set @dearles_check,@dearles_check+1;
-    if (countitem(747))set @dearles_check,@dearles_check+2;
-    if (countitem(750))set @dearles_check,@dearles_check+10;
-    if (countitem(751))set @dearles_check,@dearles_check+12;
-    if (countitem(752))set @dearles_check,@dearles_check+3;
-    if (countitem(753))set @dearles_check,@dearles_check+5;
-    if (countitem(754))set @dearles_check,@dearles_check+5;
-
-    if (@dearles_check >= 20) {
-        if (countitem(741))delitem 741,countitem(741);
-        if (countitem(740))delitem 740,countitem(740);
-        if (countitem(742))delitem 742,countitem(742);
-        if (countitem(743))delitem 743,countitem(743);
-        if (countitem(734))delitem 734,countitem(734);
-        if (countitem(735))delitem 735,countitem(735);
-        if (countitem(736))delitem 736,countitem(736);
-        if (countitem(747))delitem 747,countitem(747);
-        if (countitem(750))delitem 750,countitem(750);
-        if (countitem(751))delitem 751,countitem(751);
-        if (countitem(752))delitem 752,countitem(752);
-        if (countitem(753))delitem 753,countitem(753);
-        if (countitem(754))delitem 754,countitem(754);
-        mes "[Dearles]";
-        mes "Nice, nice~";
-        mes "These'll sell for--";
-        mes "Er, I'm glad to say";
-        mes "that you pass for now.";
-        next;
-        mes "[Dearles]";
-        mes "I think you're ready";
-        mes "for the next step. Now,";
-        mes "I'm gonna send you to";
-        mes "Lamadin for Part Two";
-        mes "of my test. Yeah, I know...";
-        set dearles_test,3;
-        close2;
-        warp "cmd_in01",34,17;
-        end;
-    } else {
-        set @dearles_check,0;
-        mes "[Dearles]";
-        mes "Hmm... Some of this";
-        mes "stuff looks good, but";
-        mes "there isn't enough variety";
-        mes "here that proves your eye for";
-        mes "craftsmanship. Come back";
-        mes "with more stuff, alright?";
-        close;
-    }
-
-
-L_Dance:
-    mes "[Dearles]";
-    mes "Hey, you gotta";
-    mes "finish the Part Two of";
-    mes "my test. I'm gonna send";
-    mes "you to Lamadin now...";
-    close2;
-    warp "cmd_in01",34,17;
-    end;
-
-L_Fail:
-    mes "[Dearles]";
-    mes "You failed Part Two,";
-    mes "the rhythm portion of";
-    mes "my freakin' test? If you";
-    mes "wanna try again, you're";
-    mes "welcome to another chance...";
-    next;
-    menu "Yes.",L_Another,"Maybe later.",-;
-    mes "[Dearles]";
-    mes "What...?";
-    mes "Alright, but you";
-    mes "really shouldn't give";
-    mes "up. I mean, Part Two is";
-    mes "supposed to be ridiculously";
-    mes "easy. I made it that way.";
-    close;
-
-L_Another:
-    mes "[Dearles]";
-    mes "Okay...";
-    mes "Just keep in mind";
-    mes "that Part Two was";
-    mes "supposed to be";
-    mes "the easy part...";
-    close2;
-    warp "cmd_in01",34,17;
-    end;
-
-L_Win:
-    mes "[Dearles]";
-    mes "Lamadin tells me";
-    mes "you passed. Since you";
-    mes "did so good, I'm gonna";
-    mes "give you some of your money";
-    mes "back. Not all, but most of it.";
-    mes "Isn't that reward enough?";
-    next;
-    set Zeny, Zeny + 20000;
-    getitem 7177,1;
-    set signquest,12;
-    set $dance_fail,0;
-    mes "[Dearles]";
-    mes "Alright, take this chunk";
-    mes "of Sobbing Starlight and";
-    mes "go find someone named";
-    mes "um, 'Bakerlan' in Alberta.";
-    next;
-
-L_Ever:
-    mes "[Dearles]";
-    mes "Well, that's it.";
-    mes "There's no reason";
-    mes "for you to ever see";
-    mes "me again. But yeah,";
-    mes "good luck with that";
-    mes "Sobbing Starlight business.";
-    close;
+cmd_in01,33,25,5	script	Examiner#sign	724,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q == 30) {
+		mes "[Lamadin]";
+		mes "Welcome to";
+		mes "Part Two of Dearles'";
+		mes "exam where your sense";
+		mes "of rhythm will be tested~";
+		next;
+		mes "[Lamadin]";
+		mes "Please click on the";
+		mes "Chat Room to enter the";
+		mes "Standby Room. When it's";
+		mes "your turn, the test will begin!";
+		next;
+		mes "[Lamadin]";
+		mes "The top left pole";
+		mes "means 'Up,' and there";
+		mes "are a total of four marks";
+		mes "designated as Upper, Lower";
+		mes "Left and Right. Hitting each";
+		mes "mark will produce a sound.";
+		next;
+		mes "[Lamadin]";
+		mes "During the test,";
+		mes "you must hit the marks";
+		mes "according to the given";
+		mes "instructions in order to";
+		mes "play music. Nifty, huh?";
+		next;
+		mes "[Lamadin]";
+		mes "I'm in charge of grading";
+		mes "your performance and determining your qualification. Please do your best and come back to me when";
+		mes "you finish the test. Good luck~";
+		mes "Please do your best.";
+		close;
+	}
+	else if (sign_q == 31) {
+		set sign_q,30;
+		mes "[Lamadin]";
+		mes "Please click on the";
+		mes "Chat Room to enter the";
+		mes "Standby Room. When it's";
+		mes "your turn, the test will begin!";
+		next;
+		mes "[Lamadin]";
+		mes "The top left pole";
+		mes "means 'Up,' and there";
+		mes "are a total of four marks";
+		mes "designated as Upper, Lower";
+		mes "Left and Right. Hitting each";
+		mes "mark will produce a sound.";
+		next;
+		mes "[Lamadin]";
+		mes "During the test,";
+		mes "you must hit the marks";
+		mes "according to the given";
+		mes "instructions in order to";
+		mes "play music. Nifty, huh?";
+		next;
+		mes "[Lamadin]";
+		mes "I'm in charge of grading";
+		mes "your performance and determining your qualification. Please do your best and come back to me when";
+		mes "you finish the test. Good luck~";
+		mes "Please do your best.";
+		close;
+	}
+	else if (sign_q == 32) {
+		mes "[Lamadin]";
+		mes "Let's see...";
+		mes "You're "+ strcharinfo(0) +"?";
+		mes "Oh, what a shame!";
+		mes "You failed this time.";
+		mes "But don't you worry...";
+		next;
+		mes "[Lamadin]";
+		mes "You're welcome to";
+		mes "try again whenever";
+		mes "you want, alright?";
+		mes "Thank you~";
+		set sign_q,30;
+		close;
+	}
+	else if (sign_q == 33) {
+		mes "[Lamadin]";
+		mes "Let's see...";
+		mes "You're "+ strcharinfo(0) +"?";
+		mes "Congratulations!";
+		mes "You passed the test!";
+		next;
+		mes "[Lamadin]";
+		mes "I'll send a message to";
+		mes "Mister Dearles right away,";
+		mes "so please go speak to him";
+		mes "again. Once again, great job~ ";
+		close;
+	}
+	else if (sign_q == 34) {
+		mes "[Lamadin]";
+		mes "Let's see...";
+		mes "You're "+ strcharinfo(0) +"?";
+		mes "Congratulations!";
+		mes "You got a perfect";
+		mes "score on this test!";
+		next;
+		mes "[Lamadin]";
+		mes "I'll send a message to";
+		mes "Mister Dearles right away,";
+		mes "so please go speak to him";
+		mes "again. He may even give";
+		mes "you a reward since you";
+		mes "did such a great job~";
+		close;
+	}
+	else {
+		mes "[Lamadin]";
+		mes "H-how did you";
+		mes "find your way here?";
+		mes "This is private property,";
+		mes "owned by Mister Dearles.";
+		mes "Please leave immediately!";
+		next;
+		warp "comodo",187,164;
+		end;
+	}
 }
 
-
-cmd_in01,32,25,3	script	Lamadin	724,{
-
-    if (SignDance == 1)goto L_Win;
-    if (SignDance == 2)goto L_Another;
-    mes "[Lamadin]";
-    mes "Welcome to";
-    mes "Part Two of Dearles'";
-    mes "exam where your sense";
-    mes "of rhythm will be tested~";
-    next;
-    mes "[Lamadin]";
-    mes "Please click on the";
-    mes "Chat Room to enter the";
-    mes "Standby Room. When it's";
-    mes "your turn, the test will begin!";
-    next;
-    mes "[Lamadin]";
-    mes "The top left pole";
-    mes "means 'Up' and there are";
-    mes "a total of four marks";
-    mes "designated as Upper, Lower,";
-    mes "Left and Right. Hitting each";
-    mes "mark will produce a sound.";
-    next;
-    mes "[Lamadin]";
-    mes "During the test,";
-    mes "you must hit the marks";
-    mes "according to the given";
-    mes "instructions in order to";
-    mes "play music. Nifty, huh?";
-    next;
-    mes "[Lamadin]";
-    mes "I'm in charge of grading";
-    mes "your performance and determinating";
-    mes "your qualification. Please do your";
-    mes "best and come back to me when";
-    mes "you finish the test. Good luck~";
-    mes "Please do your best.";
-    close;
-
-L_Another:
-    mes "[Lamadin]";
-    mes "Let's see...";
-    mes "You're "+strcharinfo(0)+"?";
-    mes "Oh, what a shame!";
-    mes "You failed this time.";
-    mes "But don't worry...";
-    next;
-    mes "[Lamadin]";
-    mes "You're welcome to";
-    mes "try again whenever";
-    mes "you want, alright?";
-    mes "Thank you~";
-    close;
-
-L_Win:
-    mes "[Lamadin]";
-    mes "Let's see...";
-    mes "You're "+strcharinfo(0)+"?";
-    mes "Congratulations!";
-    mes "You got a perfect";
-    mes "score on this test!";
-    next;
-    mes "[Dearles]";
-    mes "I'll send a message to";
-    mes "Mister Dearles right away,";
-    mes "so please go speak to him";
-    mes "again. He may even give";
-    mes "you a reward since you";
-    mes "did such a great job~";
-    set SignDance,3;
-    close;
-
+cmd_in01,16,24,0	script	Emergency Exit	111,{
+	mes "[Exit]";
+	mes "Would you like to go out?";
+	next;
+	switch(select("Yes.:No.")) {
+	case 1:
+		mes "[Exit]";
+		mes "Farewell.";
+		next;
+		warp "comodo",187,163;
+		end;
+	case 2:
+		mes "[Exit]";
+		mes "..........";
+		close;
+	}
 }
 
-cmd_in01,33,33,3	script	Waiting Room#SignDance	66,{
+cmd_in01,33,33,1	script	Standby Room#sign	66,{
 	end;
 
-OnWarp:
-	warpwaitingpc "cmd_in01",16,16,1;
-	disablewaitingroomevent;
-	disablenpc "SignDance#WARPER";
-	enablenpc "SignDance#CENTER";
-	end;
 OnInit:
-	waitingroom "DANCE~ DANCE~",20,"Waiting Room#SignDance::OnWarp",1;
+	waitingroom "DANCE~ DANCE~",20,"Standby Room#sign::OnStartArena",1;
+	//SetReqLevel 44 99
+	enablewaitingroomevent;
 	end;
-}
 
-cmd_in01,1,1,1	script	DanceInit	139,{
+OnStartArena:
+	disablewaitingroomevent;
+	donpcevent "s_dance_timer::Onbutton_off";
+	donpcevent "Examiner#sd::OnDisable";
+	warpwaitingpc "cmd_in01",16,15,1;
+	donpcevent "s_dance_timer::OnEnable";
+	end;
 
-OnInitiation:
-    initnpctimer;
-    end;
-OnTimer1000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    areaannounce "cmd_in01",12,12,35,35,"The test will begin shortly. Please do your best~",8;
-    end;
-OnTimer4000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    set $signdance,1;
-    areaannounce "cmd_in01",12,12,35,35,"UP LEFT",8;
-    end;
-OnTimer7000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 2) set $Signdanceresult,1;
-    set $signdance,3;
-    areaannounce "cmd_in01",12,12,35,35,"DOWN RIGHT",8;
-    end;
-OnTimer10000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 4) set $Signdanceresult,1;
-    set $signdance,5;
-    areaannounce "cmd_in01",12,12,35,35,"DOWN LEFT & UP RIGHT",8;
-    end;
-OnTimer13000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 7) set $Signdanceresult,1;
-    set $signdance,8;
-    areaannounce "cmd_in01",12,12,35,35,"DOWN RIGHT",8;
-    end;
-OnTimer15000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 9) set $Signdanceresult,1;
-    set $signdance,10;
-    areaannounce "cmd_in01",12,12,35,35,"DOWN LEFT & UP RIGHT & UP LEFT & STAY CENTER",8;
-    end;
-OnTimer20000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 14) set $Signdanceresult,1;
-    set $signdance,15;
-    areaannounce "cmd_in01",12,12,35,35,"DOWN LEFT & DOWN RIGHT & DOWN LEFT",8;
-    end;
-OnTimer24000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 18) set $Signdanceresult,1;
-    set $signdance,19;
-    areaannounce "cmd_in01",12,12,35,35,"DOWN RIGHT & CENTER & DOWN RIGHT",8;
-    end;
-OnTimer28000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 22) set $Signdanceresult,1;
-    set $signdance,23;
-    areaannounce "cmd_in01",12,12,35,35,"DOWN LEFT & UP LEFT & UP RIGHT & DOWN RIGHT & CENTER",8;
-    end;
-OnTimer33000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 28) set $Signdanceresult,1;
-    set $signdance,29;
-    areaannounce "cmd_in01",12,12,35,35,"DOWN LEFT & UP RIGHT & UP LEFT & DOWN RIGHT",8;
-    end;
-OnTimer40000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 33) set $Signdanceresult,1;
-    set $signdance,34;
-    areaannounce "cmd_in01",12,12,35,35,"UP RIGHT & DOWN RIGHT & UP RIGHT & DOWN RIGHT",8;
-    end;
-OnTimer44000:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 38) set $Signdanceresult,1;
-    set $signdance,39;
-    set $SignDanceRandomizer,rand(0,1);
-    if (!$SignDanceRandomizer)
-        areaannounce "cmd_in01",12,12,35,35,"UP LEFT & UP RIGHT & CENTER & UP RIGHT & DOWN LEFT & DOWN RIGHT",8;
-    else
-        areaannounce "cmd_in01",12,12,35,35,"UP LEFT & UP RIGHT & DOWN LEFT & UP RIGHT & DOWN LEFT & DOWN RIGHT",8;
-    end;
-OnTimer51500:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    if ($signdance != 45)set $Signdanceresult,1;
-    areaannounce "cmd_in01",12,12,35,35,"Well done.",8;
-    end;
-OnTimer54500:
-    if (!isloggedin($SignDancingrid))goto s_Cleanup;
-    attachrid($SignDancingrid);
-    if ($Signdanceresult)set SignDance,2;
-    else set SignDance,1;
-    warp "cmd_in01",34,17;
-    detachrid;
-    enablenpc "SignDance#WARPER";
-    disablenpc "SignDance#CENTER";
-    set $signdance,0;
-    set $Signdanceresult,0;
-    set $SignDancingrid,0;
-    set $SignDanceRandomizer,0;
-    enablewaitingroomevent "Waiting Room#SignDance";
-    stopnpctimer;
-    end;
-
-s_Cleanup:
-    donpcevent "SignDanceCleanUp::OnPlayerLogout";
-    stopnpctimer;
-    end;
+Onreset:
+	enablewaitingroomevent;
+	end;
 }
 
-cmd_in01,1,1,1	script	SignDanceCleanUp	-1,{
-
-OnPlayerLogout:
+cmd_in01,1,1,0	script	s_dance_timer	-1,{
+OnEnable:
 	initnpctimer;
-	areaannounce "cmd_in01",12,12,35,35,"The current dancer has logged out. New dancers will be accepted shortly.",8;
-	enablenpc "SignDance#WARPER";
-	disablenpc "SignDance#CENTER";
-	set $signdance,0;
-	set $Signdanceresult,0;
-	set $SignDancingrid,0;
-	set $SignDanceRandomizer,0;
+	end;
 
-OnTimer3000:
-	enablewaitingroomevent "Waiting Room#SignDance";
+OnDisable:
 	stopnpctimer;
 	end;
 
-OnInit:
-	set $signdance,0;
-	set $Signdanceresult,0;
-	set $SignDancingrid,0;
-	set $SignDanceRandomizer,0;
+Onbutton_off:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
 	end;
 
-}
+OnTimer2000:
+	mapannounce "cmd_in01","The test will be begin shortly. Please do your best~",bc_map,"0xFFFF00";
+	end;
 
-//Dancing tiles
-cmd_in01,16,13,4	script	SignDance#DOWNRIGHT	139,1,1,{
+OnTimer4000:
+	mapannounce "cmd_in01"," UP LEFT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#up::Onup";
+	donpcevent "s_dance#up::OnEnable";
+	end;
 
-	if($signdance == 3){ set $signdance,4; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 8){ set $signdance,9; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 16){ set $signdance,17; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 19){ set $signdance,20; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 21){ set $signdance,22; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 26){ set $signdance,27; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 32){ set $signdance,33; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 35){ set $signdance,36; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 37){ set $signdance,38; soundeffect "effect\\sign_down.wav",1; }
-	if($signdance == 44){ set $signdance,45; soundeffect "effect\\sign_down.wav",1; }
-	if(getcharid(3) != $SignDancingrid)warp "comodo",187,164;
+OnTimer6000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," DOWN RIGHT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#down::Onup";
+	donpcevent "s_dance#down::OnEnable";
 	end;
 
-}
+OnTimer8000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," DOWN LEFT & UP RIGHT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#left::Onup";
+	donpcevent "s_dance#left::OnEnable";
+	end;
 
+OnTimer11000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," DOWN RIGHT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#down::Onup";
+	donpcevent "s_dance#down::OnEnable";
+	end;
 
-cmd_in01,19,16,4	script	SignDance#UPRIGHT	139,1,1,{
+OnTimer13000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," DOWN LEFT & UP RIGHT & UP LEFT & STAY CENTER",bc_map,"0xFFFF00";
+	donpcevent "s_dance#left::Onup";
+	donpcevent "s_dance#left::OnEnable";
+	end;
 
-	if($signdance == 6) { set $signdance,7; soundeffect "effect\\sign_right.wav",1; }
-	if($signdance == 11) { set $signdance,12; soundeffect "effect\\sign_right.wav",1; }
-	if($signdance == 25) { set $signdance,26; soundeffect "effect\\sign_right.wav",1; }
-	if($signdance == 30) { set $signdance,31; soundeffect "effect\\sign_right.wav",1; }
-	if($signdance == 34) { set $signdance,35; soundeffect "effect\\sign_right.wav",1; }
-	if($signdance == 36) { set $signdance,37; soundeffect "effect\\sign_right.wav",1; }
-	if($signdance == 40) { set $signdance,41; soundeffect "effect\\sign_right.wav",1; }
-	if($signdance == 42) { set $signdance,43; soundeffect "effect\\sign_right.wav",1; }
-	if(getcharid(3) != $SignDancingrid)warp "comodo",187,164;
+OnTimer18000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," DOWN LEFT & DOWN RIGHT & DOWN LEFT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#left::Onup";
+	donpcevent "s_dance#left::OnEnable";
 	end;
 
-}
+OnTimer21000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," DOWN RIGHT & CENTER & DOWN RIGHT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#down::Onup";
+	donpcevent "s_dance#down::OnEnable";
+	end;
 
-cmd_in01,16,19,4	script	SignDance#UPLEFT	139,1,1,{
+OnTimer24000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," DOWN LEFT & UP LEFT & UP RIGHT & DOWN RIGHT & CENTER",bc_map,"0xFFFF00";
+	donpcevent "s_dance#left::Onup";
+	donpcevent "s_dance#left::OnEnable";
+	end;
 
-	if($signdance == 1) { set $signdance,2; soundeffect "effect\\sign_up.wav",1; }
-	if($signdance == 12) { set $signdance,13; soundeffect "effect\\sign_up.wav",1; }
-	if($signdance == 24) { set $signdance,25; soundeffect "effect\\sign_up.wav",1; }
-	if($signdance == 31) { set $signdance,32; soundeffect "effect\\sign_up.wav",1; }
-	if($signdance == 39) { set $signdance,40; soundeffect "effect\\sign_up.wav",1; }
-	if(getcharid(3) != $SignDancingrid)warp "comodo",187,164;
+OnTimer30000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," DOWN LEFT & UP RIGHT & UP LEFT & DOWN RIGHT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#left::Onup";
+	donpcevent "s_dance#left::OnEnable";
 	end;
 
-}
+OnTimer34000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," UP RIGHT & DOWN RIGHT & UP RIGHT & DOWN RIGHT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#right::Onup";
+	donpcevent "s_dance#right::OnEnable";
+	end;
 
-cmd_in01,16,16,4	script	SignDance#WARPER	139,1,1,{
-	if(getcharid(3) != $SignDancingrid)warp "comodo",187,164;
+OnTimer38000:
+	donpcevent "s_dance#up::OnDisable";
+	donpcevent "s_dance#down::OnDisable";
+	donpcevent "s_dance#left::OnDisable";
+	donpcevent "s_dance#right::OnDisable";
+	donpcevent "s_dance#cen::OnDisable";
+	mapannounce "cmd_in01"," UP LEFT & UP RIGHT & CENTER & UP RIGHT & DOWN LEFT & DOWN RIGHT",bc_map,"0xFFFF00";
+	donpcevent "s_dance#up::Onup";
+	donpcevent "s_dance#up::OnEnable";
 	end;
 
+OnTimer44000:
+	donpcevent "s_dance#up::Onreset";
+	donpcevent "s_dance#down::Onreset";
+	donpcevent "s_dance#left::Onreset";
+	donpcevent "s_dance#right::Onreset";
+	donpcevent "s_dance#cen::Onreset";
+	mapannounce "cmd_in01","Well done.",bc_map,"0xFFFF00";
+	enablenpc "Examiner#sd";
+	donpcevent "Examiner#sd::Onreset1";
+	stopnpctimer;
+	end;
 }
 
-cmd_in01,16,16,4	script	SignDance#CENTER	139,1,1,{
+cmd_in01,16,21,0	script	s_dance#up	139,1,3,{
+OnInit:
+	disablenpc "s_dance#up";
+	end;
 
-	if($signdance == 0) { set $SignDancingrid, getcharid(3); donpcevent "DanceInit::OnInitiation"; }
-	if($signdance == 13) { set $signdance,14; soundeffect "effect\\sign_center.wav",1; }
-	if($signdance == 20) { set $signdance,21; soundeffect "effect\\sign_center.wav",1; }
-	if($signdance == 27) { set $signdance,28; soundeffect "effect\\sign_center.wav",1; }
-	if($signdance == 41 && !$SignDanceRandomizer) { set $signdance,42; soundeffect "effect\\sign_center.wav",1; }
+OnEnable:
+	specialeffect EF_SUMMONSLAVE;
+	enablenpc "s_dance#up";
 	end;
 
-OnInit:
-	enablenpc "SignDance#WARPER";
-	disablenpc "SignDance#CENTER";
+OnDisable:
+	//specialeffect EF_SUMMONSLAVE;
+	disablenpc "s_dance#up";
+	end;
+
+Onup:
+	set .s_up,.s_up + 1;
+	end;
+
+Onreset:
+	set .s_up,0;
+	end;
 
+OnTouch:
+	soundeffect "effect\\sign_up.wav",1;
+	if (.s_up == 1) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#up::OnDisable";
+	}
+	else if (.s_up == 2) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#cen::Onup";
+		donpcevent "s_dance#cen::OnEnable";
+		donpcevent "s_dance#up::OnDisable";
+	}
+	else if (.s_up == 3) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#right::Onup";
+		donpcevent "s_dance#right::OnEnable";
+		donpcevent "s_dance#up::OnDisable";
+	}
+	else if (.s_up == 4) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::Onup";
+		donpcevent "s_dance#down::OnEnable";
+		donpcevent "s_dance#up::OnDisable";
+	}
+	else if (.s_up == 5) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#right::Onup";
+		donpcevent "s_dance#right::OnEnable";
+		donpcevent "s_dance#up::OnDisable";
+	}
+	end;
 }
 
-cmd_in01,13,16,4	script	SignDance#DOWNLEFT	139,1,1,{
+cmd_in01,16,11,0	script	s_dance#down	139,1,3,{
+OnInit:
+	donpcevent "s_dance#down::OnDisable";
+	end;
 
-	if($signdance == 5) { set $signdance,6; soundeffect "effect\\sign_left.wav",1; }
-	if($signdance == 10) { set $signdance,11; soundeffect "effect\\sign_left.wav",1; }
-	if($signdance == 15) { set $signdance,16; soundeffect "effect\\sign_left.wav",1; }
-	if($signdance == 17) { set $signdance,18; soundeffect "effect\\sign_left.wav",1; }
-	if($signdance == 23) { set $signdance,24; soundeffect "effect\\sign_left.wav",1; }
-	if($signdance == 29) { set $signdance,30; soundeffect "effect\\sign_left.wav",1; }
-	if($signdance == 41 && $SignDanceRandomizer) { set $signdance,42; soundeffect "effect\\sign_left.wav",1; }
-	if($signdance == 43) { set $signdance,44; soundeffect "effect\\sign_left.wav",1; }
-	if(getcharid(3) != $SignDancingrid)warp "comodo",187,164;
+OnEnable:
+	specialeffect EF_SUMMONSLAVE;
+	enablenpc "s_dance#down";
 	end;
 
-}
+OnDisable:
+	//specialeffect EF_SUMMONSLAVE;
+	disablenpc "s_dance#down";
+	end;
 
-alberta,99,151,1	script	Sign::AlbertaSign	111,{
+Onup:
+	set .s_down,.s_down + 1;
+	end;
 
-	mes "^FF0000- The Sign Reads -^000000";
-	mes "Tools by the Cart full!";
-	mes "You need tools? We got'em!";
-	mes "Come on in, we never close!";
-	close;
+Onreset:
+	set .s_down,0;
+	end;
 
+OnTouch:
+	soundeffect "effect\\sign_down.wav",1;
+	if (.s_down == 1) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 2) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 3) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#left::Onup";
+		donpcevent "s_dance#left::OnEnable";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 4) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#cen::Onup";
+		donpcevent "s_dance#cen::OnEnable";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 5) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 6) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#cen::Onup";
+		donpcevent "s_dance#cen::OnEnable";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 7) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 8) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#right::Onup";
+		donpcevent "s_dance#right::OnEnable";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 9) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	else if (.s_down == 10) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::OnDisable";
+	}
+	end;
 }
 
-alberta_in,114,178,5	script	Refined Steward	109,{
+cmd_in01,11,16,0	script	s_dance#left	139,3,1,{
+OnInit:
+	donpcevent "s_dance#left::OnDisable";
+	end;
 
-	if(bakerlan_test > 12) goto L_Hope;
-	if(bakerlan_test == 12) goto L_Thanks;
-	if(bakerlan_test > 6) goto L_Seylin;
-	if(bakerlan_test == 5) goto L_Another;
-	if(countitem(7181)) goto L_JobDone;
-	if(bakerlan_test == 2) goto L_Delivery;
-	if(bakerlan_test > 3) goto L_Sorry;
-	mes "[Mahatra]";
-	mes "Welcome to the";
-	mes "Alchiesh Estate.";
-	mes "The Alchiesh are the";
-	mes "most esteemed family";
-	mes "in all of Alberta.";
-	next;
-	mes "[Mahatra]";
-	mes "I am Mahatra Mornen,";
-	mes "steward of this family.";
-	mes "Feel free to ask me if";
-	mes "you need anything and";
-	mes "I shall do my best";
-	mes "to assist you.";
-	close;
 
-L_Delivery:
-	mes "[Mahatra]";
-	mes "Ah yes, the master informed";
-	mes "me that you would be taking";
-	mes "care of an urgent delivery";
-	mes "for him. Please take this to a";
-	mes "man named^0066CC Leibech.^000000";
-	next;
-	mes "[Mahatra]";
-	mes "It may be difficult";
-	mes "to find him since he";
-	mes "travels around the world.";
-	mes "Ah yes, I have heard that";
-	mes "he was in some other country...";
-	next;
-	mes "[Mahatra]";
-	mes "Now, the item I am";
-	mes "about to give you is";
-	mes "one of a kind. Don't lose";
-	mes "it or you will fall out of favor";
-	mes "with the master...";
-	next;
-	mes "^0066CCMahatra gives you";
-	mes "a unique stone that has";
-	mes "your name attached on it.^000000";
-	set @signid,getcharid(0,strcharinfo(0));
-	set @sign3, @signid & 65535;
-	set @sign4, @signid >> 16;
-	set @sign1,254;
-	set @sign2,0;
-	getitem2 7049,1,1,0,0,@sign1,@sign2,@sign3,@sign4;
-	set bakerlan_test,3;
-	close;
-
-L_JobDone:
-	mes "[Mahatra]";
-	mes "Ah, you've returned.";
-	mes "And I see you already";
-	mes "delivered the Stone. Great,";
-	mes "well done. Let me send a";
-	mes "message to the master, so";
-	mes "please visit him later.";
-	set bakerlan_test,4;
-	delitem 7181,1;
-	close;
+OnEnable:
+	specialeffect EF_SUMMONSLAVE;
+	enablenpc "s_dance#left";
+	end;
 
-L_Sorry:
-	mes "[Mahatra]";
-	mes "Thank you very";
-	mes "much for the trouble";
-	mes "you've gone through";
-	mes "on our behalf.";
-	close;
+OnDisable:
+	//specialeffect EF_SUMMONSLAVE;
+	disablenpc "s_dance#left";
+	end;
 
-L_Another:
-	mes "[Mahatra]";
-	mes "Greetings. Hm?";
-	mes "Did the master ask";
-	mes "you to perform another";
-	mes "task for him already?";
-	next;
-	menu "No.",-,"You have another assignment for me.",L_Assign;
-	mes "[Mahatra]";
-	mes "Very well.";
-	mes "Then, we shall";
-	mes "converse later~";
-	close;
+Onup:
+	set .s_left,.s_left + 1;
+	end;
 
-L_Assign:
-	mes "[Mahatra]";
-	mes "I...I do...?";
-	mes "The master didn't";
-	mes "leave me any instructions.";
-	mes "Hmmm. Oh, I know what you can";
-	mes "do. Why don't you help^FF0000 Seylin^000000? She";
-	mes "seems bothered with something...";
-	set bakerlan_test,6;
-	close;
+Onreset:
+	set .s_left,0;
+	end;
 
-L_Seylin:
-	mes "[Mahatra]";
-	mes "Although you may only";
-	mes "be doing it for the Sobbing";
-	mes "Starlight, I really appreciate";
-	mes "all your help. Seylin's a very";
-	mes "nice girl and doesn't deserve";
-	mes "to feel down...";
-	close;
+OnTouch:
+	soundeffect "effect\\sign_left.wav",1;
+	if (.s_left == 1) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#right::Onup";
+		donpcevent "s_dance#right::OnEnable";
+		donpcevent "s_dance#left::OnDisable";
+	}
+	else if (.s_left == 2) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#right::Onup";
+		donpcevent "s_dance#right::OnEnable";
+		donpcevent "s_dance#left::OnDisable";
+	}
+	else if (.s_left == 3) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::Onup";
+		donpcevent "s_dance#down::OnEnable";
+		donpcevent "s_dance#left::OnDisable";
+	}
+	else if (.s_left == 4) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#left::OnDisable";
+	}
+	else if (.s_left == 5) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#up::Onup";
+		donpcevent "s_dance#up::OnEnable";
+		donpcevent "s_dance#left::OnDisable";
+	}
+	else if (.s_left == 6) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#right::Onup";
+		donpcevent  "s_dance#right::OnEnable";
+		donpcevent "s_dance#left::OnDisable";
+	}
+	else if (.s_left == 7) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::Onup";
+		donpcevent "s_dance#down::OnEnable";
+		donpcevent "s_dance#left::OnDisable";
+	}
+	end;
+}
 
-L_Thanks:
-	mes "[Mahatra]";
-	mes "Yes.";
-	mes "I heard from Seylin.";
-	mes "I did not know she was worried";
-	mes "about her brother.";
-	mes "Ahem ahem...";
-	mes "Thank you for helping her.";
-	mes "I will send a message to my";
-	mes "master.";
-	next;
-	mes "[Mahatra]";
-	mes "If there is anything else, he will";
-	mes "let you pass the test.";
-	mes "Good luck.";
-	set bakerlan_test,13;
-	close;
+cmd_in01,21,16,0	script	s_dance#right	139,3,1,{
+OnInit:
+	donpcevent "s_dance#right::OnDisable";
+	end;
 
-L_Hope:
-	mes "[Mahatra]";
-	mes "I hope the master";
-	mes "listens to me and dresses more like";
-	mes "a man in his position. Even if";
-	mes "he thinks he's just a merchant,";
-	mes "he's the master of the estate!";
-	mes "But please don't tell him that~";
-	close;
+OnEnable:
+	specialeffect EF_SUMMONSLAVE;
+	enablenpc "s_dance#right";
+	end;
 
-}
+OnDisable:
+	//specialeffect EF_SUMMONSLAVE;
+	disablenpc "s_dance#right";
+	end;
 
-alberta_in,154,171,5	script	Maid#3	758,{
-
-	if(bakerlan_test > 11) goto L_Done;
-	if(bakerlan_test == 11) goto L_Thanks;
-	if(bakerlan_test == 10) goto L_Brother;	
-	if(bakerlan_test > 8 && countitem(7044)) goto L_Vigorgra;
-	if(bakerlan_test > 6) goto L_Bring;
-	if(@seylin == 2) goto L_Thought;
-	if(@seylin == 1) goto L_Help;
-	if(bakerlan_test == 6) goto L_NoUse;
-	if(bakerlan_test > 2 && bakerlan_test < 6) goto L_Bother;
-	mes "[Seylin]";
-	mes "I'm sorry, but I'm";
-	mes "busy cleaning the manor";
-	mes "right now so I don't have";
-	mes "time to talk. Oh, and would";
-	mes "please wipe your shoes";
-	mes "on the mat before coming in?";
-	close;
+Onup:
+	set .s_right,.s_right + 1;
+	end;
 
-L_Bother:
-	mes "[Seylin]";
-	mes "Ooooh...";
-	mes "What am I going";
-	mes "to do?! Oh-- You";
-	mes "startled me!";
-	next;
-	mes "[Seylin]";
-	mes "I'm sorry, but";
-	mes "I was just thinking";
-	mes "about something. I hope";
-	mes "I didn't bother you. *sigh*";
-	close;
+Onreset:
+	set .s_right,0;
+	end;
 
-L_NoUse:
-	mes "[Seylin]";
-	mes "Oh, it's no use";
-	mes "worrying about";
-	mes "something I can't do";
-	mes "nothing about. I better";
-	mes "get back to work...";
-	set @seylin,1;
-	close;
+OnTouch:
+	soundeffect "effect\\sign_right.wav",1;
+	if (.s_right == 1) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#right::OnDisable";
+	}
+	else if (.s_right == 2) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#up::Onup";
+		donpcevent "s_dance#up::OnEnable";
+		donpcevent "s_dance#right::OnDisable";
+	}
+	else if (.s_right == 3) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::Onup";
+		donpcevent "s_dance#down::OnEnable";
+		donpcevent "s_dance#right::OnDisable";
+	}
+	else if (.s_right == 4) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#up::Onup";
+		donpcevent "s_dance#up::OnEnable";
+		donpcevent "s_dance#right::OnDisable";
+	}
+	else if (.s_right == 5) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::Onup";
+		donpcevent "s_dance#down::OnEnable";
+		donpcevent "s_dance#right::OnDisable";
+	}
+	else if (.s_right == 6) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::Onup";
+		donpcevent "s_dance#down::OnEnable";
+		donpcevent "s_dance#right::OnDisable";
+	}
+	else if (.s_right == 7) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#cen::Onup";
+		donpcevent "s_dance#cen::OnEnable";
+		donpcevent "s_dance#right::OnDisable";
+	}
+	else if (.s_right == 8) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#left::Onup";
+		donpcevent "s_dance#left::OnEnable";
+		donpcevent "s_dance#right::OnDisable";
+	}
+	end;
+}
 
-L_Help:
-	mes "[Seylin]";
-	mes "*sigh...*";
-	mes "Oh, dear...";
-	mes "What can I do";
-	mes "about this...?";
-	next;
-	menu "Ignore her.",-,"Excuse me, but Mahatra sent me...",L_Work;
-	close;
+cmd_in01,16,16,0	script	s_dance#cen	139,1,1,{
+OnInit:
+	donpcevent "s_dance#cen::OnDisable";
+	end;
 
-L_Work:
-	mes "[Seylin]";
-	mes "Mister Mahatra";
-	mes "sent you to me?";
-	mes "Hm? Does he need";
-	mes "me for anything?";
-	next;
-	menu "Actually, he wants me to help you.",-;
-	mes "[Seylin]";
-	mes "Oh, how very kind!";
-	mes "Yes, yes, I could use";
-	mes "some help right now!";
-	mes "You see, it'll be my brother's";
-	mes "birthday but I'm so busy with";
-	mes "work that I can't see him.";
-	emotion e_thx;
-	next;
-	mes "[Seylin]";
-	mes "The last time I saw him,";
-	mes "he looked so tired and weak";
-	mes "so it's worrying me. Now, I've";
-	mes "heard there's some new medicine";
-	mes "called^FF0000 Vigorgra^000000. I don't know much";
-	mes "about it, but it should help him!";
-	next;
-	mes "[Seylin]";
-	mes "Do you think you could";
-	mes "find that medicine and";
-	mes "bring it to me? If you don't";
-	mes "want to, I understand. Plus,";
-	mes "I don't know if the master";
-	mes "would approve of this...";
-	next;
-	menu "I can't do it.",-,"Let me think about it.",L_Think,"Sure, why not?",L_Ok;
-	mes "[Seylin]";
-	mes "Oh really?";
-	mes "Alright, I can";
-	mes "understand. I'm";
-	mes "very sorry to bother";
-	mes "you with my problems.";
-	set @seylin,2;
-	close;
+OnEnable:
+	specialeffect EF_SUMMONSLAVE;
+	enablenpc "s_dance#cen";
+	end;
 
-L_Think:
-	mes "[Seylin]";
-	mes "Oh really?";
-	mes "I'm sorry, I...";
-	mes "I just thought";
-	mes "that maybe...";
-	set @seylin,2;
-	close;
+OnDisable:
+	//specialeffect EF_SUMMONSLAVE;
+	disablenpc "s_dance#cen";
+	end;
+	
+Onup:
+	set .s_center,.s_center + 1;
+	end;
 
-L_Thought:
-	mes "[Seylin]";
-	mes "Hello there--";
-	mes "Oh, have you";
-	mes "changed your mind";
-	mes "about helping me?";
-	mes "I'll repay you,";
-	mes "of course.";
-	next;
-	menu "No.",L_Think,"Yes.",-;
-
-L_Ok:
-	mes "[Seylin]";
-	mes "Oh, thank you so much!";
-	mes "Now, I remember hearing";
-	mes "that you can find Vigorgra";
-	mes "somewhere in Aldebaran.";
-	mes "Somebody in the Alchemist";
-	mes "Guild make it, I think.";
-	next;
-	mes "[Seylin]";
-	mes "I'm sorry but I don't";
-	mes "know much about the medicine.";
-	mes "Well, aside from the fact that";
-	mes "it makes men feel young again.";
-	mes "So that must be good, right?";
-	mes "Thanks again for your help~";
-	set bakerlan_test,7;
-	close;
+Onreset:
+	set .s_center,0;
+	end;
 
-L_Bring:
-	mes "[Seylin]";
-	mes "I know that you might";
-	mes "be able to find Vigorgra";
-	mes "in the Alchemist's Guild";
-	mes "in Aldebaran. Aside from";
-	mes "that, I don't know much...";
-	next;
-	mes "[Seylin]";
-	mes "Once you get it,";
-	mes "would you bring";
-	mes "the Vigorgra to me?";
-	close;
+OnTouch:
+	soundeffect "effect\\sign_center.wav",1;
+	if (.s_center == 1) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#cen::OnDisable";
+	}
+	else if (.s_center == 2) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#down::Onup";
+		donpcevent "s_dance#down::OnEnable";
+		donpcevent "s_dance#cen::OnDisable";
+	}
+	else if (.s_center == 3) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#cen::OnDisable";
+	}
+	else if (.s_center == 4) {
+		donpcevent "Examiner#sd::Onup";
+		donpcevent "s_dance#right::Onup";
+		donpcevent "s_dance#right::OnEnable";
+		donpcevent "s_dance#cen::OnDisable";
+	}
+	end;
+}
 
-L_Vigorgra:
-	mes "[Seylin]";
-	mes "Hurray~!";
-	mes "You brought the";
-	mes "Vigorgra! I hope";
-	mes "my brother will";
-	mes "be happy with this.";
-	next;
-	mes "[Seylin]";
-	mes "Oh! Would you please";
-	mes "bring this Vigorgra to my";
-	mes "brother? His name is Maruin";
-	mes "and he's working over at";
-	mes "the Prontera Castle.";
-	next;
-	mes "[Seylin]";
-	mes "Ah, I almost forgot!";
-	mes "I just finished writting";
-	mes "him this letter, so would";
-	mes "you make sure he gets";
-	mes "this? Thanks you so much!";
-	getitem 7183,1;
-	set bakerlan_test,10;
-	close;
+cmd_in01,14,14,0	script	Examiner#sd	-1,6,6,{
+OnInit:
+	disablenpc "Examiner#sd";
+	end;
 
-L_Brother:
-	mes "[Seylin]";
-	mes "Would you please";
-	mes "deliver the Vigorgra";
-	mes "and my letter to my brother";
-	mes "Maruin in the Prontera Castle?";
-	mes "And wish him Happy Birthday~";
-	close;
+OnTouch:
+	if (.s_check < 30) {
+		if (sign_q == 30) {
+			set sign_q,32;
+		}
+	}
+	else if (.s_check < 34) {
+		if (sign_q == 30) {
+			set sign_q,33;
+		}
+	}
+	else if (.s_check == 34) {
+		if (sign_q == 30) {
+			set sign_q,34;
+		}
+	}
+	warp "cmd_in01",29,33;
+	donpcevent "Examiner#sd::OnDisable";
+	end;
 
-L_Thanks:
-	mes "[Seylin]";
-	mes "Thanks so much";
-	mes "for your help again!";
-	mes "I want you to have this";
-	mes "as a token of my gratitude.";
-	mes "You really are a kind person~";
-	getitem 525,3;
-	emotion e_kis2;
-	set bakerlan_test,12;
-	close;
+Onup:
+	set .s_check,.s_check + 1;
+mapannounce "cmd_in01", "check: "+.s_check,bc_map,"0x00FF00";
+	end;
 
-L_Done:
-	mes "[Seylin]";
-	mes "Although the master isn't";
-	mes "a messy person, he's pretty";
-	mes "unorganized. I wish he'd make";
-	mes "it easier for me to tell which";
-	mes "papers are documents, and";
-	mes "which ones are trash...";
-	next;
-	mes "[Seylin]";
-	mes "So, how have you been?";
-	mes "Is everything okay with you?";
-	mes "I hope you have a lot of good";
-	mes "experiences in your adventures.";
-	close;
+OnDisable:
+	set .s_check,0;
+	disablenpc "Examiner#sd";
+	end;
 
+Onreset1:
+	donpcevent "Standby Room#sign::Onreset";
+	end;
 }
 
 alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
-
-    if (!signquest) {
-        mes "[Bakerlan]";
-        mes "Umm...well then...";
-        mes "I shall take the action for";
-        mes "Prontera...";
-        mes "And for Juno...";
-        mes "Awww....";
-        mes "Gosh, this is such a pain in the";
-        mes "ass...";
-        mes "Mumble mumble...";
-        close;
-    }
-    if (signquest > 12) goto L_Over;
-    if (bakerlan_test == 13) goto L_Help;
-    if (bakerlan_test == 5) goto L_Busy;
-    if (bakerlan_test == 4) goto L_JobDone;
-    if (bakerlan_test > 1) goto L_Steward;
-    if (bakerlan_test == 1) goto L_Later;
-    if (signquest == 12) {
-        mes "[Bakerlan]";
-        mes "Gosh...";
-        mes "I do not know what I should do";
-        mes "about Juno...";
-        mes "Who are you?";
-        next;
-        menu "Noone.",-,"Mr. Metz sent me.",L_Metz;
-        mes "[Bakerlan]";
-        mes "Hmm...";
-        mes "I am pretty busy at the moment. So";
-        mes "please do not interrupt me any";
-        mes "further.";
-        mes "If you are looking for a job,";
-        mes "please inquire of my steward.";
-        close;
-    }
-
-L_Metz:
-    mes "[Bakerlan]";
-    mes "Ah... He did?... Hmmmm...";
-    mes "Unfortunately, I am kind of busy...";
-    mes "Will you please come back later?";
-    mes "Thanks you.";
-    set bakerlan_test,1;
-    close;
-
-L_Later:
-    mes "[Bakerlan]";
-    mes "Hmm...? You've";
-    mes "finished all the";
-    mes "tests up until Dearles'";
-    mes "challenge? Prove it to me";
-    mes "with your pieces of the";
-    mes "Sobbing Starlight...";
-    next;
-    menu "Give me a minute...",-,"Here...",L_Star;
-
-L_NoStar:
-    mes "[Bakerlan]";
-    mes "Well, you better";
-    mes "come back soon. I'm";
-    mes "a busy businessman, so";
-    mes "my time is quite precious.";
-    close;
-
-L_Star:
-    if (countitem(7177) < 5) goto L_NoStar;
-    mes "[Bakerlan]";
-    mes "Ah, now I see that";
-    mes "you speak the truth.";
-    mes "Alright, we can begin my test.";
-    next;
-    mes "[Bakerlan]";
-    mes "First, I wish for you to make";
-    mes "a delivery. The object I want you";
-    mes "to deliver is expensive and must be";
-    mes "handled with care. Don't lose it or";
-    mes "you will fail. Now, speak to my";
-    mes "steward for more information.";
-    set bakerlan_test,2;
-    close;
-
-L_Steward:
-    mes "[Bakerlan]";
-    mes "Please speak to my";
-    mes "steward for all matters";
-    mes "related to the delivery";
-    mes "that you must complete";
-    mes "for my test.";
-    close;
-
-L_JobDone:
-    mes "[Bakerlan]";
-    mes "Ah yes, Mahatra tells";
-    mes "me that you've completed";
-    mes "the delivery. Well, um, he now";
-    mes "has another assignment for";
-    mes "you to complete. So";
-    mes "please talk to him again.";
-    set bakerlan_test,5;
-    close;
-
-L_Busy:
-    mes "[Bakerlan]";
-    mes "You have not finished yet.";
-    mes "Why don't you go finish them";
-    mes "first?";
-    mes "I'm a busy businessman.";
-    close;
-
-L_Help:
-    mes "[Bakerlan]";
-    mes "Ah, I was informed about you.";
-    mes "Well, although you have your goal,";
-    mes "that does not necessarily mean to";
-    mes "help that kid.";
-    mes "Metz must have an eye for a right";
-    mes "person, I assume.";
-    next;
-    mes "[Bakerlan]";
-    mes "Well, I wanted to assign you some";
-    mes "various tasks,";
-    mes "on my own plan, bur recently I am";
-    mes "very busy";
-    mes "to take care of tradings";
-    mes "with Kunlun and Amatsu.";
-    next;
-    mes "[Bakerlan]";
-    mes "I found Seylin while I was trading";
-    mes "with Amatsu few years ago.";
-    mes "I introduces her brother to the";
-    mes "royal family of Prontera, too.";
-    mes "But anyways,";
-    next;
-    mes "[Bakerlan]";
-    mes "I want to test you longer, but";
-    mes "I am too busy for that. Also I";
-    mes "don't think it is good for you.";
-    mes "Let's finish the test now.";
-    mes "You are qualified enough already.";
-    next;
-    mes "[Bakerlan]";
-    mes "There you go.";
-    mes "I am the last one who tested your";
-    mes "qualification.";
-    mes "Now bring all of the Stone pieces";
-    mes "to Metz.";
-    mes "He will tell you what you need to";
-    mes "do next.";
-    getitem 7177,1;
-    set signquest,13;
-    close;
-
-L_Over:
-    mes "[Bakerlan]";
-    mes "How is it going?";
-    mes "In fact, we want to do it on our";
-    mes "own...";
-    mes "but we are too preoccupied with our";
-    mes "works...";
-    mes "I hope you will keep up the good";
-    mes "work.";
-    mes "I am also curious what that stone";
-    mes "is.";
-    close;
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 35) {
+		mes "[Bakerlan]";
+		mes "Umm...well then...";
+		mes "I shall take the action for Prontera...";
+		mes "And for Juno...";
+		mes "Awww....";
+		mes "Gosh, this is such a pain in the ass...";
+		mes "Mumble mumble...";
+		close;
+	}
+	else if (sign_q == 35) {
+		mes "[Bakerlan]";
+		mes "Gosh.....";
+		mes "I do not know what I should do about Juno...";
+		mes "?";
+		mes "Who are you?";
+		next;
+		switch(select("Nothing.:Mr. Metz sent me.")) {
+		case 1:
+			mes "[Bakerlan]";
+			mes "Hmm...";
+			mes "I am pretty busy at this moment. So please do not interrupt me any further.";
+			mes "If you are looking for a job,";
+			mes "please inquire of my steward.";
+			close;
+		case 2:
+			mes "[Bakerlan]";
+			mes "Ah....";
+			mes "He did?....Hmmm..";
+			mes "Unfortunately I am kind of busy...";
+			mes "will you please come back later?";
+			mes "Thank you.";
+			set sign_q,36;
+			close;
+		}
+	}
+	else if (sign_q == 36) {
+		mes "[Bakerlan]";
+		mes "Hmm...? You've";
+		mes "finished all of the";
+		mes "tests up until Dearle's";
+		mes "challenge? Prove it to me";
+		mes "with your pieces of the";
+		mes "Sobbing Starlight...";
+		next;
+		switch(select("Give me a minute...:Here...")) {
+		case 1:
+			mes "[Bakerlan]";
+			mes "Well, you better";
+			mes "come back soon. I'm";
+			mes "a busy businessman, so";
+			mes "my time is quite precious.";
+			close;
+		case 2:
+			if (countitem(7177) < 5) {
+				mes "[Bakerlan]";
+				mes "Hmm, I suppose you";
+				mes "still haven't completed";
+				mes "all the tests. These aren't";
+				mes "enough pieces of the Sobbing";
+				mes "Starlight, you know...";
+				close;
+			}
+			else if (countitem(7177) == 5) {
+				mes "[Bakerlan]";
+				mes "Ah, now I see that";
+				mes "you speak the truth.";
+				mes "Alright, we can begin my test.";
+				next;
+				mes "[Bakerlan]";
+				mes "First, I wish for you to make";
+				mes "a delivery. The object I want you to deliver is expensive and must be handled with care. Don't lose it or you will fail. Now, speak to my steward for more information.";
+				set sign_q,37;
+				close;
+			}
+			else {
+				mes "[Bakerlan]";
+				mes "Hm? It's not possible for";
+				mes "you to have this many pieces";
+				mes "of the Sobbing Starlight!";
+				mes "These must be fakes. How";
+				mes "dare you! Leave me!";
+				close;
+			}
+		}
+	}
+	else if (sign_q < 40) {
+		mes "[Bakerlan]";
+		mes "Please speak to my";
+		mes "steward for all matters";
+		mes "related to the delivery";
+		mes "that you must complete";
+		mes "for my test.";
+		close;
+	}
+	else if (sign_q == 40) {
+		mes "[Bakerlan]";
+		mes "Ah yes, Mahatra tells";
+		mes "me that you've completed";
+		mes "the delivery. Well, um, he now";
+		mes "has another assignment for";
+		mes "for you to complete. So";
+		mes "please talk to him again.";
+		set sign_q,41;
+		close;
+	}
+	else if (sign_q < 52) {
+		mes "[Bakerlan]";
+		mes "You have not finished yet.";
+		mes "Why don't you go finish them first?";
+		mes "I am a busy businessman.";
+		close;
+	}
+	else if (sign_q == 52) {
+		mes "[Bakerlan]";
+		mes "Ah, I was informed about you.";
+		mes "Well, although you have your goal,";
+		mes "that does not necessarily mean to help that kid.";
+		mes "Metz must have an eye for a right person, I assume.";
+		next;
+		mes "[Bakerlan]";
+		mes "Well, I wanted to assign you some various tasks";
+		mes "on my own plan, but recently I am very busy";
+		mes "to take care of tradings with Kunlun and Amatsu.";
+		next;
+		mes "[Bakerlan]";
+		mes "I found Seyling while I was trading with Amatsu few years ago.";
+		mes "I introduced her brother to the royal family of Prontera, too.";
+		mes "But anyways,";
+		next;
+		mes "[Bakerlan]";
+		mes "I want to test you longer, but";
+		mes "I am too busy for that. Also I don't think it is good for you.";
+		mes "Let's finish the test now.";
+		mes "You are qualified enough already.";
+		next;
+		mes "[Bakerlan]";
+		mes "There you go.";
+		mes "I am the last one who tested your qualification.";
+		mes "Now bring all of the stone pieces to Metz.";
+		mes "He will tell you what you need to do next.";
+		set sign_q,53;
+		getitem 7177,1; //Part_Of_Star's_Sob
+		if (BaseLevel < 60) {
+			getexp 5000,0;
+		}
+		else if (BaseLevel < 70) {
+			getexp 8000,0;
+		}
+		else if (BaseLevel < 80) {
+			getexp 11000,0;
+		}
+		else if (BaseLevel < 90) {
+			getexp 15000,0;
+		}
+		else if (BaseLevel < 99) {
+			getexp 20000,0;
+		}
+		close;
+	}
+	else if (sign_q == 97) {
+		mes "[Bakerlan]";
+		mes "Umm....";
+		mes "Did I see you wrong? Or did Metz do?";
+		mes "...I do not have any more business with you.";
+		mes "Take care now.";
+		close;
+	}
+	else if (sign_q == 98) {
+		mes "[Bakerlan]";
+		mes "Umm...well then...";
+		mes "I shall take the action for Prontera...";
+		mes "And for Juno...";
+		mes "Awww....";
+		mes "Gosh, this is such a pain in the ass...";
+		mes "Mumble mumble...";
+		close;
+	}
+	else {
+		mes "[Bakerlan]";
+		mes "How is it going?";
+		mes "In fact, we want to do it on our own...";
+		mes "but we are too preoccupied with our works...";
+		mes "I hope you will keep up the good work.";
+		mes "I am also curious what that stone is.";
+		close;
+	}
 }
 
-yuno,330,100,3	script	Knight#2	734,{
-
-    if (bakerlan_test > 4) goto L_Thanks;
-    if (bakerlan_test == 3) goto L_Delivery;
-
-L_Wait:
-    mes "[Leibech]";
-    mes "Don't disturb me.";
-    mes "I'm waiting for an";
-    mes "important delivery.";
-    close;
-
-L_Delivery:
-    set @signid,getcharid(0,strcharinfo(0));
-    set @sign3, @signid & 65535;
-    set @sign4, @signid >> 16;
-    set @sign1,254;
-    set @sign2,0;
-    if (countitem2(7049,1,0,0,@sign1,@sign2,@sign3,@sign4)) {
-        mes "[Leibech]";
-        mes "Finally, it's here!";
-        mes "Yes, this is what I ordered.";
-        mes "Thanks for the delivery!";
-        next;
-        mes "[Leibech]";
-        mes "Well, here's your";
-        mes "receipt. Please take";
-        mes "this to Mister Bakerlan";
-        mes "so he knows you did";
-        mes "a good job for me.";
-        mes "Thanks again!";
-        delitem2 7049,1,1,0,0,@sign1,@sign2,@sign3,@sign4;
-        getitem 7181,1;
-        close;
-    } else {
-        goto L_Wait;
-    }
-
-L_Thanks:
-    mes "[Leibech]";
-    mes "Thanks again for";
-    mes "the delivery.";
-    mes "I was waiting for it";
-    mes "for such a long time...";
-    close;
+alberta_in,154,171,5	script	Maid#s10	758,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 38) {
+		mes "[Seylin]";
+		mes "I'm sorry, but I'm";
+		mes "busy cleaning the manor";
+		mes "right now so I don't have";
+		mes "time to talk. Oh, and would";
+		mes "you please wipe your shoes";
+		mes "on the mat before coming in?";
+		close;
+	}
+	else if (sign_q == 38) {
+		mes "[Seylin]";
+		mes "Leibech...?";
+		mes "I remember that he's";
+		mes "a regular customer who";
+		mes "orders the strangest things.";
+		mes "Last I heard, he was traveling";
+		mes "near Mount Mjolnir.";
+		next;
+		mes "[Seylin]";
+		mes "Yes, that was where";
+		mes "his last order was sent";
+		mes "to. Hm, I wonder. Do you";
+		mes "think he could have been";
+		mes "heading towards the";
+		mes "Schwaltzvalt Republic?";
+		close;
+	}
+	else if (sign_q < 42) {
+		mes "[Seylin]";
+		mes "Ooooh...";
+		mes "What am I going";
+		mes "to do?! Oh-- You";
+		mes "startled me!";
+		next;
+		mes "[Seylin]";
+		mes "I'm sorry, but";
+		mes "I was just thinking";
+		mes "about something. I hope";
+		mes "I didn't bother you. ^333333*Sigh*^000000";
+		close;
+	}
+	else if (sign_q == 42) {
+		mes "[Seylin]";
+		mes "Ooooh...";
+		mes "What am I going";
+		mes "to do?! Oh-- You";
+		mes "startled me!";
+		next;
+		mes "[Seylin]";
+		mes "I'm sorry, but";
+		mes "I was just thinking";
+		mes "about something. I hope";
+		mes "I didn't bother you. ^333333*Sigh*^000000";
+		set sign_q,43;
+		close;
+	}
+	else if (sign_q < 51) {
+		switch(sign_q) {
+		case 43:
+			mes "[Seylin]";
+			mes "^333333*Sigh...*^000000";
+			mes "Oh dear...";
+			mes "What can I do";
+			mes "about this...?";
+			next;
+			switch(select("Ignore her.:Excuse me, but Mahatra sent me...")) {
+			case 1:
+				mes "[Seylin]";
+				mes "Oh, it's no use";
+				mes "worrying about";
+				mes "something I can do";
+				mes "nothing about. I better";
+				mes "get back to work...";
+				close;
+			case 2:
+				mes "[Seylin]";
+				mes "Mister Mahatra";
+				mes "sent you to me?";
+				mes "Hm? Does he need";
+				mes "me for anything?";
+				next;
+				switch(select("Actually, he wants me to help you.")) {
+				case 1:
+					mes "[Seylin]";
+					mes "Oh, how very kind!";
+					mes "Yes, yes, I could use";
+					mes "some help right now!";
+					mes "You see, it'll be my brother's";
+					mes "birthday, but I'm so busy with";
+					mes "work that I can't see him.";
+					emotion e_thx;
+					next;
+					mes "[Seylin]";
+					mes "The last time I saw him,";
+					mes "he looked so tired and weak";
+					mes "so it's worrying me. Now, I've";
+					mes "heard there's some new medicine";
+					mes "called ^FF0000Vigorgra^000000. I don't know much about it, but it should help him!";
+					next;
+					mes "[Seylin]";
+					mes "Do you think you could";
+					mes "find that medicine and";
+					mes "bring it to me? If you don't";
+					mes "want to, I understand. Plus,";
+					mes "I don't know if the master";
+					mes "would approve of this...";
+					next;
+					switch(select("I can't do it.:Let me think about it.:Sure, why not?")) {
+					case 1:
+						mes "[Seylin]";
+						mes "Oh, really?";
+						mes "Alright, I can";
+						mes "understand. I'm";
+						mes "very sorry to bother";
+						mes "you with my problems.";
+						set sign_q,44;
+						close;
+					case 2:
+						mes "[Seylin]";
+						mes "Oh okay.";
+						mes "Take your time.";
+						mes "If you can help";
+						mes "me, I'd really";
+						mes "appreciate it~";
+						set sign_q,45;
+						close;
+					case 3:
+						mes "[Seylin]";
+						mes "Oh, thank you so much!";
+						mes "Now, I remember hearing";
+						mes "that you can find Vigorgra";
+						mes "somewhere in Al de Baran.";
+						mes "Somebody in the Alchemist";
+						mes "Guild makes it, I think.";
+						next;
+						mes "[Seylin]";
+						mes "I'm sorry, but I don't";
+						mes "know much about the medicine.";
+						mes "Well, aside from the fact that";
+						mes "it makes men feel young again.";
+						mes "So that must be good, right?";
+						mes "Thanks again for your help~";
+						set sign_q,46;
+						close;
+					}
+				}
+			}
+		case 44:
+			mes "[Seylin]";
+			mes "Hello there~";
+			mes "Oh, have you";
+			mes "changed your mind";
+			mes "about helping me?";
+			mes "I'll repay you,";
+			mes "of course.";
+			next;
+			switch(select("No.:Yes.")) {
+			case 1:
+				mes "[Seylin]";
+				mes "Oh really?";
+				mes "I'm sorry, I...";
+				mes "I just thought";
+				mes "that maybe...";
+				close2;
+				emotion e_dots;
+				end;
+			case 2:
+				mes "[Seylin]";
+				mes "Oh, thank you so much!";
+				mes "Now, I remember hearing";
+				mes "that you can find Vigorgra";
+				mes "somewhere in Al de Baran.";
+				mes "Somebody in the Alchemist";
+				mes "Guild makes it, I think.";
+				next;
+				mes "[Seylin]";
+				mes "I'm sorry, but I don't";
+				mes "know much about the medicine.";
+				mes "Well, aside from the fact that";
+				mes "it makes men feel young again.";
+				mes "So that must be good, right?";
+				mes "Thanks again for your help~";
+				set sign_q,46;
+				close;
+			}
+		case 45:
+			mes "[Seylin]";
+			mes "Hello there~";
+			mes "So have you decided";
+			mes "yet? If you help me,";
+			mes "I'll be sure to pay";
+			mes "you back somehow.";
+			next;
+			switch(select("Um, I'm still thinking.:Yes.")) {
+			case 1:
+				mes "[Seylin]";
+				mes "Oh okay.";
+				mes "But please hurry~";
+				mes "My brother's birthday";
+				mes "is coming up soon!";
+				close;
+			case 2:
+				mes "[Seylin]";
+				mes "Oh, thank you so much!";
+				mes "Now, I remember hearing";
+				mes "that you can find Vigorgra";
+				mes "somewhere in Al de Baran.";
+				mes "Somebody in the Alchemist";
+				mes "Guild makes it, I think.";
+				next;
+				mes "[Seylin]";
+				mes "I'm sorry, but I don't";
+				mes "know much about the medicine.";
+				mes "Well, aside from the fact that";
+				mes "it makes men feel young again.";
+				mes "So that must be good, right?";
+				mes "Thanks again for your help~";
+				set sign_q,46;
+				close;
+			}
+		case 46:
+			mes "[Seylin]";
+			mes "I know that you might";
+			mes "be able to find Vigorgra";
+			mes "in the Alchemist's Guild";
+			mes "in Al de Baran. Aside from";
+			mes "that, I don't know much...";
+			next;
+			mes "[Seylin]";
+			mes "Once you get it,";
+			mes "would you bring";
+			mes "the Vigorgra to me?";
+			close;
+		case 47:
+			mes "[Seylin]";
+			mes "I know that you might";
+			mes "be able to find Vigorgra";
+			mes "in the Alchemist's Guild";
+			mes "in Al de Baran. Aside from";
+			mes "that, I don't know much...";
+			next;
+			mes "[Seylin]";
+			mes "Once you get it,";
+			mes "would you bring";
+			mes "the Vigorgra to me?";
+			close;
+		case 48:
+			if (countitem(7044) < 1) {
+				mes "[Seylin]";
+				mes "Oh, you know where";
+				mes "you can get Vigorgra?";
+				mes "That's great news!";
+				mes "Oh, when you have it,";
+				mes "bring to me, okay?";
+				close;
+			}
+			else {
+				mes "[Seylin]";
+				mes "Hurray~!";
+				mes "You brought the";
+				mes "Vigorgra! I hope";
+				mes "my brother will";
+				mes "be happy with this!";
+				next;
+				mes "[Seylin]";
+				mes "Oh! Would you please";
+				mes "bring this Vigorgra to my";
+				mes "brother? His name is Maruin";
+				mes "and he's working over at";
+				mes "the Prontera Castle.";
+				next;
+				mes "[Seylin]";
+				mes "Ah, I almost forgot!";
+				mes "I just finished writing";
+				mes "him this letter, so would";
+				mes "you also make sure he gets";
+				mes "this? Thank you so much!";
+				set sign_q,49;
+				getitem 7183,1; //Sister_Letter
+				close;
+			}
+		case 49:
+			mes "[Seylin]";
+			mes "Would you please";
+			mes "deliver the Vigorgra";
+			mes "and my letter to my brother";
+			mes "Maruin in the Prontera Castle?";
+			mes "And wish him 'Happy Birthday~'";
+			close;
+		case 50:
+			mes "[Seylin]";
+			mes "Thanks so much";
+			mes "for your help again!";
+			mes "I want you to have this";
+			mes "as a token of my gratitude.";
+			mes "You really are a kind person~";
+			set sign_q,51;
+			getitem 525,3; //Panacea
+			next;
+			emotion e_kis2;
+			close;
+		}
+	}
+	else if (sign_q == 97) {
+		mes "[Seylin]";
+		mes "Oh no~!";
+		mes "Please don't";
+		mes "drag your muddy";
+		mes "feet over the carpet!";
+		mes "Would you please leave?";
+		close;
+	}
+	else if (sign_q == 98) {
+		mes "[Seylin]";
+		mes "I'm sorry, but I'm";
+		mes "busy cleaning the manor";
+		mes "right now so I don't have";
+		mes "time to talk. Oh, and would";
+		mes "you please wipe your shoes";
+		mes "on the mat before coming in?";
+		close;
+	}
+	else {
+		mes "[Seylin]";
+		mes "Although the master isn't";
+		mes "a messy person, he's pretty";
+		mes "unorganized. I wish he'd make";
+		mes "it easier for me to tell which";
+		mes "papers are documents and ";
+		mes "which ones are trash...";
+		next;
+		mes "[Seylin]";
+		mes "So how have you been?";
+		mes "Is everything okay with you?";
+		mes "I hope you have a lot of good";
+		mes "experiences in your adventures~";
+		close;
+	}
 }
 
-
-alde_alche,169,162,7	script	Alchemist#3	749,{
-
-    if (!bakerlan_test) {
-        mes "[Melkaba]";
-        mes "Most Alchemists seek out the";
-        mes "Stone of Sage, but in my opinion";
-        mes "their goals are too short sighted.";
-        mes "There are more important studies";
-        mes "to be conducted in the name of";
-        mes "science for the good of mankind...";
-        next;
-        menu "...",-,"So what are you studying?",L_What;
-
-        mes "[Melkaba]";
-        mes "In the end, the";
-        mes "Stone of Sage may";
-        mes "just be a simple rumor.";
-        mes "After all, thousands of";
-        mes "Alchemists have already";
-        mes "failed to create it.";
-        close;
-
-L_What:
-        mes "[Melkaba]";
-        mes "What am I studying?";
-        mes "Well, my expertise is...";
-        mes "Different, if you must";
-        mes "know, it's a secret~";
-        mes "If any man found out";
-        mes "about my research...";
-        close;
-    }
-    if (bakerlan_test > 8) goto L_Done;
-    if (bakerlan_test == 8) goto L_Items;
-    mes "[Melkaba]";
-    mes "Eh...?";
-    mes "What do you need?";
-    mes "If it's not important,";
-    mes "please leave my";
-    mes "laboratory.";
-    if (bakerlan_test == 7) {
-        next;
-        menu "Vigorgra?",L_Vigor,"Oh, I'm sorry.",-;
-        mes "[Melkaba]";
-        mes "There's no need";
-        mes "to apologize but";
-        mes "I'd appreciate it if";
-        mes "you'd let me work";
-        mes "in peace.";
-        close;
-
-L_Vigor:
-        mes "[Melkaba]";
-        mes "What?! Who told you";
-        mes "that I could make that?!";
-        mes "Oh, no matter I suppose";
-        mes "you want me to get some";
-        mes "some ready for you. Now tell me...";
-        mes "Why do you want it?";
-        next;
-        menu "No, I don't want it.",-,"I need Vigorgra for... a friend.",L_Friend;
-        mes "[Melkaba]";
-        mes "You immature--!";
-        mes "You come all this";
-        mes "way to bother me?";
-        mes "Don't bring your";
-        mes "shame into my lab!";
-        close;
-
-L_Friend:
-        mes "[Melkaba]";
-        mes "Oh, right.";
-        mes "Your friend.";
-        mes "I understand you.";
-        mes "Crystal clear.";
-        next;
-        mes "[Melkaba]";
-        mes "Well, since you know";
-        mes "about my secret researches,";
-        mes "I'll do you a favor so long as";
-        mes "you don't tell anyone else!";
-        mes "Of course, I can't just give";
-        mes "you Vigorgra for free...";
-        next;
-        mes "[Melkaba]";
-        mes "Now, write this";
-        mes "down. These are the";
-        mes "ingredients I need to";
-        mes "make a bottle of Vigorgra.";
-        next;
-        mes "[Melkaba]";
-        mes "^FF00001 Ment";
-        mes "20 Honey";
-        mes "10 Royal Jelly";
-        mes "30 Bear's Footskin";
-        mes "1 Hinalle Leaflet";
-        mes "1 Empty Bottle^000000";
-        next;
-        mes "[Melkaba]";
-        mes "Alright.";
-        mes "Now go and";
-        mes "bring all those";
-        mes "items to me. I'll";
-        mes "be seeing you later.";
-        set bakerlan_test,8;
-        close;
-
-L_Items:
-        mes "[Melkaba]";
-        mes "Hmmmm...";
-        mes "So did you";
-        mes "bring everything";
-        mes "you need for the";
-        mes "Vigorgra...?";
-        next;
-        menu "Not yet...",-,"Yes.",L_Check;
-        mes "[Melkaba]";
-        mes "Well, let me";
-        mes "remind you of";
-        mes "what you need to";
-        mes "bring to me in case";
-        mes "you forgot already...";
-        next;
-        mes "[Melkaba]";
-        mes "^FF00001 Ment";
-        mes "20 Honey";
-        mes "10 Royal Jelly";
-        mes "30 Bear's Footskin";
-        mes "1 Hinalle Leaflet";
-        mes "1 Empty Bottle^000000";
-        next;
-        mes "[Melkaba]";
-        mes "Take your time...";
-        mes "In the end, you're";
-        mes "the one who's got the";
-        mes "need for it, anyway.";
-        close;
-
-L_Check:
-        mes "[Melkaba]";
-        mes "Great...!";
-        mes "Now let me check";
-        mes "to see if you have";
-        mes "everything ready...";
-        next;
-        if (countitem(708) > 0 && countitem(518) > 19 && countitem(526) > 9 && countitem(948) > 29 && countitem(520) > 0 && countitem(713) > 0) goto L_Enough;
-        mes "[Melkaba]";
-        mes "Hmm, you're still";
-        mes "missing some of the";
-        mes "ingredients. Now, listen";
-        mes "carefully. I need you to get...";
-        next;
-        mes "[Melkaba]";
-        mes "^FF00001 Ment";
-        mes "20 Honey";
-        mes "10 Royal Jelly";
-        mes "30 Bear's Footskin";
-        mes "1 Hinalle Leaflet";
-        mes "1 Empty Bottle^000000";
-        close;
-
-L_Enough:
-        mes "[Melkaba]";
-        mes "Good work.";
-        mes "Everything's here.";
-        mes "Alright, just this once";
-        mes "I'll make you a bottle";
-        mes "of Vigorgra.";
-        next;
-        mes "[Melkaba]";
-        mes "If you ask me again,";
-        mes "I won't speak to you!";
-        mes "And I'll need to charge";
-        mes "you 10.000 zenys.";
-        next;
-        mes "[Melkaba]";
-        mes "Alright. I'll be";
-        mes "taking my fee from";
-        mes "you now. It's not that";
-        mes "expensive when you";
-        mes "consider Vigorgra's";
-        mes "numerous benefits.";
-        next;
-        if (Zeny < 10000) goto L_Money;
-        mes "^0066CCMelkaba placed";
-        mes "all the ingredients";
-        mes "into a test tube and";
-        mes "began processing it";
-        mes "through some strange";
-        mes "electronic equipment.^000000";
-        next;
-        mes "...";
-        mes "......";
-        next;
-        mes "...";
-        mes "......";
-        mes ".........";
-        next;
-        mes "[Melkaba]";
-        mes "Ah! Success!";
-        mes "A lifetime's supply";
-        mes "of Vigorgra! I know it's";
-        mes "just one bottle but this";
-        mes "stuff is extremely potent!";
-        misceffect 305;
-        next;
-        mes "[Melkaba]";
-        mes "Um, just remember";
-        mes "not to take too much";
-        mes "at one time. Can't have";
-        mes "you getting crazy high";
-        mes "blood pressure~";
-        set bakerlan_test,9;
-        set Zeny,Zeny - 10000;
-        delitem 708,1;
-        delitem 518,20;
-        delitem 526,10;
-        delitem 948,30;
-        delitem 520,1;
-        delitem 713,1;
-        getitem 7044,1;
-        close;
-
-L_Money:
-        mes "[Melkaba]";
-        mes "I'm sorry but it";
-        mes "seems you don't";
-        mes "have enough money";
-        mes "to support the fee...";
-        mes "Please come back";
-        mes "with 10.000 zenys.";
-        close;
-
-L_Done:
-        mes "[Melkaba]";
-        mes "Vigorgra is";
-        mes "a miracle of";
-        mes "modern science";
-        mes "but it can do more";
-        mes "harm than good if";
-        mes "you're not careful!";
-        close;
-    }
-    else {
-        close;
-    }
-
+prt_castle,107,58,5	script	Soldier#s11	105,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 49) {
+		mes "[Maruin]";
+		mes "Welcome to";
+		mes "Prontera Castle.";
+		mes "Please be careful";
+		mes "and avoid getting lost.";
+		next;
+		mes "[Maruin]";
+		mes "Oh man...";
+		mes "I'm so tired~!";
+		mes "Enervated, even~";
+		mes "If I only had some";
+		mes "kind of refreshment...";
+		close;
+	}
+	else if (sign_q == 49) {
+		if ((countitem(7044) < 1) && (countitem(7183) < 1)) {
+			mes "[Maruin]";
+			mes "Welcome to";
+			mes "Prontera Castle.";
+			mes "Please be careful";
+			mes "and avoid getting lost.";
+			next;
+			mes "[Maruin]";
+			mes "Oh man...";
+			mes "I'm so tired~!";
+			mes "Enervated, even~";
+			mes "If I only had some";
+			mes "kind of refreshment...";
+			close;
+		}
+		else {
+			mes "[Maruin]";
+			mes "Welcome to";
+			mes "Prontera Castle.";
+			mes "Please be careful";
+			mes "and avoid getting los--";
+			next;
+			mes "[Maruin]";
+			mes "What's that?";
+			mes "You're here for";
+			mes "my sister? Um, did";
+			mes "something happen...?";
+			next;
+			switch(select("Oh no, she sent you a birthday gift.")) {
+			case 1:
+				mes "[Maruin]";
+				mes "Birthday...?";
+				mes "What are you sm--";
+				mes "OH. It is my birthday.";
+				mes "Ha! I completely forgot!";
+				next;
+				mes "[Maruin]";
+				mes "Thanks for coming";
+				mes "all the way out here";
+				mes "to deliver my present!";
+				mes "Wow, I wonder what she";
+				mes "got for me this year?";
+				next;
+				emotion e_gasp;
+				mes "[Maruin]";
+				mes "Th-this is--!";
+				mes "Oh. Snap. That's right.";
+				mes "She's been worried about";
+				mes "me being tired lately. But";
+				mes "does she even know what";
+				mes "Vigorgra is supposed to...?";
+				next;
+				mes "[Maruin]";
+				mes "Never mind. It's the";
+				mes "thought that counts.";
+				mes "But for the record, it's";
+				mes "not like I need this stuff.";
+				mes "I mean, I have, you know,";
+				mes "a girlfr--you know what I mean.";
+				next;
+				mes "[Maruin]";
+				mes "I'd like to pay you";
+				mes "back, but since I'm";
+				mes "on duty, all I can do";
+				mes "is replenish your health.";
+				mes "I'm not really supposed to,";
+				mes "but no one will say anything.";
+				delitem 7044,1; //Vigorgra
+				delitem 7183,1; //Sister_Letter
+				set sign_q,50;
+				percentheal 100,100;
+				next;
+				mes "[Maruin]";
+				mes "Well, thanks for";
+				mes "the letter and the";
+				mes "male supplement, I guess.";
+				mes "I'll send a message to my";
+				mes "sister. Good luck on your";
+				mes "travels, alright?";
+				close;
+			}
+		}
+	}
+	else if (sign_q == 97 || sign_q == 98) {
+		mes "[Maruin]";
+		mes "Welcome to";
+		mes "Prontera Castle.";
+		mes "Please be careful";
+		mes "and avoid getting lost.";
+		next;
+		mes "[Maruin]";
+		mes "Oh man...";
+		mes "I'm so tired~!";
+		mes "Enervated, even~";
+		mes "If I only had some";
+		mes "kind of refreshment...";
+		close;
+	}
+	else {
+		mes "[Maruin]";
+		mes "Oh hey, how's";
+		mes "it going? Thanks";
+		mes "again for helping";
+		mes "out my sister, we";
+		mes "really appreciate it.";
+		if (Sex == 1) {
+			if (rand(1,5) == 5) {
+				next;
+				mes "[Maruin]";
+				mes "Oh...";
+				mes "And just between you";
+				mes "and me, that Vigorgra";
+				mes "really came in handy!";
+				mes "That stuff's amazing!";
+			}
+		}
+		close;
+	}
 }
 
-prt_castle,107,58,5	script	Soldier#2sign	105,{
-
-    if (bakerlan_test > 10) goto L_Heya;
-    mes "[Maruin]";
-    mes "Welcome to";
-    mes "Prontera Castle.";
-    mes "Please be careful";
-    if (bakerlan_test == 10 && countitem(7044) && countitem(7183)) {
-        mes "and avoid getting los--";
-        next;
-        mes "[Maruin]";
-        mes "What's that?";
-        mes "You're here for";
-        mes "my sister? Um, did";
-        mes "something happen...?";
-        next;
-        menu "Oh no, she sent you a birthday gift.",-;
-        mes "[Maruin]";
-        mes "Birthday...?";
-        mes "What are you sm--";
-        mes "OH. It is my birthday.";
-        mes "Ha! I completely forgot!";
-        next;
-        mes "[Maruin]";
-        mes "Thanks for coming";
-        mes "all the way out here";
-        mes "to deliver my present!";
-        mes "Wow, I wonder what she";
-        mes "gor for me this year!";
-        delitem 7044,1;
-        delitem 7183,1;
-        next;
-        mes "[Maruin]";
-        mes "Th-This is--!";
-        mes "Oh. Snap. That's right.";
-        mes "She's been worried about";
-        mes "me being tired lately. But";
-        mes "does she even know what";
-        mes "Vigorgra is supposed to...?";
-        emotion e_gasp;
-        next;
-        mes "[Maruin]";
-        mes "Never mind. It's the";
-        mes "thought that counts.";
-        mes "But for the record, it's";
-        mes "not like I need this stuff.";
-        mes "I mean, I have, you know,";
-        mes "a girlfr--you know what I mean.";
-        next;
-        mes "[Maruin]";
-        mes "I'd like to pay you";
-        mes "back but since I'm";
-        mes "on duty, all I can do";
-        mes "is replenish your health.";
-        mes "I'm not really supposed to,";
-        mes "but no one will say anything.";
-        next;
-        mes "[Maruin]";
-        mes "Well, thanks for";
-        mes "the letter and the";
-        mes "male supplement, I guess.";
-        mes "I'll send a message to my";
-        mes "sister. Good luck on your";
-        mes "travels, alright?";
-        set bakerlan_test,11;
-        close;
-
-L_Heya:
-        mes "[Maruin]";
-        mes "Oh hey, how's";
-        mes "it going? Thanks";
-        mes "again for helping";
-        mes "out my sister, we";
-        mes "really appreciate it.";
-        close;
-    } else {
-        mes "and avoid getting lost.";
-        next;
-        mes "[Maruin]";
-        mes "Oh man...";
-        mes "I'm so tired~!";
-        mes "Enervated, even~";
-        mes "If I only had some";
-        mes "kind of refreshment...";
-        close;
-    }
-
+alde_alche,169,162,7	script	Alchemist#sign	749,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 46) {
+		mes "[Melkaba]";
+		mes "Most Alchemists seek out the";
+		mes "Stone of Sage, but in my opinion, their goals are too short sighted. There are more important studies";
+		mes "to be conducted in the name of science for the good of mankind...";
+		next;
+		switch(select("...:So what are you studying?")) {
+		case 1:
+			mes "[Melkaba]";
+			mes "In the end, the ";
+			mes "Stone of Sage may";
+			mes "just be a simple rumor.";
+			mes "After all, thousands of";
+			mes "Alchemists have already";
+			mes "failed to create it.";
+			close;
+		case 2:
+			mes "[Melkaba]";
+			mes "What am I studying?";
+			mes "Well, my expertise is...";
+			mes "Different. If you must";
+			mes "know, it's a secret~";
+			mes "If any man found out";
+			mes "about my research...";
+			close;
+		}
+	}
+	else if (sign_q == 46) {
+		mes "[Melkaba]";
+		mes "Eh...?";
+		mes "What do you need?";
+		mes "If it's not important,";
+		mes "please leave my";
+		mes "laboratory!";
+		next;
+		switch(select("Vigorgra?:Oh, I'm sorry.")) {
+		case 1:
+			mes "[Melkaba]";
+			mes "What?! Who told you";
+			mes "that I could make that?!";
+			mes "Oh, no matter. I suppose";
+			mes "you want me to get some";
+			mes "ready for you. Now tell me...";
+			mes "Why do you want it?";
+			next;
+			switch(select("No, I don't want it!:I need Vigorgra for... a friend.")) {
+			case 1:
+				mes "[Melkaba]";
+				mes "You immature--!";
+				mes "You come all this";
+				mes "way to bother me?";
+				mes "Don't bring your";
+				mes "shame into my lab!";
+				close;
+			case 2:
+				mes "[Melkaba]";
+				mes "Oh right.";
+				mes "Your friend.";
+				mes "I understand you.";
+				mes "Crystal clear.";
+				next;
+				mes "[Melkaba]";
+				mes "Well, since you know";
+				mes "about my secret research,";
+				mes "I'll do you a favor so long as";
+				mes "you don't tell anyone else!";
+				mes "Of course, I can't just give";
+				mes "you Vigorgra for free...";
+				next;
+				mes "[Melkaba]";
+				mes "Now, write this";
+				mes "down. These are the";
+				mes "ingredients I need to";
+				mes "make a bottle of Vigorgra.";
+				next;
+				mes "[Melkaba]";
+				mes "^ff00001 Ment";
+				mes "20 Honey";
+				mes "10 Royal Jelly";
+				mes "30 Bear's Footskin";
+				mes "1 Hinalle Leaflet";
+				mes "1 Empty Bottle.^000000";
+				next;
+				mes "[Melkaba]";
+				mes "Alright.";
+				mes "Now go and";
+				mes "bring all those";
+				mes "items to me. I'll";
+				mes "be seeing you later.";
+				set sign_q,47;
+				close;
+			}
+		case 2:
+			mes "[Melkaba]";
+			mes "There's no need";
+			mes "to apologize. But";
+			mes "I'd appreciate it if";
+			mes "you'd let me work";
+			mes "in peace.";
+			close;
+		}
+	}
+	else if (sign_q == 47) {
+		mes "[Melkaba]";
+		mes "Hmmm...";
+		mes "So did you";
+		mes "bring everything";
+		mes "you need for the";
+		mes "Vigorgra...?";
+		next;
+		switch(select("Not yet...:Yes.")) {
+		case 1:
+			mes "[Melkaba]";
+			mes "Well, let me";
+			mes "remind you of";
+			mes "what you need to";
+			mes "bring to me in case";
+			mes "you forgot already...";
+			next;
+			mes "[Melkaba]";
+			mes "^ff00001 Ment";
+			mes "20 Honey";
+			mes "10 Royal Jelly";
+			mes "30 Bear's Footskin";
+			mes "1 Hinalle Leaflet";
+			mes "1 Empty Bottle.^000000";
+			next;
+			mes "[Melkaba]";
+			mes "Take your time...";
+			mes "In the end, you're";
+			mes "the one who's got";
+			mes "the need for it, anyway.";
+			close;
+		case 2:
+			mes "[Melkaba]";
+			mes "Great...!";
+			mes "Now let me check";
+			mes "to see if you have";
+			mes "everything ready...";
+			next;
+			if ((countitem(526) < 10) || (countitem(518) < 20) || (countitem(948) < 30) || (countitem(520) < 1) || (countitem(708) < 1) || (countitem(713) < 1)) {
+				mes "[Melkaba]";
+				mes "Hmm, you're still";
+				mes "missing some of the";
+				mes "ingredients. Now, listen";
+				mes "carefully. I need you to get...";
+				next;
+				mes "[Melkaba]";
+				mes "^ff00001 Ment";
+				mes "20 Honey";
+				mes "10 Royal Jelly";
+				mes "30 Bear's Footskin";
+				mes "1 Hinalle Leaflet";
+				mes "1 Empty Bottle.^000000";
+				close;
+			}
+			else {
+				mes "[Melkaba]";
+				mes "Good work.";
+				mes "Everything's here.";
+				mes "Alright, just this once";
+				mes "I'll make you a bottle";
+				mes "of Vigorgra.";
+				next;
+				mes "[Melkaba]";
+				mes "If you ask me again,";
+				mes "I won't speak to you!";
+				mes "And I'll need to charge";
+				mes "you 10,000 zeny.";
+				next;
+				if (Zeny < 10000) {
+					mes "[Melkaba]";
+					mes "Huh...";
+					mes "It doesn't look like";
+					mes "you have enough zeny";
+					mes "right now. No matter,";
+					mes "I can wait until you";
+					mes "bring it all to me.";
+				}
+				else {
+					mes "[Melkaba]";
+					mes "Alright, I'll be";
+					mes "taking my fee from";
+					mes "you now. It's not that";
+					mes "expensive when you";
+					mes "consider Vigorgra's";
+					mes "numerous benefits.";
+					next;
+					mes "^3355FFMelkaba placed";
+					mes "all the ingredients";
+					mes "into a test tube and";
+					mes "began processing it";
+					mes "through some strange";
+					mes "electronic equipment.^000000";
+					next;
+					mes "...";
+					mes "......";
+					next;
+					mes "...";
+					mes "......";
+					mes ".........";
+					next;
+					if (rand(1,100) < 98) {
+						specialeffect EF_PHARMACY_OK;
+						mes "[Melkaba]";
+						mes "Ah! Success!";
+						mes "A lifetime's supply";
+						mes "of Vigorgra! I know it's";
+						mes "just one bottle, but this";
+						mes "stuff is extremely potent!";
+						next;
+						set zeny,zeny-10000;
+						delitem 526,10; //Royal_Jelly
+						delitem 518,20; //Honey
+						delitem 948,30; //Bear's_Foot
+						delitem 520,1; //Leaflet_Of_Hinal
+						delitem 708,1; //Ment
+						delitem 713,1; //Empty_Bottle
+						set sign_q,48;
+						getitem 7044,1; //Vigorgra
+						mes "[Melkaba]";
+						mes "Um, just remember";
+						mes "not to take too much";
+						mes "at one time. Can't have";
+						mes "you getting crazy high";
+						mes "blood pressure~";
+						close;
+					}
+					else {
+						specialeffect EF_PHARMACY_FAIL;
+						delitem 526,10; //Royal_Jelly
+						delitem 518,20; //Honey
+						delitem 948,30; //Bear's_Foot
+						delitem 520,1; //Leaflet_Of_Hinal
+						delitem 708,1; //Ment
+						delitem 713,1; //Empty_Bottle
+						mes "[Melkaba]";
+						mes "It failed?!";
+						mes "Of course, the mixture";
+						mes "was too vigorous, even";
+						mes "for the machinery! I'm sorry,";
+						mes "but would you bring the things";
+						mes "we need to make Vigorgra again?";
+						close;
+					}
+				}
+			}
+		}
+	}
+	else if (sign_q == 97) {
+		mes "[Melkaba]";
+		mes "Most Alchemists seek out the";
+		mes "Stone of Sage, but in my opinion, their goals are too short sighted. There are more important studies";
+		mes "to be conducted in the name of science for the good of mankind...";
+		next;
+		switch(select("...:So what are you studying?")) {
+		case 1:
+			mes "[Melkaba]";
+			mes "In the end, the";
+			mes "Stone of Sage may";
+			mes "just be a simple rumor.";
+			mes "After all, thousands of";
+			mes "Alchemists have already";
+			mes "failed to create it.";
+			close;
+		case 2:
+			mes "[Melkaba]";
+			mes "What am I studying?";
+			mes "Well, my expertise is...";
+			mes "Different. If you must";
+			mes "know, it's a secret~";
+			mes "If any man found out";
+			mes "about my research...";
+			close;
+		}
+	}
+	else if (sign_q == 98) {
+		mes "[Melkaba]";
+		mes "Most Alchemists seek out the";
+		mes "Stone of Sage, but in my opinion, their goals are too short sighted. There are more important studies";
+		mes "to be conducted in the name of science for the good of mankind...";
+		next;
+		switch(select("...:So what are you studying?")) {
+		case 1:
+			mes "[Melkaba]";
+			mes "In the end, the";
+			mes "Stone of Sage may";
+			mes "just be a simple rumor.";
+			mes "After all, thousands of";
+			mes "Alchemists have already";
+			mes "failed to create it.";
+			close;
+		case 2:
+			mes "[Melkaba]";
+			mes "What am I studying?";
+			mes "Well, my expertise is...";
+			mes "Different. If you must";
+			mes "know, it's a secret~";
+			mes "If any man found out";
+			mes "about my research...";
+			close;
+		}
+	}
+	else {
+		mes "[Melkaba]";
+		mes "Vigorgra is";
+		mes "a miracle of";
+		mes "modern science,";
+		mes "but it can do more";
+		mes "harm than good if";
+		mes "you're not careful!";
+		close;
+	}
 }
 
-
-geffen_in,171,43,3	script	Cute Girl	703,{
-
-    if (!signquest) {
-        mes "[Liana]";
-        mes "^222222*Pout*^000000";
-        mes "When's my daddy";
-        mes "coming home?!";
-        mes "I... I miss him so much~";
-        mes "^222222*Cries*";
-        emotion e_sob;
-        close;
-    }
-    if (signquest > 20) goto L_Never;
-    if (signquest == 20) goto L_Thanks;
-    if (signquest == 17) goto L_Letter;
-    if (signquest == 16) goto L_Father;
-    mes "[Liana]";
-    mes "Oh, my mom said she's gonna cook me";
-    mes "something good today.";
-    mes "I wonder what she's gonna make?";
-    mes "I hope it's pickled cabbage again!";
-    close;
-
-L_Father:
-    mes "[Liana]";
-    mes "Everyone says that daddy is the";
-    mes "best blacksmith in the whole world!";
-    mes "but now he lets his apprentices do";
-    mes "the work so he can go around the";
-    mes "world to ding a rare ore~ Isn't";
-    mes "it amazing?";
-    next;
-    menu "What are you drawing by the way?",L_Draw,"Apprentices?",-;
-    mes "[Liana]";
-    mes "Yeah, Uncle Hollgrehenn and";
-    mes "Aragham come to visit sometimes and";
-    mes "we all play. But it's more fun to";
-    mes "see my dad, even though he's not";
-    mes "back yet. *Pout*";
-    next;
-    menu "Don't you miss your dad?",L_Miss,"He also misses you a lot.",-;
-    mes "[Liana]";
-    mes "I hope so...";
-    mes "But I hate it when";
-    mes "he doesn't have enough";
-    mes "time to come home and";
-    mes "see me. Sooooooooo~";
-    mes "I wrote this letter!";
-    emotion e_dots;
-    next;
-    menu "...",-,"I'll bring this to him",L_Really;
-    mes "[Brenda Howard]";
-    mes "Liana~";
-    mes "This nice man is going to look for";
-    mes "you dad. Why don't you ask him to";
-    mes "take your letter to him for you?";
-    next;
-
-L_Really:
-    mes "[Liana]";
-    mes "You are...?";
-    mes "Really, really?";
-    mes "H-hooray!";
-    next;
-    mes "[Liana]";
-    mes "Okay then, don't";
-    mes "forgive to give this to";
-    mes "my dad, okay? Promise?";
-    getitem 7276,1;
-    set signquest,17;
-    close;
-
-L_Draw:
-    mes "[Liana]";
-    mes "This is my father coming";
-    mes "back from his expedition";
-    mes "with the rarest ore ever";
-    mes "found in the world! I hope";
-    mes "he will be here soon.";
-    close;
-
-L_Miss:
-    mes "[Liana]";
-    mes "I miss him soooo much!";
-    mes "*Cries* But Mom always";
-    mes "says that he's too busy.";
-    mes "*Pouts*";
-    close;
-
-L_Letter:
-    mes "[Liana]";
-    mes "Would you please bring my letter";
-    mes "over to my dad? Heh heh, he'll be";
-    mes "so happy to hear from me!";
-    close;
-
-L_Thanks:
-    mes "[Liana]";
-    mes "Yay~!";
-    mes "Thank you for bringing my letter to";
-    mes "my dad. Here, here!";
-    mes "You have to share my treasure with";
-    mes "me, 'kay?";
-    getitem 529,10;
-    set signquest,21;
-    close;
-
-L_Never:
-    mes "[Liana]";
-    mes "I never saw my dad fail to upgrade";
-    mes "a weapon or armor. Mmm? But maybe";
-    mes "if he had something really really";
-    mes "old and rare and special...";
-    close;
-
+alberta_in,114,178,5	script	Refined Steward	109,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 37) {
+		mes "[Mahatra]";
+		mes "Welcome to the";
+		mes "Alchesh Estate.";
+		mes "The Alcheshs are the";
+		mes "most esteemed family";
+		mes "in all of Alberta.";
+		next;
+		mes "[Mahatra]";
+		mes "I am Mahatra Mornen,";
+		mes "steward of this family.";
+		mes "Feel free to ask me if";
+		mes "you need anything and";
+		mes "I shall do my best";
+		mes "to assist you.";
+		close;
+	}
+	else if (sign_q == 37) {
+		mes "[Mahatra]";
+		mes "Ah yes, the master informed";
+		mes "me that you would be taking";
+		mes "care of an urgent delivery for";
+		mes "him. Please take this to a";
+		mes "man named ^3355FFLeibech^000000.";
+		next;
+		mes "[Mahatra]";
+		mes "It may be difficult";
+		mes "to find him since he";
+		mes "travels around the world.";
+		mes "Ah yes, I have heard that";
+		mes "he was in some other country...";
+		next;
+		mes "[Mahatra]";
+		mes "Now, the item I am";
+		mes "about to give you is";
+		mes "one of a kind. Don't lose";
+		mes "it or you will fall out of favor with the master...";
+		next;
+		mes "^3355FFMahatra gives you";
+		mes "a unique stone that has";
+		mes "your name attached to it.^000000";
+		set sign_q,38;
+		getnameditem 7049,strcharinfo(0);
+		close;
+	}
+	else if (sign_q == 38) {
+		mes "[Mahatra]";
+		mes "You haven't delivered";
+		mes "the Stone yet? Please take";
+		mes "good care of it since it's very";
+		mes "rare. Don't use it or lose it.";
+		mes "before it's delivered!";
+		mes "Take care, now...";
+		close;
+	}
+	else if (sign_q == 39) {
+		if (countitem(7181) < 1) {
+			mes "[Mahatra]";
+			mes "You haven't delivered";
+			mes "the Stone yet? Please take";
+			mes "good care of it since it's very";
+			mes "rare. Don't use it or lose it.";
+			mes "before it's delivered!";
+			mes "Take care, now...";
+			close;
+		}
+		else {
+			mes "[Mahatra]";
+			mes "Ah, you've returned.";
+			mes "And I see you already";
+			mes "delivered the Stone. Great,";
+			mes "well done. Let me send a";
+			mes "message to the master, so";
+			mes "please visit him later.";
+			delitem 7181,1; //Receipt_01
+			set sign_q,40;
+			close;
+		}
+	}
+	else if (sign_q == 40) {
+		mes "[Mahatra]";
+		mes "Thank you very";
+		mes "much for the trouble";
+		mes "you've gone through";
+		mes "on our behalf.";
+		close;
+	}
+	else if (sign_q == 41) {
+		mes "[Mahatra]";
+		mes "Greetings. Hm?";
+		mes "Did the master ask";
+		mes "you to perform another";
+		mes "task for him already?";
+		next;
+		switch(select("No.:You have another assignment for me.")) {
+		case 1:
+			mes "[Mahatra]";
+			mes "Very well.";
+			mes "Then we shall";
+			mes "converse later~";
+			close;
+		case 2:
+			mes "[Mahatra]";
+			mes "I... I do...?";
+			mes "The master didn't";
+			mes "leave me any instructions.";
+			mes "Hmmm. Oh, I know what you can";
+			mes "do! Why don't you help ^FF0000Seylin^000000? She seems bothered by something...";
+			set sign_q,42;
+			close;
+		}
+	}
+	else if (sign_q < 51) {
+		mes "[Mahatra]";
+		mes "Although you may only";
+		mes "be doing it for the Sobbing";
+		mes "Starlight, I really appreciate";
+		mes "all your help. Seylin's a very";
+		mes "nice girl and doesn't deserve";
+		mes "to feel down...";
+		close;
+	}
+	else if (sign_q == 51) {
+		mes "[Mahatra]";
+		mes "Yes.";
+		mes "I heard from Seylin.";
+		mes "I did not know she was worried about her brother.";
+		mes "Ahem ahem...";
+		mes "Thank you for helping her.";
+		mes "I will send a message to my master.";
+		next;
+		mes "Mahatra]";
+		mes "If there is anything else, he will let you pass the test.";
+		mes "Good luck.";
+		set sign_q,52;
+		close;
+	}
+	else if (sign_q == 98) {
+		mes "[Mahatra]";
+		mes "I'm very disappointed";
+		mes "in you. We put our trust";
+		mes "in you and you really";
+		mes "let us down.";
+		next;
+		mes "Mahatra]";
+		mes "Well, I suppose";
+		mes "that's the nature";
+		mes "of the testing. They're";
+		mes "designed so that only";
+		mes "the best of the best";
+		mes "can pass them.";
+		close;
+	}
+	else {
+		mes "[Mahatra]";
+		mes "I hope the master listens";
+		mes "to me and dresses more like";
+		mes "a man in his position. Even if";
+		mes "he thinks he's just a merchant,";
+		mes "he's the master of this estate!";
+		mes "But please don't tell him that~";
+		close;
+	}
 }
 
-
-geffen_in,159,48,5	script	Woman	711,{
-    if (signquest > 22) goto L_Cherish;
-    if (signquest > 19) goto L_Done;
-    if (signquest == 19 && countitem(7278)) goto L_Letter;
-    if (signquest > 15) goto L_Cooking;
-    if (@signbrenda == 1) goto L_Husband;
-    if (signquest == 15) {
-        mes "[Brenda Howard]";
-        mes "Hey, who are you anyhow?";
-        mes "Don't you know it's rude to";
-        mes "enter someone's house without";
-        mes "being invited? Besides, I don't";
-        mes "have the time to help strangers";
-        mes "while I'm busy making dinner...";
-        next;
-        mes "[" + strcharinfo(0) + "]";
-        mes "W-Wait!";
-        mes "I'm here to see...";
-        next;
-        mes "[Brenda Howard]";
-        mes "Huh?";
-        mes "What are you";
-        mes "talking about?";
-        next;
-        mes "[Brenda Howard]";
-        mes "Hmm...";
-        mes "I wonder";
-        mes "how my pickled";
-        mes "cabbage will turn out?";
-        set @signbrenda,1;
-        close;
-    }
-    // Script could get to this point if the variable "signquest" was non-zero
-    // It would then continue running at the label "L_Husband" [Llyr]
-
-    mes "[Brenda Howard]";
-    mes "Hmm...";
-    mes "What should I make for";
-    mes "dinner today? Pickled cabbage?";
-    mes "I learned how to make it a while";
-    mes "ago, but I've never gotten the";
-    mes "chance to make it yet...";
-    close;
-
-L_Husband:
-    mes "[Brenda Howard]";
-    mes "Ah... I see.";
-    mes "You're looking for my husband.";
-    mes "My husband, my daughter and";
-    mes "I just moved to Geffen from";
-    mes "Prontera a while ago.";
-    next;
-    mes "[Brenda Howard]";
-    mes "We moved to geffen for the sake of";
-    mes "my husband's business. Apparently,";
-    mes "this town is closest to something";
-    mes "he really seems to need. Whatever";
-    mes "it is, it must be really important";
-    mes "to his smithing work.";
-    next;
-    mes "[Brenda Howard]";
-    mes "Oh, and if you're going to look";
-    mes "for my husband,  please talk to my";
-    mes "daughter before you go. I think she";
-    mes "has something she wants to";
-    mes "give to her father...";
-    set signquest,16;
-    close;
-
-L_Cooking:
-    mes "[Brenda Howard]";
-    mes "Ho-Ho~";
-    mes "Crisp and delicious pickled";
-    mes "cabbage~ My kid loves this stuff";
-    mes "and finished it all by herself the";
-    mes "last time I made it!";
-    close;
-
-L_Letter:
-    mes "[Brenda Howard]";
-    mes "Thank you so much for bringing";
-    mes "this to me. I'm so happy to hear";
-    mes "that he's fine and doing well.";
-    mes "Although he's not here often";
-    mes "enough, it's good to know";
-    mes "that he loves his job.";
-    next;
-    mes "[Brenda Howard]";
-    mes "Even so, I should start letting";
-    mes "him know that I want him to spend";
-    mes "a little more time at home. Oh, and";
-    mes "why don't you talk to Liana? She's";
-    mes "been waiting to tell you";
-    mes "something.";
-    delitem 7278,1;
-    set signquest,20;
-    close;
-
-L_Done:
-    mes "[Brenda Howard]";
-    mes "So how have you been?";
-    mes "As usual, Liana misses";
-    mes "her daddy, but I suppose";
-    mes "it can't be helped...";
-    next;
-    mes "[Brenda Howard]";
-    mes "I may be no expert but I'm";
-    mes "certain that my husband is";
-    mes "the best blacksmith in the world!";
-    mes "Did you know Hollgrehenn and";
-    mes "Aragham used to be his apprentices?";
-    mes "Ho ho ho~";
-    close;
-
-L_Cherish:
-    mes "[Brenda Howard]";
-    mes "Try to cherish your";
-    mes "family, especially through the";
-    mes "hard times. Even when you're angry";
-    mes "with them, try to be more";
-    mes "understanding. I know it's hard...";
-    close;
-
+alberta,98,202,5	script	Guard#s10	105,{
+	if (sign_q < 35) {
+		mes "[Hurubu]";
+		mes "Welcome to the";
+		mes "Alchesh Estate.";
+		mes "If you have any business";
+		mes "with the master, please";
+		mes "let me know.";
+		close;
+	}
+	else if (sign_q < 52) {
+		mes "[Hurubu]";
+		mes "Welcome to the";
+		mes "Alchesh Estate.";
+		mes "If you have any business";
+		mes "with the master, please";
+		mes "let me know.";
+		next;
+		switch(select("I'd like to see Mr. Bakerlan.:Have a nice day.")) {
+		case 1:
+			mes "[Hurubu]";
+			mes "Ah, you've";
+			mes "come to speak";
+			mes "to the master?";
+			mes "He's not out on";
+			mes "business, so you";
+			mes "can probably see him.";
+			close;
+		case 2:
+			mes "[Hurubu]";
+			mes "Ah...";
+			mes "Good day.";
+			close;
+		}
+	}
+	else if (sign_q == 97) {
+		mes "[Hurubu]";
+		mes "Welcome to the";
+		mes "Alchesh Estate.";
+		mes "Please leave if";
+		mes "you do not have";
+		mes "any business here.";
+		close;
+	}
+	else if (sign_q == 98) {
+		mes "[Hurubu]";
+		mes "Welcome to the";
+		mes "Alchesh Estate.";
+		mes "Please leave if";
+		mes "you do not have";
+		mes "any business here.";
+		close;
+	}
+	else {
+		mes "[Hurubu]";
+		mes "Welcome to the";
+		mes "Alchesh Estate.";
+		mes "Lately, it seems that";
+		mes "the master is in a good";
+		mes "mood. I believe that we";
+		mes "have you to thank for that.";
+		close;
+	}
 }
 
-mjo_dun02,88,295,3	script	Flaming Spirit Man	85,{
-    //get rid of some pieces, to let player reborn in future
-    if (signquest > 22) delitem 7177,countitem(7177);
-
-    if (signquest > 62) goto L_Improve;
-    if (signquest > 61) goto L_Hour;
-    if (signquest > 60 && countitem(7314)) goto L_Sign;
-    if (signquest > 22) goto L_Done;
-    if (signquest == 21) goto L_Refine;
-    if (signquest == 18 || signquest == 22) goto L_Check;
-    if (signquest == 17)goto L_Family;
-    emotion e_pif;
-    mes "[Engel]";
-    mes "I hope you understand that";
-    mes "this forge isn't really open to the";
-    mes "public. I'm doing some intensive";
-    mes "training, so I'd appreciate it if";
-    mes "you would just leave now.";
-    close2;
-    warp "mjo_dun02",372,346;
-    end;
-
-L_Family:
-    mes "[Engel]";
-    mes "*Sigh*";
-    mes "It's been a long";
-    mes "time since I've seen";
-    mes "my family. I really should let them";
-    mes "know how I'm doing sooner or later.";
-    mes "Hmmm...";
-    next;
-    mes "[Engel]";
-    mes "...?";
-    mes "Were you looking for me?";
-    mes "I'm sorry, but I'm busy at the";
-    mes "moment. Please don't disturb me";
-    mes "while I try to get my work done.";
-    if (signquest == 17 && countitem(7276)) {
-        next;
-        menu "I need your help.",L_Help,"Here is a letter for you.",L_Letter,"I am leaving, leaving.",-;
-        mes "[Engel]";
-        mes "Alright, then.";
-        mes "Take care.";
-    }
-    close;
-
-L_Help:
-    mes "[Engel]";
-    mes "Well, I'd like to help you";
-    mes "but now isn't a good for me.";
-    mes "Plenty of other good smiths out";
-    mes "there who can help you with the";
-    mes "work that you want done. Farewell.";
-    close;
-
-L_Letter:
-    mes "[Engel]";
-    mes "Oh, are you serious?";
-    mes "Let me read it first.";
-    next;
-    mes "[Engel]";
-    mes "Yes, yes...";
-    mes "...Hahaha!";
-    mes "It's so good to hear from";
-    mes "my darling daughter.";
-    delitem 7276,1;
-    next;
-    mes "[Engel]";
-    mes "Thanks, I really appreciate that";
-    mes "you've delivered this letter for";
-    mes "me. Now, is there anything you'd";
-    mes "like to ask of me? If it's not a";
-    mes "big favor, I can probably help";
-    mes "you.";
-    next;
-    menu "Please look at this.",-;
-    mes "[Engel]";
-    mes "Oh?";
-    mes "Isn't this...?";
-    mes "I see, I see!";
-    next;
-    mes "[Engel]";
-    mes "Long ago, my old master told me";
-    mes "that there are these strange ores";
-    mes "that have fallen from the sky. The";
-    mes "most beautiful and mysterious is";
-    mes "the one shines just like a star.";
-    next;
-    mes "[Engel]";
-    mes "Most people may know it as Sobbing";
-    mes "Starlight, but my master used to";
-    mes "call it God's Tear Drop.";
-    next;
-    mes "[Engel]";
-    mes "However, this ore has been";
-    mes "shattered into pieces. Judging from";
-    mes "the smoothness of the edges, its";
-    mes "inner power must have caused it to";
-    mes "break apart. So you want to put";
-    mes "this back together, don't you?";
-    next;
-    mes "[Engel]";
-    mes "This will be a good challenge";
-    mes "for me! However, I'll need some";
-    mes "special tools and materials to";
-    mes "repair this kind of ore. Now, I";
-    mes "want you to bring me the following";
-    mes "things...";
-    next;
-    mes "[Engel]";
-    mes "^FF00005 Mini Furnace^000000,";
-    mes "^FF00002 Oridecon Hammer^000000,";
-    mes "and ^FF00001 good quality Anvil^000000.";
-    mes "Now, keep in mind that ordinary";
-    mes "anvils won't be good enough for";
-    mes "this kind of work.";
-    next;
-    mes "[Engel]";
-    mes "Now, an Emperium Anvil would be";
-    mes "ideal for this job. I used to have";
-    mes "one, but a while back I ended up";
-    mes "giving it to someone. Anyway, I'll";
-    mes "wait here for you while you gather";
-    mes "everything you need.";
-    next;
-    mes "[Engel]";
-    mes "Right. Let me guide you to a";
-    mes "shortcut to the exit of these";
-    mes "mines, just in case you don't know";
-    mes "your way out of here. Good luck~";
-    set signquest,18;
-    close2;
-    warp "mjo_dun02",371,344;
-    end;
-
-L_Check:
-    mes "[Engel]";
-    mes "As I've told you before, I'm more";
-    mes "likely to succeed in my work if I'm";
-    mes "able to use a higher quality anvil.";
-    mes "Let me see what you've";
-    mes "brought.";
-    next;
-    if ((countitem(612) > 4) && countitem(615) > 1) {
-        if (countitem(986)) {
-            set signanvil,1;
-            goto L_Forge1;
-        }
-        if (countitem(987)) {
-            set signanvil,2;
-            goto L_Forge2;
-        }
-        if (countitem(988)) {
-            set signanvil,3;
-            goto L_Forge3;
-        }
-        if (countitem(989)) {
-            set signanvil,4;
-            goto L_Forge4;
-        }
-    }
-
-L_NotEnough:
-    mes "[Engel]";
-    mes "I'm sorry but you didn't";
-    mes "bring me enough materials.";
-    mes "I'll repeat you what you";
-    mes "need to bring me.";
-    next;
-    mes "[Engel]";
-    mes "^FF00005 Mini Furnace^000000,";
-    mes "^FF00002 Oridecon Hammer^000000,";
-    mes "and ^FF00001 good quality Anvil^000000.";
-    mes "Now, keep in mind that ordinary";
-    mes "anvils won't be good enough for";
-    mes "this kind of work.";
-    close;
-
-L_Forge1:
-    mes "[Engel]";
-    mes "Ah...";
-    mes "A normal Anvil.";
-    mes "Err... I told you";
-    mes "the better quality you";
-    mes "bring, the better the";
-    mes "result will be...";
-    mes "Anyway, I will try.";
-    delitem 986,1;
-    goto L_Forge;
-
-L_Forge2:
-    mes "[Engel]";
-    mes "Ah...";
-    mes "An Oridecon Anvil.";
-    mes "This isn't too bad,";
-    mes "but there's a good risk";
-    mes "that this might not work.";
-    delitem 987,1;
-    goto L_Forge;
-
-L_Forge3:
-    mes "[Engel]";
-    mes "Ah...";
-    mes "A Golden Anvil.";
-    mes "Excellent.";
-    mes "This anvil should be quite";
-    mes "enough to perform the";
-    mes "restoration.";
-    delitem 988,1;
-    goto L_Forge;
-
-L_Forge4:
-    mes "[Engel]";
-    mes "Ah...";
-    mes "An Emperium Anvil.";
-    mes "Perfect!";
-    mes "I didn't think you'd";
-    mes "be able to find one as";
-    mes "they are extremely rare.";
-    mes "Sure, it will work!";
-    delitem 989,1;
-    goto L_Forge;
-
-L_Forge:
-    delitem 612,5;
-    delitem 615,2;
-    next;
-    if (signquest == 22) goto L_Refine;
-    mes "[Engel]";
-    mes "While I'm working on this, would";
-    mes "you deliver a letter to my family";
-    mes "for me? I'm sorry, but please";
-    mes "consider that I'm waiving the fee";
-    mes "for restoring this Sobbing";
-    mes "Starlight.";
-    next;
-    mes "[Engel]";
-    mes "Well then...";
-    mes "I wish you safety";
-    mes "in your travels.";
-    delitem 7177,5; //we'll delete all sobbing pieces later
-    getitem 7278,1;
-    set signquest,19;
-    close;
-
-L_Refine:
-    if (signanvil == 1) set @signrefine,rand(100);
-    if (signanvil == 2) set @signrefine,rand(60);
-    if (signanvil == 3) set @signrefine,rand(40);
-    if (signanvil == 4) set @signrefine,rand(30);
-    mes "[Engel]";
-    mes "Are you back already?";
-    if (@signrefine <= 30) goto L_Success;
-    mes "I am sorry but I failed";
-    mes "restoring the Sobbing";
-    mes "Starlight.. But it isn't";
-    mes "a failure, bring me back";
-    mes "the materials and I'll";
-    mes "try again.";
-    getitem 7177,5;
-    set signquest,22;
-    close;
-
-L_Success:
-    delitem 7177,countitem(7177); //we delete all the pieces, or else u can't reborn
-    mes "While you were gone, I managed to";
-    mes "restore the Sobbing Starlight. Why";
-    mes "don't you go ahead and take a";
-    mes "look?";
-    next;
-    getitem 7178,1;
-    set signquest,23;
-    specialeffect2 EF_YUFITELHIT;
-    next;
-    mes "[Engel]";
-    mes "This was one of the most difficult";
-    mes "jobs I've ever done. But look! It";
-    mes "was beautiful when broken in";
-    mes "fragments, but now it's absolutely";
-    mes "dazzling! This was really worth the";
-    mes "effort.";
-    next;
-    mes "[Engel]";
-    mes "In any case, I worked really hard";
-    mes "to do a good job on this, so I hope";
-    mes "you treasure this Sobbing";
-    mes "Starlight, young adventurer.";
-    close;
-
-L_Done:
-    mes "[Engel]";
-    mes "How have you been doing lately?";
-    mes "Feel free to ask me if you ever";
-    mes "think that you need my expertise,";
-    mes "alright?";
-    close;
-
-L_Sign:
-    mes "[Engel]";
-    mes "How have you been";
-    mes "doing lately? You seem";
-    mes "very well. So is there anything";
-    mes "I can help you with today?";
-    next;
-    menu "I need your help again.",-;
-    mes "[Engel]";
-    mes "Haha, so what have";
-    mes "you brought me this time?";
-    mes "It must be fairly important if";
-    mes "you've brought it all the way";
-    mes "down here.";
-    next;
-    menu "Please look at this.",-;
-    mes "[Engel]";
-    mes "Isn't this...?!";
-    mes "Amazing, just by looking at it,";
-    mes "I can feel its power! You really";
-    mes "are something! How do you come";
-    mes "across all of this amazing stuff?";
-    next;
-    mes "[Engel]";
-    mes "You know, I consider myself";
-    mes "lucky to even see this kind of";
-    mes "stuff. Most smiths might be able to";
-    mes "see this kind of thing only once in";
-    mes "their entire lives. And to be able";
-    mes "to work on it...";
-    next;
-    mes "[Engel]";
-    mes "Hmmm...";
-    mes "It's going to take quite";
-    mes "a while to work on this.";
-    mes "Unfortunately, I can't even";
-    mes "give you a time estimate...";
-    mes "But I'll do my best for you.";
-    delitem 7314,1;
-    set @engelhour,gettime(3);
-    set @engelmin,gettime(2);
-    if (@engelmin > 29) set @engelhour,@engelhour +1;
-    set signengelhour,@engelhour + rand(2,4);
-    if (signengelhour > 23) set signengelhour,signengelhour - 24;
-    set signquest,62;
-    close;
-
-L_Hour:
-    if (gettime(3) == signengelhour || gettime(3) == signengelhour +1 || gettime(3) == signengelhour +2 || (signengelhour +1 == 24 && gettime(3) == 0) || (signengelhour +2 == 24 && gettime(3) == 0) || (signengelhour +2 == 25 && gettime(3) == 1)) {
-        mes "[Engel]";
-        mes "This is now yours to keep.";
-        mes "Thank you for giving me the";
-        mes "honor of working on a worthy";
-        mes "smithing challenge.";
-        getitem 2644,1;
-        set signquest,63;
-        close;
-    } else {
-        mes "[Engel]";
-        mes "I haven't completed it yet, but";
-        mes "please understand that I've got to";
-        mes "be really careful when working with";
-        mes "something so valuable. But don't";
-        mes "worry, its inner power will be";
-        mes "revealed when I'm finished.";
-        close;
-    }
-
-L_Improve:
-    mes "[Engel]";
-    mes "Sometimes, you can only";
-    mes "improve yourself by training in";
-    mes "solitude. But don't ever forget";
-    mes "about the ones who really care";
-    mes "about you. It's those people who";
-    mes "make everything worth it.";
-    close2;
-    emotion e_dots;
-    end;
-
+alberta,43,49,5	script	Poor-looking Merchant	89,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 35) {
+		mes "[Machen]";
+		mes "Why...?";
+		mes "How did my";
+		mes "family's wealth";
+		mes "and prestige just";
+		mes "go down the drain?";
+		next;
+		mes "[Machen]";
+		mes "Ever since the";
+		mes "Alcheshs came to Alberta,";
+		mes "they quickly took our place";
+		mes "as the biggest business owners";
+		mes "here. It's our biggest shame...";
+		close;
+	}
+	else if ((sign_q < 52) || (sign_q ==98)) {
+		mes "[Machen]";
+		mes "^333333*Sigh...*^000000";
+		mes "How did it happen?";
+		mes "How did the Alcheshs";
+		mes "become so rich so quickly?";
+		next;
+		switch(select("Alchesh family?:Do you know where Mr. Bakerlan is?")) {
+		case 1:
+			mes "[Machen]";
+			mes "My family, the Tudas,";
+			mes "used to run the biggest";
+			mes "trading company in Alberta.";
+			mes "But when the Alcheshs came";
+			mes "fifty years ago, they started";
+			mes "to outdo us in everything...";
+			next;
+			mes "[Machen]";
+			mes "It's like they're financial";
+			mes "geniuses or something!";
+			mes "Under Bakerlan's guidance,";
+			mes "their estate has grown to be";
+			mes "one of the richest in Alberta,";
+			mes "if not all of Rune-Midgard...";
+			close;
+		case 2:
+			mes "[Machen]";
+			mes "Bakerlan...?";
+			mes "Oh, he's probably";
+			mes "in his ten story money";
+			mes "vault, swimming in his";
+			mes "money by now. You";
+			mes "know rich people.";
+			next;
+			select(".........");
+			mes "[Machen]";
+			mes "It-was-a-joke!";
+			mes "You see that big";
+			mes "mansion to the north?";
+			mes "That's the Alchesh Estate.";
+			mes "He should be home now.";
+			next;
+			mes "[Machen]";
+			mes "He usually travels";
+			mes "a lot on business,";
+			mes "but if you're lucky you";
+			mes "should be able to catch him.";
+			close;
+		}
+	}
+	else if (sign_q == 97) {
+		mes "[Machen]";
+		mes "Why...?";
+		mes "How did my";
+		mes "family's wealth";
+		mes "and prestige just";
+		mes "go down the drain?";
+		next;
+		mes "[Machen]";
+		mes "Ever since the";
+		mes "Alcheshs came to Alberta,";
+		mes "they quickly took our place";
+		mes "as the biggest business owners";
+		mes "here. It's our biggest shame...";
+		close;
+	}
+	else {
+		mes "[Machen]";
+		mes "You know, if the Alcheshs";
+		mes "were greedy, they actually";
+		mes "wouldn't be as big as they";
+		mes "are today. They've contributed";
+		mes "to a lot of social causes and";
+		mes "that won them a lot of support.";
+		next;
+		mes "[Machen]";
+		mes "I gotta admit...";
+		mes "The whole family";
+		mes "is a bunch of financial";
+		mes "geniuses, alright.";
+		close;
+	}
 }
 
+yuno,330,100,4	script	Knight#ss	734,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 38) {
+		mes "[Leibech]";
+		mes "I have a great";
+		mes "interest in collecting";
+		mes "unique and uncommon";
+		mes "goods. You know, things";
+		mes "that most people see just";
+		mes "once in their lifetimes.";
+		next;
+		mes "[Leibech]";
+		mes "I usually use the";
+		mes "Alchesh Trading Company";
+		mes "to help add to my collection.";
+		mes "Their prices aren't the cheapest, but their service is very reliable.";
+		close;
+	}
+	else if (sign_q == 38) {
+		if (countitem(7049) < 1) {
+			mes "[Leibech]";
+			mes "Excuse me...";
+			mes "Are you from the Alchesh";
+			mes "Trading Company? I've been";
+			mes "waiting for my order and they";
+			next;
+			switch(select("No, I'm not.:They must be busy.:Yes, I have your order.")) {
+			case 1:
+				mes "[Leibech]";
+				mes "Oh, I'm sorry.";
+				mes "My mistake. Well";
+				mes "then, be safe in";
+				mes "your travels.";
+				close;
+			case 2:
+				mes "[Leibech]";
+				mes "I suppose you're";
+				mes "right. I mean, Juno";
+				mes "is pretty far from";
+				mes "Alberta. Maybe I'm";
+				mes "just overly excited";
+				mes "about my delivery...";
+				close;
+			case 3:
+				mes "[Leibech]";
+				mes "Really?!";
+				mes "That's great!";
+				mes "Do you have the";
+				mes "item I ordered?";
+				mes "Where is it?";
+				next;
+				switch(select("I put it somewhere.:Sorry, I lost it.")) {
+				case 1:
+					mes "[Leibech]";
+					mes "Oh, alright. ";
+					mes "So long as you didn't";
+					mes "lose it, that's fine. I'll wait";
+					mes "here, so would you bring it";
+					mes "to me as soon as you can?";
+					close;
+				case 2:
+					mes "[Leibech]";
+					mes "What...?";
+					mes "Hey, man.";
+					mes "That's not funny!";
+					mes "You're joking, right?";
+					next;
+					switch(select("No. I'm not joking.:Okay, you got me~")) {
+					case 1:
+						mes "[Leibech]";
+						mes "I don't believe it!";
+						mes "I think I'm going to";
+						mes "write a letter to your";
+						mes "boss, Mister Bakerlan.";
+						mes "What do you think ";
+						mes "about that?";
+						close;
+					case 2:
+						mes "[Leibech]";
+						mes "Oh, thank goodness!";
+						mes "I thought you might have";
+						mes "really lost it! Say, would you";
+						mes "bring it to me as soon as";
+						mes "can? I'll wait for you here.";
+						close;
+					}
+				}
+			}
+		}
+		else {
+			set .@signid,getcharid(0,strcharinfo(0));
+			set .@sign3, .@signid & 65535;
+			set .@sign4, .@signid >> 16;
+			set .@sign1,254;
+			set .@sign2,0;
+			if (!countitem2(7049,1,0,0,.@sign1,.@sign2,.@sign3,.@sign4)) {
+				mes "[Leibech]";
+				mes "Hm...?";
+				mes "There must be some";
+				mes "mistake. This isn't what";
+				mes "I ordered. Well, I can wait... ";
+				next;
+				mes "[Leibech]";
+				mes "Just come back and";
+				mes "bring me what I actually";
+				mes "ordered, alright? And this";
+				mes "time, don't make any mistakes.";
+				mes "Thanks, I appreciate it~";
+				close;
+			}
+			else {
+				mes "[Leibech]";
+				mes "Finally, it's here!";
+				mes "Yes, this is what I ordered.";
+				mes "Thanks for the delivery!";
+				next;
+				mes "[Leibech]";
+				mes "Well, here's your";
+				mes "receipt. Please take";
+				mes "this to Mister Bakerlan";
+				mes "so he knows you did";
+				mes "a good job for me.";
+				mes "Thanks again!";
+				delitem2 7049,1,1,0,0,.@sign1,.@sign2,.@sign3,.@sign4;
+				set sign_q,39;
+				getitem 7181,1; //Receipt_01
+				if (BaseLevel < 60) {
+					getexp 1000,0;
+				}
+				else if (BaseLevel < 70) {
+					getexp 2000,0;
+				}
+				else if (BaseLevel < 80) {
+					getexp 4000,0;
+				}
+				else if (BaseLevel < 90) {
+					getexp 7000,0;
+				}
+				else if (BaseLevel < 99) {
+					getexp 11000,0;
+				}
+				close;
+			}
+		}
+	}
+	else if (sign_q == 97) {
+		mes "[Leibech]";
+		mes "I have a great";
+		mes "interest in collecting";
+		mes "unique and uncommon";
+		mes "goods. You know, things";
+		mes "that most people see just";
+		mes "once in their lifetimes.";
+		next;
+		mes "[Leibech]";
+		mes "I usually use the";
+		mes "Alchesh Trading Company";
+		mes "to help add to my collection.";
+		mes "Their prices aren't the cheapest, but their service is very reliable.";
+		close;
+	}
+	else if (sign_q == 98) {
+		mes "[Leibech]";
+		mes "I am interested in collecting uncommon stuffs.";
+		mes "For that, I need to find something that I cannot see around here.";
+		next;
+		mes "[Leibech]";
+		mes "Usually, I am using Alchesh Trading Company for that.";
+		mes "Although the price is little bit higher than I wish,";
+		mes "they are very reliable.";
+		close;
+	}
+	else {
+		mes "[Leibech]";
+		mes "Hey, thanks for";
+		mes "delivering my order";
+		mes "for me. It was a great";
+		mes "addition to my collection!";
+		next;
+		mes "[Leibech]";
+		mes "It's really tough to";
+		mes "find unique and oddball";
+		mes "items, but I find great pride";
+		mes "in expanding my collection~";
+		close;
+	}
+}
 
-gef_tower,118,36,5	script	Annoyed Man	64,{
-
+//============================================================ 
+// The Sign (Part 2)
+//============================================================ 
 
-	if(signquest > 24) goto L_Answer;
-	if(@sign_dhota == 1) goto L_Star;
-	mes "[Dhota]";
-	mes "Wah~";
-	mes "Why the hell did he even go";
-	mes "there...!";
-	mes "What are you doing here?!";
-	next;
-	mes "[Dhota]";
-	mes "Say what...?";
-	mes "I have no idea what";
-	mes "you're talking about!";
-	mes "If you've got nothing";
-	mes "to say, leave me alone!";
-	if(signquest == 24) set @sign_dhota,1;
-	close;
+geffen_in,159,48,5	script	Lonely-looking Woman	711,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 54) {
+		mes "[Brenda Howard]";
+		mes "Hmm...";
+		mes "What should I make for";
+		mes "dinner today? Pickled cabbage?";
+		mes "I learned how to make it a while ago, but I've never gotten the chance to make it yet...";
+		close;
+	}
+	else if (sign_q == 54) {
+		mes "[Brenda Howard]";
+		mes "Hey, who are you anyhow?";
+		mes "Don't you know it's rude to";
+		mes "enter someone's house without";
+		mes "being invited? Besides, I don't have the time to help strangers while I'm busy making dinner...";
+		next;
+		mes "["+ strcharinfo(0) +"]";
+		mes "W-wait!";
+		mes "I'm here to see...";
+		next;
+		input .@input$;
+		if (.@input$ != "Engel Howard") {
+			mes "[Brenda Howard]";
+			mes "Huh?";
+			mes "What are you";
+			mes "talking about?";
+			next;
+			mes "[Brenda Howard]";
+			mes "Hmm...";
+			mes "I wonder";
+			mes "how my pickled";
+			mes "cabbage will turn out?";
+			emotion e_ho;
+			close;
+		}
+		else {
+			mes "[Brenda Howard]";
+			mes "Ah... I see.";
+			mes "You're looking for my husband.";
+			mes "My husband, my daughter and";
+			mes "I just moved to Geffen from";
+			mes "Prontera a while ago.";
+			next;
+			mes "[Brenda Howard]";
+			mes "We moved to Geffen for the sake of my husband's business. Apparently, this town is closest to something he really seems to need. Whatever it is, it must be really important to his smithing work.";
+			next;
+			mes "[Brenda Howard]";
+			mes "Oh, and if you're going to look";
+			mes "for my husband, please talk to my daughter before you go. I think she has something that she wants to give to her father...";
+			set sign_q,55;
+			close;
+		}
+	}
+	else if (sign_q < 57) {
+		mes "[Brenda Howard]";
+		mes "Ho-ho~!";
+		mes "Crisp and delicious pickled";
+		mes "cabbage~ My kid loves this stuff and finished it all by herself the last time I made it.";
+		close;
+	}
+	else if (sign_q == 57) {
+		mes "[Brenda Howard]";
+		mes "Ah...";
+		mes "So you've seen my husband.";
+		mes "How is he doing? I worry about";
+		mes "whether or not he's taking care";
+		mes "of himself enough...";
+		next;
+		mes "[Brenda Howard]";
+		mes "Oh, I can't help but worry!";
+		mes "Thank you for letting me know";
+		mes "how he's doing. Still, he should";
+		mes "be doing a better job of keeping";
+		mes "in touch with us. ^333333*Sigh*^000000";
+		emotion e_dots;
+		close;
+	}
+	else if (sign_q < 62) {
+		if (countitem(7278) > 0) {
+			mes "[Brenda Howard]";
+			mes "Thank you so much for bringing";
+			mes "this to me. I'm so happy to hear that he's fine and doing well.";
+			mes "Although he's not here often enough, it's good to know";
+			mes "that he loves his job.";
+			next;
+			mes "[Brenda Howard]";
+			mes "Even so, I should start letting";
+			mes "him know that I want him to spend";
+			mes "a little more time at home. Oh, and why don't you talk to Liana? She's been waiting to tell you something.";
+			delitem 7278,1; //Wellbeing_Letter
+			set sign_q,sign_q+4;
+			close;
+		}
+		else {
+			mes "[Brenda Howard]";
+			mes "Liana's daddy needs to come home more often. ^333333*Sigh*^000000 Even though he's away for long periods of time, I suppose it's for the best...";
+			close2;
+			emotion e_dots;
+			end;
+		}
+	}
+	else if (sign_q < 67) {
+		mes "[Brenda Howard]";
+		mes "So how have you been?";
+		mes "So how have you been?";
+		mes "As usual, Liana misses";
+		mes "her daddy, but I suppose";
+		mes "it can't be helped...";
+		next;
+		mes "I may be no expert, but I'm";
+		mes "certain that my husband is";
+		mes "the best blacksmith in the world! Did you know Hollgrehenn and Aragham used to be his apprentices? Ho ho ho~";
+		close;
+	}
+	else {
+		mes "[Brenda Howard]";
+		mes "Try to cherish your";
+		mes "family, especially through the";
+		mes "hard times. Even when you're angry with them, try to be more understanding. I know it's hard...";
+		close;
+	}
+}
 
-L_Star:
-	mes "[Dhota]";
-	mes "Eh?";
-	mes "For that Sobbing Starlight, is that";
-	mes "right?";
-	next;
-	mes "[Dhota]";
-	mes "...";
-	emotion e_dots;
-	next;
-	mes "[Dhota]";
-	mes "...";
-	mes "......";
-	emotion e_dots;
-	next;
-	mes "[Dhota]";
-	mes "...";
-	mes "......";
-	mes "BWAAAAH~!";
-	emotion e_ag;
-	next;
-	mes "[Dhota]";
-	mes "Right, he wants that guy";
-	mes "who's good at working with";
-	mes "gems and stuff. Eh, he's not";
-	mes "here right now. Went somewhere";
-	mes "near Comodo to investigate some";
-	mes "tribal people or whatever.";
-	emotion e_pif;
-	set signquest,25;
-	close;
+geffen_in,171,42,3	script	Cute Girl	703,{
+	callfunc "F_UpdateSignVars";
+	if (checkweight(908,200) == 0) {
+		mes "^3355FFWait a second! Right now,";
+		mes "you have too many items in your inventory. Please come back after you've made more available inventory space.^000000";
+		close;
+	}
+	if (sign_q < 54) {
+		mes "[Liana]";
+		mes "*Pout*";
+		mes "When's my daddy";
+		mes "coming home?!";
+		mes "I... I miss him so much~";
+		mes "*Cries*";
+		emotion e_sob;
+		close;
+	}
+	else if (sign_q == 54) {
+		mes "[Liana]";
+		mes "Oh, my mom said she's gonna cook me something good today.";
+		mes "I wonder what she's gonna make?";
+		mes "I hope it's pickled cabbage again!";
+		emotion e_heh;
+		close;
+	}
+	else if (sign_q == 55) {
+		mes "[Liana]";
+		mes "Everyone says that daddy is the best blacksmith in the whole world! But now he lets his apprentices do";
+		mes "the work so he can go around the world to find a rare ore~ Isn't that amazing?";
+		next;
+		switch(select("What are you drawing by the way?:Apprentices?")) {
+		case 1:
+			mes "[Liana]";
+			mes "Oh, this?";
+			mes "It's a letter for my daddy.";
+			if (Sex == 0) {
+				mes "Mom said that some lady is gonna try to find my dad, so I'm making this so she can take it him~";
+			}
+			else {
+				mes "Mom said that some guy is gonna try to find my dad, so I'm making this so he can take it him~";
+			}
+			close;
+		case 2:
+			mes "[Liana]";
+			mes "Yeah, Uncle Hollegrehenn and Aragham come to visit sometimes and we all play. But, it's more fun to see my dad, even though he's not back yet. ^333333*Pout*^000000";
+			next;
+			switch(select("Don't you miss your dad?:He also misses you a lot.")) {
+			case 1:
+				mes "[Liana]";
+				mes "I miss him sooo much!";
+				mes "^333333*Cries*^000000 But Mom always";
+				mes "says that he's too busy.";
+				mes "^333333*Pouts*^000000";
+				close;
+			case 2:
+				mes "[Liana]";
+				mes "I hope so...";
+				mes "But I hate it when";
+				mes "he doesn't have enough";
+				mes "time to come home and";
+				mes "see me. Sooooooooo~";
+				mes "I wrote this letter!";
+				emotion e_dots;
+				next;
+				switch(select("....:I'll bring this to him.")) {
+				case 1:
+					mes "[Brenda Howard]";
+					mes "Liana~";
+					if (Sex == 0) {
+						mes "This nice lady is going to look for your dad. Why don't you ask her to take your letter to him for you?";
+					}
+					else {
+						mes "This nice man is going to look for your dad. Why don't you ask him to take your letter to him for you?";
+					}
+					next;
+					mes "[Liana]";
+					mes "You are...?";
+					mes "Really, really?";
+					mes "H-hooray!";
+					next;
+					mes "[Liana]";
+					mes "Okay then, don't";
+					mes "forget to give this to";
+					mes "my dad, okay? Promise?";
+					emotion e_ho;
+					set sign_q,56;
+					getitem 7276,1; //Picture_Letter
+					close;
+				case 2:
+					mes "[Liana]";
+					mes "Mmmm...";
+					mes "But I don't know you!";
+					mes "Mom says I should never";
+					mes "ask for anything from strangers.";
+					close;
+				}
+			}
+		}
+	}
+	else if (sign_q < 62) {
+		if (rand(1,10) < 6) {
+			mes "[Liana]";
+			mes "My dad never broke anything";
+			mes "his customers gave him. And my uncle Hollgrehenn and Aragham wouldn't let anything like that";
+			mes "happen, would they?";
+			close;
+		}
+		else {
+			mes "[Liana]";
+			mes "Would you please bring my letter over to my dad? Heh heh, he'll be";
+			mes "so happy to hear from me!";
+			close;
+		}
+	}
+	else if (sign_q < 66) {
+		mes "[Liana]";
+		mes "Yay~!";
+		mes "Thank you for bringing my letter to my dad. Here, here!";
+		mes "You have to share my treasure with me, 'kay?";
+		set sign_q,sign_q+4;
+		getitem 529,10; //Candy
+		close;
+	}
+	else {
+		mes "[Liana]";
+		mes "I never saw my dad fail to upgrade a weapon or armor. Mmm? But maybe if he had something really really old and rare and special...";
+		close;
+	}
+}
 
-L_Answer:
-	mes "[Dhota]";
-	mes "Hmmm...";
-	mes "That can't be right...";
-	mes "What could possibly be";
-	mes "the answer I'm looking";
-	mes "for...? *Sigh...*";
-	emotion e_pif;
-	close;
-	
+mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
+	callfunc "F_UpdateSignVars";
+	if (checkweight(908,200) == 0) {
+		mes "^3355FFWait a second! Right now,";
+		mes "you have too many items in your inventory. Please come back after you've freed up more inventory space.^000000";
+		close;
+	}
+	if ((sign_q > 1) && (sign_q < 54)) {
+		if(countitem(1002) > 0) {
+			mes "[Engel]";
+			mes "Just as I suspected...";
+			mes "I didn't bring enough of them.";
+			mes "Hmm, this is serious. What";
+			mes "am I going to do about this?";
+			next;
+			mes "[Engel]";
+			mes "Oh great! I see that you're";
+			mes "carrying some Iron Ores with you. Would you be so kind as to lend me 1 Iron Ore? Please, I beg of you...";
+			next;
+			switch(select("Sure, why not?:Sorry, I can't.")) {
+			case 1:
+				mes "[Engel]";
+				mes "Thank you so much!";
+				mes "If it weren't for your help,";
+				mes "I'd be in big trouble. I really appreciate you stepping in and volunteering your materials like this.";
+				delitem 1002,1; //Iron_Ore
+				getexp 10,0;
+				close;
+			case 2:
+				mes "[Engel]";
+				mes "I suppose I understand.";
+				mes "However, you're lucky that I don't kick you out of my forge right here and right now~";
+				close2;
+				emotion e_pif;
+				end;
+			}
+		}
+		else {
+			mes "[Engel]";
+			mes "I hope you understand that";
+			mes "this forge isn't really open to the public. I'm doing some intensive training,so I'd appreciate it if you would just leave now.";
+			emotion e_pif;
+			close2;
+			warp "mjo_dun02",372,346;
+			end;
+		}
+	}
+	else if (sign_q < 56) {
+		mes "[Engel]";
+		mes "I hope you understand that";
+		mes "this forge isn't really open to the public. I'm doing some intensive training,so I'd appreciate it if you would just leave now.";
+		close2;
+		emotion e_pif;
+		end;
+	}
+	else if (sign_q == 56) {
+		if (countitem(7276) > 0) {
+			mes "[Engel]";
+			mes "^333333*Sigh*^000000";
+			mes "It's been a long";
+			mes "time since I've seen";
+			mes "my family. I really should let them know how I'm doing sooner or later. Hmmm....";
+			next;
+			mes "[Engel]";
+			mes "...?";
+			mes "Were you looking for me?";
+			mes "I'm sorry, but I'm busy at the moment. Please don't disturb me while I try to get my work done.";
+			next;
+			switch(select("I need your help.:Here is a letter for you.:I am leaving, leaving.")) {
+			case 1:
+				mes "[Engel]";
+				mes "Well, I'd like to help you,";
+				mes "but now isn't a good for me.";
+				mes "plenty of other good smiths out there who can help you with the work that you want done. Farewell.";
+				close;
+			case 2:
+				mes "[Engel]";
+				mes "Oh, are you serious?";
+				mes "Let me read it first.";
+				next;
+				mes "[Engel]";
+				mes "Yes, yes.";
+				mes "...Hahaha!";
+				mes "It's so good to hear from";
+				mes "my darling daughter.";
+				next;
+				mes "[Engel]";
+				mes "Thanks, I really appreciate that you've delivered this letter for me. Now, is there anything you'd like to ask of me? If it's not a big favor, I can probably help you.";
+				next;
+				switch(select("Please look at this.")) {
+				case 1:
+					mes "[Engel]";
+					mes "Oh?";
+					mes "Isn't this...?";
+					mes "I see, I see!";
+					next;
+					mes "[Engel]";
+					mes "Long ago, my old master told me that there are these strange ores that have fallen from the sky. The most beautiful and mysterious is the one shines just like a star.";
+					next;
+					mes "[Engel]";
+					mes "Most people may know it as Sobbing Starlight, but my master used to call it God's Tear Drop.";
+					next;
+					mes "[Engel]";
+					mes "However, this ore has been shattered into pieces. Judging from the smoothness of the edges, its inner power must have caused it to break apart. So you want me to put this back together, don't you?";
+					next;
+					mes "[Engel]";
+					mes "This will be a good challenge";
+					mes "for me! However, I'll need some";
+					mes "special tools and materials to repair this kind of ore. Now, I want you to bring me the following things...";
+					next;
+					mes "[Engel]";
+					mes "^FF00005 Mini Furnace^000000,";
+					mes "^FF00002 Oridecon Hammer^000000,";
+					mes "and ^ff00001 good quality Anvil^000000.";
+					mes "Now keep in mind that ordinary anvils won't be good enough for";
+					mes "this kind of work.";
+					next;
+					mes "[Engel]";
+					mes "Now, an Emperium Anvil would be ideal for this job. I used to have one, but a while back I ended up giving it to someone. Anyway, I'll wait here for you while you gather everything you need.";
+					next;
+					mes "[Engel]";
+					mes "Right. Let me guide you to a shortcut to the exit of these mines, just in case you don't know your way out of here. Good luck~";
+					delitem 7276,1; //Picture_Letter
+					delitem 7177,7; //Part_Of_Star's_Sob
+					set sign_q,57;
+					close2;
+					warp "mjo_dun02",371,344;
+					end;
+				}
+			case 3:
+				mes "[Engel]";
+				mes "Alright, then.";
+				mes "Take care.";
+				close;
+			}
+		}
+		else {
+			mes "[Engel]";
+			mes "^333333*Sigh*^000000";
+			mes "It's been a long";
+			mes "time since I've seen";
+			mes "my family. I really should let them know how I'm doing sooner or later. Hmmm....";
+			next;
+			mes "[Engel]";
+			mes "...?";
+			mes "Do you have any business";
+			mes "me? I'm sorry, but right";
+			mes "now I'm very busy. Please leave";
+			mes "me alone to my research.";
+			close;
+		}
+	}
+	else if (sign_q == 57) {
+		mes "[Engel]";
+		mes "As I've told you before, I'm more likely to succeed in my work if I'm able to use a higher quality anvil. Let's me see what you've brought...";
+		next;
+		if ((countitem(612) > 4) && (countitem(615) > 1) && ((countitem(986) > 0) || (countitem(987) > 0) || (countitem(988) > 0) || (countitem(989) > 0))) {
+			if (countitem(986) > 0) {
+				mes "[Engel]";
+				mes "A...";
+				mes "Regular Anvil?";
+				mes "Alright, I guess I'll try it.";
+				mes "But I can't guarantee success.";
+				next;
+				mes "[Engel]";
+				mes "While I'm working on this, would you deliver a letter to my family for me? I'm sorry, but please consider that I'm waiving the fee for restoring this Sobbing Starlight.";
+				next;
+				mes "[Engel]";
+				mes "Well then...";
+				mes "I wish you safety";
+				mes "in your travels.";
+				delitem 612,5; //Portable_Furnace
+				delitem 615,2; //Oridecon_Hammer
+				delitem 986,1; //Anvil
+				set sign_q,58;
+				getitem 7278,1; //Wellbeing_Letter
+				close;
+			}
+			else if (countitem(987) > 0) {
+				mes "[Engel]";
+				mes "Ah...";
+				mes "An Oridecon Avil.";
+				mes "This isn't too bad,";
+				mes "but there's a good risk";
+				mes "that this might not work.";
+				next;
+				mes "[Engel]";
+				mes "While I'm working on this, would you deliver a letter to my family for me? I'm sorry, but please consider that I'm waiving the fee for restoring this Sobbing Starlight.";
+				next;
+				mes "[Engel]";
+				mes "Well then...";
+				mes "I wish you safety";
+				mes "in your travels.";
+				delitem 612,5; //Portable_Furnace
+				delitem 615,2; //Oridecon_Hammer
+				delitem 987,1; //Oridecon_Anvil
+				set sign_q,59;
+				getitem 7278,1; //Wellbeing_Letter
+				close;
+			}
+			else if (countitem(988) > 0) {
+				mes "[Engel]";
+				mes "Ah...";
+				mes "A Golden Anvil.";
+				mes "This just might be able to do the job. This might take a while, so I have something to ask of you.";
+				next;
+				mes "[Engel]";
+				mes "While I'm working on this, would you deliver a letter to my family for me? I'm sorry, but please consider that I'm waiving the fee for restoring this Sobbing Starlight.";
+				next;
+				mes "[Engel]";
+				mes "Well then...";
+				mes "I wish you safety";
+				mes "in your travels.";
+				delitem 612,5; //Portable_Furnace
+				delitem 615,2; //Oridecon_Hammer
+				delitem 988,1; //Golden_Anvil
+				set sign_q,60;
+				getitem 7278,1; //Wellbeing_Letter
+				close;
+			}
+			else if (countitem(989) > 0) {
+				mes "[Engel]";
+				mes "Oh wow, an Emperium Anvil!";
+				mes "And this looks like one I might have actually made. Great, I should be able to do this so long as I don't make any critical mistakes~";
+				next;
+				mes "[Engel]";
+				mes "While I'm working on this, would you deliver a letter to my family for me? I'm sorry, but please consider that I'm waiving the fee for restoring this Sobbing Starlight.";
+				mes "[Engel]";
+				mes "Well then...";
+				mes "I wish you safety";
+				mes "in your travels.";
+				delitem 612,5; //Portable_Furnace
+				delitem 615,2; //Oridecon_Hammer
+				delitem 989,1; //Emperium_Anvil
+				set sign_q,61;
+				getitem 7278,1; //Wellbeing_Letter
+				close;
+			}
+		}
+		else {
+			if (rand(1,6) == 3) {
+				mes "[Engel]";
+				mes "Oh, you don't have everything ready yet? Take your time, so long as you didn't forget what you needed to bring. You do remember, right?";
+				next;
+				mes "[Engel]";
+				mes "^FF00005 Mini Furnace^000000,";
+				mes "^FF00002 Oridecon Hammer^000000,";
+				mes "and ^ff00001 good quality Anvil^000000.";
+				mes "That's all you need!";
+				next;
+				mes "[Engel]";
+				mes "Remember that I have a greater chance of repairing the Sobbing Starlight if I have access to a higher quality Anvil. Otherwise...";
+				close;
+			}
+			else {
+				mes "[Engel]";
+				mes "Still don't have everything ready? That's fine, just take your time. So long as you haven't forgotten all the things that you need. I mean, how can you forget when you have such an important ore on you?";
+				close;
+			}
+		}
+	}
+	else if (sign_q < 66) {
+		mes "[Engel]";
+		mes "Are you back already?";
+		mes "Sorry, but I haven't quite finished yet. I won't be done for a while, so why don't you deliver that letter to my family?";
+		close;
+	}
+	else if (sign_q < 70) {
+		if (sign_q == 66) {
+			if (rand(1,100) < 38) {
+				mes "[Engel]";
+				mes "Are you back already?";
+				mes "While you were gone, I managed to restore this Sobbing Starlight. Why don't you go ahead and take a look?";
+				next;
+				set sign_q,71;
+				getitem 7178,1; //Star's_Sob
+				specialeffect2 EF_YUFITELHIT;
+				next;
+				mes "[Engel]";
+				mes "This was one of the most difficult jobs I've ever done. But look! It was beautiful when broken in fragments but now it's absolutely dazzling! This was really worth my effort.";
+				next;
+				mes "[Engel]";
+				mes "In any case, I worked really hard to do a good job on this, so I hope you treasure this Sobbling Starlight, young adventurer.";
+				close;
+			}
+			else {
+				mes "[Engel]";
+				mes "You've returned?";
+				mes "Well, I don't know how to put this, but once you hear it, don't take it the wrong way...";
+				emotion e_swt2;
+				next;
+				mes "[Engel]";
+				mes "^333333*Ahem*^000000";
+				mes "Just as I've warned you, this attempt to restore the Sobbling Starlight failed because the anvil you gave me wasn't up to the job. I'm sorry about that.";
+				next;
+				mes "[Engel]";
+				mes "However, I only";
+				mes "broke all of the tools";
+				mes "and the ore pieces are still intact. Now, if you bring me the tools one more time, I can try this again.";
+				next;
+				mes "[Engel]";
+				mes "Since I'm a bit more familiar with this material, I won't take so much time. Once again, let me tell you which things you need to bring...";
+				next;
+				mes "[Engel]";
+				mes "^FF00005 Mini Furnace^000000,";
+				mes "^FF00002 Oridecon Hammer^000000,";
+				mes "and ^ff00001 good quality Anvil^000000.";
+				mes "And this time, bring";
+				mes "me a better anvil, huh?";
+				next;
+				mes "[Engel]";
+				mes "Although it'd be perfect if I had an Emperium Anvil, I'm pretty sure it'll be alright if we used a Golden Anvil.";
+				set sign_q,70;
+				close;
+			}
+		}
+		else if (sign_q == 67) {
+			if (rand(1,100) < 67) {
+				mes "[Engel]";
+				mes "Are you back already?";
+				mes "While you were gone, I managed to restore this Sobbing Starlight. Why don't you go ahead and take a look?";
+				next;
+				set sign_q,71;
+				getitem 7178,1; //Star's_Sob
+				specialeffect2 EF_YUFITELHIT;
+				next;
+				mes "[Engel]";
+				mes "This was one of the most difficult jobs I've ever done. But look! It was beautiful when broken in fragments but now it's absolutely dazzling! This was really worth the effort.";
+				next;
+				mes "[Engel]";
+				mes "In any case, I worked really hard to do a good job on this, so I hope you treasure this Sobbling Starlight, young adventurer.";
+				close;
+			}
+			else {
+				mes "[Engel]";
+				mes "You've returned?";
+				mes "Well, I don't know how to put this, but once you hear it, don't take it the wrong way...";
+				emotion e_swt2;
+				next;
+				mes "[Engel]";
+				mes "^333333*Ahem*^000000";
+				mes "Just as I've warned you, this attempt to restore the Sobbling Starlight failed because the anvil you gave me wasn't up to the job. I'm sorry about that.";
+				next;
+				mes "[Engel]";
+				mes "However, I only";
+				mes "broke all of the tools";
+				mes "and the ore pieces are still intact. Now, if you bring me the tools one more time, I can try this again.";
+				next;
+				mes "[Engel]";
+				mes "Since I'm a bit more familiar with this material, I won't take so much time. Once again, let me tell you which things you need to bring...";
+				next;
+				mes "[Engel]";
+				mes "^FF00005 Mini Furnace^000000,";
+				mes "^FF00002 Oridecon Hammer^000000,";
+				mes "and ^ff00001 good quality Anvil^000000.";
+				mes "And this time, bring";
+				mes "me a better anvil, huh?";
+				next;
+				mes "[Engel]";
+				mes "Although it'd be perfect if I had an Emperium Anvil, I'm pretty sure it'll be alright if we used a Golden Anvil.";
+				set sign_q,70;
+				close;
+			}
+		}
+		else if (sign_q == 68) {
+			if (rand(1,100) < 91) {
+				mes "[Engel]";
+				mes "Are you back already?";
+				mes "While you were gone, I managed to restore this Sobbing Starlight. Why don't you go ahead and take a look?";
+				next;
+				set sign_q,71;
+				getitem 7178,1; //Star's_Sob
+				specialeffect2 EF_YUFITELHIT;
+				next;
+				mes "[Engel]";
+				mes "This was one of the most difficult jobs I've ever done. But look! It was beautiful when broken in fragments but now its absolutely dazzling! This was really worth my effort.";
+				next;
+				mes "[Engel]";
+				mes "In any case, I worked really hard to do a good job on this, so I hope you treasure this Sobbling Starlight, young adventurer.";
+				close;
+			}
+			else {
+				mes "[Engel]";
+				mes "Oh good, you're back.";
+				mes "I've got some bad news,";
+				mes "so please don't overreact~";
+				mes "Um, are you ready?";
+				emotion e_swt2;
+				next;
+				mes "[Engel]";
+				mes "While I was trying to restore the ";
+				mes "Sobbling Starlight, I was attacked ";
+				mes "by monsters all of a sudden. If only";
+				mes "I paid more attention to my";
+				mes "surroundings...";
+				next;
+				mes "[Engel]";
+				mes "Please understand that I get very deeply engrossed in my smithing work. If you don't mind, I'll try this again you'll bring all the tools just like the last time.";
+				next;
+				mes "[Engel]";
+				mes "^FF00005 Mini Furnace^000000 and";
+				mes "^FF00002 Oridecon Hammer^000000.";
+				mes "Don't forget the ^FF0000Golden Anvil^000000! But if you can get your hands on one, an ^FF0000Emperium Anvil^000000 would be better.";
+				set sign_q,70;
+				close;
+			}
+		}
+		else if (sign_q == 69) {
+			mes "[Engel]";
+			mes "Are you back already?";
+			mes "While you were gone, I managed to restore this Sobbing Starlight. Why don't you go ahead and take a look?";
+			next;
+			set sign_q,71;
+			getitem 7178,1; //Star's_Sob
+			specialeffect2 EF_YUFITELHIT;
+			next;
+			mes "[Engel]";
+			mes "This was one of the most difficult jobs I've ever done. But look! It was beautiful when broken in fragments but now its absolutely dazzling! This was really worth my effort.";
+			next;
+			mes "[Engel]";
+			mes "In any case, I worked really hard to do a good job on this, so I hope you treasure this Sobbling Starlight, young adventurer.";
+			close;
+		}
+	}
+	else if (sign_q == 70) {
+		if ((countitem(612) > 4) && (countitem(615) > 1) && ((countitem(986) > 0) || (countitem(987) > 0) || (countitem(988) > 0) || (countitem(989) > 0))) {
+			if ((countitem(986) > 0) || (countitem(987) > 0)) {
+				mes "[Engel]";
+				mes "Didn't I tell you to bring me a Golden Anvil or an Emperium Anvil? Anything less isn't good enough to do any restoration work on this Sobbing Starlight.";
+				next;
+				mes "[Engel]";
+				mes "Next time you come";
+				mes "here, bring a Golden or Emperium Anvil and make sure to leave all of your other anvils in Kafra Storage or something, okay?";
+				close;
+			}
+			else if (countitem(988) > 0) {
+				mes "[Engel]";
+				mes "Good, good.";
+				mes "I see that you've brought a Golden Anvil. Now I can get started right away! Still, I'm a little about those monsters showing up again, so would you keep a lookout?";
+			}
+			else if (countitem(989) > 0) {
+				mes "[Engel]";
+				mes "Excellent! You've brought an Emperium Anvil! Now, keep a lookout for monsters while I repair these ore fragments. We can't have those beasts ruin my work again, right? Thank you.";
+			}
+			next;
+			mes "^3355FF*Clink*";
+			mes "*Clink Clink Clink*";
+			mes "*Clink Clink Clink*";
+			mes "*Cliiiiiiiiiiiiink*^000000";
+			next;
+			specialeffect EF_REPAIRWEAPON;
+			next;
+			mes "^3355FF*Clink*";
+			mes "*Clink-Clink*";
+			mes "*Clink-Clink-Clink*";
+			mes "*Claaaaaaaaaaack*^000000";
+			next;
+			specialeffect EF_REPAIRWEAPON;
+			next;
+			mes "[Engel]";
+			mes "It's almost done.";
+			mes "Just be a bit more patient...";
+			next;
+			specialeffect EF_REPAIRWEAPON;
+			next;
+			mes "^3355FF*Tink Tink*^000000";
+			mes " ";
+			mes "...*Tonk*^000000";
+			next;
+			specialeffect EF_REPAIRWEAPON;
+			next;
+			specialeffect EF_FLASHER;
+			next;
+			mes "[Engel]";
+			mes "Finally... Completed.";
+			mes "^333333*Phew!*^000000 That was one of the toughest jobs I've ever done, but this was well worth all of our efforts. Just look at the dazzling beauty of this Sobbing Starlight!";
+			next;
+			mes "[Engel]";
+			mes "We've both gone through a lot of trouble to make this, so I hope you treasure your Sobbing Starlight. Good luck on your adventures...";
+			if (countitem(988) > 0) {
+				delitem 988,1; //Golden_Anvil
+			}
+			else if (countitem(989) > 0) {
+					delitem 989,1; //Emperium_Anvil
+			}
+			set sign_q,71;
+			getitem 7178,1; //Star's_Sob
+			specialeffect2 EF_YUFITELHIT;
+			close;
+		}
+		else {
+			if (rand(1,6) == 3) {
+				mes "[Engel]";
+				mes "Oh, you don't have everything ready yet? Take your time, so long as you didn't forget what you needed to bring. You do remember, right?";
+				next;
+				mes "[Engel]";
+				mes "^FF00005 Mini Furnace^000000,";
+				mes "^FF00002 Oridecon Hammer^000000,";
+				mes "and ^ff00001 good quality Anvil^000000.";
+				mes "That's all you need!";
+				next;
+				mes "[Engel]";
+				mes "Remember that I have a greater chance of repairing the Sobbing Starlight if I have access to a higher quality Anvil. Otherwise...";
+				close;
+			}
+			else {
+				mes "[Engel]";
+				mes "Still don't have everything ready? That's fine, just take your time. So long as you haven't forgotten all the things that you need. I mean, how can you forget when you have such an important ore on you?";
+				close;
+			}
+		}
+	}
+	else if (sign_q < 139) {
+		mes "[Engel]";
+		mes "How have you been doing lately? Feel free to ask me if you ever think that you need my expertise, alright?";
+		close;
+	}
+	else if (sign_q == 139) {
+		mes "[Engel]";
+		mes "How have you been";
+		mes "doing lately? You seem";
+		mes "quite well. So is there anything";
+		mes "I can help you with today?";
+		next;
+		select("I need your help again.");
+		mes "[Engel]";
+		mes "Haha, so what have";
+		mes "you brought me this time?";
+		mes "It must be fairly important if you've brought it all the way";
+		mes "down here.";
+		next;
+		select("Please look at this.");
+		mes "[Engel]";
+		mes "Isn't this...?!";
+		mes "Amazing, just by looking at it,";
+		mes "I can feel its power! You really";
+		mes "are something! How do you come across all of this amazing stuff?";
+		next;
+		mes "[Engel]";
+		mes "You know, I consider myself";
+		mes "lucky to even see this kind of stuff. Most smiths might be able to see this kind of thing only once in their entire lives. And to be able to work on it...";
+		next;
+		mes "[Engel]";
+		mes "Hmmm...";
+		mes "It's going to take quite";
+		mes "a while to work on this. Unfortunately, I can't even";
+		mes "give you a time estimate...";
+		mes "But I'll do my best for you.";
+		delitem 7314,1; //The_Sign
+		set sign_q,140;
+		set .@stime_e,gettime(3);
+		if (.@stime_e < 2) {
+			set sign_sq,1;
+		}
+		else if (.@stime_e < 4) {
+			set sign_sq,2;
+		}
+		else if (.@stime_e < 6) {
+			set sign_sq,3;
+		}
+		else if (.@stime_e < 8) {
+			set sign_sq,4;
+		}
+		else if (.@stime_e < 10) {
+			set sign_sq,5;
+		}
+		else if (.@stime_e < 12) {
+			set sign_sq,6;
+		}
+		else if (.@stime_e < 14) {
+			set sign_sq,7;
+		}
+		else if (.@stime_e < 16) {
+			set sign_sq,8;
+		}
+		else if (.@stime_e < 18) {
+			set sign_sq,9;
+		}
+		else if (.@stime_e < 20) {
+			set sign_sq,10;
+		}
+		else if (.@stime_e < 22) {
+			set sign_sq,11;
+		}
+		else {
+			set sign_sq,12;
+		}
+		close;
+	}
+	else if (sign_q == 140) {
+		set .@stime_e1,gettime(3);
+		if (.@stime_e1 < 2) {
+			if (sign_sq == 11) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 4) {
+			if (sign_sq == 12) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 6) {
+			if (sign_sq == 1) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 8) {
+			if (sign_sq == 2) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 10) {
+			if (sign_sq == 3) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 12) {
+			if (sign_sq == 4) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 14) {
+			if (sign_sq == 5) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 16) {
+			if (sign_sq == 6) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 18) {
+			if (sign_sq == 7) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 20) {
+			if (sign_sq == 8) {
+				set .@pass_s1,1;
+			}
+		}
+		else if (.@stime_e1 < 22) {
+			if (sign_sq == 9) {
+				set .@pass_s1,1;
+			}
+		}
+		else {
+			if (sign_sq == 10) {
+				set .@pass_s1,1;
+			}
+		}
+		if (.@pass_s1 == 1) {
+			mes "[Engel]";
+			mes "It's so...";
+			mes "Beautiful! I don't know";
+			mes "if I'll ever see anything";
+			mes "like this again in my life...";
+			next;
+			mes "[Engel]";
+			mes "Oh, you're back just in time.";
+			mes "Although it was one of my most difficult jobs, I believe you'll be pleased with my work. Only a few smiths are privileged enough to work with this, even just once.";
+			next;
+			mes "[Engel]";
+			mes "This is now yours to keep.";
+			mes "Thank you for giving me the";
+			mes "honor of working on a worthy";
+			mes "smithing challenge.";
+			set sign_q,141;
+			getitem 2644,1; //The_Sign_
+			close;
+		}
+		else {
+			mes "[Engel]";
+			mes "I haven't completed it yet, but please understand that I've got to be really careful when working with something so valuable. But don't worry, its inner power will be revealed when I'm finished.";
+			close;
+		}
+	}
+	else {
+		mes "[Engel]";
+		mes "Sometimes, you can only";
+		mes "improve yourself by training in solitude. But don't ever forget about the ones who really care about you. It's those people who make everything worth it.";
+		close2;
+		emotion e_dots;
+		end;
+	}
 }
 
-umbala,163,256,3	script	Native	781,{
+gef_tower,118,36,4	script	Annoyed Man	64,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 72) {
+		mes "[Dhota]";
+		mes "Hmmm...";
+		mes "That can't be right...";
+		mes "What could possibly be";
+		mes "the answer I'm looking";
+		mes "for? ^333333*Sigh...*^000000";
+		emotion e_pif;
+		close;
+	}
+	else if (sign_q == 72) {
+		if (BaseClass == Job_Mage) {
+			mes "[Dhota]";
+			mes "Wah~";
+			mes "Why the hell did he even go there...!";
+		}
+		else {
+			mes "[Dhota]";
+			mes "You're not even a Mage,";
+			mes "much less a Wizard or a Sage.";
+			mes "Why bother climbing this tower?";
+		}
+		mes "What are you doing here?!";
+		emotion e_pif;
+		next;
+		input .@input$;
+		if ((.@input$ == "Metz Brayde") || (.@input$ == "Sobbing Starlight")) {
+			mes "[Dhota]";
+			mes "Eh?";
+			if (.@input$ == "Metz Brayde") {
+				mes "Did you just say you're";
+				mes "here for Metz Brayde?";
+			}
+			if (.@input$ == "Sobbing Starlight") {
+				mes "For that Sobbing Starlight, is that right?";
+			}
+			next;
+			mes "[Dhota]";
+			mes "...";
+			emotion e_dots;
+			next;
+			mes "[Dhota]";
+			mes "...";
+			mes "......";
+			emotion e_dots;
+			next;
+			mes "[Dhota]";
+			mes "...";
+			mes "......";
+			mes "BWAAAAH~!";
+			emotion e_ag;
+			next;
+			mes "[Dhota]";
+			mes "Right, he wants that guy";
+			mes "who's good at working with";
+			mes "gems and stuff. Eh, he's not";
+			mes "here right now. Went somewhere";
+			mes "near Comodo to investigate some";
+			mes "tribal people or whatever.";
+			set sign_q,73;
+			emotion e_pif;
+			close;
+		}
+		else {
+			mes "[Dhota]";
+			mes "Say what...?";
+			mes "I have no idea what";
+			mes "you're talking about!";
+			mes "If you've got nothing";
+			mes "to say, then leave me alone!";
+			close;
+		}
+	}
+	else {
+		mes "[Dhota]";
+		mes "Hmmm...";
+		mes "That can't be right...";
+		mes "What could possibly be";
+		mes "the answer I'm looking";
+		mes "for? ^333333*Sigh...*^000000";
+		emotion e_pif;
+		close;
+	}
+}
 
-	if(event_umbala < 3) goto L_UmWord;
-	if(signquest > 25) goto L_Thanks;
-	if(signquest == 25) goto L_Sign;
-	mes "[Laotan]";
-	mes "All my friends have a new";
-	mes "mask and I'm the only one";
-	mes "who didn't get mine...";
-	mes "Wh.. why? Waaaaaaah!";
-	close;
+umbala,163,256,3	script	Native#_s	781,{
+	callfunc "F_UpdateSignVars";
+	if (event_umbala >= 3) {
+		if (sign_q < 73) {
+			mes "[Laotan]";
+			mes "Oh, I wish I had";
+			mes "a Mr. Smile mask!";
+			mes "But where can I get";
+			mes "one of those? Well, I'd";
+			mes "be happy if I had some";
+			mes "Meat to eat, I guess!";
+			emotion e_ho;
+			close;
+		}
+		else if (sign_q == 73) {
+			mes "[Laotan]";
+			mes "Mmm...?";
+			mes "A new guy in our village?";
+			mes "I think I know him! Yea, I do!";
+			next;
+			if (countitem(2278) > 0) {
+				mes "[Laotan]";
+				mes "Oh my gosh!";
+				mes "You've got a Mr. Smile mask!";
+				mes "Would you give that to me?";
+				mes "Pretty please...?";
+				next;
+				switch(select("Sure~:^FF0000No.^000000")) {
+				case 1:
+					mes "[Laotan]";
+					mes "Hooooray!";
+					mes "Thank you thank you";
+					mes "thank you thank you";
+					mes "soooooooooo much!";
+					next;
+					mes "[Laotan]";
+					mes "Oh right~!";
+					mes "The weird man in the funny clothes was in our village for a while, but ever since he went into that big tree, nobody's seen him!";
+					delitem 2278,1; //Mr_Smile
+					set sign_q,74;
+					close;
+				case 2:
+					mes "[Laotan]";
+					mes "I...";
+					mes "I was...";
+					mes "I just...";
+					mes "Waaaaaaahhhh!";
+					close;
+				}
+			}
+			else {
+				mes "[Laotan]";
+				mes "Waaaait.";
+				mes "I knooow~!";
+				mes "I know if you get";
+				mes "me a Mr. Smile, okay?";
+				close;
+			}
+		}
+		else {
+			mes "[Laotan]";
+			mes "I love my Mr. Smile mask";
+			mes "soooo much! I'm gonna show";
+			mes "it to all my friends! Thank you";
+			mes "so much again! You're really";
+			mes "really nice, you know that?";
+			close;
+		}
+	}
+	else {
+		mes "[??????]";
+		mes "Chuuuba?";
+		mes "Chu-chu-chu-chu-chaba?";
+		mes "Oom oom oom daba. Blip blip?";
+		mes "Sabaloo koombah Solo. Ho ho~";
+		close;
+	}
+}
 
-L_Sign:
-	mes "[Laotan]";
-	mes "Mmmh...";
-	mes "A new guy in our village?";
-	mes "I think I know him! Yea, I do!";
-	next;
-	if(countitem(2278)) goto L_Mask;
-	mes "[Laotan]";
-	mes "Waaaait";
-	mes "I knooow~!";
-	mes "I know if you get me";
-	mes "a Mr. Smile, okay?";
-	close;
+um_in,27,23,3	script	Fastidious-Looking Guy	121,{
+	callfunc "F_UpdateSignVars";
+	if (checkweight(908,200) == 0) {
+		mes "^3355FFWait a second! Right now,";
+		mes "you have too many items in your inventory. Please come back after you've freed up more inventory space.^000000";
+		close;
+	}
+	if (sign_q < 74) {
+		mes "^333333*Giggle*^000000";
+		mes "So if I do this,";
+		mes "then that and then...";
+		mes "Ooh, these calculations";
+		mes "are absolutely perfect!";
+		emotion e_gg;
+		next;
+		mes "[Cyon]";
+		mes "Wh-what?!";
+		mes "Who are you?";
+		mes "H-how did you get";
+		mes "in here? I demand";
+		mes "that you leave, right now!";
+		emotion e_an;
+		close2;
+		warp "um_dun01",129,90;
+		end;
+	}
+	else if (sign_q == 74) {
+		mes "[Cyon]";
+		mes "^333333*Giggle*^000000";
+		mes "So if I do this,";
+		mes "then that and then...";
+		mes "Ooh, these calculations";
+		mes "are absolutely perfect!";
+		emotion e_gg;
+		next;
+		mes "[Cyon]";
+		mes "Wh-what?!";
+		mes "Who are you?";
+		mes "H-how did you get";
+		mes "in here? I demand";
+		mes "that you leave, right now!";
+		emotion e_an;
+		next;
+		switch(select("I'm here for Metz Brayde.:My apologies.:Would you look at this?:...")) {
+		case 1:
+			mes "[Cyon]";
+			mes "Huh? Brayde?";
+			mes "Do you expect me";
+			mes "to just trust you without";
+			mes "a single shred of proof that";
+			mes "he sent you? Get out now!";
+			close;
+		case 2:
+			mes "[Cyon]";
+			mes "If you're so sorry,";
+			mes "then hurry up and get";
+			mes "out of here! Not just anyone";
+			mes "is allowed here! Leave!";
+			emotion e_pif;
+			close;
+		case 3:
+			mes "[Cyon]";
+			mes "What could be so";
+			mes "special about what";
+			mes "you've brought here?!";
+			mes "Fine, you've piqued my";
+			mes "scientific curiosity...";
+			next;
+			emotion e_omg;
+			next;
+			mes "[Cyon]";
+			mes "Sweet lord...";
+			mes "This is 'God's Tear Drop!'";
+			mes "The Sobbling Starlight!";
+			mes "He finally made it....";
+			next;
+			mes "[Cyon]";
+			mes "^333333*Giggle*^000000";
+			mes "Well, since he's kept his promise, I suppose that I should keep mine";
+			mes "as well. Now, within this Sobbing Starlight are these tiny letters... ^FFFFFFcobo^000000";
+			next;
+			mes "[Cyon]";
+			mes "The text is so small that even Hunters skilled in Vulture's Eye are unable to read them. However, I've read that this Sobbing";
+			mes "Starlight will respond";
+			mes "to really old papers...";
+			next;
+			mes "[Cyon]";
+			mes "Now, if we want to figure out";
+			mes "what's written in the Sobbing";
+			mes "Starlight, we'd need at least";
+			mes "10 ancient pieces of paper...";
+			set sign_q,75;
+			close;
+		case 4:
+			specialeffect EF_VENOMDUST;
+			mes "[Cyon]";
+			mes "Not listening, eh?";
+			mes "Fine, if you don't";
+			mes "understand words, then";
+			mes "I'll have to use force!";
+			mes "Get out here right now!";
+			close2;
+			percentheal -30,0;
+			specialeffect2 EF_MAGNUMBREAK;
+			end;
+		}
+	}
+	else if (sign_q == 75) {
+		mes "[Cyon]";
+		mes "You've come back.";
+		mes "I hope you were able";
+		mes "to find some ancient";
+		mes "or really aged paper...";
+		next;
+		if (countitem(1097) > 6) {
+			mes "[Cyon]";
+			mes "How did you find these";
+			mes "Worn Out Pages? This is great,";
+			mes "I'm sure the Sobbing Starlight";
+			mes "will respond to these!";
+			next;
+			mes "[Cyon]";
+			mes "Yes. Yes...";
+			mes "This should be enough.";
+			mes "Now give them to me";
+			mes "and wait here while";
+			mes "I try a few things...";
+			next;
+			specialeffect EF_SPHERE;
+			next;
+			mes "[Cyon]";
+			mes "Just as I thought!";
+			mes "The Sobbing Starlight is responding to these Worn Out Pages! Excellent! I've finally fulfilled my promise to Metz! Now he can leave";
+			mes "me alone!";
+			delitem 1097,7; //Worn_Out_Page
+			set sign_q,76;
+			getitem 7275,1; //Ancient_Document
+			close;
+		}
+		else if (countitem(1097) > 0) {
+			mes "[Cyon]";
+			mes "How did you find these";
+			mes "^FF0000Worn Out Pages^000000? This is great,";
+			mes "I'm sure the Sobbing Starlight";
+			mes "will respond to these!";
+			next;
+			mes "[Cyon]";
+			mes "Wait, we don't have enough";
+			mes "of them to make the Sobbing";
+			mes "Starlight respond. Find more";
+			mes "of these papers and bring";
+			mes "them all to me!";
+			close;
+		}
+		else {
+			mes "[Cyon]";
+			mes "You haven't found anything?";
+			mes "What kind of scientist are you?";
+			mes "Now go out and find some old and ancient papers so that we can learn what's written in the Sobbing Starlight! Go!";
+			next;
+			mes "[Cyon]";
+			mes "...?";
+			mes "Why are you still here?";
+			mes "Leave and do what I told";
+			mes "you to do, alright?! Don't";
+			mes "make me get violent...";
+			next;
+			percentheal -30,0;
+			specialeffect2 EF_MAGNUMBREAK;
+			next;
+			warp "um_dun01",129,90;
+			end;
+		}
+	}
+	else if (sign_q == 76) {
+		mes "[Cyon]";
+		mes "My business with you is finished, so you go along on your way now. And tell Metz not to bother me anymore! I'm done doing favors!";
+		close;
+	}
+	else {
+		mes "[Cyon]";
+		mes "How dare you intrude";
+		mes "on my property?! Now,";
+		mes "get out now before I get";
+		mes "violent! Didn't you hear me?";
+		mes "GET OUT OF HERE!";
+		close;
+	}
+}
 
-L_Mask:
-	mes "[Laotan]";
-	mes "Oh my gosh!";
-	mes "You've got a Mr. Smile mask!";
-	mes "Would you give that to me?";
-	mes "Pretty please...?";
-	next;
-	menu "Sure~",L_Ok,"^FF0000No.^000000",-;
-	mes "[Laotan]";
-	mes "I...";
-	mes "I was...";
-	mes "I just...";
-	mes "Waaaaaaahhhh!";
-	close;
+alberta,165,83,4	script	Fastidious Old Man	755,{
+	callfunc "F_UpdateSignVars";
+	if (checkweight(908,200) == 0) {
+		mes "^3355FFWait a second! Right now,";
+		mes "you have too many items in your inventory. Please come back after you've freed up more inventory space.^000000";
+		close;
+	}
+	if (sign_q < 77) {
+		mes "[Frank]";
+		mes "My back~";
+		mes "It's so sore!";
+		mes "And my eyes are";
+		mes "hurting worse and worse.";
+		mes "^333333*Sigh*^000000 I'm getting old...";
+		close;
+	}
+	else if (sign_q == 77) {
+		mes "[Frank]";
+		mes "My vision's getting";
+		mes "blurrier and I get headaches";
+		mes "when I read. I guess this old";
+		mes "man's got no choice but to get";
+		mes "some sort of seeing aid...";
+		set sign_q,78;
+		close;
+	}
+	else if (sign_q == 78) {
+		if ((countitem(2203) > 0) && (countitem(7275) > 0)) {
+			mes "[Frank]";
+			mes "My vision's getting";
+			mes "blurrier and I get headaches";
+			mes "when I read. I guess this old";
+			mes "man's got no choice but to get";
+			mes "some sort of seeing aid...";
+			next;
+			switch(select("Wait, I've got a pair of glasses...:Pass on by.")) {
+			case 1:
+				mes "[Frank]";
+				mes "Oh, you've brought me";
+				mes "these Glasses? Thanks";
+				mes "so much, youngster. Now that";
+				mes "I can see better, what can";
+				mes "I do for you in return?";
+				next;
+				while(1) {
+					switch(select("About Geffen's Hidden Power:About Sobbing Starlight:Interpret Ancient Document")) {
+					case 1:
+						mes "[Frank]";
+						mes "Geffen's hidden power?";
+						mes "I don't know much about it, but I'm sure that Geffen Tower is more than just a simple building. I'm sure it was created to restrain or contain some powerful force.";
+						next;
+						mes "[Frank]";
+						mes "It's even possible that the fountain in front of Geffen Tower also plays the same role, but I've got no hard evidence. Since I'm not too interested in Geffen, I haven't really investigated...";
+						next;
+						mes "[Frank]";
+						mes "Still...";
+						mes "There's a strong possibility that some enormous power is being sealed beneath the Geffen Tower.";
+						next;
+						break;
+					case 2:
+						mes "[Frank]";
+						mes "The Sobbing Starlight?";
+						mes "To the experts, it's known as God's Tear Drop. Now, some believe it was created from the voice of God.";
+						next;
+						mes "[Frank]";
+						mes "Of course, it probably isn't made from God's voice or tear drops, but who knows? In any case, it's said that something's written in the Sobbing Starlight. What ever it is, it must be something important...";
+						next;
+						break;
+					case 3:
+						mes "[Frank]";
+						mes "I don't believe it!";
+						mes "This is... I see. You want me to translate this ancient language. Ah, you're rather fortunate. I'm probably the only person in the world who can translate this.";
+						next;
+						mes "[Frank]";
+						mes "Hmm, as far as I can tell, this is a sophisticated language spoken by the ancient gods. It's complex and confusing, but I'll do my best for you. Come back to me later, and I'll what I've learned.";
+						delitem 2203,1; //Glasses
+						delitem 7275,1; //Ancient_Document
+						set sign_q,79;
+						close;
+					}
+				}
+			case 2:
+				mes "[Frank]";
+				mes "Oooh~";
+				mes "How will I ever";
+				mes "be able to continue";
+				mes "my life's work? I'm";
+				mes "helpless if I can't read...";
+				close;
+			}
+		}
+		else {
+			mes "[Frank]";
+			mes "My vision's getting";
+			mes "blurrier and I get headaches";
+			mes "when I read. I guess this old";
+			mes "man's got no choice but to get";
+			mes "some sort of seeing aid...";
+			close;
+		}
+	}
+	else if (sign_q == 79) {
+		if (rand(1,50) == 9) {
+			mes "[Frank]";
+			mes "I've finally completed the translation. It was a challenge deciphering the meaning of some";
+			mes "of these words. Even translated in our own language, this contents of this text are fairly ambiguous.";
+			next;
+			mes "[Frank]";
+			mes "Well, I've written down the best translation that I could for you. It's been a long time since I've had this kind of challenge. Thanks, youngster.";
+			mes "Ha ha ha~";
+			set sign_q,80;
+			getitem 7274,1; //Ancient_Translator
+			close;
+		}
+		else {
+			mes "[Frank]";
+			mes "I'm sorry, but I haven't finished translating this text. It's taking quite a long time since I don't have any reference material for this particular language. Why";
+			mes "don't you come back later?";
+			close;
+		}
+	}
+	else {
+		mes "[Frank]";
+		mes "There are many things out";
+		mes "there that defy our understanding of the world and are beyond our imagination. Many fear the unknown, but the truly brave will always seek out the truth.";
+		close;
+	}
+}
 
-L_UmWord:
-	mes "[??????]";
-	mes "Umbaumbafumba.";
-	mes "Uwambaunbaumbabaufumba";
-	mes "Umbababaumbaumba.";
-	close;
+gef_fild07,182,241,0	script	#Valkyrie Warp	111,1,1,{
+	callfunc "F_UpdateSignVars";
+	if ((sign_q == 80) && (countitem(907) > 3) && (countitem(953) > 11) && (countitem(7013) > 364)) {
+		mes "^6B8E23It seems that";
+		mes "something in the";
+		mes "vicinity is reacting";
+		mes "with the Sobbing Starlight";
+		mes "in your possession. Perhaps";
+		mes "you can find it nearby...^000000";
+		close;
+	}
 
-L_Ok:
-	mes "[Laotan]";
-	mes "Hooooray!";
-	mes "Thank you thank you";
-	mes "thank you thank you";
-	mes "soooooooooo much!";
-	delitem 2278,1;
-	set signquest,26;
-	next;
-	mes "[Laotan]";
-	mes "Oh right~!";
-	mes "The weird man in the funny clothes";
-	mes "was in our village for a while, but";
-	mes "ever since he went into that big";
-	mes "tree, nobody's seen him!";
-	close;
+OnTouch:
+	if ((sign_q == 80) && (countitem(907) > 3) && (countitem(953) > 11) && (countitem(7013) > 364)) {
+		mes "["+strcharinfo(0)+"]";
+		mes "What the...?";
+		mes "What's happening?!";
+		specialeffect2 EF_BEGINSPELL6;
+		next;
+		mes "^3355FFFor some reason, in";
+		mes "this particular spot, the";
+		mes "Sobbing Starlight is reacting";
+		mes "with the Resin, Stone Hearts";
+		mes "and Coral Reefs that you're";
+		mes "holding. All the objects are";
+		mes "violently resonating...^000000";
+		specialeffect2 EF_ENHANCE;
+		next;
+		mes "^3355FFAll of a sudden these";
+		mes "objects emit a bright flash";
+		mes "of light that envelops your";
+		mes "entire body, then you gently";
+		mes "fall into unconsciousness...^000000";
+		specialeffect2 EF_FLASHER;
+		next;
+		delitem 907,4; //Resin
+		delitem 953,12; //Stone_Heart
+		delitem 7013,365; //Coral_Reef
+		set sign_q,81;
+		warp "himinn",49,10;
+		end;
+	}
+	else if (sign_q == 203) {
+		mes "^3355FFNothing seems to";
+		mes "happen when you";
+		mes "approach this area now.^000000";
+		close;
+	}
+	else if (sign_q > 80) {
+		warp "himinn",49,10;
+	}
+	end;
+}
 
-L_Thanks:
-	mes "[Laotan]";
-	mes "I love my Mr. Smile mask";
-	mes "soooo much! I'm gonna show";
-	mes "it to all my friends! Thank you";
-	mes "so much again! You're really";
-	mes "really nice, you know that ?";
-	close;	
+himinn,48,86,5	script	Valkyrie#sign	811,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 81) {
+		mes "[Valkyrie Sandra]";
+		mes "Only the chosen";
+		mes "can enter this place.";
+		mes "I will not ask how you've";
+		mes "gained entrance, but I will";
+		mes "require you to leave.";
+		close2;
+		warp "gef_fild07",180,242;
+		end;
+	}
+	else if (sign_q == 81) {
+		mes "[Valkyrie Sandra]";
+		mes "Welcome, "+strcharinfo(0)+",";
+		mes "to this realm of holiness.";
+		mes "You have endured great difficulty and tested your courage to obtain the Sobbing Starlight, which will be the certificate for your test.";
+		next;
+		select("Test...?");
+		mes "[Valkyrie Sandra]";
+		mes "The gods have decided that";
+		mes "you are worthy of undergoing";
+		mes "a special test that will judge";
+		mes "your merits. If you are a true";
+		mes "hero who is pure of heart,";
+		mes "you will certainly succeed...";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "Now, there is a critical";
+		mes "situation in the ^FF0000realm where";
+		mes "the fallen warriors dwell^000000. The";
+		mes "gods wish for you to restore the balance by quelling a specific";
+		mes "evil influence in that place.";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "There will be many obstacles.";
+		mes "First, the fallen, who will target their anger and hatred towards";
+		mes "you. Where they have failed to";
+		mes "enter Valhalla, you have a rare";
+		mes "and wondrous opportunity...";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "Secondly, and more";
+		mes "importantly, you must find";
+		mes "this evil influence on your";
+		mes "own. This will judge your";
+		mes "ability to discern good from evil. Do not trust appearances...";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "This is your task.";
+		mes "I cannot tell you more.";
+		mes "It is now your duty to";
+		mes "travel there and ferret";
+		mes "out true darkness from";
+		mes "one of the hearts there...";
+		set sign_q,82;
+		percentheal 100,100;
+		if (BaseLevel < 56) {
+			getexp 9000,0;
+		}
+		else if ((BaseLevel > 55) && (BaseLevel < 61)) {
+			getexp 12000,0;
+		}
+		else if ((BaseLevel > 60) && (BaseLevel < 66)) {
+			getexp 20000,0;
+		}
+		else if ((BaseLevel > 65) && (BaseLevel < 71)) {
+			getexp 35000,0;
+		}
+		else if ((BaseLevel > 70) && (BaseLevel < 76)) {
+			getexp 70000,0;
+		}
+		else if ((BaseLevel > 75) && (BaseLevel < 81)) {
+			getexp 120000,0;
+		}
+		else if ((BaseLevel > 80) && (BaseLevel < 86)) {
+			getexp 160000,0;
+		}
+		else if ((BaseLevel > 85) && (BaseLevel < 91)) {
+			getexp 210000,0;
+		}
+		else if (BaseLevel > 90) {
+			getexp 350000,0;
+		}
+		close2;
+		warp "geffen",120,100;
+		end;
+	}
+	else if (sign_q < 95) {
+		mes "[Valkyrie Sandra]";
+		mes "I commend your ability";
+		mes "to survive in the realm";
+		mes "of the dead. I imagine it";
+		mes "must be very difficult for";
+		mes "a mortal to endure its cruelty.";
+		close;
+	}
+	else if (sign_q == 95) {
+		mes "[Valkyrie Sandra]";
+		mes "Regrettably, I can't really";
+		mes "provide any answers for you.";
+		mes "You must overcome the ordeals";
+		mes "of the gods on your own. All I can do is offer my guidance and prayer. ^FFFFFFcobo^000000";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "Remember that the";
+		mes "demonstration of your belief,";
+		mes "rather than the decision to";
+		mes "blindly adhere to faith, is";
+		mes "what the gods want to see.";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "Always step forward";
+		mes "with wisdom and courage.";
+		mes "That is all I can tell you.";
+		set sign_q,96;
+		close;
+	}
+	else if ((sign_q == 129) || (sign_q == 130)) {
+		mes "[Valkyrie Sandra]";
+		mes "Welcome back.";
+		mes "Not only have you passed the trials that the gods have set for you, you have tested your courage in the realm of the dead and protected Rune-Midgard from attack.";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "I'm pleased to announce that the gods have been watching you and decided to invite you to Valhalla. However, Rune-Midgard still has great need of you.";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "As a symbol of this promise to invite you to Valhalla, you shall be rewarded with 'The Sign' which will show all others that you are a great warrior whose courage was tested by the gods themselves.";
+		next;
+		set name,PcName;
+		mes "[Valkyrie Sandra]";
+		mes "Congratulations,";
+		mes ""+ strcharinfo(0) +". Verily,";
+		mes "you are an honorable";
+		mes "hero worthy of praise!";
+		set sign_q,137;
+		getitem 7314,1; //The_Sign
+		close;
+	}
+	else if (sign_q < 150) {
+		mes "[Valkyrie Sandra]";
+		mes "The gods are watching";
+		mes "you. Prove your courage,";
+		mes "and at that moment, you";
+		mes "will earn the honor of being";
+		mes "selected by the gods.";
+		close;
+	}
+	else if ((sign_q > 199) && (sign_q < 202)) {
+		mes "[Sandra]";
+		mes "You have yet to";
+		mes "fully prove your courage.";
+		mes "Once you do, you will be";
+		mes "summoned by the gods.";
+		close;
+	}
+	else if (sign_q == 202) {
+		mes "[Valkyrie Sandra]";
+		mes "The gods are disappointed";
+		mes "in what you have decided to";
+		mes "do. Unfortunately, you have";
+		mes "been banished from Valhalla";
+		mes "and this place as well.";
+		next;
+		mes "[Valkyrie Sandra]";
+		mes "Although you have failed,";
+		mes "I hope that you find your";
+		mes "another way to win back";
+		mes "the favor of the gods...";
+		set sign_q,203;
+		close;
+	}
+	else {
+		if (countitem(7314) < 1) {
+			mes "[Valkyrie Sandra]";
+			mes "Only the chosen";
+			mes "can enter this place.";
+			mes "I will not ask how you've";
+			mes "gained entrance, but I will";
+			mes "require you to leave.";
+			close2;
+			warp "gef_fild07",180,242;
+			end;
+		}
+		else {
+			mes "[Valkyrie Sandra]";
+			mes "Great warrior,";
+			mes "your time has not yet";
+			mes "come. Please focus on";
+			mes "your training until you";
+			mes "are summoned by the gods...";
+			close;
+		}
+	}
 }
 
-um_in,27,23,3	script	Weird Man	121,{
+//============================================================ 
+// The Sign (Part 3)
+//============================================================ 
 
-	if(signquest > 27) goto L_Done;
-	if(signquest == 27) goto L_Check;
-	mes "[Cyon]";
-	mes "*Giggle*";
-	mes "So, if I do this,";
-	mes "then that and then...";
-	mes "Ooh, these calculations";
-	mes "are absolutely perfect!";
-	emotion e_gg;
-	next;
-	mes "[Cyon]";
-	mes "Wh-what?!";
-	mes "Who are you?";
-	mes "H-how did you get";
-	mes "in here? I demand";
-	mes "that you leave, right now!";
-	emotion e_an;
-	if(signquest == 26) goto L_Sign;
-	close2;
-	warp "um_dun01",129,90;
+que_sign01,196,39,4	script	Serin#dummy	90,{
 	end;
 
-L_Sign:
-	next;
-	menu "I'm here for Metz Brayde.",L_Metz,"My apologies.",L_Sorry,"Would you look at this?",-,"...",L_Leave;
-	mes "[Cyon]";
-	mes "What could be so";
-	mes "special about what";
-	mes "you've brought here?!";
-	mes "Fine, you've picked my";
-	mes "scientific curiosity...";
-	next;
-	mes "[Cyon]";
-	mes "Sweet lord...";
-	mes "This is 'God's Tear Drop'!";
-	mes "The Sobbing Starlight!";
-	mes "He finally made it...";
-	next;
-	mes "[Cyon]";
-	mes "*Giggle*";
-	mes "Well, since he's kept his promise";
-	mes "I suppose that I should keep mine";
-	mes "as well. Now within this Sobbing";
-	mes "Starlight are these tiny letters...";
-	next;
-	mes "[Cyon]";
-	mes "The text is so small that even";
-	mes "Hunters skilled in Vulture's Eye";
-	mes "are unable to read them. However,";
-	mes "I've read that this Sobbing";
-	mes "Starlight will respond";
-	mes "to really old papers...";
-	next;
-	mes "[Cyon]";
-	mes "Now, if we want to figure out";
-	mes "what's written in the Sobbing";
-	mes "Starlight, we'd need at least";
-	mes "10 ancient pieces of paper...";
-	set signquest,27;
-	close;
-
+OnInit:
+	disablenpc "Serin#dummy";
+	end;
 
-L_Metz:
-	mes "[Cyon]";
-	mes "Huh? Brayde?";
-	mes "Do you expect me";
-	mes "to just trust you without";
-	mes "a single shred of proof that";
-	mes "he sent you? Get out now!";
-	close;
+OnDisable:
+	disablenpc "Serin#dummy";
+	end;
 
-L_Sorry:
-	mes "[Cyon]";
-	mes "If you're so sorry,";
-	mes "then hurry up and get";	
-	mes "out of here! Not just anyone";
-	mes "is allowed in here! Leave!";
-	emotion e_pif;
-	close;
+OnEnable:
+	enablenpc "Serin#dummy";
+	end;
 
-L_Leave:
-	mes "[Cyon]";
-	mes "Not listening, eh?";
-	mes "Fine, if you don't";
-	mes "understand words, then";
-	mes "I'll have to use force!";
-	mes "Get out here right now!";
-	close2;
-	percentheal -30,0;
+Onstart:
+	initnpctimer;
 	end;
 
-L_Check:
-	mes "[Cyon]";
-	mes "You've come back.";
-	mes "I hope you were able";
-	mes "to find some ancient";
-	mes "or really aged papers...";
-	next;
-	if (countitem(1097) > 6) goto L_Text;
-	mes "[Cyon]";
-	mes "You haven't found anything?";
-	mes "What kind of scientist are you?";
-	mes "Now go out and find some old and";
-	mes "ancient papers so that we can learn";
-	mes "what's written in the Sobbing";
-	mes "Starlight! Go!";
-	next;
-	mes "[Cyon]";
-	mes "...?";
-	mes "Why are you still here?";
-	mes "Leave and do what I told";
-	mes "you to do, alright?! Don't";
-	mes "make me get violent...";
-	next;
-	percentheal -30,0;
-	close2;
-	warp "um_dun01",129,90;
+OnTimer3000:
+	specialeffect EF_GLASSWALL;
 	end;
 
-L_Text:
-	mes "[Cyon]";
-	mes "How did you find these";
-	mes "Worn Out Pages? This is great";
-	mes "I'm sure the Sobbing Starlight";
-	mes "will respond to these!";
-	next;
-	mes "[Cyon]";
-	mes "Yes. Yes...";
-	mes "This should be enough.";
-	mes "Now give them to me";
-	mes "and wait here while";
-	mes "I try a few things...";
-	next;
-	delitem 1097,7;
-	misceffect 72;
-	next;
-	mes "[Cyon]";
-	mes "Just as I thought!";
-	mes "The Sobbing Starlight is responding";
-	mes "to these Worn Out Pages! Excellent!";
-	mes "I've finally fulfilled my promise";
-	mes "to Metz! Now he can leave";
-	mes "me alone!";
-	getitem 7275,1;
-	set signquest,28;
-	close;
+OnTimer6000:
+	specialeffect EF_CRASHEARTH;
+	end;
 
-L_Done:
-	mes "[Cyon]";
-	mes "My business with you is finished,";
-	mes "so you go along on your way now.";
-	mes "And tell Metz not to bother me";
-	mes "anymore! I'm done doing favors!";
-	close;
-}
+OnTimer9000:
+	specialeffect EF_LORD;
+	end;
 
-alberta,165,83,3	script	Fastidious Old Man#sign	755,{
-
-    if (signquest > 30) goto L_Done;
-    if (signquest == 30) goto L_Interpret;
-    if (signquest == 29) goto L_Vision;
-    mes "[Frank]";
-    mes "My back~";
-    mes "It's so sore!";
-    mes "And my eyes are";
-    mes "hurting worse and worse.";
-    mes "^343434*Sigh* ^000000I'm getting old...";
-    close;
-
-L_Vision:
-    mes "[Frank]";
-    mes "My vision's getting";
-    mes "blurrier and I get headaches";
-    mes "when I read. I guess this old";
-    mes "man's got no choice but to get";
-    mes "some sort of seeing aid...";
-    if (!countitem(2203))close;
-    next;
-    menu "Wait, I've got a pair of glasses...",L_Glasses,"Pass on by.",-;
-    mes "[Frank]";
-    mes "Oooh~";
-    mes "How will I ever";
-    mes "be able to continue";
-    mes "my life's work? I'm";
-    mes "helpless if I can't read...";
-    close;
-
-L_Glasses:
-    mes "[Frank]";
-    mes "Oh, you've brought me";
-    mes "these Glasses. Thanks";
-    mes "so much, youngster. Now that";
-    mes "I can see better, what can";
-    mes "I do for you in return?";
-    delitem 2203,1;
-    next;
-
-L_Frank:
-    menu "About Geffen's Hidden Power.",L_Power,"About Sobbing Starlight.",L_Star,"Interpret Ancient Document.",-;
-    mes "[Frank]";
-    mes "I don't believe it!";
-    mes "This is... I see. You want me to";
-    mes "translate this ancient language.";
-    mes "Ah, you're rather fortunate. I'm";
-    mes "probably the only person in the";
-    mes "world who can translate this.";
-    next;
-    mes "[Frank]";
-    mes "Hmm, as far as I can tell, this is";
-    mes "a sophisticated language spoken by";
-    mes "the ancient gods. It's complex and";
-    mes "confusing, but I'll do my best for";
-    mes "you. Come back to me later, and";
-    mes "I'll tell you what I've learned.";
-    set signquest,30;
-    close;
-
-L_Power:
-    mes "[Frank]";
-    mes "Geffen's hidden power?";
-    mes "I don't know much about it, but I'm";
-    mes "sure that Geffen Tower is more than";
-    mes "just a simple building. I'm sure it";
-    mes "was created to restrain or contain";
-    mes "some powerful force.";
-    next;
-    mes "[Frank]";
-    mes "It's even possible that the";
-    mes "fountain in front of Geffen Tower";
-    mes "also plays the same role, but I've";
-    mes "got no hard evidence. Since I'm not";
-    mes "too interested in Geffen, I haven't";
-    mes "really investigated...";
-    next;
-    mes "[Frank]";
-    mes "Still...";
-    mes "There's a strong possibility that";
-    mes "some enormous power is being sealed";
-    mes "beneath the Geffen Tower.";
-    next;
-    goto L_Frank;
-
-L_Star:
-    mes "[Frank]";
-    mes "The Sobbing Starlight?";
-    mes "To the experts, it's known as God's";
-    mes "Tear Drop. Now, some believe it was";
-    mes "created from the voice of God.";
-    next;
-    mes "[Frank]";
-    mes "Of course, it probably isn't made";
-    mes "from God's voice or tear drops but";
-    mes "who knows? In any case, it's said";
-    mes "that something's written in the";
-    mes "Sobbing Starlight. What ever it is,";
-    mes "it must be something important.";
-    next;
-    goto L_Frank;
-
-L_Interpret:
-    if (!rand(10)) {
-        mes "[Frank]";
-        mes "Well, I've written down the best";
-        mes "translation that I could for you.";
-        mes "It's been a long time since I've";
-        mes "had this kind of challenge. Thanks,";
-        mes "youngster.";
-        mes "Ha ha ha~";
-        delitem 7275,1;
-        getitem 7274,1;
-        set signquest,31;
-        close;
-    } else {
-        mes "[Frank]";
-        mes "I'm sorry, but I haven't finished";
-        mes "translating this text. It's taking";
-        mes "quite a long time since I don't";
-        mes "have any reference material for";
-        mes "this particular language. Why";
-        mes "don't you come back later?";
-        close;
-    }
-
-L_Done:
-    mes "[Frank]";
-    mes "There are many things out";
-    mes "there that defy out understanding";
-    mes "of the world and are beyond our";
-    mes "imagination. Many fear the unknown";
-    mes "but the truly brave will always";
-    mes "seek out the truth.";
-    close;
+OnTimer13000:
+	donpcevent "Serin#dummy::OnDisable";
+	donpcevent "Dark Lord#serin::OnEnable";
+	donpcevent "Serin#serin::OnEnable";
+	stopnpctimer;
+	end;
 }
 
-
-// Himinn Part & Valkyrie
-
-gef_fild07,182,241,1	script	#himinnwarper	111,1,1,{
-
-	if(signquest == 31 && countitem(7013) > 364 && countitem(953) > 11 && countitem(907) > 3) goto L_FirstClick;
+que_sign01,196,44,4	script	Dark Lord#serin	737,{
 	end;
 
-L_FirstClick:
-	mes "^657540It seems that";
-	mes "something in the";
-	mes "vicinity is reacting";
-	mes "with the Sobbing Starlight";
-	mes "in your possession. Perhaps";
-	mes "you can find it nearby...^000000";
-	close;
+OnInit:
+	disablenpc "Dark Lord#serin";
+	end;
 
-OnTouch:
-	if(signquest > 31) goto L_Warp;
-	if(signquest == 31 && countitem(7013) > 364 && countitem(953) > 11 && countitem(907) > 3) goto L_FirstTouch;
+OnDisable:
+	disablenpc "Dark Lord#serin";
 	end;
 
-L_FirstTouch:
-	mes "[" + strcharinfo(0) + "]";
-	mes "What the...?";
-	mes "What's happening?!";
-	next;
-	specialeffect2 EF_ENHANCE;
-	mes "^3355FFFor some reason, in";
-	mes "this particular spot, the";
-	mes "Sobbing Starlight is reacting";
-	mes "wit the Resin, Stone Hearts";
-	mes "and Coral Reefs that you're";
-	mes "holding. All the objects are";
-	mes "violently resonating";
-	next;
-	specialeffect2 EF_FLASHER;
-	mes "All of a sudden these";
-	mes "objects emit a bright flash";
-	mes "of light that envelops your";
-	mes "entire body, then you gently";
-	mes "fall into unconsciousness...";
-	close2;
-	set signquest,32;
-	delitem 7013,365;
-	delitem 953,12;
-	delitem 907,4;
+OnEnable:
+	enablenpc "Dark Lord#serin";
+	end;
 
-L_Warp:
-	warp "himinn",49,10;
+Onemo:
+	emotion e_gg;
 	end;
 }
 
-himinn,48,86,5	script	Valkyrie#2	811,{
-
-	if(signquest == 58) goto L_Done;
-	if(signquest > 51) goto L_Gods;
-	if(signquest > 50) goto L_Help;
-	if(signquest > 32) goto L_Duty;
-	mes "[Valkyrie Sandra]";
-	mes "Welcome, " + strcharinfo(0) + " ,";
-	mes "to this realm of holiness.";
-	mes "You have endured great difficulty";
-	mes "and tested your courage to obtain";
-	mes "the Sobbing Starlight, which will";
-	mes "be the certificate for your test.";
-	next;
-	menu "Test...?",-;
-	mes "[Valkyrie Sandra]";
-	mes "The gods have decided that";
-	mes "you are worthy of undergoing";
-	mes "a special test that will judge";
-	mes "your merits. If you are a true";
-	mes "hero who is pure of heart,";
-	mes "you will certainly succeed...";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "Now, there is a critical";
-	mes "situation in the ^FF0000realm where";
-	mes "the fallen warriors dwell^000000. The";
-	mes "gods wish for you to restore the";
-	mes "balance by quelling a specific";
-	mes "evil influence in that place.";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "There will be many obstacles.";
-	mes "First, the fallen, who will target";
-	mes "their anger and hatred towards";
-	mes "you. Where they have failed to";
-	mes "enter Valhalla, you have a rare";
-	mes "and wondrous opportunity.";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "Secondly, and more";
-	mes "importantly, you must find";
-	mes "this evil influence on your";
-	mes "own. This will judge your";
-	mes "ability to discern good from";
-	mes "evil. Do not trust appearances...";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "This is your task.";
-	mes "I can't tell you more.";
-	mes "It is now your duty to";
-	mes "travel there and ferret";
-	mes "out true darkness from";
-	mes "one of the hearts there...";
-	if(signquest==32)set signquest,33;
-	close2;
-	warp "geffen",120,100;
+que_sign01,196,39,4	script	Serin#serin	90,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 132) {
+		mes "[Serin]";
+		mes "....?";
+		close;
+	}
+	else if (sign_q == 132) {
+		mes "[Serin]";
+		mes "As its magic power grows,";
+		mes "the Magic Circle is nearing completion. The symbol which I've asked you for is the last material needed for summoning Dark Lord.";
+		next;
+		mes "[Serin]";
+		mes "However, the power of that";
+		mes "symbol can be used to complete";
+		mes "the Magic Circle or destroy it.";
+		mes "Would you hand it over to me?";
+		mes "I choose to destroy this...";
+		next;
+		mes "[Serin]";
+		mes "Please...";
+		mes "Let me have the symbol.";
+		next;
+		select("Give Serin the symbol.");
+		mes "[Serin]";
+		mes "This could be";
+		mes "pretty dangerous";
+		mes "so please step back...";
+		delitem 7305,1; //Authority_Of_Nine_World
+		set sign_q,133;
+		donpcevent "Serin#dummy::OnEnable";
+		donpcevent "Serin#dummy::Onstart";
+		donpcevent "Serin#serin::OnDisable";
+		close;
+	}
+	else if (sign_q == 133) {
+		mes "[Serin]";
+		mes "I'm sorry.";
+		mes "But I have to do this";
+		mes "to summon Dark Lord.";
+		next;
+		select("But why...?");
+		mes "[Serin]";
+		mes "It was never the witch";
+		mes "that wanted Dark Lord summoned,";
+		mes "but me. I've always wanted to return to my human form. I'm sick and tired of being bound here in Niflheim!";
+		next;
+		mes "[Serin]";
+		mes "Unfortunately, the symbol";
+		mes "which Lady Hell gave you is";
+		mes "limited to a one time use. Its";
+		mes "power wasn't enough to bring me";
+		mes "back, so summoning Dark Lord is";
+		mes "my last chance.";
+		next;
+		select("But if Dark Lord comes to Rune-Midgard...");
+		mes "[Serin]";
+		mes "Oh, I'm pretty sure of";
+		mes "what will happen if Dark Lord";
+		mes "enters the realm of the living. He'll destroy Rune-Midgard and bring death to thousands and thousands of people.";
+		next;
+		mes "[Serin]";
+		mes "So if I came back to life";
+		mes "and everyone else were dead,";
+		mes "However, by summoning Dark Lord,";
+		mes "you might be thinking it'd be pretty pointless for me to come back. But you know what? I don't care.";
+		next;
+		mes "[Serin]";
+		mes "The living don't appreciate";
+		mes "what they have, so they ought";
+		mes "to be punished. They can all go to Niflheim while I enjoy the warmth of the sun and the fresh outside air.";
+		next;
+		mes "[Serin]";
+		mes "Maybe you might not";
+		mes "pity my situation since you've";
+		mes "never been bound to Niflheim,";
+		mes "but I'm begging you. Don't get";
+		mes "in my way.";
+		next;
+		switch(select("Alright. I'll let you go.:No, you have to be stopped.")) {
+		case 1:
+			mes "[Serin]";
+			mes "Are you really willing";
+			mes "to throw so much away for";
+			mes "my sake? You do understand";
+			mes "that you'll be failing the ordeals set before you by the gods...";
+			next;
+			switch(select("I changed my mind for Rune-Midgard.:I do, and it's alright...")) {
+			case 1:
+				mes "[Serin]";
+				mes "...";
+				mes "I really don't want to fight you,";
+				mes "but I've come too far to give up now. If you insist on interfering, then you leave me no choice...";
+				next;
+				donpcevent "Dark Lord#serin::OnEnable";
+				mes "[Dark Lord]";
+				mes "^330033Insolent mortal!";
+				mes "Do you really think";
+				mes "you have a chance of";
+				mes "stopping me? Hmpf.";
+				mes "Every fool must learn.";
+				mes "Prepare to die!^000000";
+				set sign_q,134;
+				donpcevent "Serin#serin::OnDisable";
+				donpcevent "Dark Lord#serin::OnDisable";
+				donpcevent "CallMonster#serin::Oncall";
+				close;
+			case 2:
+				mes "[Serin]";
+				mes "The least I can";
+				mes "do is send you back";
+				mes "to Rune-Midgard and";
+				mes "ask the Dark Lord to spare";
+				mes "you. Thank you so much...";
+				set sign_q,200;
+				getexp 200000,0;
+				set $@sign_w2,0;
+				donpcevent "Dark Lord#serin::OnDisable";
+				close2;
+				warp "umbala",132,203;
+				end;
+			}
+		case 2:
+			mes "[Serin]";
+			mes "...";
+			mes "I really don't want to fight you,";
+			mes "but I've come too far to give up now. If you insist on interfering, then you leave me no choice...";
+			next;
+			donpcevent "Dark Lord#serin::Onemo";
+			mes "[Dark Lord]";
+			mes "^330033Insolent mortal!";
+			mes "Do you really think";
+			mes "you have a chance of";
+			mes "stopping me? Hmpf.";
+			mes "Every fool must learn.";
+			mes "Prepare to die!^000000";
+			set sign_q,134;
+			donpcevent "Serin#serin::OnDisable";
+			donpcevent "Dark Lord#serin::OnDisable";
+			donpcevent "CallMonster#serin::Oncall";
+			close;
+		}
+	}
+	else if (sign_q == 134) {
+		mes "[Serin]";
+		mes "I see now.";
+		mes "Soon, I'll lose my memories";
+		mes "and remain dead in Niflheim.";
+		mes "Just like all the others. Still,";
+		mes "may I ask you one question?";
+		next;
+		mes "[Serin]";
+		mes "With that symbol, you";
+		mes "could order the dead to do";
+		mes "whatever you want. Why didn't";
+		mes "you use it to command me to quit?";
+		next;
+		mes "[Serin]";
+		mes "...";
+		mes "......";
+		mes "..........";
+		next;
+		mes "[Serin]";
+		mes "I see it now.";
+		mes "The kindness in your eyes";
+		mes "tells me everything. You wanted to give me another chance. But in the end, I managed to destroy the";
+		mes "chance you had given me.";
+		next;
+		mes "[Serin]";
+		mes "Even though I'm nothing but";
+		mes "a spirit now, it was an honor";
+		mes "for me to meet somebody like you. Although I'll lose my memories, I'll try not to forget you.";
+		next;
+		mes "[Serin]";
+		mes "My memories of your";
+		mes "courage and kindness";
+		mes "are more precious to";
+		mes "me than life itself.";
+		next;
+		mes "[Serin]";
+		mes "Farewell, now.";
+		mes "And good luck on";
+		mes "your travels, my friend...";
+		set sign_q,135;
+		close;
+	}
+	else if (sign_q == 135) {
+		mes "^3355FFYou helped the";
+		mes "unconscious Serin";
+		mes "and returned to Niflheim.^000000";
+		close2;
+		set sign_q,136;
+		set $@sign_w2,0;
+		warp "que_sign01",117,137;
+		end;
+	}
+	else if (sign_q == 199) {
+		set .@fail_s1,rand(1,800);
+		set .@fail_s2,rand(1,700);
+		set .@fail_s3,rand(1,600);
+		set .@fail_s4,rand(1,500);
+		set .@fail_s5,rand(1,400);
+		if (countitem(2643) == 1) {
+			if (((sign_sq == 0) && (.@fail_s3 == 356)) || ((sign_sq == 1) && (.@fail_s2 == 356)) || (.@fail_s1 == 356)) {
+				set sign_q,200;
+				mes "[Serin]";
+				mes "Even though you tried";
+				mes "to stop me, I still don't wish";
+				mes "to take your life. I understand";
+				mes "that you've merely trying to";
+				mes "protect your Rune-Midgard.";
+				next;
+				mes "[Serin]";
+				mes "However...";
+				mes "I do not think you";
+				mes "have the courage to";
+				mes "overcome the ordeals ";
+				mes "of the gods. Please don't";
+				mes "come here anymore...";
+				next;
+				mes "[Serin]";
+				mes "Farewell...";
+				close2;
+				set $@sign_w2,0;
+				warp "niflheim",30,156;
+				end;
+			}
+			else {
+				mes "[Serin]";
+				mes "Haven't you";
+				mes "given up yet?";
+				mes "Please don't";
+				mes "try to stop me!";
+				close2;
+				set sign_q,134;
+				donpcevent "Serin#serin::OnDisable";
+				donpcevent "Dark Lord#serin::OnDisable";
+				donpcevent "CallMonster#serin::Oncall";
+				end;
+			}
+		}
+		else {
+			if (((sign_sq == 0) && (.@fail_s5 == 356)) || ((sign_sq == 1) && (.@fail_s4 == 356)) || (.@fail_s3 == 356)) {
+				set sign_q,200;
+				mes "[Serin]";
+				mes "Even though you tried";
+				mes "to stop me, I still don't wish";
+				mes "to take your life. I understand";
+				mes "that you've merely trying to";
+				mes "protect your Rune-Midgard.";
+				next;
+				mes "[Serin]";
+				mes "However...";
+				mes "I do not think you";
+				mes "have the courage to";
+				mes "overcome the ordeals ";
+				mes "of the gods. Please don't";
+				mes "come here anymore...";
+				next;
+				mes "[Serin]";
+				mes "Farewell...";
+				close2;
+				set $@sign_w2,0;
+				warp "niflheim",30,156;
+				end;
+			}
+			else {
+				mes "[Serin]";
+				mes "Haven't you";
+				mes "given up yet?";
+				mes "Please don't";
+				mes "try to stop me!";
+				close2;
+				set sign_q,134;
+				donpcevent "Serin#serin::OnDisable";
+				donpcevent "Dark Lord#serin::OnDisable";
+				donpcevent "CallMonster#serin::Oncall";
+				end;
+			}
+		}
+	}
+	else if (sign_q == 200) {
+		mes "[Serin]";
+		mes "Let me guide";
+		mes "you to where";
+		mes "you belong.";
+		close2;
+		warp "umbala",132,203;
+		end;
+	}
+	else {
+		mes "..........";
+		close;
+	}
 	end;
 
-L_Duty:
-	mes "[Valkyrie Sandra]";
-	mes "I commend your ability";
-	mes "to survive in the realm";
-	mes "of the dead. I imagine it";
-	mes "must be very difficult for";
-	mes "a mortal to endure its cruelty.";
-	close;
-
-L_Help:
-	mes "[Valkyrie Sandra]";
-	mes "Regrettably, I can't really";
-	mes "provide any answers for you.";
-	mes "You must overcome the ordeals";
-	mes "of the gods on your own. All I can";
-	mes "do is offer my guidance and prayer.";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "Remember that the";
-	mes "demonstration of your belief,";
-	mes "rather than the decision to";
-	mes "blindly adhere to faith, is";
-	mes "what the gods want to see.";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "Always step forward";
-	mes "with wisdom and courage.";
-	mes "That is all I can tell you.";
-	set signquest,52;
-	close;
-
-L_Gods:
-	mes "[Valkyrie Sandra]";
-	mes "The gods are watching";
-	mes "you. Prove your courage";
-	mes "and at that moment, you";
-	mes "will earn the honor of being";
-	mes "selected by the gods.";
-	close;
+OnDisable:
+	disablenpc "Serin#serin";
+	end;
 
-L_Done:
-	mes "[Valkyrie Sandra]";
-	mes "Welcome back.";
-	mes "Not only have you passed the trials";
-	mes "that the gods have set for you, you";
-	mes "have tested your courage in the";
-	mes "realm of the dead and protected";
-	mes "Rune-Midgard from attack.";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "I'm pleased to announce that the";
-	mes "gods have been watching you and";
-	mes "decided to invite you to Valhalla.";
-	mes "However, Rune-Midgard still has";
-	mes "great need of you.";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "As a symbol of this promise to";
-	mes "invite you to Valhalla, you shall";
-	mes "be rewarded with 'The Sign' which";
-	mes "will show all others that you are";
-	mes "a great warrior whose courage was";
-	mes "tested by the gods themselves.";
-	next;
-	mes "[Valkyrie Sandra]";
-	mes "Congratulations,";
-	mes "" + strcharinfo(0) + ". Verily,";
-	mes "you are an honorable";
-	mes "hero worthy of praise!";
-	getitem 7314,1;
-	set signquest,59;
-	close;
+OnEnable:
+	enablenpc "Serin#serin";
+	end;
 }
 
-// Niflheim Part & Realm of the Dead
-
-niflheim,102,54,4	script	Mad Man	739,{
-
-	if(signquest > 53) goto L_Queen;
-	if(signlaichin == 4) goto L_Where1;
-	if(signlaichin == 3) goto L_Seal;
-	if(signlaichin == 2) goto L_Direction;
-	if(signlaichin == 1) goto L_Risk;
-	if(signquest == 52) goto L_Help;
-	if(signquest) goto L_Asgard;
-	mes "[Laichin]";
-	mes "What? I look familiar to you?";
-	mes "Eh, you know what they say.";
-	mes "Everyone has a lookalike in the";
-	mes "world somewhere. Am I right";
-	mes "or am I am right?";
-	close;
-
-L_Asgard:
-	mes "[Laichin]";
-	mes "Niflheim ain't such a bad";
-	mes "place to live. Sure, Asgard's";
-	mes "all pretty and stuff, but there's";
-	mes "too many rules. In this place, you";
-	mes "can enjoy a lot more freedom. After";
-	mes "you get used to all the stink.";
-	next;
-	mes "[Laichin]";
-	mes "Did I say 'stink'?";
-	mes "I meant... 'fragrance'.";
-	mes "Alright, so the gods expelled";
-	mes "me, but I really oughtta thank";
-	mes "'em for sending me here!";
-	next;
-	mes "[Laichin]";
-	mes "What's that look for...?";
-	mes "What, you can't believe";
-	mes "that someone like me used";
-	mes "to live in Valhalla? Me neither!";
-	mes "They really made a mistake when";
-	mes "they put me up to live in Asgard!";
-	close;
-
-L_Help:
-	mes "[Laichin]";
-	mes "Angrboda...?";
-	mes "Yeah, yeah!";
-	mes "I remember hearing something";
-	mes "about her when I usedta hang";
-	mes "with the gods up in Asgard.";
-	next;
-	mes "[Laichin]";
-	mes "Yeah, those guys were pretty";
-	mes "gangster about it. I mean, they";
-	mes "took her soul, broke it in four";
-	mes "pieces and stashed them in the";
-	mes "deepest hole in Rune-Midgard.";
-	next;
-	mes "[Laichin]";
-	mes "Sure, she was a giant, but";
-	mes "they were pretty scared of her.";
-	mes "All her children ended up to be";
-	mes "legendary monsters! Well, I'm";
-	mes "not sure if Lady Hell counts.";
-	next;
-	mes "[Laichin]";
-	mes "That's pretty harsh.";
-	mes "I mean, even if you die,";
-	mes "your soul has no place";
-	mes "to rest. Angrboda's soul is";
-	mes "all cut up and stuff!";
-	next;
-	menu "So where are the soul pieces again?",-;
-	mes "[Laichin]";
-	mes "What...? I just said,";
-	mes "the deepest place";
-	mes "underground in Rune-Midgard.";
-	mes "It's a dangerous joint";
-	mes "protected by gangs";
-	mes "of monsters.";
-	next;
-	mes "[Laichin]";
-	mes "Wait, you're tellin' me";
-	mes "that you're gonna find";
-	mes "all of Angrboda's soul?!";
-	mes "You're crazy! If they end up";
-	mes "missing, the gods'll know I was";
-	mes "the one who tipped you off!";
-	set signlaichin,1;
-	next;
-
-L_Risk:
-	mes "[Laichin]";
-	mes "If I was gonna risk my soul,";
-	mes "I'd wanna enjoy the rest of my";
-	mes "afterlife as much as I could";
-	mes "before the gods offed me. Man,";
-	mes "I'd need at least 40.000 Zeny to";
-	mes "even have a decent time...";
-	next;
-	menu "Pay Laichin 40.000 Zeny.",-,"Don't pay Laichin.",L_Pay;
-	if(Zeny < 40000) goto L_NotEnough;
-//Settings for the 4 seals you will have to break
-Seal1:
-	set Sign_Seal1,rand(1,8);
-Seal2:
-	set Sign_Seal2,rand(1,8);
-	if(Sign_Seal2 == Sign_Seal1) goto Seal2;
-Seal3:
-	set Sign_Seal3,rand(1,8);
-	if(Sign_Seal3 == Sign_Seal1 || Sign_Seal3 == Sign_Seal2) goto Seal3;
-Seal4:
-	set Sign_Seal4,rand(1,8);
-	if(Sign_Seal4 == Sign_Seal1 || Sign_Seal4 == Sign_Seal2 || Sign_Seal4 == Sign_Seal3) goto Seal4;
-//End of settings
-	mes "[Laichin]";
-	mes "Now we're talkin'!";
-	mes "You're a true hero!";
-	mes "Right, you gotta go to the";
-	mes "lowest part of Glast Heim to";
-	mes "find Angrboda's soul pieces.";
-	next;
-	mes "[Laichin]";
-	mes "Check out the";
-	set @signseal,1;
-	callfunc "Sign_Seal";
-	set @signseal,2;
-	callfunc "Sign_Seal";
-	set @signseal,3;
-	callfunc "Sign_Seal";
-	set @signseal,4;
-	callfunc "Sign_Seal";
-	mes "" + Sign_Seal1$ + ",";
-	mes "" + Sign_Seal2$ + ",";
-	mes "" + Sign_Seal3$ + " and the";
-	mes "" + Sign_Seal4$ + ".";
-	next;
-	mes "[Laichin]";
-	mes "Her soul pieces are really";
-	mes "well hidden, so you gotta look";
-	mes "around, even if know the";
-	mes "general location, and don't";
-	mes "tell anyone else about these";
-	mes "locations or there'll be trouble.";
-	next;
-	menu "I promise.",-,"What do you mean by big and small?",L_Mean;
-	set Zeny,Zeny - 40000;
-	set signlaichin,2;
-	close;
-
-L_Mean:
-	mes "[Laichin]";
-	mes "What do I mean by";
-	mes "big and small? Hey man,";
-	mes "the answer to that is worth";
-	mes "at least... 20.000 Zeny.";
-	mes "If you wanna know,";
-	mes "cough up the cash!";
-	next;
-
-L_Pay2:
-	menu "Don't pay him.",L_NoPay,"Pay him.",-;
-	if(signlaichin != 2) set Zeny,Zeny - 40000;
-	if(Zeny < 20000) goto L_NotEnough2;
-	mes "[Laichin]";
-	mes "Alright, listen up.";
-	mes "Big, small and very small";
-	mes "mean the distances from the";
-	mes "center of the map. So for big,";
-	mes "I mean look near the border of";
-	mes "the map. Easy, huh?";
-	next;
-	mes "[Laichin]";
-	mes "When I say small, you";
-	mes "gotta look in areas closer";
-	mes "than the borders of the map.";
-	mes "For very small, you gotta";
-	mes "look near the center, got it?";
-	set Zeny,Zeny - 20000;
-	set signquest,53;
-	set brokenseal,1;
-	set signlaichin,3;
-	close;
-
-L_Pay:
-	mes "[Laichin]";
-	mes "Huh...?";
-	mes "Okay pal.";
-	close;
-
-L_NotEnough:
-	mes "[Laichin]";
-	mes "Hey...";
-	mes "This is sooo";
-	mes "not enough money";
-	mes "for me to enjoy myself";
-	mes "if my soul ends up getting";
-	mes "busted by the gods.";
-	close;
-
-L_NoPay:
-	mes "[Laichin]";
-	mes "Fine, fine.";
-	mes "Just don't come";
-	mes "crawling back when";
-	mes "you can't figure out";
-	mes "where the soul pieces are.";
-	if(signlaichin != 2) set Zeny,Zeny - 40000;
-	set signlaichin,2;
-	close;
-
-L_Direction:
-	mes "[Laichin]";
-	mes "Oh yeah, about those";
-	mes "directions I gave you";
-	mes "last time? They work,";
-	mes "but you gotta know what I mean";
-	mes "by 'big' or 'small' whatever";
-	mes "o'clock means. That's right...";
-	next;
-	mes "[Laichin]";
-	mes "Matter of fact, I'll";
-	mes "tell you about it.";
-	mes "Right after you pay me,";
-	mes "oh, I don't know, ^FF000020.000 zeny^000000.";
-	next;
-	goto L_Pay2;
-
-L_NotEnough2:
-	mes "[Laichin]";
-	mes "What is this?";
-	mes "You tryin to wetch";
-	mes "me or somethin'?";
-	set signlaichin,2;
-	close;
-
-L_Seal:
-	mes "[Laichin]";
-	mes "Oh yeah, Uh, I forgot to tell";
-	mes "you that Angrboda's soul pieces are";
-	mes "sealed with the power of the gods.";
-	mes "You can't just smash them open.";
-	next;
-	mes "[Laichin]";
-	mes "...Or maybe you could.";
-	mes "Anyway, it'll be better";
-	mes "if you had a weapon that";
-	mes "was solid, heavy and powerful.";
-	next;
-	mes "[Laichin]";
-	mes "But yeah, think about";
-	mes "what it means to break";
-	mes "a godly seal. Remember there's";
-	mes "^FF0000some kinda rule^000000 that the gods";
-	mes "imposed which you gotta follow";
-	mes "to release Angrboda's soul.";
-	next;
-
-L_Info:
-	mes "[Laichin]";
-	mes "Ah, right. If you wanna";
-	mes "try different weapons for";
-	mes "breaking those seals, make";
-	mes "sure you got 'em in your";
-	mes "inventory and that they're";
-	mes "not equipped, alright?";
-	next;
-	menu "Thanks~",-,"Where am I supposed to go again?",L_Where;
-	mes "[Laichin]";
-	mes "Oh no...";
-	mes "Thank you for all";
-	mes "of this Zeny. Money";
-	mes "might not be able to";
-	mes "buy happiness but it";
-	mes "sure comes real close!";
-	set signlaichin,4;
-	close;
-
-L_Where:
-	mes "[Laichin]";
-	mes "Hey... You gotta go";
-	mes "to the lowest part";
-	mes "of Glast Heim to find all";
-	mes "of Angrboda's soul pieces.";
-	mes "Once you get there...";
-	next;
-
-L_Where1:
-	mes "[Laichin]";
-	mes "Check out the";
-	mes "" + Sign_Seal1$ + ",";
-	mes "" + Sign_Seal2$ + ",";
-	mes "" + Sign_Seal3$ + " and the";
-	mes "" + Sign_Seal4$ + ".";
-	mes "And break those seals";
-	mes "in that order, okay?";
-	next;
-	if(signlaichin == 4) goto L_Info;
-	mes "[Laichin]";
-	mes "Big, small and very small";
-	mes "mean the distances from the";
-	mes "center of the map. So for big,";
-	mes "I mean look near the border of";
-	mes "the map. Easy, huh?";
-	next;
-	mes "[Laichin]";
-	mes "When I say small, you";
-	mes "gotta look in areas closer";
-	mes "than the borders of the map.";
-	mes "For very small, you gotta";
-	mes "look near the center, got it?";
-	set signlaichin,4;
-	close;
+que_sign01,197,195,4	script	Serin#witch	90,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 124) {
+		mes "[Serin]";
+		mes "...";
+		mes "......";
+		emotion e_dots;
+		close;
+	}
+	else if (sign_q == 124) {
+		mes "[Serin]";
+		mes "You're finally here.";
+		mes "That witch has been watching";
+		mes "my every move, so she probably";
+		mes "knows what I'm up to by now...";
+		next;
+		select("Why are you doing this...");
+		mes "[Serin]";
+		mes "You don't understand";
+		mes "the horrific experience";
+		mes "of being bound to Niflheim.";
+		mes "I'm sick of breathing death";
+		mes "and feeding on despair.";
+		mes "I want to live again!";
+		next;
+		select("Is that why you want Dark Lord...?");
+		mes "[Serin]";
+		mes "Unfortunately, the symbol";
+		mes "which Lady Hell gave you is";
+		mes "limited to a one time use. Its";
+		mes "power wasn't enough to bring me";
+		mes "back, so summoning Dark Lord is";
+		mes "my last chance.";
+		next;
+		select("But if Dark Lord comes to Rune-Midgard...");
+		mes "[Serin]";
+		mes "Oh, I'm pretty sure of";
+		mes "what will happen if Dark Lord";
+		mes "enters the realm of the living. He'll destroy Rune-Midgard and bring death to thousands and thousands of people.";
+		next;
+		mes "[Serin]";
+		mes "So if I came back to life";
+		mes "and everyone else were dead,";
+		mes "However, by summoning Dark";
+		mes "Lord, you might be thinking it'd be pretty pointless for me to come back. But I don't care.";
+		next;
+		mes "[Serin]";
+		mes "The living don't appreciate";
+		mes "what they have, so they ought";
+		mes "to be punished. They can all go to Niflheim while I enjoy the warmth of the sun and the fresh outside air. Everyone should die...";
+		next;
+		mes "[Serin]";
+		mes "Maybe you might not";
+		mes "pity my situation since you've";
+		mes "never been bound to Niflheim,";
+		mes "but I'm begging you. Don't get";
+		mes "in my way, "+strcharinfo(0)+".";
+		next;
+		switch(select("I can't let you do this!:Okay, have it your way.")) {
+		case 1:
+			set sign_q,125;
+			close;
+		case 2:
+			mes "[Serin]";
+			mes "Are you really willing";
+			mes "to throw so much away for";
+			mes "my sake? You do understand";
+			mes "that you'll be failing the ordeals set before you by the gods...";
+			next;
+			switch(select("I changed my mind for Rune-Midgard.:I do, and it's alright...")) {
+			case 1:
+				set sign_q,125;
+				close;
+			case 2:
+				mes "[Serin]";
+				mes "The least I can";
+				mes "do is send you back";
+				mes "to Rune-Midgard and";
+				mes "ask the Dark Lord to spare";
+				mes "you. Thank you so much...";
+				set sign_q,200;
+				getexp 200000,0;
+				set $@sign_w1,0;
+				close2;
+				warp "umbala,",132,203;
+				end;
+			}
+		}
+	}
+	else if (sign_q == 125) {
+		if (countitem(2643) ==1) {
+			mes "[Serin]";
+			mes "If you think that";
+			mes "I can't summon Dark Lord";
+			mes "without the symbol, then you're";
+			mes "mistaken. I've been collecting";
+			mes "the power of despair!";
+			next;
+			mes "[Serin]";
+			mes "Do you remember what";
+			mes "happened to the dead that you";
+			mes "helped on my behalf? Even if they seemed to have found shelter at first, they cannot escape my";
+			mes "deep hollow of despair...";
+			next;
+			mes "[Serin]";
+			mes "And that poor little girl,";
+			mes "Alakina Anne? She still";
+			mes "hasn't realized that she's dead!";
+			next;
+			mes "[Serin]";
+			mes "You gave her hope,";
+			mes "but ultimately, you can't";
+			mes "keep your promise to bring her home. Oh, her disappointment";
+			mes "must be so crushing...";
+			next;
+			mes "[Serin]";
+			mes "Yes...";
+			mes "By trying to help,";
+			mes "you gave them nothing";
+			mes "but pain, just as I planned.";
+			mes "Now I have enough despair";
+			mes "to summon Dark Lord!";
+			next;
+			mes "[Serin]";
+			mes "I don't want us to fight,";
+			mes "but I can't let you stop me.";
+			mes "I've already sold my soul to";
+			mes "Dark Lord to become a living";
+			mes "human again so I can't give up";
+			mes "now! We'll have to battle!";
+			close2;
+			set sign_q,126;
+			donpcevent "CallMonster#witch::Oncall";
+			donpcevent "Serin#witch::OnDisable";
+			end;
+		}
+		else {
+			mes "[Serin]";
+			mes "If you think that";
+			mes "I can't summon Dark Lord";
+			mes "without the symbol, then you're";
+			mes "mistaken. I've been collecting";
+			mes "the power of despair!";
+			next;
+			mes "[Serin]";
+			mes "What most adventurers";
+			mes "don't know is that many of the";
+			mes "souls in Niflheim are simply";
+			mes "doomed to suffer. That's the";
+			mes "nature of this realm and one";
+			mes "of the rules of balance...";
+			next;
+			mes "[Serin]";
+			mes "It was child's play to ask";
+			mes "some adventurers to help";
+			mes "these souls. But once they learn that these souls can't be helped,";
+			mes "it's too late! In failing them, the adventurers add to their despair!";
+			next;
+			mes "[Serin]";
+			mes "And by increasing";
+			mes "the despair here, it";
+			mes "also adds to the power I'll";
+			mes "use to summon Dark Lord!";
+			next;
+			mes "[Serin]";
+			mes "I don't want us to fight,";
+			mes "but I can't let you stop me.";
+			mes "I've already sold my soul to";
+			mes "Dark Lord to become a living";
+			mes "human again so I can't give up";
+			mes "now! We'll have to battle!";
+			close2;
+			set sign_q,126;
+			donpcevent "CallMonster#witch::Oncall";
+			donpcevent "Serin#witch::OnDisable";
+			end;
+		}
+	}
+	else if (sign_q == 126) {
+		mes "[Serin]";
+		mes "I see now.";
+		mes "Soon, I'll lose my memories";
+		mes "and remain dead in Niflheim.";
+		mes "Just like all the others. Still,";
+		mes "may I ask you one question?";
+		next;
+		mes "[Serin]";
+		mes "With that symbol, you";
+		mes "could order the dead to do";
+		mes "whatever you want. Why didn't";
+		mes "you use it to command me to quit?";
+		next;
+		mes "[Serin]";
+		mes "...";
+		mes "......";
+		mes "..........";
+		next;
+		mes "[Serin]";
+		mes "I see it now.";
+		mes "The kindness in your eyes";
+		mes "tells me everything. You wanted to give me another chance. But in the end, I managed to destroy the";
+		mes "chance you had given me.";
+		next;
+		mes "[Serin]";
+		mes "Even though I'm nothing but";
+		mes "a spirit now, it was an honor";
+		mes "for me to meet somebody like you. Although I'll lose my memories, I'll try not to forget you.";
+		next;
+		mes "[Serin]";
+		mes "My memories of your";
+		mes "courage and kindness";
+		mes "are more precious to";
+		mes "me than life itself.";
+		next;
+		mes "[Serin]";
+		mes "Farewell, now.";
+		mes "And good luck on";
+		mes "your travels, my friend...";
+		delitem 7308,1; //Witch's_Potion
+		set sign_q,127;
+		close;
+	}
+	else if (sign_q == 127) {
+		mes "^3355FFYou helped the";
+		mes "unconscious Serin";
+		mes "and returned to Niflheim.^000000";
+		close2;
+		set sign_q,128;
+		set $@sign_w1,0;
+		warp "que_sign01",117,137;
+		end;
+	}
+	else if (sign_q == 198) {
+		set .@fail_s1,rand(1,1000);
+		set .@fail_s2,rand(1,900);
+		set .@fail_s3,rand(1,800);
+		set .@fail_s4,rand(1,700);
+		set .@fail_s5,rand(1,600);
+		if (countitem(2643) == 1) {
+			if (((sign_sq == 0) && (.@fail_s3 == 356)) || ((sign_sq == 1) && (.@fail_s2 == 356)) || (.@fail_s1 == 356)) {
+				delitem 7308,1; //Witch's_Potion
+				set sign_q,200;
+				mes "[Serin]";
+				mes "Even though you tried";
+				mes "to stop me, I still don't wish";
+				mes "to take your life. I understand";
+				mes "that you've merely trying to";
+				mes "protect your Rune-Midgard.";
+				next;
+				mes "[Serin]";
+				mes "However...";
+				mes "I do not think you";
+				mes "have the courage to";
+				mes "overcome the ordeals ";
+				mes "of the gods. Please don't";
+				mes "come here anymore...";
+				next;
+				mes "^3355FFSerin took";
+				mes "1 Witch's Tonic";
+				mes "from you.^000000";
+				next;
+				mes "[Serin]";
+				mes "I'm sorry...";
+				mes "But I'm taking";
+				mes "your Witch's Tonic";
+				mes "to help me summon";
+				mes "Dark Lord. Farewell...";
+				close2;
+				set $@sign_w1,0;
+				warp "niflheim",30,156;
+				end;
+			}
+			else {
+				mes "[Serin]";
+				mes "Haven't you";
+				mes "given up yet?";
+				mes "Please don't";
+				mes "try to stop me!";
+				close2;
+				set sign_q,126;
+				donpcevent "Serin#witch::OnDisable";
+				donpcevent "CallMonster#witch::Oncall";
+				end;
+			}
+		}
+		else {
+			if (((sign_sq == 0) && (.@fail_s5 == 356)) || ((sign_sq == 1) && (.@fail_s4 == 356)) || (.@fail_s3 == 356)) {
+				delitem 7308,1; //Witch's_Potion
+				set sign_q,200;
+				mes "[Serin]";
+				mes "Even though you tried";
+				mes "to stop me, I still don't wish";
+				mes "to take your life. I understand";
+				mes "that you've merely trying to";
+				mes "protect your Rune-Midgard.";
+				next;
+				mes "[Serin]";
+				mes "However...";
+				mes "I do not think you";
+				mes "have the courage to";
+				mes "overcome the ordeals ";
+				mes "of the gods. Please don't";
+				mes "come here anymore...";
+				next;
+				mes "^3355FFSerin took";
+				mes "1 Witch's Tonic";
+				mes "from you.^000000";
+				next;
+				mes "[Serin]";
+				mes "I'm sorry...";
+				mes "But I'm taking";
+				mes "your Witch's Tonic";
+				mes "to help me summon";
+				mes "Dark Lord. Farewell...";
+				close2;
+				set $@sign_w1,0;
+				warp "niflheim",30,156;
+				end;
+			}
+			else {
+				mes "[Serin]";
+				mes "Haven't you";
+				mes "given up yet?";
+				mes "Please don't";
+				mes "try to stop me!";
+				close2;
+				set sign_q,126;
+				donpcevent "Serin#witch::OnDisable";
+				donpcevent "CallMonster#witch::Oncall";
+				end;
+			}
+		}
+	}
+	else if (sign_q == 200) {
+		mes "[Serin]";
+		mes "Let me guide";
+		mes "you to where";
+		mes "you belong.";
+		mes ".......";
+		close2;
+		set $@sign_w1,0;
+		warp "umbala",132,203;
+		end;
+	}
+	else {
+		mes "[Serin]";
+		mes ".........";
+		close;
+	}
+	end;
 
-L_Queen:
-	mes "[Laichin]";
-	mes "Dude, Niflheim rocks.";
-	mes "It's like, a million times";
-	mes "better than the boring";
-	mes "old Asgard. Hell yeah!";
-	next;
-	mes "[Laichin]";
-	mes "Eh, I don't even wanna";
-	mes "know if you manage to";
-	mes "find all of Angrboda's soul";
-	mes "pieces, but if you do, don't";
-	mes "go bringin' close to me. If the";
-	mes "gods find out you have 'em...";
-	next;
-	mes "[Laichin]";
-	mes "But for the sake of";
-	mes "argument, let's say you";
-	mes "do happen to get them all.";
-	mes "In that case, you oughta get";
-	mes "Angrboda's soul to the Queen";
-	mes "of Hell right away, alright?";
-	next;
-	mes "[Laichin]";
-	mes "Ooh... But not just any";
-	mes "yahoo can waltz up to her.";
-	mes "The best thing would be to";
-	mes "give it to one of her really";
-	mes "trusted retainers, I guess.";
-	mes "Now, who was he again?";
-	next;
-	mes "[Laichin]";
-	mes "I know he's always in";
-	mes "disguise as some sorta";
-	mes "really ^C9CACBdespressing guy^000000";
-	mes "and I can't remember his";
-	mes "name for the life of me, but";
-	mes "he's around here somewhere...";
-	close;
-}
+OnDisable:
+	disablenpc "Serin#witch";
+	end;
 
-function	script	Sign_Seal	{
-
-    if (@signseal == 1) {
-        if (Sign_Seal1 == 1) set Sign_Seal1$,"big 1 o'clock";
-        if (Sign_Seal1 == 2) set Sign_Seal1$,"big 4 o'clock";
-        if (Sign_Seal1 == 3) set Sign_Seal1$,"big 5 o'clock";
-        if (Sign_Seal1 == 4) set Sign_Seal1$,"small 6 o'clock";
-        if (Sign_Seal1 == 5) set Sign_Seal1$,"big 7 o'clock";
-        if (Sign_Seal1 == 6) set Sign_Seal1$,"very small 11 o'clock";
-        if (Sign_Seal1 == 7) set Sign_Seal1$,"big 11 o'clock";
-        if (Sign_Seal1 == 8) set Sign_Seal1$,"small 11 o'clock";
-    }
-    if (@signseal == 2) {
-        if (Sign_Seal2 == 1) set Sign_Seal2$,"big 1 o'clock";
-        if (Sign_Seal2 == 2) set Sign_Seal2$,"big 4 o'clock";
-        if (Sign_Seal2 == 3) set Sign_Seal2$,"big 5 o'clock";
-        if (Sign_Seal2 == 4) set Sign_Seal2$,"small 6 o'clock";
-        if (Sign_Seal2 == 5) set Sign_Seal2$,"big 7 o'clock";
-        if (Sign_Seal2 == 6) set Sign_Seal2$,"very small 11 o'clock";
-        if (Sign_Seal2 == 7) set Sign_Seal2$,"big 11 o'clock";
-        if (Sign_Seal2 == 8) set Sign_Seal2$,"small 11 o'clock";
-    }
-    if (@signseal == 3) {
-        if (Sign_Seal3 == 1) set Sign_Seal3$,"big 1 o'clock";
-        if (Sign_Seal3 == 2) set Sign_Seal3$,"big 4 o'clock";
-        if (Sign_Seal3 == 3) set Sign_Seal3$,"big 5 o'clock";
-        if (Sign_Seal3 == 4) set Sign_Seal3$,"small 6 o'clock";
-        if (Sign_Seal3 == 5) set Sign_Seal3$,"big 7 o'clock";
-        if (Sign_Seal3 == 6) set Sign_Seal3$,"very small 11 o'clock";
-        if (Sign_Seal3 == 7) set Sign_Seal3$,"big 11 o'clock";
-        if (Sign_Seal3 == 8) set Sign_Seal3$,"small 11 o'clock";
-    }
-    if (@signseal == 4) {
-        if (Sign_Seal4 == 1) set Sign_Seal4$,"big 1 o'clock";
-        if (Sign_Seal4 == 2) set Sign_Seal4$,"big 4 o'clock";
-        if (Sign_Seal4 == 3) set Sign_Seal4$,"big 5 o'clock";
-        if (Sign_Seal4 == 4) set Sign_Seal4$,"small 6 o'clock";
-        if (Sign_Seal4 == 5) set Sign_Seal4$,"big 7 o'clock";
-        if (Sign_Seal4 == 6) set Sign_Seal4$,"very small 11 o'clock";
-        if (Sign_Seal4 == 7) set Sign_Seal4$,"big 11 o'clock";
-        if (Sign_Seal4 == 8) set Sign_Seal4$,"small 11 o'clock";
-    }
-    return;
+OnEnable:
+	enablenpc "Serin#witch";
+	end;
 }
 
-
-niflheim,313,70,3	script	Pleasant-Featured Lady	90,{
-
-    if (signquest > 56) goto L_Souvenir;
-    if (signquest > 55) goto L_NoWord;
-    if (Sign_Branch8A) goto L_Memory;
-    if (Sign_Branch8B) goto L_BranchB;
-    if (signquest > 54 && countitem(7305)) goto L_Give;
-    if (signquest > 50) goto L_Symbol;
-    if (signquest > 49) goto L_Valkyrie;
-    if (signquest > 48) goto L_Info;
-    if (signquest > 47) goto L_Look;
-    if (signquest > 43) goto L_Survive;
-    if (signquest > 42) goto L_Bard;
-    if (signquest == 42) goto L_Thanks;
-    if (signquest > 33) goto L_Help;
-    if (Sign_Branch2B) goto L_Advice;
-    if (signquest > 32) goto L_Sign;
-    mes "[Serin]";
-    mes "I'm sorry,";
-    mes "but you're not";
-    mes "the person I'm";
-    mes "looking for. No...";
-    close;
-
-L_Sign:
-    mes "[Serin]";
-    mes "Kind adventurer...";
-    mes "You're the one I'm looking";
-    mes "for, the one who's been on a";
-    mes "long journey to prove";
-    mes "his courage.";
-    next;
-    mes "[Serin]";
-    mes "Even in the darkness of";
-    mes "Niflheim, I can recognize";
-    mes "you. You shine out to me like";
-    mes "a star! I beg of you, please";
-    mes "listen to my story...";
-    next;
-    menu "I'm busy, sorry.",-,"Sure, go ahead.",L_Listen;
-
-L_Sorry:
-    mes "[Serin]";
-    mes "I know I can't stop";
-    mes "you from pursuing your";
-    mes "path to glory. But if you";
-    mes "should change your mind...!";
-    close;
-
-L_Listen:
-    mes "[Serin]";
-    mes "Thank you...";
-    mes "Now, if you've heard";
-    mes "from the others and as";
-    mes "you can tell by my appearance";
-    mes "I clearly don't belong here.";
-    next;
-    mes "[Serin]";
-    mes "I might not have";
-    mes "the luck to be selected";
-    mes "by Valkyrie, but I need";
-    mes "your help to get out of";
-    mes "here as soon as I can~";
-    next;
-    menu "Er, I'm busy, now that I think about it.",L_Sorry,"Sure, let's do it.",-;
-    mes "[Serin]";
-    mes "I know I'm asking too much";
-    mes "of you, but if you'd also help";
-    mes "the other infortunate souls in";
-    mes "this place, I'd be truly grateful.";
-    mes "Somehow, I think solving their";
-    mes "problems will help me get back.";
-    next;
-    menu "Sure, why not?",-,"Why should I help them?",L_Why;
-    mes "[Serin]";
-    mes "I knew you'd understand!";
-    mes "You really are a kind person .";
-    mes "Now, in order to help the other";
-    mes "misfortunate in Niflheim, you've";
-    mes "got to remember to gain their trust";
-    mes "first and get close to them, okay?";
-    set signquest,34;
-    close;
-
-L_Help:
-    mes "[Serin]";
-    mes "Hmm...?";
-    mes "You don't know which";
-    mes "people you need to help";
-    mes "here in Niflheim? Mmm,";
-    mes "let me think about it...";
-    next;
-    mes "[Serin]";
-    mes "In this doomed place";
-    mes "there isn't too much trust";
-    mes "amongst some of the people";
-    mes "here, but some will share their";
-    mes "problems if you ^5131FFapproach them";
-    mes "closely, face to face.^000000 Okay?";
-    next;
-    mes "[Serin]";
-    mes "In this way, if they talk";
-    mes "to you first, they might";
-    mes "be more willing to accept";
-    mes "help or tell you what you";
-    mes "really need to know.";
-    mes "I hope this helps...";
-    close;
-
-L_Thanks:
-    mes "[Serin]";
-    mes "Thank you so much for";
-    mes "your help. This is all I have,";
-    mes "and it means a lot to me, but";
-    mes "I want you to have this ring. It's";
-    mes "the only way I can properly express";
-    mes "my gratitude for your aid so far.";
-    getitem 2642,1;
-    set signquest,43;
-    close;
-
-L_Bard:
-    mes "[Serin]";
-    mes "There's a Bard in";
-    mes "Niflheim with a very";
-    mes "sweet, yet melancholy voice.";
-    mes "He sings for strangers just";
-    mes "like you, adventurer.";
-    next;
-    mes "[Serin]";
-    mes "I think he might know";
-    mes "some useful information,";
-    mes "so it might be a good";
-    mes "idea to speak with him.";
-    set signquest,44;
-    close;
-
-L_Survive:
-    mes "[Serin]";
-    mes "Hello, " + strcharinfo(0) + ",";
-    mes "I'm surprised that";
-    mes "you've managed to survive";
-    mes "here all this time. It's no small";
-    mes "feat for a mortal to be able to";
-    mes "remain alive in Niflheim...";
-    close;
-
-L_Look:
-    mes "[Serin]";
-    mes "Ah, " + strcharinfo(0) + "~";
-    mes "How is everything?";
-    mes "Once again, I want to";
-    mes "thank you for helping the";
-    mes "poor souls in this place.";
-    next;
-    mes "[Serin]";
-    mes "Hmm...?";
-    mes "What's with that";
-    mes "look on your face?";
-    mes "Do you have something";
-    mes "you want to ask me?";
-    next;
-    menu "Nothing.",-,"About the Queen of the Dead...",L_Queen;
-    mes "[Serin]";
-    mes "Well, if you ever";
-    mes "need my help, please";
-    mes "don't hesitate to ask.";
-    close;
-
-L_Queen:
-    mes "[Serin]";
-    mes "The Queen of the Dead?";
-    mes "Well, she's the ruler of Niflheim.";
-    mes "As Loki and Angrboda's last child";
-    mes "she was given complete control of";
-    mes "this realm by Odin.";
-    next;
-    mes "[Serin]";
-    mes "She usually rules from her";
-    mes "castle, Hell, but sometimes she";
-    mes "goes out to tour Niflheim. That's";
-    mes "all I really know about her.";
-    next;
-    menu "About the Symbol of Nine Realms",-;
-    mes "[Serin]";
-    mes "Oh that...?";
-    mes "Sometimes it's called";
-    mes "the Voucher of the Dead";
-    mes "Odin gave it to the Queen";
-    mes "of the Dead to signify her";
-    mes "authority over Niflheim.";
-    next;
-    mes "[Serin]";
-    mes "There are many rumors";
-    mes "floating around about that";
-    mes "and its abilities, but";
-    mes "all we know for sure is that it can";
-    mes "be used to command the dead...";
-    next;
-    menu "About Angrboda",-;
-    mes "[Serin]";
-    mes "Angrboda...?";
-    mes "She's the mother of the";
-    mes "Queen of Hell, as well as";
-    mes "some of the most powerful";
-    mes "monsters in this universe.";
-    next;
-    mes "[Serin]";
-    mes "The gods feared her monstrous";
-    mes "children so much that they bound";
-    mes "them and sealed Angrboda away.";
-    mes "Nothing has been heard";
-    mes "of her since...";
-    next;
-    menu "I was told by the Witch that you're...",-;
-    mes "[Serin]";
-    mes "Oh, the Witch was";
-    mes "talking about me? I'm";
-    mes "aware that she doesn't";
-    mes "think very highly of me.";
-    mes "Then again, it's not like";
-    mes "I can trust her either.";
-    next;
-    mes "[Serin]";
-    mes "Well, it can't be helped.";
-    mes "At least we both agree that";
-    mes "somehow I don't really belong";
-    mes "here in Niflheim.";
-    emotion e_dots;
-    set signquest,49;
-    close;
-
-L_Info:
-    mes "[Serin]";
-    mes "I'm sorry that I sort of";
-    mes "rambling on and on that last";
-    mes "time we spoke. Now that I think";
-    mes "about it, I didn't really give you";
-    mes "any information that might have";
-    mes "been very useful to you.";
-    next;
-    mes "[Serin]";
-    mes "But lately, I've heard that the";
-    mes "Queen of the Dead is seeking her";
-    mes "mother, Angrboda. It's strange that";
-    mes "even the queen, with all her";
-    mes "power, is unable to find her.";
-    next;
-    mes "[Serin]";
-    mes "I have no idea how,";
-    mes "but it seems that Angrboda";
-    mes "have been sealed away in the";
-    mes "world of Rune-Midgard...";
-    emotion e_dots;
-    set signquest,50;
-    close;
-
-L_Valkyrie:
-    mes "[Serin]";
-    mes "I've told you";
-    mes "everything I know.";
-    mes "But if you want to learn more";
-    mes "about Angrboda, you probably need";
-    mes "to talk to someone who actually";
-    mes "communicates with the gods.";
-    next;
-    mes "[Serin]";
-    mes "Perhaps Valkyrie";
-    mes "or someone who actually";
-    mes "lived in Asgard may know";
-    mes "more about where Angrboda";
-    mes "is sealed away.";
-    next;
-    mes "[Serin]";
-    mes "Also, why would you want";
-    mes "the Symbol of the Nine Realms?";
-    mes "It's a very dangerous object that";
-    mes "could cause a lot of trouble if it";
-    mes "fell into the wrong hands...";
-    next;
-    menu "What do you mean?",-,"Don't worry, I won't.",L_Noworry;
-    mes "[Serin]";
-    mes "There are plenty of dead";
-    mes "people in Niflheim that are";
-    mes "driven by regret and despair.";
-    mes "The rage of being dead may result";
-    mes "in some of them performing horrific";
-    mes "deeds if they are the symbol.";
-    next;
-    menu "Then what should I do?",-,"Thanks for the concern, but I'm not worried.",L_Noworry;
-    mes "[Serin]";
-    mes "I really think that you";
-    mes "should bring that symbol";
-    mes "to me before you show it to anybody";
-    mes "else. Then, I want you to know why";
-    mes "I really need its power.";
-    next;
-    mes "[Serin]";
-    mes "I can't explain myself";
-    mes "now, but I want to use the";
-    mes "power of the symbol to do";
-    mes "something really helpful";
-    mes "for you. You'll just need";
-    mes "to trust me on this.";
-    set signquest,51;
-    next;
-
-L_Symbol:
-    mes "[Serin]";
-    mes "If you obtain";
-    mes "the Symbol of Nine Realms,";
-    mes "please bring it to me";
-    mes "right away, " +strcharinfo(0) + ".";
-    close;
-
-L_Noworry:
-    mes "[Serin]";
-    mes "Alright...";
-    mes "It's your decision.";
-    close;
-
-L_Memory:
-    mes "^3355FFThis is only";
-    mes "a lingering trace";
-    mes "of Serin, a manifestation";
-    mes "of her definitive memory.";
-    close;
-
-L_NoWord:
-    mes "[Serin]";
-    mes "...";
-    mes "......";
-    close;
-    
-L_Souvenir:
-	mes "[Serin]";
-	mes "...";
-	mes "......";
-	next;
-	mes "[Serin]";
-	mes "...";
-	mes "......";
-	mes "..........";
-	if (countitem(2643))
-	{
-		next;
-		switch( select( "Give Serin her ring.","Keep the ring." ) )
-		{
+niflheim,313,70,4	script	Pleasant-Featured Lady#s	90,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 82) {
+		mes "[Serin]";
+		mes "I'm sorry,";
+		mes "but you're not";
+		mes "the person I'm";
+		mes "looking for. No...";
+		close;
+	}
+	else if (sign_q == 82) {
+		mes "[Serin]";
+		mes "Kind adventurer...";
+		mes "You're the one I'm looking";
+		mes "for, the one who's been on";
+		mes "a long journey to prove";
+		if (Sex == 1) {
+			mes "his courage.";
+		}
+		else {
+			mes "her courage.";
+		}
+		next;
+		mes "[Serin]";
+		mes "Even in the darkness of";
+		mes "Niflheim, I can recognize";
+		mes "you. You shine out to me like";
+		mes "a star! I beg of you, please";
+		mes "listen to my story...";
+		next;
+		switch(select("I'm busy, sorry.:Sure, go ahead.")) {
+		case 1:
+			mes "[Serin]";
+			mes "I know I can't stop";
+			mes "you from pursing your";
+			mes "path to glory. But if you";
+			mes "should change your mind...!";
+			close;
+		case 2:
+			mes "[Serin]";
+			mes "Thank you...";
+			mes "Now, if you've heard";
+			mes "from the others and as";
+			mes "you can tell by my appearance,";
+			mes "I clearly don't belong here.";
+			next;
+			mes "[Serin]";
+			mes "I might not have";
+			mes "the luck to be selected";
+			mes "by Valkyrie, but I need";
+			mes "your help to get out of";
+			mes "here as soon as I can~";
+			next;
+			switch(select("Er, I'm busy, now that I think about it.:Sure, let's do it.")) {
+			case 1:
+				mes "[Serin]";
+				mes "I know I can't stop";
+				mes "you from pursing your";
+				mes "path to glory. But if you";
+				mes "should change your mind...!";
+				close;
+			case 2:
+				mes "[Serin]";
+				mes "I know I'm asking too much";
+				mes "of you, but if you'd also help";
+				mes "the other unfortunate souls in";
+				mes "this place, I'd be truly grateful. Somehow, I think solving their problems will help me get back.";
+				next;
+				switch(select("Sure, why not?:Why should I help them?")) {
+				case 1:
+					mes "[Serin]";
+					mes "I knew you'd understand!";
+					mes "You really are a kind person.";
+					mes "Now, in order to help the other";
+					mes "misfortunate in Niflheim, you've got to remember to gain their trust first and get close to them, okay?";
+					set sign_q,83;
+					close;
+				case 2:
+					mes "[Serin]";
+					mes "I... I understand.";
+					mes "Although I asked too much in asking you to help the other people here, I was hoping you'd realize that";
+					mes "would be the best way to learn clues for a way to escape for now.";
+					set sign_q,84;
+					close;
+				}
+			}
+		}
+	}
+	else if (sign_q == 83) {
+		if (sign_sq < 8) {
+			mes "[Serin]";
+			mes "Hmm...?";
+			mes "You don't know which";
+			mes "people you need to help";
+			mes "here in Niflheim? Mmm,";
+			mes "let me think about it...";
+			next;
+			mes "[Serin]";
+			mes "In this doomed place,";
+			mes "there isn't too much trust";
+			mes "amongst some of the people";
+			mes "here, but some will share their";
+			mes "problems if you ^3355FFapproach them";
+			mes "closely^000000, ^3355FFface to face^000000. Okay?";
+			next;
+			mes "[Serin]";
+			mes "In this way, if they talk";
+			mes "to you first, they might";
+			mes "be more willing to accept";
+			mes "help or tell you what you";
+			mes "really need to know.";
+			mes "I hope this helps...";
+			close;
+		}
+		else if (sign_sq == 8) {
+			mes "[Serin]";
+			mes "Thank you so much for";
+			mes "your help. This is all I have,";
+			mes "and it means a lot to me, but";
+			mes "I want you to have this ring. It's the only way I can properly express my gratitude for your aid so far.";
+			set sign_q,85;
+			set sign_sq,0;
+			getitem 2642,1; //Serin's_Gold_Ring
+			close;
+		}
+		else {
+			mes "[Serin]";
+			mes "To the dead,";
+			mes "living people";
+			mes "are either good";
+			mes "prey or good marks.";
+			close;
+		}
+	}
+	else if (sign_q == 84) {
+		mes "[Serin]";
+		mes "Hello, adventurer.";
+		mes "How have you been doing?";
+		mes "I'm surprised to still see you";
+		mes "around this dangerous town.";
+		next;
+		mes "[Serin]";
+		mes "If you wander around";
+		mes "Niflheim, you'll find that";
+		mes "some of the deceased here are";
+		mes "different than most of the others in this town. Please talk to them and see if you can be of any help.";
+		set sign_q,87;
+		close;
+	}
+	else if (sign_q == 85) {
+		mes "[Serin]";
+		mes "There's a Bard in";
+		mes "Niflheim with a very";
+		mes "sweet, yet melancholy voice.";
+		mes "He sings for strangers just";
+		mes "like you, adventurer.";
+		next;
+		mes "[Serin]";
+		mes "I think he might know";
+		mes "some useful information,";
+		mes "so it might be a good";
+		mes "idea to speak with him.";
+		set sign_q,86;
+		close;
+	}
+	else if (sign_q < 92) {
+		mes "[Serin]";
+		mes "Hello, "+strcharinfo(0)+",";
+		mes "I'm surprised that";
+		mes "you've managed to survive";
+		mes "here all this time. It's no small feat for a mortal to be able to remain alive in Niflheim...";
+		close;
+	}
+	else if (sign_q == 92) {
+		if (countitem(2642) > 0) {
+			mes "[Serin]";
+			mes "Ah, "+strcharinfo(0)+"~";
+			mes "How is everything?";
+			mes "Once again, I want to";
+			mes "thank you for helping the";
+			mes "poor souls in this place.";
+			next;
+			mes "[Serin]";
+			mes "Hmm...?";
+			mes "What's with that";
+			mes "look on your face?";
+			mes "Do you have something";
+			mes "you want to ask me?";
+			next;
+		}
+		else {
+			mes "[Serin]";
+			mes "Ah, "+strcharinfo(0)+"~";
+			mes "How is everything?";
+			next;
+			mes "[Serin]";
+			mes "Hmm...?";
+			mes "What's with that";
+			mes "look on your face?";
+			mes "Do you have something";
+			mes "you want to ask me?";
+			next;
+		}
+		switch(select("Nothing.:About the Queen of the Dead...")) {
+		case 1:
+			mes "[Serin]";
+			mes "Well, if you ever";
+			mes "need my help, please";
+			mes "don't hesitate to ask.";
+			close;
+		case 2:
+			mes "[Serin]";
+			mes "The Queen of the Dead?";
+			mes "Why, she's the ruler of Niflheim.";
+			mes "As Loki and Angrboda's last child, she was given complete control of this realm by Odin.";
+			next;
+			mes "[Serin]";
+			mes "She usually rules from her";
+			mes "castle, Hell, but sometimes she goes out to tour Niflheim. That's all I really know about her.";
+			next;
+			select("About the Symbol of Nine Realms");
+			mes "[Serin]";
+			mes "Oh that...?";
+			mes "Sometimes it's called";
+			mes "the Voucher of the Dead.";
+			mes "Odin gave it to the Queen";
+			mes "of the Dead to signify her";
+			mes "authority over Niflheim.";
+			next;
+			mes "[Serin]";
+			mes "There are many rumors";
+			mes "floating around about that";
+			mes "symbol and its abilities, but";
+			mes "all we know for sure is that it can be used to command the dead...";
+			next;
+			select("About Angrboda");
+			mes "[Serin]";
+			mes "Angrboda...?";
+			mes "She's the mother of the";
+			mes "Queen of Hell, as well as";
+			mes "some of the most powerful";
+			mes "monsters in this universe.";
+			next;
+			mes "[Serin]";
+			mes "The gods feared her monstrous";
+			mes "children so much that they bound";
+			mes "them and sealed Angrboda away.";
+			mes "Nothing has been heard";
+			mes "of her since...";
+			next;
+			select("I was told by the Witch that you're...");
+			mes "[Serin]";
+			mes "Oh, the Witch was";
+			mes "talking about me? I'm";
+			mes "aware that she doesn't";
+			mes "think very highly of me.";
+			mes "Then again, it's not like";
+			mes "I can trust her either.";
+			next;
+			mes "[Serin]";
+			mes "Well, it can't be helped.";
+			mes "At least we both agree that";
+			mes "somehow I don't really belong";
+			mes "here in Niflheim.";
+			emotion e_dots;
+			set sign_q,93;
+			close;
+		}
+	}
+	else if (sign_q == 93) {
+		mes "[Serin]";
+		mes "I'm sorry that I sort of";
+		mes "rambled on and on that last";
+		mes "time we spoke. Now that I think";
+		mes "about it, I didn't really give you any information that might have been very useful to you.";
+		next;
+		mes "[Serin]";
+		mes "But lately I've heard that the";
+		mes "Queen of the Dead is seeking her";
+		mes "mother, Angrboda. It's strange that even the queen, with all of her";
+		mes "power, is unable to find her.";
+		next;
+		mes "[Serin]";
+		mes "I have no idea how,";
+		mes "but it seems like Angrboda";
+		mes "has been sealed away in the";
+		mes "world of Rune-Midgard...";
+		emotion e_dots;
+		set sign_q,94;
+		close;
+	}
+	else if (sign_q == 94) {
+		mes "[Serin]";
+		mes "I've told you";
+		mes "everything I know.";
+		mes "But if you want to learn more";
+		mes "about Angrboda, you probably need to talk to someone who actually communicates with the gods.";
+		next;
+		mes "[Serin]";
+		mes "Perhaps Valkyrie";
+		mes "or someone who actually";
+		mes "lived in Asgard may know";
+		mes "more about where Angrboda";
+		mes "is sealed away.";
+		next;
+		mes "[Serin]";
+		mes "Also, why would you want";
+		mes "the Symbol of the Nine Realms?";
+		mes "It's a very dangerous object that could cause a lot of trouble if it fell into the wrong hands...";
+		next;
+		switch(select("What do you mean??:Don't worry, it won't.")) {
+		case 1:
+			mes "[Serin]";
+			mes "There are plenty of dead";
+			mes "people in Niflheim that are";
+			mes "driven by regret and despair.";
+			mes "The rage of being dead may result in some of them performing horrific deeds if they had the symbol.";
+			next;
+			switch(select("Then what should I do?:Thanks for the concern, but I'm not worried.")) {
+			case 1:
+				mes "[Serin]";
+				mes "I really think that you";
+				mes "should bring that symbol";
+				mes "to me before you show it to anybody else. Then, I want you to know why I really need its power.";
+				next;
+				mes "[Serin]";
+				mes "I can't explain myself";
+				mes "now, but I want to use the";
+				mes "power of the symbol to do";
+				mes "something really helpful";
+				mes "for you. You'll just need";
+				mes "to trust me on this.";
+				next;
+				select("I'll think about it.");
+				mes "[Serin]";
+				mes "Then I will";
+				mes "wait for you here.";
+				set sign_q,95;
+				close;
+			case 2:
+				mes "[Serin]";
+				mes "Alright...";
+				mes "It's your decision.";
+				set sign_q,95;
+				close;
+			}
+		case 2:
+			mes "[Serin]";
+			mes "Ah...";
+			mes "Alright, I suppose";
+			mes "that if you're worthy";
+			mes "of obtaining the symbol,";
+			mes "you should also be able";
+			mes "to protect it from abuse.";
+			set sign_q,95;
+			close;
+		}
+	}
+	else if (sign_q < 118) {
+		mes "[Serin]";
+		mes "If you obtain the";
+		mes "Symbol of Nine Realms,";
+		mes "please bring it to me";
+		mes "right away, "+strcharinfo(0)+".";
+		close;
+	}
+	else if (sign_q == 118) {
+		mes "[Serin]";
+		mes "Yes...";
+		mes "This is the Symbol of the";
+		mes "Nine Realms. It only has enough";
+		mes "power for one use, but it's still not easy to get this. Now, what were you planning to use this for?";
+		next;
+		select("Tell her your story.");
+		mes "[Serin]";
+		mes "Ah, so you're here";
+		mes "in Niflheim to overcome";
+		mes "the ordeals of the gods and";
+		mes "prove your courage to Valkyrie.";
+		next;
+		mes "[Serin]";
+		mes "So wait...";
+		mes "You've obtained that symbol";
+		mes "just for that witch? This may";
+		mes "seem rude, but I want to tell";
+		mes "you exactly how I feel about her.";
+		next;
+		mes "[Serin]";
+		mes "Isn't it suspicious that she";
+		mes "hasn't explained her intentions to you? The Symbol of Nine Realms";
+		mes "is one of the most powerful objects in Niflheim. Whatever she's planning has to be large scale.";
+		next;
+		mes "[Serin]";
+		mes "Then, there's that Metz Brayde.";
+		mes "Do you really believe that after he completes his research, he'll just give it back to you? You can't just trust someone to hold an object of enormous power and give it back!";
+		next;
+		switch(select("W-what should I do?:I can't believe this!")) {
+		case 1:
+			mes "[Serin]";
+			mes "Well, I can't really tell";
+			mes "you what to do, but I don't think it's a good idea to let that witch have the Symbol of Nine Realms. There's no telling what she'll";
+			mes "use its power for.";
+			next;
+			mes "[Serin]";
+			mes "Actually...";
+			mes "There is this rumor";
+			mes "going around, but I don't";
+			mes "know if you want to hear it...";
+			set sign_q,131;
+			close;
+		case 2:
+			mes "[Serin]";
+			mes "I'm sorry if you were offended.";
+			mes "I know I can't really convince you to believe anything, but please understand that I just don't want anyone to take advantage of you. Forgive my rudeness.";
+			close;
+		}
+	}
+	else if (sign_q < 129) {
+		mes "^3355FFThis is only";
+		mes "a lingering trace";
+		mes "of Serin, a manifestation";
+		mes "of her definitive memory.^000000";
+		close;
+	}
+	else if (sign_q == 129) {
+		mes "[Serin]";
+		mes "...";
+		mes "......";
+		next;
+		mes "[Serin]";
+		mes "...";
+		mes "......";
+		mes "..........";
+		if (countitem(2643) == 1) {
+			next;
+			switch(select("Give Serin her ring.:Keep the ring.")) {
 			case 1:
 				mes "[Serin]";
 				mes "...";
@@ -6910,2524 +10129,4835 @@ L_Souvenir:
 				mes "to forget her sadness. The tears streaked across her cheeks and";
 				mes "the faint smile on her lips tell you that her memories of you";
 				mes "will always remain in her heart.^000000";
-				delitem 2643,1;
+				delitem 2643,1; //Serin's_Gold_Ring_
 				getexp 500000,0;
 				close;
-
 			case 2:
-				emotion e_sob,0;
+				emotion e_sob;
 				close;
+			}
+		}
+		else {
+			emotion e_sob;
+			close;
 		}
 	}
-	else
-	{
-		emotion e_sob,0;
+	else if (sign_q == 130) {
+		mes "[Serin]";
+		mes "...........";
+		emotion e_sob;
+		next;
+		mes "[Serin]";
+		mes "...........";
+		emotion e_dots;
+		next;
+		mes "[Serin]";
+		mes "...........";
+		emotion e_dots;
+		next;
+		mes "[Serin]";
+		mes "...........";
+		emotion e_sob;
 		close;
 	}
-
-L_Give:
-	mes "[Serin]";
-	mes "Yes...";
-	mes "This is the Symbol of the";
-	mes "Nine Realms. It only has enough";
-	mes "power for one use, but it's still not easy to get this. Now, what were you planning to use this for?";
-	next;
-	select( "Tell her your story." );
-	mes "[Serin]";
-	mes "Ah, so you're here";
-	mes "in Niflheim to overcome";
-	mes "the ordeals of the gods and";
-	mes "prove your courage to Valkyrie.";
-	next;
-	mes "[Serin]";
-	mes "So wait...";
-	mes "You've obtained that symbol";
-	mes "just for that witch? This may";
-	mes "seem rude, but I want to tell";
-	mes "you exactly how I feel about her.";
-	next;
-	mes "[Serin]";
-	mes "Isn't it suspicious that she";
-	mes "hasn't explained her intentions to you? The Symbol of Nine Realms";
-	mes "is one of the most powerful objects in Niflheim. Whatever she's planning has to be large scale.";
-	next;
-	mes "[Serin]";
-	mes "Then, there's that Metz Brayde.";
-	mes "Do you really believe that after he completes his research, he'll just give it back to you? You can't just trust someone to hold an object of enormous power and give it back!";
-	next;
-	switch( select( "W-what should I do?","I can't believe this!" ) )
-	{
+	else if (sign_q == 131) {
+		mes "[Serin]";
+		mes "........";
+		next;
+		select("Tell me the rumors about the witch.");
+		next;
+		mes "[Serin]";
+		mes "Well, I've heard that the witch has been hiding deep in Niflheim and will only speak to those who pass her test. Apparently, she's been preparing some sort of ritual";
+		mes "to gain more power...";
+		next;
+		mes "[Serin]";
+		mes "It's almost too horrible";
+		mes "to believe, but I think that";
+		mes "she's preparing the ritual to";
+		mes "summon Dark Lord, ruler of";
+		mes "the Realm of Fiends.";
+		next;
+		select("Dark Lord...?");
+		mes "[Serin]";
+		mes "Well, most people don't";
+		mes "know this, but Dark Lord";
+		mes "comes from the Realm of Fiends.";
+		mes "In his own domain, he's so powerful that even the gods fear his might.";
+		next;
+		mes "[Serin]";
+		mes "Now, sometimes Dark Lord can";
+		mes "enter the world of Rune-Midgard, but only in a manifestation that represents just a small portion";
+		mes "of his full power.";
+		next;
+		mes "[Serin]";
+		mes "You see, it takes too much energy to travel from the Realm of Fiends to Rune-Midgard. And since the life force in Rune-Midgard conflicts with his powers, Dark Lord can't reach your world directly.";
+		next;
+		select("Wouldn't Lady Hell stop him?");
+		mes "[Serin]";
+		mes "Well, Dark Lord only wants";
+		mes "Rune-Midgard, so the Queen of the Dead doesn't feel threatened about her control of Niflheim.";
+		next;
+		mes "[Serin]";
+		mes "In fact, I'm sure she's aware";
+		mes "that Dark Lord will cause thousands of deaths in Rune-Midgard, meaning that there would be thousands more souls for her to rule over. So it's not to her advantage to stop him.";
+		next;
+		select("Then what should we do...?");
+		mes "[Serin]";
+		mes "No matter what the cost,";
+		mes "we've got to stop her from";
+		mes "summoning Dark Lord in order";
+		mes "to protect Rune-Midgard from";
+		mes "total annihiliation.";
+		next;
+		mes "[Serin]";
+		mes "I used to be a pretty";
+		mes "skilled Wizard, so I know";
+		mes "that she needs to draw a really huge magic circle in Niflheim if she wants to summon Dark Lord.";
+		next;
+		select("Can you tell me where?");
+		mes "[Serin]";
+		mes "Well, there are certain rules";
+		mes "and conditions to perform the summoning. There aren't any spaces wide enough in the Valley of Gyoll, and Niflheim's entrance is watched by too many people...";
+		next;
+		mes "[Serin]";
+		mes "Now, if I were to summon";
+		mes "Dark Lord, I would probably";
+		mes "do it somewhere inside town";
+		mes "to avoid attention. Hmmm...";
+		mes "I'll send you there once I figure out where the circle might be.";
+		set sign_q,132;
+		close;
+	}
+	else if (sign_q == 132) {
+		if ($@sign_w2 == 1) {
+			mes "[Serin]";
+			mes "I need to finish";
+			mes "my preparations to send";
+			mes "you to the magic circle,";
+			mes "so I need a little more time...";
+			close;
+		}
+		mes "[Serin]";
+		mes "Alright...";
+		mes "So are you";
+		mes "ready to leave?";
+		next;
+		switch(select("Yes:Not yet")) {
 		case 1:
 			mes "[Serin]";
-			mes "Well, I can't really tell";
-			mes "you what to do, but I don't think it's a good idea to let that witch have the Symbol of Nine Realms. There's no telling what she'll";
-			mes "use its power for.";
+			mes "Okay~";
+			mes "Let's go...";
+			close2;
+			set $@sign_w2,1;
+			warp "que_sign01",199,36;
+			end;
+		case 2:
+			close;
+		}
+	}
+	else if ((sign_q < 135) || (sign_q == 199)) {
+		if ($@sign_w2 == 1) {
+			mes "[Serin]";
+			mes "My preparations";
+			mes "are taking longer";
+			mes "than I thought. Would";
+			mes "you wait a little while?";
+			close;
+		}
+		mes "^3355FFThis is just a lingering";
+		mes "trace of Serin, an impression";
+		mes "of her soul and memories that";
+		mes "you can still sense somehow.^000000";
+		next;
+		switch(select("Follow the trace.:Ignore it.")) {
+		case 1:
+			close2;
+			set sign_q,199;
+			set $@sign_w2,1;
+			warp "que_sign01",199,36;
+			end;
+		case 2:
+			close;
+		}
+	}
+	else if (sign_q < 137) {
+		mes "[Serin]";
+		mes "...";
+		mes "......";
+		mes "W-who...";
+		mes "Who are you?";
+		emotion e_dots;
+		close;
+	}
+	else if (sign_q > 199) {
+		mes "^3355FFThis is just a lingering";
+		mes "trace of Serin, an impression";
+		mes "of her soul and memories that";
+		mes "you can still sense somehow.";
+		mes "What could have happened to her?^000000";
+		if (countitem(2642) > 0) {
 			next;
+			mes "^33555FFSuddenly, Serin's";
+			mes "gold ring sparkled";
+			mes "with a soft glow and";
+			mes "faded away.^000000";
+			delitem 2642,1; //Serin's_Gold_Ring
+			close;
+		}
+		close;
+	}
+	else {
+		if (countitem(2642) > 0) {
 			mes "[Serin]";
-			mes "Actually...";
-			mes "There is this rumor";
-			mes "going around, but I don't";
-			mes "know if you want to hear it...";
+			mes "Thank you...";
+			emotion e_sob;
+			delitem 2642,1; //Serin's_Gold_Ring
 			next;
-			switch( select( "Tell me the rumors about the witch","I don't want to hear." ) )
-			{
-				case 1:
-					mes "[Serin]";
-					mes "Well, I've heard that the witch has been hiding deep in Nifflheim and will only speak to those who pass her test. Apparently, she's been preparing some sort of ritual";
-					mes "to gain more power...";
-					next;
-					mes "[Serin]";
-					mes "It's almost too horrible";
-					mes "to believe, but I think that";
-					mes "she's preparing the ritual to";
-					mes "summon Dark Lord, ruler of";
-					mes "the Realm of Fiends.";
-					next;
-					select( "Dark Lord...?" );
-					mes "[Serin]";
-					mes "Well, most people don't";
-					mes "know this, but Dark Lord";
-					mes "comes from the Realm of Fiends.";
-					mes "In his own domain, he's so powerful";
-					mes "that even the gods fear his might.";
-					next;
-					mes "[Serin]";
-					mes "Now, sometimes Dark Lord can";
-					mes "enter the world of Rune-Midgard, but only in a manifestation that represents just a small portion";
-					mes "of his full power.";
-					next;
-					mes "[Serin]";
-					mes "You see, it takes too much energy to travel from the Realm of Fiends to Rune-Midgard. And since the life force in Rune-Midgard conflicts with his powers, Dark Lord has problems reaching your world directly.";
-					next;
-					select( "Wouldn't Lady Hell stop him?" );
-					mes "[Serin]";
-					mes "Well, Dark Lord only wants";
-					mes "Rune-Midgard, so the Queen of the Dead doesn't feel threatened about her control of Niflheim.";
-					next;
-					mes "[Serin]";
-					mes "In fact, I'm sure she's aware";
-					mes "that Dark Lord will cause thousands of deaths in Rune-Midgard, meaning that there would be thousands more souls for her to rule over. So it's not to her advantage to stop him.";
-					next;
-					select( "Then what should we do...?" );
-					mes "[Serin]";
-					mes "No matter what the cost,";
-					mes "we've got to stop her from";
-					mes "summoning Dark Lord in order";
-					mes "to protect Rune-Midgard from";
-					mes "total annihiliation.";
-					next;
-					mes "[Serin]";
-					mes "I used to be a pretty";
-					mes "skilled Wizard, so I know";
-					mes "that she needs to draw a really huge magic circle in Niflheim if she wants to summon Dark Lord.";
-					next;
-					select( "Can you tell me where?" );
-					mes "[Serin]";
-					mes "Well, there are certain rules";
-					mes "and conditions to perform the summoning. There aren't any spaces wide enough in the Valley of Gyoll, and Nifflheim's entrance is watched by too many people...";
-					next;
-					mes "[Serin]";
-					mes "Now, I were to summon";
-					mes "Dark Lord, I would probably";
-					mes "do it somewhere inside town";
-					mes "to avoid attention. Hmmm...";
-					mes "I'll send you there once I figure out where the circle might be.";
-					set Sign_Branch8B,1;
-					close;
-					
-				case 2:
-					break;
+			mes "^3355FFYou returned";
+			mes "Serin's gold ring.^000000";
+			close;
+		}
+		mes "[Serin]";
+		mes "...";
+		mes "......";
+		emotion e_dots;
+		close;
+	}
+}
+
+que_sign01,122,141,4	script	Witch#s	792,{
+	callfunc "F_UpdateSignVars";
+	if (checkweight(1201,1) == 0) {
+		mes "- Wait a minute !! -";
+		mes "- Currently you're carrying -";
+		mes "- too many items with you. -";
+		mes "- Please try again -";
+		mes "- after you loose some weight. -";
+		close;
+	}
+	if ((countitem(7313) == 1) && ((sign_q != 124) || (sign_q != 125) || (sign_q != 126))) {
+		mes "[Kirkena]";
+		mes "That Witch's Medal...";
+		mes "You must be here to";
+		mes "help your friend take";
+		mes "care of Serin. Are you";
+		mes "ready to go, "+strcharinfo(0)+"?";
+		next;
+		switch(select("Yes.:Not yet...")) {
+		case 1:
+			switch(select("Go directly to Serin:Path Towards Serin")) {
+			case 1:
+				mes "[Kirkena]";
+				mes "Thank you";
+				mes "for your help.";
+				mes "Serin's threat may";
+				mes "be too much for just";
+				mes "one adventurer alone...";
+				close2;
+				warp "que_sign01",195,189;
+				end;
+			case 2:
+				mes "[Kirkena]";
+				mes "Thank you";
+				mes "for your help.";
+				mes "Serin's threat may";
+				mes "be too much for just";
+				mes "one adventurer alone...";
+				close2;
+				warp "que_sign02",35,313;
+				end;
 			}
-			
 		case 2:
-			mes "[Serin]";
-			mes "I'm sorry if you were offended.";
-			mes "I know I can't really convince you to believe anything, but please understand that I just don't want anyone to take advantage of you. Forgive my rudeness.";
+			mes "[Kirkena]";
+			mes "Please hurry...";
+			mes "Time is of the essence...";
 			close;
+		}
+	}
+	if (sign_q == 90) {
+		if (countitem(2642) == 1) {
+			mes "[Kirkena]";
+			mes "That bastard stole";
+			mes "two spell books from me.";
+			mes "You've brought one of them";
+			mes "back, but the other book";
+			mes "is still missing.";
+			next;
+			mes "[Kirkena]";
+			mes "Would you please";
+			mes "retrieve my other";
+			mes "spell book for me,";
+			mes "adventurer?";
+			set sign_sq,0;
+			close;
+		}
+		else {
+			mes "[Kirkena]";
+			mes "Some bastard stole";
+			mes "two of my spell books.";
+			mes "I'd be grateful if you can";
+			mes "find him in Niflheim and";
+			mes "bring my books back to me.";
+			close;
+		}
+	}
+	else if (sign_q == 91) {
+		if (countitem(7304) > 0) {
+			mes "[Kirkena]";
+			mes "Once that fool stole my spell";
+			mes "books, he was cursed after he";
+			mes "cast those spells without my";
+			mes "permission. I'm so relieved to";
+			mes "finally hold these in my";
+			mes "hands again.";
+			next;
+			mes "[Kirkena]";
+			mes "Now mortal...";
+			mes "Why is it that";
+			mes "you've come to see me?";
+			mes "I'm sure that there must";
+			mes "be something you want.";
+			next;
+			select("He asked me to see you for....");
+			mes "[Kirkena]";
+			mes "As I expected,";
+			mes "there is something behind";
+			mes "all of this. Now, you may";
+			mes "know where you are, but";
+			mes "do you understand why";
+			mes "the dead are here?";
+			next;
+			mes "[Kirkena]";
+			mes "This realm is a place";
+			mes "for warriors that have failed";
+			mes "to prove their courage. Keep in";
+			mes "mind that it's not too late for";
+			mes "you to join their ranks.";
+			next;
+			mes "[Kirkena]";
+			mes "The realm of Niflheim";
+			mes "is ruled by the Queen of the";
+			mes "Dead. Sometimes she appears";
+			mes "in her shining armor and makes the rounds. Everyone who sees her is stunned by the image of authority.";
+			next;
+			mes "[Kirkena]";
+			mes "Now...";
+			mes "What I need you to do is";
+			mes "ask the Queen of the Dead";
+			mes "for the Symbol of Nine Realms.";
+			next;
+			select("What is that?");
+			mes "[Kirkena]";
+			mes "The symbol acts as";
+			mes "a voucher of the queen's";
+			mes "authority and represents her";
+			mes "undeniable right to rule over";
+			mes "the dead. But right now, I can't";
+			mes "explain why I need it.";
+			next;
+			mes "[Kirkena]";
+			mes "I'll tell you why I need";
+			mes "it once you bring me the";
+			mes "queen's symbol. Now, please";
+			mes "keep this secret and tell no one that I asked you to bring the symbol to me.";
+			next;
+			select("How am I supposed to get the symbol?");
+			mes "[Kirkena]";
+			mes "Taking the symbol";
+			mes "by force is out of the";
+			mes "question. Not even the gods";
+			mes "would consider battling the";
+			mes "Queen of the Dead.";
+			next;
+			mes "[Kirkena]";
+			mes "You will need to";
+			mes "earn the queen's favor";
+			mes "in order to even have";
+			mes "a chance of obtaining";
+			mes "the Symbol of Nine Realms.";
+			next;
+			mes "[Kirkena]";
+			mes "Now, there is a rumor";
+			mes "that the Queen of the Dead";
+			mes "is searching for her lost mother, Angrboda. Now, if you could find where Angrboda has been";
+			mes "sealed away...";
+			delitem 7304,1; //Witch's_Spell_Book
+			set sign_q,92;
+			close;
+		}
+		else {
+			mes "[Kirkena]";
+			mes "Hmm...?";
+			mes "Why haven't you";
+			mes "brought my books";
+			mes "back to me yet?";
+			emotion e_pif;
+			close;
+		}
+	}
+	else if (sign_q == 92) {
+		if (rand(1,10) < 9) {
+			mes "[Kirkena]";
+			mes "If you need to learn more";
+			mes "about Angrboda, why don't you";
+			mes "just ask around? I'm sure that";
+			mes "everyone is aware that the queen";
+			mes "is searching for her mother.";
+			next;
+			mes "[Kirkena]";
+			mes "Once again, don't let";
+			mes "anyone know that I've asked";
+			mes "you to bring me the Symbol of";
+			mes "the Nine Realms. I especially";
+			mes "don't want Serin to find out.";
+			next;
+			mes "[Kirkena]";
+			mes "If I can help it,";
+			mes "I won't tolerate";
+			mes "Serin's presense here";
+			mes "in Niflheim. If I could";
+			mes "banish her, I'd do it!";
+			close;
+		}
+		else {
+			mes "[Kirkena]";
+			mes "I almost hate";
+			mes "suggesting it, but";
+			mes "I think Serin might";
+			mes "have some information";
+			mes "on Angrboda's whereabouts.";
+			next;
+			mes "[Kirkena]";
+			mes "But remember to be";
+			mes "careful around her.";
+			mes "Something about that";
+			mes "Serin isn't quite right...";
+			close;
+		}
+	}
+	else if (sign_q < 118) {
+		mes "[Kirkena]";
+		mes "It may be almost";
+		mes "impossible to obtain";
+		mes "the Symbol of Nine Realms.";
+		mes "Still, you and I both need it.";
+		next;
+		mes "[Kirkena]";
+		mes "I hope you understand";
+		mes "that the symbol is more";
+		mes "than just a mere voucher.";
+		mes "It actually contains";
+		mes "enormous power...";
+		close;
+	}
+	else if (sign_q == 118) {
+		mes "[Kirkena]";
+		mes "The Symbol of Nine Realms?";
+		mes "How were you able to get that?!";
+		mes "Ah, you must have found the Queen of the Dead's mother, Angrboda, right? Great work~";
+		next;
+		mes "[Kirkena]";
+		mes "Now, if you'll just";
+		mes "hand me the symbol, I'll tell";
+		mes "you what we need to do next.";
+		next;
+		switch(select("Give the symbol.:Don't give the symbol.")) {
+		case 1:
+			mes "[Kirkena]";
+			mes "Listen carefully.";
+			mes "Since you were actually";
+			mes "able to get the symbol, I believe that you're the only person capable of performing this next task.";
+			next;
+			mes "[Kirkena]";
+			mes "We're going to use this";
+			mes "symbol to create something,";
+			mes "but we need one last item.";
+			mes "I need you to find something";
+			mes "imbued with Serin's vibes.";
+			next;
+			mes "[Kirkena]";
+			mes "Serin's already hid herself";
+			mes "deep within Niffleim, but I'm";
+			mes "sure you can find something";
+			mes "if you can find any remaining";
+			mes "trace of her.";
+			delitem 7305,1; //Authority_Of_Nine_World
+			set sign_q,119;
+			close;
+		case 2:
+			mes "[Kirkena]";
+			mes "Huh...?";
+			mes "Don't tell me that";
+			mes "you've taken that wench's";
+			mes "side! Well, I won't take the";
+			mes "symbol against your will, but";
+			mes "you better think this over...";
+			emotion e_dots;
+			close;
+		}
+	}
+	else if (sign_q == 119) {
+		if (countitem(2642) > 0) {
+			mes "[Kirkena]";
+			mes "This is Serin's gold ring?";
+			mes "Excellent, this has been";
+			mes "strongly infused with her";
+			mes "vibes. It's really tough to find something like this that resonates so strongly with its owner.";
+			delitem 2642,1; //Serin's_Gold_Ring
+			set sign_q,120;
+			close;
+		}
+		else {
+			mes "[Kirkena]";
+			mes "Hmm, you don't have";
+			mes "anything related to Serin.";
+			mes "This isn't good. She's hid";
+			mes "herself already and it might";
+			mes "be too late to find any trace of her. I'll have to do something...";
+			set sign_q,121;
+			close;
+		}
+	}
+	else if ((sign_q == 120) || (sign_q == 121)) {
+		mes "[Kirkena]";
+		mes "Now that the potion I'm";
+		mes "making is being processed,";
+		mes "I can finally tell you what";
+		mes "I've been trying to do with";
+		mes "the objects I've asked you";
+		mes "to get for me.";
+		next;
+		mes "[Kirkena]";
+		mes "I didn't explain the";
+		mes "reason I wanted the Symbol";
+		mes "of Nine Realms to prevent Serin";
+		mes "from getting suspicious and forcing you to reveal my plans. You see, Serin isn't fit for Niflheim.";
+		next;
+		mes "[Kirkena]";
+		mes "Although she's in the";
+		mes "world of the dead, Serin";
+		mes "has never accepted death and";
+		mes "has desired to return to life. Of course, that's the natural response for everyone that comes here...";
+		next;
+		mes "[Kirkena]";
+		mes "However, unlike the others";
+		mes "who have despaired, lost";
+		mes "hope and accepted their fate,";
+		mes "Serin has never given up her hope to return to life. With her hope, she retains her beauty and light.";
+		next;
+		mes "[Kirkena]";
+		mes "But she's only denying";
+		mes "the fate she deserves.";
+		mes "What she's trying to do";
+		mes "is wrong and we need to";
+		mes "stop her before it's too late.";
+		next;
+		while(1) {
+			switch(select("What does she want?:What is she going to do?:What should I do?")) {
+			case 1:
+				mes "[Kirkena]";
+				mes "Make no mistake:";
+				mes "Serin wants the Symbol";
+				mes "of the Nine Realms. ";
+				next;
+				mes "[Kirkena]";
+				mes "Now, if she could use it";
+				mes "multiple times, she could just";
+				mes "command the guards of Niflheim";
+				mes "to just let her pass and re-enter the world of the living. But your symbol can be used just once...";
+				next;
+				set .@kir_talk1,1;
+				if ((.@kir_talk1 == 1) && (.@kir_talk2 == 1) && (.@kir_talk3 == 1)) {
+					if (sign_q == 120) {
+						set sign_q,122;
+					}
+					else if (sign_q == 121) {
+						set sign_q,123;
+					}
+				}
+				break;
+			case 2:
+				mes "[Kirkena]";
+				mes "I believe Serin is going to";
+				mes "summon the Dark Lord. Since";
+				mes "she used to be a great wizard,";
+				mes "it's entirely possible. However, she might need the Symbol of the Nine Realms in order to do it.";
+				next;
+				mes "[Kirkena]";
+				mes "Now, you may believe that";
+				mes "Dark Lord can be defeated by";
+				mes "humans, but what you might not";
+				mes "know is that the manifestation of Dark Lord in your world is limited to a fraction of his true power.";
+				next;
+				mes "[Kirkena]";
+				mes "Sometimes Dark Lord can";
+				mes "cross over into Rune-Midgard,";
+				mes "but traveling from his world into";
+				mes "ours takes vast amounts of energy. Also the life force in your world conflicts with his dark powers.";
+				next;
+				mes "[Kirkena]";
+				mes "Now, if Dark Lord were";
+				mes "summoned into Niflheim,";
+				mes "he would have easy access";
+				mes "to Rune-Midgard and the use";
+				mes "of all of his destructive power.";
+				next;
+				mes "[Kirkena]";
+				mes "Serin plans to strike";
+				mes "a deal with Dark Lord:";
+				mes "In exchange for summoning";
+				mes "him to Niflheim, Serin will";
+				mes "be brought back to life.";
+				next;
+				mes "[Kirkena]";
+				mes "Although you've found";
+				mes "favor with Lady Hell, she";
+				mes "will probably not stop Dark";
+				mes "Lord's approach. Dark Lord";
+				mes "only wants Rune-Midgard.";
+				next;
+				mes "[Kirkena]";
+				mes "Now that I think about";
+				mes "it, massive death would";
+				mes "actually increase Lady Hell's";
+				mes "sphere of influence. I don't think she'll help Dark Lord, but she";
+				mes "also won't get in his way.";
+				next;
+				set .@kir_talk2,1;
+				if ((.@kir_talk1 == 1) && (.@kir_talk2 == 1) && (.@kir_talk3 == 1)) {
+					if (sign_q == 120) {
+						set sign_q,122;
+					}
+					else if (sign_q == 121) {
+						set sign_q,123;
+					}
+				}
+				break;
+			case 3:
+				mes "[Kirkena]";
+				mes "I need you to take";
+				mes "this tonic and have";
+				mes "Serin drink it. This";
+				mes "special potion will erase";
+				mes "most of her memories.";
+				next;
+				mes "[Kirkena]";
+				mes "Without her memories,";
+				mes "Serin should also lose";
+				mes "her twisted ambitions.";
+				mes "Now, with the Symbol of Nine Realms, Serin cannot refuse drinking this potion.";
+				next;
+				mes "[Kirkena]";
+				mes "That's why having the";
+				mes "symbol is so crucial.";
+				mes "Serin is clever enough";
+				mes "to avoid drinking this";
+				mes "for quite a while now...";
+				next;
+				set .@kir_talk3,1;
+				if ((.@kir_talk1 == 1) && (.@kir_talk2 == 1) && (.@kir_talk3 == 1)) {
+					if (sign_q == 120) {
+						set sign_q,122;
+					}
+					else if (sign_q == 121) {
+						set sign_q,123;
+					}
+				}
+			}
+			if ((sign_q == 122) || (sign_q == 123)) {
+				close;
+			}
+		}
+		close;
+	}
+	else if ((sign_q == 122) || (sign_q == 123)) {
+		mes "[Kirkena]";
+		mes "The potion is finally";
+		mes "completed. Now, take this";
+		mes "and command Serin to drink it.";
+		next;
+		if (sign_q == 122) {
+			mes "[Kirkena]";
+			mes "Luckily, I was able to";
+			mes "use Serin's gold ring to";
+			mes "trace her location. I'm going";
+			mes "to send you there, so please";
+			mes "do whatever it takes to stop her.";
+			next;
+			mes "[Kirkena]";
+			mes "Please take these with you";
+			mes "as they'll probably be useful";
+			mes "when you deal with her. As for";
+			mes "these vouchers, give them to your allies. They'll send them straight to where Serin is located.";
+			next;
+			mes "[Kirkena]";
+			mes "When you're finished";
+			mes "dealing with Serin, don't";
+			mes "forget to bring back all";
+			mes "of the vouchers I've";
+			mes "given you, alright?";
+			set sign_q,124;
+			getitem 7308,1; //Witch's_Potion
+			getitem 2643,1; //Serin's_Gold_Ring_
+			getitem 7313,5; //Seal_Of_Witch
+			close;
+		}
+		else if (sign_q == 123) {
+			mes "[Kirkena]";
+			mes "I'm not exactly sure";
+			mes "where Serin is hiding,";
+			mes "but I'll send you to her";
+			mes "general location. Do";
+			mes "everything in your";
+			mes "power to stop her.";
+			next;
+			mes "[Kirkena]";
+			mes "Now, I'm lending you";
+			mes "these Witch's Medals. You";
+			mes "may lend these to your allies";
+			mes "to help you deal with Serin.";
+			mes "Remember, if they carry more";
+			mes "than one, they won't work.";
+			next;
+			mes "[Kirkena]";
+			mes "Let your allies know";
+			mes "that they have to take";
+			mes "the secret passge through";
+			mes "the right side of the portrait";
+			mes "on the castle's second floor.";
+			mes "Then, I can send them to Serin. ";
+			next;
+			mes "[Kirkena]";
+			mes "When you're finished";
+			mes "dealing with Serin, don't";
+			mes "forget to bring back all of";
+			mes "the Witch's Medals that";
+			mes "I've lent to you, alright?";
+			set sign_q,124;
+			getitem 7308,1; //Witch's_Potion
+			getitem 7313,5; //Seal_Of_Witch
+			close;
+		}
+	}
+	else if ((sign_q == 124) || (sign_q == 125) || (sign_q == 198)) {
+		if ($@sign_w1 == 1) {
+			mes "[Kirkena]";
+			mes "Please wait";
+			mes "a bit. I'm still";
+			mes "trying to finish";
+			mes "these preparations...";
+			close;
+		}
+		if (countitem(2643) == 1) {
+			mes "[Kirkena]";
+			mes "You're finally";
+			mes "back. We might not";
+			mes "have enough time to";
+			mes "stop her, but we have";
+			mes "to try. Are you ready?";
+			next;
+			switch(select("Yes:No")) {
+			case 1:
+				close2;
+				set $@sign_w1,1;
+				warp "que_sign01",195,189;
+				end;
+			case 2:
+				mes "[Kirkena]";
+				mes "Hurry up, then!";
+				mes "There's no time";
+				mes "to waste!";
+				close;
+			}
+		}
+		else {
+			mes "[Kirkena]";
+			mes "We've got to";
+			mes "stop Serin before";
+			mes "she does something";
+			mes "truly horrible. Are";
+			mes "you ready to go?";
+			next;
+			switch(select("Yes:No")) {
+			case 1:
+				mes "[Kirkena]";
+				mes "Okay then.";
+				mes "Good luck,";
+				mes ""+strcharinfo(0)+"...";
+				close2;
+				warp "que_sign02",35,313;
+				end;
+			case 2:
+				mes "[Kirkena]";
+				mes "Hurry up, then!";
+				mes "There's no time";
+				mes "to waste!";
+				close;
+			}
+		}
+	}
+	else if ((sign_q == 127) || (sign_q == 128)) {
+		if (countitem(2643) == 1) {
+			if (countitem(7313) < 5) {
+				mes "[Kirkena]";
+				mes "Hmmm...?";
+				mes "Where are all the";
+				mes "vouchers I've lent to you?";
+				mes "Please retrieve them all";
+				mes "before coming back to me.";
+				close;
+			}
+			else {
+				mes "[Kirkena]";
+				mes "You've done well.";
+				mes "Without her memories of her";
+				mes "previous life, Serin can remain";
+				mes "here in Niflheim peacefully.";
+				next;
+				mes "[Kirkena]";
+				mes "Although she failed to return to life, I'm sure she is glad to have met you. I think she's also started to learn that life's meaning is not in living alone...";
+				next;
+				mes "[Kirkena]";
+				mes "Once again, thank";
+				mes "you so much for your";
+				mes "help. Once you finish here,";
+				mes "please visit our queen, Lady Hell. I believe she wants to see you for some reason, "+strcharinfo(0)+"...";
+				delitem 7313,5; //Seal_Of_Witch
+				set sign_q,129;
+				getexp 500000,0;
+				close;
+			}
+		}
+		else {
+			if (countitem(7313) < 5) {
+				mes "[Kirkena]";
+				mes "Hmmm...?";
+				mes "Where are all the";
+				mes "vouchers I've lent to you?";
+				mes "Please retrieve them all";
+				mes "before coming back to me.";
+				close;
+			}
+			else {
+				mes "[Kirkena]";
+				mes "You've done well.";
+				mes "Without her memories of her";
+				mes "previous life, Serin can remain";
+				mes "here in Niflheim peacefully.";
+				next;
+				mes "[Kirkena]";
+				mes "Although she failed to return to life, I'm sure she is glad to have met you. I think she's also started to learn that life's meaning is not in living alone...";
+				next;
+				mes "[Kirkena]";
+				mes "Once again, thank";
+				mes "you so much for your";
+				mes "help. Once you finish here,";
+				mes "please visit our queen, Lady Hell. I believe she wants to see you for some reason...";
+				delitem 7313,5; //Seal_Of_Witch
+				set sign_q,130;
+				getexp 300000,0;
+				close;
+			}
+		}
+	}
+	else if ((sign_q == 136) || (sign_q == 135)) {
+		mes "[Kirkena]";
+		mes "I'm so relieved that";
+		mes "my expectations about";
+		mes "you weren't wrong.";
+		next;
+		mes "[Kirkena]";
+		mes "You've done well.";
+		mes "Without her memories of her";
+		mes "previous life, Serin can remain";
+		mes "here in Niflheim peacefully.";
+		next;
+		mes "[Kirkena]";
+		mes "Although she failed to return to life, I'm sure she is glad to have met you. I think she's also started to learn that life's meaning is not in living alone...";
+		next;
+		mes "[Kirkena]";
+		mes "Once again, thank";
+		mes "you so much for your";
+		mes "help. Once you finish here,";
+		mes "please visit our queen, Lady Hell. I believe she wants to see you for some reason...";
+		if (countitem(2643) == 1) {
+			set sign_q,129;
+		}
+		else {
+			set sign_q,130;
+		}
+		getexp 300000,0;
+		close;
+	}
+	else if (sign_q == 200) {
+		mes "[Kirkena]";
+		mes "How could you fail when";
+		mes "the stakes are so high?";
+		mes "Serin almost summoned";
+		mes "the Dark Lord, but luckily,";
+		mes "somebody else stopped";
+		mes "her in the nick of time.";
+		next;
+		mes "[Kirkena]";
+		mes "Fortunately, there are many people who are coming to Niflheim as part of the ordeals set before them by the gods. It looks like you just failed that ordeal, and Valkyrie will choose someone else.";
+		next;
+		mes "[Kirkena]";
+		mes "It's over. You failed.";
+		mes "Still, consider yourself";
+		mes "lucky. Your soul could have";
+		mes "been bound to Niflheim if it";
+		mes "weren't for Serin's wish for";
+		mes "you to remain free.";
+		next;
+		mes "[Kirkena]";
+		mes "You really should thank";
+		mes "her for that. Though, it's";
+		mes "ironic that you failed your";
+		mes "ordeals for her sake...";
+		if (countitem(2642) > 0) {
+			delitem 2642,1; //Serin's_Gold_Ring
+		}
+		if (countitem(7308) > 0) {
+			delitem 7308,1; //Witch's_Potion
+		}
+		set sign_q,201;
+		getexp 200000,0;
+		close;
+	}
+	else if (sign_q > 200) {
+		mes "[Kirkena]";
+		mes "Hmpf.";
+		mes "I don't really";
+		mes "want to talk to";
+		mes "you anymore.";
+		close;
+	}
+	else if ((sign_q > 130) && (sign_q < 136)) {
+		mes "[Kirkena]";
+		mes "You've got to hurry";
+		mes "and stop Serin!";
+		close;
+	}
+	else {
+		mes "[Kirkena]";
+		mes "Hm? Still exploring";
+		mes "Niflheim? Although you're";
+		mes "strong enough to survive,";
+		mes "I still think you're risking";
+		mes "your life by remaining here";
+		mes "when you don't have to.";
+		close;
 	}
-	
-L_Keep:
-    mes "[Serin]";
-    mes "Ok, come back";
-    mes "when you have realized";
-    mes "this is the wisest choice";
-    mes "to make.";
-    close;
-
-L_BranchB:
-    mes "[Serin]";
-    mes "I'll show you the way";
-    mes "to their hope... Are you";
-    mes "ready to come with me?";
-    next;
-    menu "Yes.",-,"No.",L_No;
-    if (($signroom2full > 1) || getareausers("que_sign01",229,77,166,12) > 0) goto L_Full;
-    if(Sign_Branch8B == 3) set Sign_Branch8B,4;
-    mes "[Serin]";
-    mes "Please follow me";
-    mes "......";
-    close2;
-    if (($signroom2full > 1) || getareausers("que_sign01",229,77,166,12) > 0) end;
-    donpcevent "#signserin2::OnSerin";
-    donpcevent "#signserin2::OnCooldown";
-    set $signroom2full,2;
-    warp "que_sign01",191,39;
-    end;
-
-
-L_No:
-    mes "[Serin]";
-    mes "Please hurry, we don't";
-    mes "have any time to lose.";
-    close;
-
-L_Why:
-    mes "[Serin]";
-    mes "Do you really need a";
-    mes "reason ? Well... Maybe";
-    mes "you're right, they don't";
-    mes "deserve to be helped~";
-    next;
-
-L_Advice:
-    mes "[Serin]";
-    mes "I advise you to meet that";
-    mes "depressing person in Niflheim.";
-    mes "He'll probably tell you his story";
-    mes "and you might understand...";
-    mes "Yes... You should meet him.";
-    if (!Sign_Branch2B) set Sign_Branch2B,1;
-    close;
-
-L_Full:
-    mes "[Serin]";
-    mes "Please wait";
-    mes "a bit. I'm still";
-    mes "trying to finish";
-    mes "these preparations.";
-    close;
-
 }
 
-nif_in,156,93,1	script	#signann	139,2,2,{
-
-	if(signquest > 33) goto L_SignAnn;
+nif_in,186,168,1	script	#witch	-1,1,1,{
+OnTouch:
+	callfunc "F_UpdateSignVars";
+	if (sign_q == 83) {
+		if (sign_sq == 2) {
+			if (countitem(7304) > 0) {
+				mes "[Kirkena]";
+				mes "W-what's this?";
+				mes "Why is it that";
+				mes "you have one of";
+				mes "my lost spell books?";
+				next;
+				switch(select("From a cursed soul...")) {
+				case 1:
+					mes "[Kirkena]";
+					mes "Oh. That bastard must have";
+					mes "stolen my spell books and got cursed when he cast the spells without my permission. Still, it's a relief to have my spells back.";
+					next;
+					mes "[Kirkena]";
+					mes "So mortal...";
+					mes "You must be here for";
+					mes "some reason. Speak";
+					mes "your mind.";
+					next;
+					switch(select("Send me back to my world.:There's a lost child here that I want to help...")) {
+					case 1:
+						mes "[Kirkena]";
+						mes "Understood.";
+						mes "Let me send";
+						mes "you back to the";
+						mes "realm of the living";
+						mes "where you belong...";
+						close2;
+						warp "umbala",132,203;
+						end;
+					case 2:
+						mes "[Kirkena]";
+						mes "There's a living child?";
+						mes "Here in Niflheim? That's";
+						mes "most peculiar. Well, let me";
+						mes "give you this. It will send";
+						mes "a living human back to one";
+						mes "of the towns in your realm.";
+						delitem 7304,1; //Witch's_Spell_Book
+						set sign_sq,3;
+						getitem 7309,1; //Wing_Of_Crow
+						close;
+					}
+				}
+			}
+			else {
+				mes "[Kirkena]";
+				mes "A mortal? What are you doing";
+				mes "here? I'm not sure how more";
+				mes "of you are able to get here,";
+				mes "or your reasons for coming,";
+				mes "but this place is dangerous";
+				mes "for the living.";
+				next;
+				mes "[Kirkena]";
+				mes "I'm sending you back";
+				mes "to the realm of the living.";
+				mes "If you can help it, you should";
+				mes "probably avoid coming back";
+				mes "to Niflheim...";
+				close2;
+				warp "umbala",132,203;
+				end;
+			}
+		}
+		else if (sign_sq == 3) {
+			if (countitem(7309) < 1) {
+				mes "[Kirkena]";
+				mes "You lost the wing?";
+				mes "Here, let me give you";
+				mes "my last one. Now, hurry";
+				mes "up and save that lost child!";
+				set sign_sq,4;
+				getitem 7309,1; //Wing_Of_Crow
+				close;
+			}
+			else {
+				mes "[Kirkena]";
+				mes "I just gave you";
+				mes "that wing, right?";
+				mes "Hurry and save that";
+				mes "poor child stuck in";
+				mes "Niflheim!";
+				close;
+			}
+		}
+		else if (sign_sq < 6) {
+			mes "[Kirkena]";
+			mes "Hmm...";
+			mes "If you don't have";
+			mes "anything important to";
+			mes "accomplish in Niflheim,";
+			mes "you should probably return";
+			mes "to the realm of the living...";
+			close;
+		}
+		else if (sign_sq == 6) {
+			mes "[Kirkena]";
+			mes "So did you already";
+			mes "use the wing to save";
+			mes "that poor, lost child?";
+			next;
+			mes "[Kirkena]";
+			mes "What...?!";
+			mes "It didn't work?";
+			mes "That's impossible!";
+			mes "Wait, give me a moment to";
+			mes "think. What could be wrong?";
+			set sign_sq,7;
+			close;
+		}
+		else if (sign_sq == 7) {
+			mes "[Kirkena]";
+			mes "Alright.";
+			mes "Now I understand";
+			mes "why the wing didn't";
+			mes "work for that poor girl...";
+			next;
+			mes "[Kirkena]";
+			mes "She's so young that";
+			mes "she doesn't even know";
+			mes "that she's dead. It's tragic,";
+			mes "but there's no way for her";
+			mes "to get out of here...";
+			set sign_sq,8;
+			close;
+		}
+		else {
+			mes "[Kirkena]";
+			mes "When people don't fully";
+			mes "know the situation that";
+			mes "they're in, they become more";
+			mes "willing to take their chances.";
+			close;
+		}
+	}
+	else if (sign_q < 88) {
+		mes "[Kirkena]";
+		mes "When people don't fully";
+		mes "know the situation that";
+		mes "they're in, they become more";
+		mes "willing to take their chances.";
+		close;
+	}
+	else if (sign_q == 88) {
+		if (countitem(2642) > 0) {
+			mes "[Kirkena]";
+			mes "As I expected,";
+			mes "there is something behind";
+			mes "all of this. Now, you may";
+			mes "know where you are, but";
+			mes "do you understand why";
+			mes "the dead are here?";
+			next;
+			mes "[Kirkena]";
+			mes "This realm is a place";
+			mes "for warriors that have failed";
+			mes "to prove their courage. Keep in";
+			mes "mind that it's not too late for";
+			mes "you to join their ranks.";
+			next;
+			mes "[Kirkena]";
+			mes "The realm of Niflheim";
+			mes "is ruled by the Queen of the";
+			mes "Dead. Sometimes she appears";
+			mes "in her shining armor and makes the rounds. Everyone who sees her is stunned by the image of authority.";
+			next;
+			mes "[Kirkena]";
+			mes "Now...";
+			mes "What I need you to do is";
+			mes "ask the Queen of the Dead";
+			mes "for the Symbol of Nine Realms.";
+			next;
+			select("What is that?");
+			mes "[Kirkena]";
+			mes "The symbol acts as";
+			mes "a voucher of the queen's";
+			mes "authority and represents her";
+			mes "undeniable right to rule over";
+			mes "the dead. But right now, I can't";
+			mes "explain why I need it.";
+			next;
+			mes "[Kirkena]";
+			mes "I'll tell you why I need";
+			mes "it once you bring me the";
+			mes "queen's symbol. Now, please";
+			mes "keep this secret and tell no one that I asked you to bring the symbol to me.";
+			next;
+			switch(select("Alright, I understand.:How am I supposed to get the symbol?")) {
+			case 1:
+				set sign_q,89;
+				close;
+			case 2:
+				mes "[Kirkena]";
+				mes "Taking the symbol";
+				mes "by force is out of the";
+				mes "question. Not even the gods";
+				mes "would consider battling the";
+				mes "Queen of the Dead.";
+				next;
+				mes "[Kirkena]";
+				mes "You will need to";
+				mes "earn the queen's favor";
+				mes "in order to even have";
+				mes "a chance of obtaining";
+				mes "the Symbol of Nine Realms.";
+				next;
+				mes "[Kirkena]";
+				mes "Now, there is a rumor";
+				mes "that the Queen of the Dead";
+				mes "is searching for her lost mother, Angrboda. Now, if you could find where Angrboda has been";
+				mes "sealed away...";
+				next;
+				mes "[Kirkena]";
+				mes "When you need to meet";
+				mes "me from now on, go ahead";
+				mes "and take the ^FF0000secret passage";
+				mes "through the right side of the";
+				mes "portrait on the second floor^000000";
+				mes "of this castle, "+strcharinfo(0)+".";
+				set sign_q,92;
+				next;
+				mes "[Kirkena]";
+				mes "If you use that piano";
+				mes "to find me, I'll probably";
+				mes "mistake you for one of the";
+				mes "humans that need guidance";
+				mes "out of Niflheim. So don't";
+				mes "forget to use that passage.";
+				close;
+			}
+		}
+		else {
+			mes "[Kirkena]";
+			mes "Did you need my help?";
+			mes "I know that I'm one of the few in Niflheim that are sympathetic with mortals, I've got a problem of my own that I need to deal with...";
+			next;
+			switch(select("Never mind, sorry!:What happened...?")) {
+			case 1:
+				mes "[Kirkena]";
+				mes "...";
+				mes "Hrrmmmpf...";
+				emotion e_pif;
+				close;
+			case 2:
+				mes "[Kirkena]";
+				mes "Recently, I've found that";
+				mes "two of my spell books are";
+				mes "missing. They contain some";
+				mes "pretty potent spells that";
+				mes "could cause disaster in";
+				mes "incompetent hands...";
+				next;
+				mes "[Kirkena]";
+				mes "I'm pretty sure they";
+				mes "were stolen, so if you'd";
+				mes "retrieve them for me from";
+				mes "the thief, I'd be truly grateful. Then, I'd have my hands free";
+				mes "to give the help you came for.";
+				next;
+				mes "[Kirkena]";
+				mes "Oh, and next time you come";
+				mes "to see me, go ahead and use";
+				mes "the passage to the right of the portrait on the second floor";
+				mes "of the castle.";
+				set sign_q,90;
+				close;
+			}
+		}
+	}
+	else if (sign_q == 89) {
+		mes "[Kirkena]";
+		mes "...Hm?";
+		mes "Is there";
+		mes "something that";
+		mes "you need to ask me?";
+		next;
+		switch(select("How can I get the symbol?")) {
+		case 1:
+			mes "[Kirkena]";
+			mes "Taking the symbol";
+			mes "by force is out of the";
+			mes "question. Not even the gods";
+			mes "would consider battling the";
+			mes "Queen of the Dead.";
+			next;
+			mes "[Kirkena]";
+			mes "You will need to";
+			mes "earn the queen's favor";
+			mes "in order to even have";
+			mes "a chance of obtaining";
+			mes "the Symbol of Nine Realms.";
+			next;
+			mes "[Kirkena]";
+			mes "Now, there is a rumor";
+			mes "that the Queen of the Dead";
+			mes "is searching for her lost mother, Angrboda. Now, if you could find where Angrboda has been";
+			mes "sealed away...";
+			next;
+			mes "[Kirkena]";
+			mes "When you need to";
+			mes "meet me from now on,";
+			mes "go ahead and take passage";
+			mes "through the right side of the";
+			mes "portrait on the second";
+			mes "floor of this castle.";
+			set sign_q,92;
+			close;
+		}
+	}
 	end;
-
-L_SignAnn:
-	if(signquest == 39) goto L_Sad;
-	if(signquest == 38 && countitem(7309)) goto L_Crow;
-	if(signquest == 36) goto L_Help;
-	if(signquest > 34) goto L_Home;
-	mes "[Alakina Ann]";
-	mes "Where...Where am I...?";
-	mes "I remember I was sleeping";
-	mes "and when I woke up, I was here...";
-	mes "Mommy, have you seen my mommy?";
-	mes "I wanna go home...*Sob*";
-	next;
-	menu "About the witch.",L_Witch,"About the curse.",L_Curse,"Cancel",-;
-	mes "[Alakina Ann]";
-	mes "It's so cold in here...";
-	mes "I'm freezing...";
-	mes "And I wanna go home and";
-	mes "get away from this scary place...";
-	next;
-	mes "[Alakina Ann]";
-	mes "Please... help me.";
-	mes "Could you take me with you...?";
-	close;
-
-L_Witch:
-	mes "[Alakina Ann]";
-	mes "Witch...? I've never seen a witch,";
-	mes "but I've read about them in books.";
-	mes "I'm not sure if they exist or not,";
-	mes "but it would be so horrifying if";
-	mes "they did...";
-	next;
-	mes "[Alakina Ann]";
-	mes "Why is it so cold in here...?";
-	mes "A-aren't you cold, or even scared?";
-	mes "I wanna go home... It's warm over";
-	mes "there. Could you help me get";
-	mes "back... Please...? H-help me...";
-	close;
-
-L_Curse:
-	mes "[Alakina Ann]";
-	mes "A c-curse...?";
-	mes "My grandma says there are lots";
-	mes "of curses in the world. Some of";
-	mes "them, you can tell it's a curse.";
-	mes "But there are other curses that";
-	mes "follow you throughout life...";
-	next;
-	mes "[Alakina Ann]";
-	mes "Grandma says curses can take other";
-	mes "forms... Like if someones's always";
-	mes "mad at you, and won't forgive you,";
-	mes "you can see that as a curse too.";
-	next;
-	mes "[Alakina Ann]";
-	mes "My grandma told me there's only one";
-	mes "spell that can break a strong curse";
-	mes "that you can't lift with";
-	mes "Blessings...";
-	next;
-	mes "[Alakina Ann]";
-	mes "Klaatu...";
-	mes "Verata...";
-	mes "Ne...ni...umm...?";
-	mes "What was the last part?";
-	mes "I-I can't remember";
-	mes "the last part of the spell!";
-	next;
-	mes "[Alakina Ann]";
-	mes "If you repeat the spell in that";
-	mes "order, it will release you from";
-	mes "someone's anger and hate. And if";
-	mes "you do it near a bad spirit, they";
-	mes "might get the curse instead.";
-	next;
-	mes "[Alakina Ann]";
-	mes "Why are you asking me about these";
-	mes "scary kind of things...? I just";
-	mes "wanna go home...";
-	set signquest,35;
-	close;
-
-L_Home:
-	mes "[Alakina Ann]";
-	mes "*Cries*";
-	mes "Where am I?";
-	mes "I... I wanna go home~";
-	emotion e_sob;
-	close;
-
-L_Help:
-	mes "[Alakina Ann]";
-	mes "W-Will you help me get";
-	mes "back home? Please? I miss";
-	mes "my mommy and my daddy and";
-	mes "I don't know how I got here.";
-	mes "*Snif*";
-	next;
-	menu "What can I do?",L_Ok,"You can't go back...",-;
-	mes "[Alakina Ann]";
-	mes "*Snif*";
-	mes "N-no...";
-	mes "I wanna go home...";
-	close;
-
-L_Ok:
-	mes "[Alakina Ann]";
-	mes "I dunno. I-I think a";
-	mes "singing man told me to";
-	mes "go meet a witch but it's";
-	mes "too scary to go outside...";
-	set signquest,37;
-	close;
-
-L_Crow:
-	mes "[Alakina Ann]";
-	mes "I... I can use";
-	mes "this to go back home?";
-	mes "Thank you! Thank you so much!";
-	delitem 7309,1;
-	set signquest,39;
-	close;
-
-L_Sad:
-	mes "[Alakina Ann]";
-	mes "Y-You lied to me!";
-	mes "This wing doesn't do";
-	mes "anything! I-I'm still here";
-	mes "in this scary place! *Cries*";
-	set signquest,40;
-	close;
-
 }
 
-niflheim,350,258,1	script	#signbruce	139,2,2,{
-
-	if(signquest == 35 || Sign_Branch2B == 3) goto L_SignBruce;
-	end;
-
-L_SignBruce:
-	mes "[Ashe Bruce]";
-	mes "I sense you're cursed";
-	mes "by a powerful spell...";
-	mes "Hmm... It's clear what";
-	mes "you must be up to...";
-	next;
-	mes "[Ashe Bruce]";
-	mes "You wish to get";
-	mes "rid of the curse...";
-	mes "By giving it to me!!";
-	next;
-	mes "[Ashe Bruce]";
-	mes "Just because I'm a cursed spirit,";
-	mes "you adventurers think you can just";
-	mes "dump your curses on me?!";
-	emotion e_dots;
-	next;
-	mes "[Ashe Bruce]";
-	mes "I refuse to let";
-	mes "you remain there...";
-	mes "Leave now, or I will";
-	mes "remove you by force...";
-	next;
-	mes "[Ashe Bruce]";
-	mes "...And...";
-	mes "...Whatever you do...";
-	mes "...Do NOT touch my books...";
-	next;
-	menu "Touch the 1st book.",L_Book1,"Touch the 2nd Book.",L_Book2,"Touch the 3rd book",L_Book3,"Okay, I am leaving.",-;
-	mes "[Ashe Bruce]";
-	mes "...";
-	mes ".....";
-	next;
-	mes "[Ashe Bruce]";
-	mes "Well then.";
-	mes "Try not to trip on";
-	mes "your feet in your";
-	mes "rush to leave.";
-	close;
-
-L_Book1:
-	mes "[Ashe Bruce]";
-	mes "...!...";
-	mes "How dare you touch my books";
-	mes "when I specifically said";
-	mes "'Don't touch my books!'";
-	killmonster "niflheim","#signbruce::Onmymob";
-	monster "niflheim",350,258,"Rideword",1478,1,"#signbruce::Onmymob";
-	close;
-
-L_Book2:
-	mes "[Ashe Bruce]";
-	mes "I said don't touch my booksssahhh...";
-	mes "Get lost....";
-	mes "Don't disrupt my restingggaaahh!!";
-	close2;
-	warp "niflheim",34,162;
-	end;
-
-L_Book3:
-	set @signbruce,0;
-	mes "[Ashe Bruce]";
-	mes "Muhahahaha...";
-	mes "Stubborn mortal~!";
-	mes "Fine! I will give you";
-	mes "a fighting chance and let";
-	mes "you cast a spell!";
-	next;
-L_Spell1:
-	menu "Clover",L_Spell2,"Klaatu",-,"Kleitos",L_Spell2;
-	set @signbruce,@signbruce + 1;
-
-L_Spell2:
-	menu "Verit",L_Spell3,"Veritas",L_Spell3,"Verata",-;
-	set @signbruce,@signbruce + 1;
-
-L_Spell3:
-	menu "Necktie",L_Check,"Necklace",L_Check,"Nero",L_Check,"^FFFFFFNictu^000000",-;
-	set @signbruce,@signbruce + 1;
-
-L_Check:
-	if (@signbruce == 3) goto L_Success;
-	mes "[Ashe Bruce]";
-	mes "Muhahahahahaha!";
-	mes "That's not the right spell!";
-	mes "Now death awaits you!";
-	killmonster "niflheim","#signbruce::Onmymob";
-	monster "niflheim",349,256,"Orc Skeleton",1462,1,"#signbruce::Onmymob";
-	monster "niflheim",347,258,"Orc Skeleton",1462,1,"#signbruce::Onmymob";
-	monster "niflheim",347,254,"Orc Skeleton",1462,1,"#signbruce::Onmymob";
-	monster "niflheim",350,252,"Orc Skeleton",1462,1,"#signbruce::Onmymob";
-	monster "niflheim",344,255,"Orc Skeleton",1462,1,"#signbruce::Onmymob";
-	monster "niflheim",348,252,"Orc Skeleton",1462,1,"#signbruce::Onmymob";
-	monster "niflheim",347,259,"Orc Skeleton",1462,1,"#signbruce::Onmymob";
-	close;
-
-L_Success:
-	mes "[Ashe Bruce]";
-	mes "That spell...";
-	mes "You removed my curse?";
-	mes "I don't believe it. I'm free!";
-	next;
-	mes "[Ashe Bruce]";
-	mes "But do not underestimate";
-	mes "my awesome powers! In fact,";
-	mes "I command you to take this";
-	mes "book and give it to that";
-	mes "weak, pathetic witch!";
-	if(signquest == 35) set signquest,36;
-	if(Sign_Branch2B == 3) set Sign_Branch2B,4;
-	getitem 7304,1;
-	close;
-
-Onmymob:
-	end;
-
+que_sign01,45,227,4	script	Queen of the Dead	856,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 117) {
+		mes "[Lady Hell]";
+		mes "^8C1717You wish to have";
+		mes "an audience with the";
+		mes "Queen of the Dead without";
+		mes "invitation? Insolent mortal!";
+		mes "Go back to where you belong!^000000";
+		close2;
+		percentheal -100,0;
+		end;
+	}
+	else if (sign_q == 117) {
+		mes "[Lady Hell]";
+		mes "^8C1717I have been told";
+		mes "by Ganglati that you";
+		mes "are the mortal that has";
+		mes "guided Mother's soul to me.^000000";
+		next;
+		mes "[Lady Hell]";
+		mes "^8C1717Do not fear me,";
+		mes "hero of Rune-Midgard.";
+		mes "You have won the favor";
+		mes "of the Queen of the Dead";
+		mes "and may ask me of any";
+		mes "reward if I deem it fair.^000000";
+		next;
+		select("The Symbol of the Nine Realms...");
+		mes "[Lady Hell]";
+		mes "^8C1717The true Symbol of the";
+		mes "Nine Realms cannot be freely";
+		mes "given or lent. However, I sense";
+		mes "your purpose and will give you";
+		mes "a symbol imbued with enough";
+		mes "power to be used only once.^000000";
+		next;
+		mes "[Lady Hell]";
+		mes "^8C1717With the symbol I give you,";
+		mes "you can command the dead to";
+		mes "carry out your will without";
+		mes "question. However, keep in";
+		mes "mind that after one use,";
+		mes "its power will be consumed.^000000";
+		next;
+		mes "[Lady Hell]";
+		mes "^8C1717I have also decided";
+		mes "to reward you with one";
+		mes "more special permission.";
+		mes "You may now freely draw";
+		mes "water from the fountain";
+		mes "in my mansion, brave hero.^000000";
+		next;
+		mes "^3355FFYou received the";
+		mes "Symbol of the Nine Realms.^000000";
+		delitem 7307,1; //Whisper_Of_Soul
+		set sign_q,118;
+		getitem 7305,1; //Authority_Of_Nine_World
+		close;
+	}
+	else if (sign_q < 142) {
+		mes "[Lady Hell]";
+		mes "^8C1717Greetings, mortal.";
+		mes "Make sure that you";
+		mes "use the power of the";
+		mes "symbol wisely. You will";
+		mes "be responsible for the";
+		mes "consequences...^000000";
+		close;
+	}
+	else if (sign_q == 142) {
+		set name,PcName;
+		mes "[Lady Hell]";
+		mes "^8C1717Ah.";
+		mes "You are the";
+		mes "mortal called";
+		mes ""+strcharinfo(0)+", are you not?";
+		mes "Yes, you are known to me.^000000";
+		next;
+		mes "[Lady Hell]";
+		mes "^8C1717I've wanted to see you";
+		mes "as I've sensed that you";
+		mes "carry something which feels";
+		mes "very familiar to me. Do you";
+		mes "have something extraordinarily";
+		mes "special in your possession?^000000";
+		next;
+		switch(select("The Sign:Sobbing Starlight")) {
+		case 1:
+			mes "[Lady Hell]";
+			mes "^8C1717The Sign...?";
+			mes "Hmm, no, that's not";
+			mes "what I sensed. It's actually";
+			mes "something quite different...^000000";
+			close;
+		case 2:
+			mes "[Lady Hell]";
+			mes "^8C1717Yes, that's it!";
+			mes "I never expected a mortal";
+			mes "to have such an interesting^000000";
+			if (Sex == 1) {
+				mes "^8C1717artifact in his possession.^000000";
+			}
+			else {
+				mes "^8C1717artifact in her possession.^000000";
+			}
+			next;
+			mes "[Lady Hell]";
+			mes "^8C1717As queen of Niflheim,";
+			mes "I command you to lend the";
+			mes "Sobbing Starlight to me! Fear";
+			mes "not, I shall quickly return it. For a mortal, it must have";
+			mes "taken great pains to obtain this...^000000";
+			next;
+			switch(select("Please take it...:N-no! Don't take it!")) {
+			case 1:
+				mes "[Lady Hell]";
+				mes "^8C1717Thank you mortal.";
+				mes "Now, I shall show";
+				mes "you something truly";
+				mes "interesting...^000000";
+				delitem 7178,1; //Star's_Sob
+				set sign_q,143;
+				close;
+			case 2:
+				mes "[Lady Hell]";
+				mes "^8C1717Ha ha ha!";
+				mes "You amuse me,";
+				mes "mortal! To think,";
+				mes "you even have courage";
+				mes "to refuse the queen of";
+				mes "Niflheim! Ha ha ha!^000000";
+				next;
+				mes "[Lady Hell]";
+				mes "^8C1717Mercy is not a quality";
+				mes "that I am known for, but";
+				mes "since you are my favored";
+				mes "mortal, I shall not kill you.";
+				mes "Still, it would be unwise";
+				mes "to displease me~^000000";
+				close2;
+				warp "niflheim",29,154;
+				end;
+			}
+		}
+	}
+	else if (sign_q == 143) {
+		mes "[Lady Hell]";
+		mes "^8C1717As queen of this realm,";
+		mes "I am unaccustomed to labor.";
+		mes "But give me a moment to finish";
+		mes "my work on this priceless";
+		mes "artifact, mortal.^000000";
+		next;
+		specialeffect EF_GLASSWALL;
+		next;
+		specialeffect EF_NAPALMBEAT;
+		next;
+		specialeffect EF_FIREPILLARBOMB;
+		next;
+		specialeffect EF_LORD;
+		next;
+		mes "[Lady Hell]";
+		mes "^8C1717It is done.";
+		mes "This is the true";
+		mes "form of the object";
+		mes "you humans call the";
+		mes "Sobbing Starlight.^000000";
+		next;
+		set sign_q,144;
+		getitem 7025,1; //Lucifer's_Lament
+		mes "[Lady Hell]";
+		mes "^8C1717Although you may also know";
+		mes "this object as God's Tear Drop, keep in mind that history, as you humans know it, may actually be different than the truth.^000000";
+		next;
+		mes "[Lady Hell]";
+		mes "^8C1717In other words, there";
+		mes "are some older tales about";
+		mes "the gods and their enemies that";
+		mes "may have been confused and twisted as they were handed down from generation to generation.^000000";
+		next;
+		mes "[Lady Hell]";
+		mes "^8C1717That is all I can tell";
+		mes "you for now, mortal. It will";
+		mes "be your job to discover the";
+		mes "truth of the legends...^000000";
+		close;
+	}
+	else {
+		mes "[Lady Hell]";
+		mes "^8C1717Greetings, mortal.";
+		mes "Is the realm of the living";
+		mes "that boring and tedious?";
+		mes "Ha ha ha! Well, there shall";
+		mes "always be a place for you";
+		mes "here in Niflheim.^000000";
+		close;
+	}
 }
-	
-nif_in,188,168,1	script	#signwitch	139,2,2,{
-
-	if(signquest > 36) goto L_SignWitch;
-	if(Sign_Branch2B > 1) goto L_Book;
-	end;
-
-L_SignWitch:
-	if(signquest > 55 || sign_fail) end;
-	if(Sign_Branch8A || Sign_Branch8B || countitem(7305)) goto L_Privacy;
-	if(signquest > 46) goto L_Help;
-	if(signquest > 45) goto L_Courage;
-	if(signquest > 41) goto L_Think;
-	if(signquest > 40) goto L_Tragic;
-	if(signquest > 39) goto L_Crow;
-	if(signspellbook) goto L_SpellBook;
-	if(signquest > 37 || !countitem(7304)) end;
-	mes "[Kirkena]";
-	mes "W-what's this?";
-	mes "Why is it that";
-	mes "you have one of";
-	mes "my lost spell books?";
-	next;
-	menu "From a cursed soul...",-;
-	mes "[Kirkena]";
-	mes "Oh. That bastard must have";
-	mes "stolen my spell books and got";
-	mes "cursed when he cast the spells";
-	mes "without my permission. Still, it's";
-	mes "a relief to have my spells back.";
-	delitem 7304,1;
-	set signspellbook,1;
-	next;
-L_SpellBook:
-	mes "[Kirkena]";
-	mes "So mortal...";
-	mes "You must be here for";
-	mes "some reason. Speak";
-	mes "your mind.";
-	next;
-	menu "Send me back to my world.",-,"There's a lost child here that I want to help...",L_Child;
-	mes "[Kirkena]";
-	mes "Alright, you made the";
-	mes "good choice... I mean...";
-	mes "for your life...";
-	close2;
-	warp "umbala",138,208;
-	end;
-
-L_Child:
-	mes "[Kirkena]";
-	mes "There's a living child?";
-	mes "Here in Niflheim? That's";
-	mes "most peculiar. Well, let me";
-	mes "give you this. It will send";
-	mes "a living human back to one";
-	mes "of the towns in your realm.";
-	set signquest,38;
-	set signspellbook,0;
-	getitem 7309,1;
-	close;
-
-L_Crow:
-	mes "[Kirkena]";
-	mes "So did you already";
-	mes "use the wing to save";
-	mes "that poor, lost child?";
-	next;
-	mes "[Kirkena]";
-	mes "What...?!";
-	mes "It didn't work?";
-	mes "That's impossible!";
-	mes "Wait, give me a moment to";
-	mes "think. What could be wrong?";
-	set signquest,41;
-	close;
-
-L_Tragic:
-	mes "[Kirkena]";
-	mes "Alright.";
-	mes "Now I understand";
-	mes "why the wing didn't work";
-	mes "for that poor girl...";
-	next;
-	mes "[Kirkena]";
-	mes "She's so young that";
-	mes "she doesn't even know";
-	mes "that she's dead. It's tragic,";
-	mes "but there's no way for her";
-	mes "to get out of here...";
-	set signquest,42;
-	close;
-
-L_Think:
-	mes "[Kirkena]";
-	mes "When people don't fully";
-	mes "know the situation that";
-	mes "they're in, they become more";
-	mes "willing to take their chances.";
-	close;
-
-L_Courage:
-	mes "[Kirkena]";
-	mes "As I expected,";
-	mes "there is something behind";
-	mes "all of this. Now, you may";
-	mes "know where you are, but";
-	mes "do you understand why the";
-	mes "dead are here?";
-	next;
-	mes "[Kirkena]";
-	mes "This realm is a place";
-	mes "for warriors that have failed";
-	mes "to prove their courage. Keep in";
-	mes "mind that it's not too late for";
-	mes "you to join their ranks.";
-	next;
-	mes "[Kirkena]";
-	mes "The realm of Niflheim";
-	mes "is ruled by the Queen of the";
-	mes "Dead. Sometimes she appears";
-	mes "in her shining armor and makes the";
-	mes "rounds. Everyone who sees her is";
-	mes "stunned by the image of authority.";
-	next;
-	mes "[Kirkena]";
-	mes "Now...";
-	mes "What I need you to do is";
-	mes "ask the Queen of the Dead";
-	mes "for the Symbol of Nine Realms.";
-	next;
-	menu "What is that?",-;
-	mes "[Kirkena]";
-	mes "The symbol acts";
-	mes "as a voucher of the queen's";
-	mes "authority and represents her";
-	mes "undeniable right to rule over";
-	mes "the dead. But right now, I can't";
-	mes "explain why I need it.";
-	next;
-	mes "[Kirkena]";
-	mes "I'll tell you why I need";
-	mes "it once you bring me the";
-	mes "queen's symbol. Now, please";
-	mes "keep this secret and tell no one";
-	mes "that I asked you to bring the";
-	mes "symbol to me.";
-	set signquest,47;
-	next;
-	menu "Alright, I understand.",-,"How am I supposed to get the symbol?",L_Symbol;
-	close;
-
-L_Help:
-	mes "[Kirkena]";
-	mes "...Hm?";
-	mes "Is there";
-	mes "something that";
-	mes "you need to ask to me?";
-	next;
-	menu "How can I get the symbol?",-;
-
-L_Symbol:
-	mes "[Kirkena]";
-	mes "Taking the symbol";
-	mes "by force is out of the";
-	mes "question. Not even the gods";
-	mes "would consider battling the";
-	mes "Queen of the Dead.";
-	next;
-	mes "[Kirkena]";
-	mes "You will need to";
-	mes "earn the queen's favor";
-	mes "in order to even have";
-	mes "a chance of obtaining";
-	mes "the Symbol of Nine Realms.";
-	next;
-	mes "[Kirkena]";
-	mes "Now, there is a rumor";
-	mes "that the Queen of the Dead";
-	mes "is searching for her lost mother,";
-	mes "Angrboda. Now, if you could find";
-	mes "where Angrboda has been";
-	mes "sealed away...";
-	next;
-	mes "[Kirkena]";
-	mes "When you need to";
-	mes "meet me from now on,";
-	mes "go ahead and take passage";
-	mes "through the right side of the";
-	mes "portrait on the second";
-	mes "floor of this castle.";
-	set signquest,48;
-	close;
-
-L_Book:
-	if(countitem(7304)) goto L_Found;
-	if(Sign_Branch2B > 2) end;
-	mes "[Kirkena]";
-	mes "What are you doing here ?";
-	mes "This is not a place for a";
-	mes "mortal like you. I shall";
-	mes "send you back to your realm.";
-	next;
-	mes "[Kirkena]";
-	mes "Unfortunately, I lost my spell";
-	mes "book and you should think of";
-	mes "you as a very lucky person.";
-	mes "I'm sure that bastard has stolen";
-	mes "books and tried to use their power.";
-	next;
-	mes "[Kirkena]";
-	mes "He has always dreamt to obtain";
-	mes "my powers but if he thinks he'll";
-	mes "get them this way... he's surely";
-	mes "wrong.";
-	next;
-	mes "[Kirkena]";
-	mes "Hey you, thank me for not";
-	mes "sending you far away from here";
-	mes "by finding my spell book !";
-	set Sign_Branch2B,3;
-	close;
-
-L_Found:
-	mes "[Kirkena]";
-	mes "Ohh... This is my spell book.";
-	mes "I wouldn't have thought of you";
-	mes "to be brave enough to find it.";
-	mes "There may be a place for you";
-	mes "here after all...";
-	delitem 7304,1;
-	next;
-	mes "[Kirkena]";
-	mes "Listen to me.";
-	mes "What I'm going to tell";
-	mes "you is no small thing, it";
-	mes "is about an entire realm.";
-	mes "Believe me or not, I don't care.";
-	next;
-	goto L_Courage;
-
-L_Privacy:
-	mes "[Kirkena]";
-	mes "This place isn't really";
-	mes "good to talk about these";
-	mes "kind of serious things. We";
-	mes "should meet in privacy to make";
-	mes "sure noone can hear us.";
-	next;
-	mes "[Kirkena]";
-	mes "Please, hurry up and take";
-	mes "the secret passage behind";
-	mes "the right side of the portrait";
-	mes "at second floor of my manor.";
-	close;
 
+niflheim,146,241,0	script	Depressing Man	735,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 80) {
+		mes "[????]";
+		mes "Leave me be,";
+		mes "ruffian! I'm disinclined";
+		mes "towards conversation";
+		mes "at the moment.";
+		close;
+	}
+	else if (sign_q < 87) {
+		mes "[????]";
+		mes "Don't go judging";
+		mes "people based on just";
+		mes "how they look. Try to look";
+		mes "inside and find the truth";
+		mes "within their hearts.";
+		close;
+	}
+	else if (sign_q == 87) {
+		if (countitem(2642) > 1) {
+			mes "[Gen]";
+			mes "You lookin' for";
+			mes "something? Crayu";
+			mes "must have sent you.";
+			mes "Alright then, let's get";
+			mes "straight to the point.";
+			next;
+			mes "[Gen]";
+			mes "So, why is it that you";
+			mes "wanna become one";
+			mes "of Valkyrie's chosen?";
+			next;
+			switch(select("To prove my courage:For honor:To help people")) {
+			case 1:
+				if (sign_sq > 2) {
+					set sign_sq,0;
+				}
+				else {
+					set sign_sq,sign_sq+1;
+				}
+			case 2:
+				break;
+			}
+			mes "[Gen]";
+			mes "Alright...";
+			mes "Now, did Crayu";
+			mes "tell you why I'm here?";
+			next;
+			switch(select("Yes:No")) {
+			case 1:
+				mes "[Gen]";
+				mes "Good, then you";
+				mes "already know what";
+				mes "you need to do. Now go";
+				mes "see the witch of Niflheim.";
+				next;
+				mes "[Gen]";
+				mes "And, off the record,";
+				mes "I think you should be";
+				mes "really careful if you find";
+				mes "yourself dealing with Serin...";
+				set sign_q,88;
+				close;
+			case 2:
+				mes "[Gen]";
+				mes "You know, I was an";
+				mes "adventurer myself. In fact,";
+				mes "I even came here to Niflheim";
+				mes "for the ordeals set by the gods. However, I failed and ended up being bound to this realm...";
+				next;
+				mes "[Gen]";
+				mes "I just wanted to warn you.";
+				mes "Be careful and don't justify";
+				mes "your greed for any sort of reward using the excuse that you're just gonna prove your courage.";
+				mes "That's what I did...";
+				next;
+				mes "[Gen]";
+				mes "Anyway, I've already talked";
+				mes "too much. First, go and see";
+				mes "the witch and ask her to";
+				mes "help you out, okay?";
+				next;
+				mes "[Gen]";
+				mes "One last thing. Off the";
+				mes "record, I think you should";
+				mes "be really careful if you find";
+				mes "yourself dealing with Serin.";
+				mes "She seems nice enough, but";
+				mes "something's weird about her.";
+				next;
+				mes "[Gen]";
+				mes "She's awfully persuasive,";
+				mes "and the fact that she used";
+				mes "to be a great wizard when she";
+				mes "was alive bothers me. She's a lot different than the rest of the guys stuck in Niflheim...";
+				set sign_q,88;
+				close;
+			}
+		}
+		else {
+			mes "[Gen]";
+			mes "Are you here";
+			mes "to prove your";
+			mes "courage to the gods?";
+			next;
+			mes "[Gen]";
+			mes "You know, I was an";
+			mes "adventurer myself. In fact,";
+			mes "I even came here to Niflheim";
+			mes "for the ordeals set by the gods. However, I failed and ended up being bound to this realm...";
+			next;
+			mes "[Gen]";
+			mes "I just wanted to warn you.";
+			mes "Be careful and don't justify";
+			mes "your greed for any sort of reward using the excuse that you're just gonna prove your courage.";
+			mes "That's what I did...";
+			next;
+			mes "[Gen]";
+			mes "Anyway, I've already talked";
+			mes "too much. First, go and see";
+			mes "the witch and ask her to";
+			mes "help you out, okay?";
+			set sign_q,88;
+			close;
+		}
+	}
+	else if (sign_q < 117) {
+		mes "[Gen]";
+		mes "Huh... I hear you're";
+		mes "looking for something";
+		mes "pretty important. It's going";
+		mes "to be a dangerous search.";
+		next;
+		mes "[Gen]";
+		mes "They are plenty of";
+		mes "other parties that are";
+		mes "interested in the thing";
+		mes "which you're seeking...";
+		close;
+	}
+	else if (sign_q == 117) {
+		mes "[Gen]";
+		mes "You must be a very";
+		mes "resourceful mortal.";
+		mes "Not even Lady Hell, with";
+		mes "all her power, could find";
+		mes "the soul of her mother";
+		mes "for a long time.";
+		next;
+		mes "[Gen]";
+		mes "There's no need";
+		mes "for me to hide my";
+		mes "true identity any longer.";
+		mes "My real name is Ganglati,";
+		mes "servant of Lady Hell, the";
+		mes "ruler of Niflheim.";
+		next;
+		mes "[Gen]";
+		mes "Her highness would";
+		mes "have words with you.";
+		mes "Shall I send you to her";
+		mes "mansion, Eljudnir,";
+		mes "right now?";
+		next;
+		switch(select("Yes:No")) {
+		case 1:
+			mes "[Gen]";
+			mes "Remember to be";
+			mes "careful and especially";
+			mes "polite when you speak to";
+			mes "Lady Hell. Otherwise, the";
+			mes "consequences will be severe...";
+			close2;
+			warp "que_sign01",45,20;
+			end;
+		case 2:
+			mes "[Gen]";
+			mes "I understand.";
+			mes "Meeting with a deity is";
+			mes "no small matter. However,";
+			mes "I advise you to make haste";
+			mes "as her highness is eager";
+			mes "to see you soon.";
+			close;
+		}
+	}
+	else if (sign_q == 118) {
+		mes "[Gen]";
+		mes "You must be most favored";
+		mes "to receive the Symbol of the";
+		mes "Nine Realms. Of course, it";
+		mes "can be used only once, but";
+		mes "it is still a great honor.";
+		next;
+		mes "[Gen]";
+		mes "Once again, I ask that";
+		mes "you be on guard against";
+		mes "Serin. She may already be";
+		mes "aware of what you plan to";
+		mes "do with this symbol...";
+		close;
+	}
+	else if (sign_q < 129) {
+		mes "[Gen]";
+		mes "You must hurry and";
+		mes "stop the summoning";
+		mes "before your world in";
+		mes "cast into immense peril!";
+		next;
+		mes "[Gen]";
+		mes "Although Lady Hell";
+		mes "is being rather blase";
+		mes "about this matter, I beseech";
+		mes "you to do what you can for";
+		mes "the realm of the living!";
+		close;
+	}
+	else if (sign_q > 200) {
+		mes "[Gen]";
+		mes "I should have";
+		mes "known you couldn't";
+		mes "stop her. Still, I had";
+		mes "a little hope that you'd";
+		mes "be able to do it.";
+		next;
+		mes "[Gen]";
+		mes "Perhaps I expected";
+		mes "far too much of you.";
+		mes "Goodbye for now, mortal.";
+		close;
+	}
+	else {
+		mes "[Gen]";
+		mes "You've done a great";
+		mes "job of stopping Serin.";
+		mes "Excellent! Such great";
+		mes "service on behalf of";
+		mes "the realm of the living!";
+		next;
+		mes "[Gen]";
+		mes "I'm pleased to inform";
+		mes "you that you've been";
+		mes "invited to Lady Hell's";
+		mes "mansion once again.";
+		mes "Are you ready to go?";
+		next;
+		switch(select("No, thanks.:Yes.")) {
+		case 1:
+			mes "[Gen]";
+			mes "I see.";
+			mes "Well then, come";
+			mes "back to me when you";
+			mes "feel fully prepared.";
+			close;
+		case 2:
+			mes "[Gen]";
+			mes "Good, good.";
+			mes "Don't forget to";
+			mes "speak to her highness";
+			mes "with the utmost respect!";
+			close2;
+			warp "que_sign01",45,20;
+			end;
+		}
+		close;
+	}
 }
 
-nif_in,105,81,1	script	#signcrayu	139,2,2,{
-
-	if(signquest == 44) goto L_SignCrayu;
+nif_in,140,177,0	script	#Switch	111,{
+	callfunc "F_UpdateSignVars";
+	if (countitem(7313) == 1) {
+		warp "que_sign01",115,135;
+		end;
+	}
+	if (sign_q > 89) {
+		if (sign_q == 126) {
+			set sign_q,198;
+		}
+		warp "que_sign01",115,135;
+		end;
+	}
 	end;
-
-L_SignCrayu:
-	mes "[Crayu]";
-	mes "Mountain sunset to the west";
-	mes "Where the purple dusk falls";
-	mes "Surrounded by beautiful melody";
-	mes "You become the key that ignores its";
-	mes "master.";
-	next;
-	mes "[Crayu]";
-	mes "Hello adventurer.";
-	mes "I know this is rather";
-	mes "abrupt, but what do";
-	mes "you think of Serin?";
-	next;
-	menu "She's good.",-,"She's evil!",-,"She could go either way.",-;
-	mes "[Crayu]";
-	mes "Hm...?";
-	mes "And why do";
-	mes "you think so?";
-	next;
-	menu "Just my opinion.",-,"It's the truth!",-;
-	mes "[Crayu]";
-	mes "Ah, I understand.";
-	mes "Now, how may I help you?";
-	next;
-	menu "What exactly is Niflheim?",-,"How do I become one of the chosen?",L_Chosen;
-	mes "[Crayu]";
-	mes "Niflheim is commonly";
-	mes "known as the city of the";
-	mes "dead, but it's also the";
-	mes "resting place of warriors";
-	mes "who failed to enter Valhalla.";
-	next;
-	mes "[Crayu]";
-	mes "Some heroes may think";
-	mes "of Niflheim as the tragic end,";
-	mes "but it really all depends on";
-	mes "your point of view.";
-	close;
-
-L_Chosen:
-	mes "[" + strcharinfo(0) + "]";
-	mes "What do I need";
-	mes "to do to become one";
-	mes "of the chosen warriors?";
-	next;
-	mes "[Crayu]";
-	mes "First and foremost,";
-	mes "you must prove your courage.";
-	mes "It will be up to you to decide";
-	mes "how you will demonstrate your";
-	mes "bravery. The Gods will only";
-	mes "be watching and judging.";
-	next;
-	mes "[Crayu]";
-	mes "Hmm...";
-	mes "I think it would";
-	mes "be a good idea if";
-	mes "you talk to someone";
-	mes "in Niflheim named ^FF0000Gen^000000.";
-	set signquest,45;
-	close;
-
 }
 
-niflheim,146,241,7	script	Depressing Man	735,{
-
-	if(signquest > 56) goto L_Done;
-	if(Sign_Branch8A > 3 || (Sign_Branch8B && Sign_Branch8B < 4)) goto L_Hurry;
-	if(signquest > 54) goto L_Serin;
-	if(signquest > 53) goto L_Queen;
-	if(signquest) goto L_Seek;
-	mes "[????]";
-	mes "Leave me be,";
-	mes "ruffian! I'm disinclined";
-	mes "towards conversation";
-	mes "at the moment.";
-	close;
-
-L_Seek:
-	mes "[Gen]";
-	mes "Huh... I hear you're";
-	mes "looking for something";
-	mes "pretty important. It's going";
-	mes "to be a dangerous search.";
-	next;
-	mes "[Gen]";
-	mes "There are plenty of";
-	mes "other parties that are";
-	mes "interested in the thing";
-	mes "which you're seeking...";
-	close;
+niflheim,102,54,4	script	Mad Man#s	739,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 82) {
+		mes "[Laichin]";
+		mes "What? I look familiar to you?";
+		mes "Eh, you know what they say.";
+		mes "Everyone has a lookalike in the";
+		mes "world somewhere. Am I right";
+		mes "or am I right?";
+		close;
+	}
+	else if (sign_q < 96) {
+		mes "[Laichin]";
+		mes "Niflheim ain't such a bad";
+		mes "place to live. Sure, Asgard's";
+		mes "all pretty and stuff, but there's too many rules. In this place, you";
+		mes "can enjoy a lot more freedom. After you get used to all the stink.";
+		next;
+		mes "[Laichin]";
+		mes "Did I say 'stink?'";
+		mes "I meant... 'fragrance.'";
+		mes "Alright, so the gods expelled";
+		mes "me, but I really oughtta thank";
+		mes "'em for sending me here!";
+		next;
+		mes "[Laichin]";
+		mes "What's that look for...?";
+		mes "What, you can't believe";
+		mes "that someone like me used";
+		mes "to live in Valhalla? Me neither! They really made a mistake when they put me up to live in Asgard!";
+		close;
+	}
+	else if (sign_q == 96) {
+		mes "[Laichin]";
+		mes "Angrboda...?";
+		mes "Yeah, yeah!";
+		mes "I remember hearing something";
+		mes "about her when I usedta hang";
+		mes "with the gods up in Asgard.";
+		next;
+		mes "[Laichin]";
+		mes "Yeah, those guys were pretty";
+		mes "gangster about it. I mean, they took her soul, broke it in four pieces and stashed them in the deepest hole in Rune-Midgard!";
+		next;
+		mes "[Laichin]";
+		mes "Sure, she was a giant, but";
+		mes "they were pretty scared of her.";
+		mes "All her children ended up to be legendary monsters! Well, I'm";
+		mes "not sure if Lady Hell counts.";
+		next;
+		mes "[Laichin]";
+		mes "That's pretty harsh.";
+		mes "I mean, even if you die,";
+		mes "your soul has no place to";
+		mes "rest. Angrboda's soul is";
+		mes "all cut up and stuff!";
+		next;
+		select("So where are the soul pieces again?");
+		mes "[Laichin]";
+		mes "What...? I just said,";
+		mes "the deepest underground";
+		mes "place in Rune-Midgard.";
+		mes "It's a dangerous joint";
+		mes "protected by gangs";
+		mes "of monsters.";
+		next;
+		mes "[Laichin]";
+		mes "Wait, you tellin' me";
+		mes "that you're gonna find";
+		mes "all of Angrboda's soul?!";
+		mes "You're crazy! If they end up";
+		mes "missing, the gods'll know I was";
+		mes "the one who tipped you off!";
+		next;
+		mes "[Laichin]";
+		mes "If I was gonna risk my soul,";
+		mes "I'd wanna enjoy the rest of my";
+		mes "afterlife as my much as I could";
+		mes "before the gods offed me. Man,";
+		mes "I'd need at least 40,000 Zeny to even have a decent time...";
+		next;
+		switch(select("Pay Laichin 40,000 Zeny:Don't pay Laichin.")) {
+		case 1:
+			if (Zeny < 40000) {
+				mes "[Laichin]";
+				mes "Hey...";
+				mes "This is sooo";
+				mes "not enough money";
+				mes "for me to enjoy myself";
+				mes "if my soul ends up getting";
+				mes "busted by the gods.";
+				emotion e_pif;
+				close;
+			}
+			else {
+				mes "[Laichin]";
+				mes "Now we're talkin'!";
+				mes "You're a true hero!";
+				mes "Right, you gotta go to the";
+				mes "lowest part of Glast Heim to";
+				mes "find Angrboda's soul pieces.";
+				next;
+				set .@select_s,rand(1,5);
+				if (.@select_s == 1) {
+					mes "[Laichin]";
+					mes "Check out the";
+					mes "big 1 o' clock,";
+					mes "big 5 o' clock,";
+					mes "big 7 o' clock and";
+					mes "the small 6 o' clock.";
+					next;
+				}
+				else if (.@select_s == 2) {
+					mes "[Laichin]";
+					mes "Check out the";
+					mes "big 4 o' clock,";
+					mes "big 10 o' clock,";
+					mes "small 6 o' clock and the";
+					mes "very small 11 o' clock.";
+					next;
+				}
+				else if (.@select_s == 3) {
+					mes "[Laichin]";
+					mes "Check out the";
+					mes "big 5 o' clock,";
+					mes "small 11 o' clock,";
+					mes "small 6 o' clock and the";
+					mes "very small 11 o' clock.";
+					next;
+				}
+				else if (.@select_s == 4) {
+					mes "[Laichin]";
+					mes "Check out the";
+					mes "big 4 o' clock,";
+					mes "big 5 o' clock,";
+					mes "big 10 o' clock and";
+					mes "the small 11 o' clock.";
+					next;
+				}
+				else {
+					mes "[Laichin]";
+					mes "Heh heh!";
+					close;
+				}
+				mes "[Laichin]";
+				mes "Her soul pieces are really";
+				mes "well hidden, so you gotta look around, even if you know the general location. And don't";
+				mes "tell anyone else about these locations or there'll be trouble.";
+				next;
+				switch(select("I promise.:What do you mean by big and small?")) {
+				case 1:
+					mes "[Laichin]";
+					mes "Alright, kid.";
+					mes "Have fun!";
+					if (.@select_s == 1) {
+						set sign_q,97;
+					}
+					else if (.@select_s == 2) {
+						set sign_q,98;
+					}
+					else if (.@select_s == 3) {
+						set sign_q,99;
+					}
+					else if (.@select_s == 4) {
+						set sign_q,100;
+					}
+					else {
+						mes "[Laichin]";
+						mes "Heh heh!";
+						close;
+					}
+					set zeny,zeny-40000;
+					close;
+				case 2:
+					mes "[Laichin]";
+					mes "What do I mean by";
+					mes "big and small? Hey man,";
+					mes "the answer to that is worth";
+					mes "at least... 20,000 Zeny.";
+					mes "If you wanna know,";
+					mes "cough up the cash!";
+					next;
+					switch(select("Don't pay him.:Pay him.")) {
+					case 1:
+						mes "[Laichin]";
+						mes "Fine, fine.";
+						mes "Just don't come";
+						mes "crawling back when";
+						mes "you can't figure out";
+						mes "where the soul pieces are!";
+						set zeny,zeny-40000;
+						if (.@select_s == 1) {
+							set sign_q,97;
+						}
+						else if (.@select_s == 2) {
+							set sign_q,98;
+						}
+						else if (.@select_s == 3) {
+							set sign_q,99;
+						}
+						else if (.@select_s == 4) {
+							set sign_q,100;
+						}
+						else {
+							mes "[Laichin]";
+							mes "Hehehehe~";
+							close;
+						}
+						emotion e_pif;
+						close;
+					case 2:
+						if (Zeny < 20000) {
+							mes "[Laichin]";
+							mes "What is this?";
+							mes "You tryin to welch";
+							mes "me or somethin'?";
+							emotion e_pif;
+							close;
+						}
+						else {
+							mes "[Laichin]";
+							mes "Alright, listen up.";
+							mes "Big, small and very small";
+							mes "mean the distances from the";
+							mes "center of the map. So for big,";
+							mes "I mean look near the border of";
+							mes "the map. Easy, huh?";
+							next;
+							mes "[Laichin]";
+							mes "When I say small, you";
+							mes "gotta look in areas closer";
+							mes "than the borders of the map.";
+							mes "For very small, you gotta";
+							mes "look near the center. Got it?";
+							set zeny,zeny-60000;
+							if (.@select_s == 1) {
+								set sign_q,101;
+							}
+							else if (.@select_s == 2) {
+								set sign_q,102;
+							}
+							else if (.@select_s == 3) {
+								set sign_q,103;
+							}
+							else if (.@select_s == 4) {
+								set sign_q,104;
+							}
+							else {
+								mes "[Laichin]";
+								mes "Eh heh";
+								mes "heh heh heh!";
+								close;
+							}
+							close;
+						}
+					}
+				}
+			}
+		case 2:
+			mes "[Laichin]";
+			mes "Huh...?";
+			mes "Okay pal.";
+			close;
+		}
+	}
+	else if ((sign_q == 97) || (sign_q == 98) || (sign_q == 99) || (sign_q == 100)) {
+		mes "[Laichin]";
+		mes "Oh yeah, about those";
+		mes "directions I gave you";
+		mes "last time? They work, but";
+		mes "you gotta know what I mean";
+		mes "by 'big' or 'small' whatever";
+		mes "o' clock means. That's right... ";
+		next;
+		mes "[Laichin]";
+		mes "Matter of fact, I'll";
+		mes "tell you all about it.";
+		mes "Right after you pay me,";
+		mes "oh, I don't know, ^FF000020,000 zeny^000000.";
+		next;
+		switch(select("Pay him.:Don't pay him.")) {
+		case 1:
+			if (Zeny < 20000) {
+				mes "[Laichin]";
+				mes "What is this?";
+				mes "You tryin to welch";
+				mes "me or somethin'?";
+				close;
+			}
+			else {
+				mes "[Laichin]";
+				mes "Alright, listen up.";
+				mes "Big, small and very small";
+				mes "mean the distances from the";
+				mes "center of the map. So for big,";
+				mes "I mean look near the border of";
+				mes "the map. Easy, huh?";
+				next;
+				mes "[Laichin]";
+				mes "When I say small, you";
+				mes "gotta look in areas closer";
+				mes "than the borders of the map.";
+				mes "For very small, you gotta";
+				mes "look near the center. Got it?";
+				set zeny,zeny-20000;
+				if (sign_q == 97) {
+					set sign_q,101;
+				}
+				else if (sign_q == 98) {
+					set sign_q,102;
+				}
+				else if (sign_q == 99) {
+					set sign_q,103;
+				}
+				else if (sign_q == 100) {
+					set sign_q,104;
+				}
+				else {
+					mes "[Laichin]";
+					mes "Bwahahaha!";
+					close;
+				}
+				close;
+			}
+		case 2:
+			mes "[Laichin]";
+			mes "Whatever, dude!";
+			mes "Freakin' cheapskate...";
+			emotion e_pif;
+			close;
+		}
+	}
+	else if (sign_q < 105) {
+		mes "[Laichin]";
+		mes "Oh yeah. Uh, I forgot to tell";
+		mes "you that Angrboda's soul pieces are sealed with the power of the gods. You can't just smash them open.";
+		next;
+		mes "[Laichin]";
+		mes "...Or maybe you could.";
+		mes "Anyway, it'll be better";
+		mes "if you had a weapon that";
+		mes "was solid, heavy and powerful.";
+		next;
+		mes "[Laichin]";
+		mes "But yeah, think about";
+		mes "what it means to break";
+		mes "a godly seal. Remember there's";
+		mes "^FF0000some kinda rule^000000 that the gods imposed which you gotta follow";
+		mes "to release Angrboda's soul.";
+		next;
+		mes "[Laichin]";
+		mes "Ah, right. If you wanna";
+		mes "try different weapons for";
+		mes "breaking those seals, make";
+		mes "sure you got 'em in your";
+		mes "inventory and that they're";
+		mes "not equipped, alright?";
+		next;
+		switch(select("Thanks~!:Where am I supposed to go again?")) {
+		case 1:
+			mes "[Laichin]";
+			mes "Oh no...";
+			mes "Thank you for all";
+			mes "of this zeny! Money";
+			mes "might not be able to";
+			mes "buy happiness, but it";
+			mes "sure comes real close!";
+			close;
+		case 2:
+			mes "[Laichin]";
+			mes "Hey... You gotta";
+			mes "go to the lowest part";
+			mes "of Glast Heim to find all";
+			mes "of Angrboda's soul pieces.";
+			mes "Once you get there...";
+			next;
+			mes "[Laichin]";
+			if (sign_q == 101) {
+				mes "Check out the";
+				mes "big 1 o' clock,";
+				mes "big 5 o' clock,";
+				mes "big 7 o' clock and";
+				mes "the small 6 o' clock.";
+			}
+			else if (sign_q == 102) {
+				mes "Check out the";
+				mes "big 4 o' clock,";
+				mes "big 10 o' clock,";
+				mes "small 6 o' clock and the";
+				mes "very small 11 o' clock.";
+			}
+			else if (sign_q == 103) {
+				mes "Check out the";
+				mes "big 5 o' clock,";
+				mes "small 11 o' clock,";
+				mes "small 6 o' clock and the";
+				mes "very small 11 o' clock.";
+			}
+			else if (sign_q == 104) {
+				mes "Check out the";
+				mes "big 4 o' clock,";
+				mes "big 5 o' clock,";
+				mes "big 10 o' clock and";
+				mes "the small 11 o' clock.";
+			}
+			mes "And break those seals";
+			mes "in that order, okay?";
+			next;
+			mes "[Laichin]";
+			mes "Big, small and very small";
+			mes "mean the distances from the";
+			mes "center of the map. So for big,";
+			mes "I mean look near the border of";
+			mes "the map. Easy, huh?";
+			next;
+			mes "[Laichin]";
+			mes "When I say small, you";
+			mes "gotta look in areas closer";
+			mes "than the borders of the map.";
+			mes "For very small, you gotta";
+			mes "look near the center. Got it?";
+			close;
+		}
+	}
+	else if (sign_q < 150) {
+		mes "[Laichin]";
+		mes "Dude, Niflheim rocks.";
+		mes "It's like, a million times";
+		mes "better than that boring";
+		mes "old Asgard. Hell yeah!";
+		next;
+		mes "[Laichin]";
+		mes "Eh, I don't even wanna";
+		mes "know if you manage to";
+		mes "find all of Angrboda's soul";
+		mes "pieces, but if you do, don't";
+		mes "go bringin' close to me. If the";
+		mes "gods find out you have 'em... ";
+		next;
+		mes "[Laichin]";
+		mes "But for the sake of";
+		mes "argument, let's say you";
+		mes "do happen to get them all.";
+		mes "In that case, you oughta get";
+		mes "Angrboda's soul to the Queen";
+		mes "of Hell right away, alright?";
+		next;
+		mes "[Laichin]";
+		mes "Ooh.. But not just any";
+		mes "yahoo can waltz up to her.";
+		mes "The best thing would be to";
+		mes "give it to one of her really";
+		mes "trusted retainers, I guess.";
+		mes "Now, who was he again?";
+		next;
+		mes "[Laichin]";
+		mes "I know he's always in";
+		mes "disguise as some sorta";
+		mes "really ^666666despressing guy^000000";
+		mes "and I can't remember his";
+		mes "name for the life of me, but";
+		mes "he's around here somewhere...";
+		close;
+	}
+	else if (sign_q == 200) {
+		mes "[Laichin]";
+		mes "Whoa...";
+		mes ".................";
+		mes "My freakin' head hurts.";
+		close;
+	}
+	else {
+		mes "[Laichin]";
+		mes "Whoa...";
+		mes ".................";
+		close;
+	}
+}
 
-L_Queen:
-	mes "[Gen]";
-	mes "You must be a very";
-	mes "resourceful mortal.";
-	mes "Not even Lady Hell, with";
-	mes "all her power, could find";
-	mes "the soul of her mother";
-	mes "for a long time.";
-	next;
-	mes "[Gen]";
-	mes "There's no need";
-	mes "for me to hide";
-	mes "my true identity any longer.";
-	mes "My real name is Ganglati,";
-	mes "servant of Lady Hell, the";
-	mes "ruler of Niflheim.";
-	next;
-	mes "[Gen]";
-	mes "Her highness would";
-	mes "have words with you.";
-	mes "Shall I send you to her";
-	mes "mansion, Eljudnir,";
-	mes "right now?";
-	next;
-	menu "Yes",-,"No",L_No;
-	mes "[Gen]";
-	mes "Remember to be";
-	mes "careful and especially";
-	mes "polite when you speak to";
-	mes "Lady Hell. Otherwise, the";
-	mes "consequences will be severe...";
-	close2;
-	warp "que_sign01",45,20;
+niflheim,348,257,1	script	#Cursed Soul	-1,1,1,{
+OnTouch:
+	callfunc "F_UpdateSignVars";
+	if ((sign_q == 83) || (sign_q == 90)) {
+		if (sign_sq == 0) {
+			killmonster "niflheim","#Cursed Soul::OnMyMobDead";
+			mes "[Ashe Bruce]";
+			mes "Leave now, or I will";
+			mes "remove you by force....";
+			next;
+			mes "[Ashe Bruce]";
+			mes "....And...";
+			mes "....Whatever you do...";
+			mes "....Do NOT touch my books...";
+			next;
+			switch(select("Pick up the 1st book.:Pick up the 2nd book.:Pick up the 3rd book.:Leave immediately.")) {
+			case 1:
+				monster "niflheim",349,259,"Rideword",1478,1;
+				mes "[Ashe Bruce]";
+				mes "...!...";
+				mes "How dare you touch my books";
+				mes "when I specifically said";
+				mes "'Don't touch my books!'";
+				next;
+				mes "[Ashe Bruce]";
+				mes "....!...Grrrrr!";
+				mes "I shall tear you apart...!";
+				mes "Be bound by an eternal curse...!";
+				close;
+				break;
+			case 2:
+				mes "[Ashe Bruce]";
+				mes "...!...";
+				mes "You dare touch my books?!";
+				mes "Right after I said not";
+				mes "to touch them...?!";
+				mes "Foolish mortal!";
+				mes "...BEGONE!";
+				close;
+				warp "niflheim",34,162;
+				break;
+			case 3:
+				mes "[Ashe Bruce]";
+				mes "Muhahahaha....";
+				mes "Stubborn mortal~!";
+				mes "Fine! I will give you";
+				mes "a fighting chance and let";
+				mes "you cast a spell.";
+				next;
+				if (select("Clover:Klaatu:Kleitos") == 2) set .@spell,.@spell+1;
+				if (select("Verit:Veritas:Verata") == 3) set .@spell,.@spell+1;
+				if (select("Necktie:Necklace:Nero:^FFFFFFNictu^000000") == 4) set .@spell,.@spell+1;
+				if (.@spell == 3) {
+					if (rand(1,5) == 5) {
+						mes "[Ashe Bruce]";
+						mes "That was the right";
+						mes "spell! But nothing";
+						mes "happened. Madness!";
+						close;
+					}
+					else {
+						mes "[Ashe Bruce]";
+						mes "That spell...";
+						mes "You removed my curse?";
+						mes "I don't believe it. I'm free!";
+						next;
+						mes "[Ashe Bruce]";
+						mes "But do not underestimate";
+						mes "my awesome powers! In fact,";
+						mes "I command you to take this";
+						mes "book and give it to that";
+						mes "weak, pathetic witch!";
+						if (sign_q == 83) {
+							if(sign_sq == 0) {
+								set sign_sq,1;
+								getitem 7304,1; //Witch's_Spell_Book
+							}
+						}
+						else if (sign_q == 90) {
+							set sign_q,91;
+							getitem 7304,1; //Witch's_Spell_Book
+						}
+						close;
+					}
+				}
+				else {
+					monster "niflheim",345,259,"Orc Skeleton",1462,1,"#Cursed Soul::OnMyMobDead";
+					monster "niflheim",347,261,"Orc Skeleton",1462,1,"#Cursed Soul::OnMyMobDead";
+					monster "niflheim",344,253,"Orc Skeleton",1462,1,"#Cursed Soul::OnMyMobDead";
+					monster "niflheim",346,251,"Orc Skeleton",1462,1,"#Cursed Soul::OnMyMobDead";
+					monster "niflheim",349,249,"Orc Skeleton",1462,1,"#Cursed Soul::OnMyMobDead";
+					monster "niflheim",350,260,"Orc Skeleton",1462,1,"#Cursed Soul::OnMyMobDead";
+					monster "niflheim",353,256,"Orc Skeleton",1462,1,"#Cursed Soul::OnMyMobDead";
+					mes "[Ashe Bruce]";
+					mes "Muhahahahahaha!";
+					mes "That's not the right spell!";
+					mes "Now, death awaits you!";
+					close;
+				}
+			case 4:
+				mes "[Ashe Bruce]";
+				mes "Well then.";
+				mes "Try not to trip on";
+				mes "your feet in your";
+				mes "rush to leave.";
+				close;
+			}
+		}
+	}
 	end;
 
-L_No:
-	mes "[Gen]";
-	mes "I understand.";
-	mes "Meeting with a deity is";
-	mes "no small matter. However,";
-	mes "I advise to make haste";
-	mes "as her highness is eager";
-	mes "to see you soon.";
-	close;
-
-L_Serin:
-	mes "[Gen]";
-	mes "You must be most favored";
-	mes "to receive the SYmbol of the";
-	mes "Nine Realms. Of course, it";
-	mes "can be used only once, but";
-	mes "it is still a great honor.";
-	next;
-	mes "[Gen]";
-	mes "Once again, I ask that";
-	mes "you be on guard against";
-	mes "Serin. She may already be";
-	mes "aware of what you plan to";
-	mes "do with the symbol...";
-	close;
-
-L_Hurry:
-	mes "[Gen]";
-	mes "You must hurry and";
-	mes "stop the summoning";
-	mes "before your world in";
-	mes "cast into immense peril!";
-	next;
-	mes "[Gen]";
-	mes "Although Lady Hell";
-	mes "is being rather blase";
-	mes "about this matter, I beseech";
-	mes "you to do what you can for";
-	mes "the realm of the living!";
-	close;
-
-L_Done:
-	mes "[Gen]";
-	mes "You've done a great";
-	mes "job of stopping Serin.";
-	mes "Excellent! Such great";
-	mes "service on behalf of";
-	mes "the realm of the living!";
-	next;
-	mes "[Gen]";
-	mes "I'm pleased to inform";
-	mes "you that you've been";
-	mes "invited to Lady Hell's";
-	mes "mansion once again.";
-	mes "Are you ready to go?";
-	next;
-	menu "No, thanks.",L_No2,"Yes.",-;
-	mes "[Gen]";
-	mes "Good, good.";
-	mes "Don't forget to";
-	mes "speak to her highness";
-	mes "with the utmost respect!";
-	close2;
-	warp "que_sign01",45,20;
+OnMyMobDead:
 	end;
-
-L_No2:
-	mes "[Gen]";
-	mes "I see.";
-	mes "Well then, come";
-	mes "back to me when you";
-	mes "feel fully prepared.";
-	close;
-
 }
 
-niflheim,146,241,1	script	#signgen	139,2,2,{
-
-	if(signquest == 45 || Sign_Branch2B == 1) goto L_SignGen;
+nif_in,102,81,1	script	#Crayu	-1,1,1,{
+OnTouch:
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 75) {
+		end;
+	}
+	else if (sign_q < 82) {
+		mes "[Crayu]";
+		mes "Mountain sunset to the west";
+		mes "Where the purple dusk falls ";
+		mes "Surrounded by beautiful melody";
+		mes "^You become the key that ignores its master";
+		close;
+	}
+	else if (sign_q == 86) {
+		mes "[Crayu]";
+		mes "Mountain sunset to the west";
+		mes "Where the purple dusk falls ";
+		mes "Surrounded by beautiful melody";
+		mes "You become the key that ignores its master";
+		next;
+		mes "[Crayu]";
+		mes "Hello adventurer.";
+		mes "I know this is rather";
+		mes "abrupt, but what do";
+		mes "you think of Serin?";
+		next;
+		select("She's good.:She's evil!:She could go either way.");
+		mes "[Crayu]";
+		mes "Hm...?";
+		mes "And why do";
+		mes "you think so?";
+		next;
+		switch(select("Just my opinion.:It's the truth!")) {
+		case 1:
+			if (sign_sq > 1) {
+				set sign_sq,0;
+			}
+			else {
+				set sign_sq,sign_sq+1;
+			}
+			break;
+		case 2:
+			break;
+		}
+		mes "[Crayu]";
+		mes "Ah, I understand.";
+		mes "Now, how may I help you?";
+		next;
+		switch(select("What exactly is Niflheim?:How do I become one of the chosen?")) {
+		case 1:
+			mes "[Crayu]";
+			mes "Niflheim is commonly";
+			mes "known as the city of the";
+			mes "dead, but it's also the";
+			mes "resting place of warriors";
+			mes "who failed to enter Valhalla.";
+			next;
+			mes "[Crayu]";
+			mes "Some heroes may think";
+			mes "of Niflheim as the tragic end,";
+			mes "but it really all depends on";
+			mes "your point of view.";
+			close;
+		case 2:
+			mes "["+strcharinfo(0)+"]";
+			mes "What do I need";
+			mes "to do to become one";
+			mes "of the chosen warriors?";
+			next;
+			mes "[Crayu]";
+			mes "First and foremost,";
+			mes "you must prove your courage.";
+			mes "It will be up to you to decide";
+			mes "how you will demonstrate your";
+			mes "bravery. The gods will only";
+			mes "be watching and judging.";
+			next;
+			mes "[Crayu]";
+			mes "Hmm...";
+			mes "I think it would";
+			mes "be a good idea if";
+			mes "you talk to someone";
+			mes "in Niflheim named ^FF0000Gen^000000.";
+			set sign_q,87;
+			close;
+		}
+	}
+	else if (sign_q == 86) {
+		mes "Hmm...";
+		mes "I think it would";
+		mes "be a good idea if";
+		mes "you talk to someone";
+		mes "in Niflheim named ^FF0000Gen^000000.";
+		close;
+	}
 	end;
-
-L_SignGen:
-	mes "[Gen]";
-	mes "Are you here";
-	mes "to prove your";
-	mes "courage to the Gods?";
-	next;
-	mes "[Gen]";
-	mes "You know, I was an";
-	mes "adventurer myself. In fact,";
-	mes "I even came here to Niflheim";
-	mes "for the ordeals set by the gods.";
-	mes "However, I failed and ended up";
-	mes "being bound to this realm...";
-	next;
-	mes "[Gen]";
-	mes "I just wanted to warn you.";
-	mes "Be careful and don't justify";
-	mes "your greed for any sort of reward";
-	mes "using the excuse that you're just";
-	mes "gonna prove your courage.";
-	mes "That's what I did...";
-	next;
-	mes "[Gen]";
-	mes "Anyway, I've already talked";
-	mes "too much. First, go and see";
-	mes "the witch and ask her to";
-	mes "help you out, okay?";
-	if(Sign_Branch2B) set Sign_Branch2B,2;
-	if(signquest == 45) set signquest,46;
-	close;
-
 }
 
-nif_in,140,177,1	script	#signgrave	111,{
-
-	if(signquest > 47 || countitem(7313) > 0)  warp "que_sign01",115,135;
+nif_in,156,91,1	script	#kidniff	-1,1,1,{
+OnTouch:
+	callfunc "F_UpdateSignVars";
+	if (sign_q == 83) {
+		if (sign_sq == 0) {
+			mes "[Alakina Ann]";
+			mes "^333333*Cries*^000000";
+			mes "Where am I?";
+			mes "I... I wanna go home~";
+			emotion e_sob;
+			close;
+		}
+		else if (sign_sq == 1) {
+			mes "[Alakina Ann]";
+			mes "W-will you help me get";
+			mes "back home? Please? I miss";
+			mes "my mommy and my daddy and";
+			mes "I don't know how I got here.";
+			mes "^333333*Sniff*^000000";
+			next;
+			switch(select("What can I do?:You can't go back...")) {
+			case 1:
+				mes "[Alakina Ann]";
+				mes "I dunno. I-I think a ";
+				mes "singing man told me to";
+				mes "go meet a witch, but it's";
+				mes "too scary to go outside...";
+				set sign_sq,2;
+				close;
+			case 2:
+				mes "[Alakina Ann]";
+				mes "^333333*Sniff*^000000";
+				mes "N-no...";
+				mes "I wanna go home...";
+				close2;
+				emotion e_sob;
+				end;
+			}
+		}
+		else if (sign_sq == 2) {
+			mes "[Alakina Ann]";
+			mes "^333333*Cries*^000000";
+			mes "Where am I?";
+			mes "I... I wanna go home~";
+			emotion e_sob;
+			close;
+		}
+		else if ((sign_sq == 3) || (sign_sq == 4)) {
+			if (countitem(7309) > 0) {
+				mes "[Alakina Ann]";
+				mes "I... I can use";
+				mes "this to go back home?";
+				mes "Thank you! Thank you so much!";
+				delitem 7309,countitem(7309); //Wing_Of_Crow
+				set sign_sq,5;
+				close;
+			}
+			else {
+				mes "[Alakina Ann]";
+				mes "How am I gonna";
+				mes "find that witch?";
+				mes "She's the only one";
+				mes "who knows how to";
+				mes "get me back home...";
+				mes "^333333*Cries*^000000";
+				emotion e_sob;
+				close;
+			}
+		}
+		else if (sign_sq == 5) {
+			mes "[Alakina Ann]";
+			mes "Y-you lied to me!";
+			mes "This wing doesn't do";
+			mes "anything! I-I'm still here";
+			mes "in this scary place! ^333333*Cries*^000000";
+			set sign_sq,6;
+			emotion e_sob;
+			close;
+		}
+		else {
+			mes "[Alakina Ann]";
+			mes "You said that you";
+			mes "could help me get home,";
+			mes "but you didn't help me";
+			mes "at all. Y-you lied to me!";
+			mes "I... I hate you! ^333333*Wah~!*^000000";
+			emotion e_sob;
+			close;
+		}
+	}
+	else {
+		mes "[Alakina Ann]";
+		mes "^333333*Cries*^000000";
+		mes "Where am I?";
+		mes "I... I wanna go home~";
+		emotion e_sob;
+		close;
+	}
 	end;
-
-}
-
-que_sign01,122,141,5	script	Witch#2	792,{
-
-    if (signquest > 56) goto L_NoMedal;
-    if (signquest > 55) goto L_Success;
-    if (Sign_Branch8B && Sign_Branch8B < 4)goto L_MustHurry;
-    if ((countitem(7313) > 0) && Sign_Branch8A < 4 ) goto L_Medal;
-    if (Sign_Branch8A) goto L_BranchA;
-    if (signquest > 54 && countitem(7305)) goto L_Symbol;
-    if (signquest < 48) goto L_NoMedal;
-    mes "[Kirkena]";
-    mes "If you need to learn more";
-    mes "about Angrboda, why don't you";
-    mes "just ask around? I'm sure that";
-    mes "everyone is aware that the queen";
-    mes "is searching for her mother.";
-    next;
-    mes "[Kirkena]";
-    mes "Once again, don't let";
-    mes "anyone know that I've asked";
-    mes "you to bring me the Symbol of";
-    mes "Nine Realms. I especially";
-    mes "don't want Serin to find out.";
-    next;
-    mes "[Kirkena]";
-    mes "If I can help it,";
-    mes "I won't tolerate";
-    mes "Serin's presence here";
-    mes "in Niflheim. If I could";
-    mes "banish her, I'd do it!";
-    close;
-
-L_Symbol:
-    mes "[Kirkena]";
-    mes "The Symbol of Nine Realms?";
-    mes "How were you able to get that?!";
-    mes "Ah, you must have found the Queen";
-    mes "of the Dead's mother, Angrboda,";
-    mes "right? Great work~";
-    next;
-    mes "[Kirkena]";
-    mes "Now, if you'll just";
-    mes "hand me the symbol, I'll tell";
-    mes "you what you need to do next.";
-    next;
-    menu "Give the symbol.",L_Give,"Don't give the symbol.",-;
-    mes "[Kirkena]";
-    mes "Don't worry about that.";
-    mes "I'm sure you will come back";
-    mes "later with the wise decision";
-    mes "to give the symbol to me~";
-    close;
-
-L_Give:
-    mes "[Kirkena]";
-    mes "Listen carefully.";
-    mes "Since you were actually";
-    mes "able to get the symbol, I believe";
-    mes "that you're the only person capable";
-    mes "of performing this next task.";
-    next;
-    mes "[Kirkena]";
-    mes "We're going to use this";
-    mes "symbol to create something,";
-    mes "but we need one last item.";
-    mes "I need you to find something";
-    mes "imbued with Serin's vibes.";
-    next;
-    mes "[Kirkena]";
-    mes "Serin's already hid herself";
-    mes "deep within Niflheim, but I'm";
-    mes "sure you can find something";
-    mes "if you can find any remaining";
-    mes "trace of her.";
-    delitem 7305,1;
-    set Sign_Branch8A,1;
-    close;
-
-L_BranchA:
-    if (sign_fail) goto L_NoMedal;
-    if (Sign_Branch8A > 3) goto L_Serin;
-    if (Sign_Branch8A > 2) goto L_Complete;
-    if (Sign_Branch8A > 1) goto L_Potion;
-    if (countitem(2642) < 1) goto L_Lack;
-    mes "[Kirkena]";
-    mes "This is Serin's gold ring?";
-    mes "Excellent, this has been";
-    mes "strongly infused with her";
-    mes "vibes. It's really tough to find";
-    mes "something like this that resonates";
-    mes "so strongly with his owner.";
-    next;
-    delitem 2642,1;
-    set serinring,1;
-    set Sign_Branch8A,2;
-    close;
-
-L_Potion:
-    mes "[Kirkena]";
-    mes "Now that the potion I'm";
-    mes "making is being processed,";
-    mes "I can finally tell you what";
-    mes "I've been trying to do";
-    mes "with the objects I've asked you";
-    mes "to get for me.";
-    next;
-    mes "[Kirkena]";
-    mes "I didn't explain";
-    mes "the reason I wanted the Symbol";
-    mes "of Nine Realms to prevent Serin";
-    mes "from getting suspicious and forcing";
-    mes "you to reveal my plans. You see,";
-    mes "Serin isn't fit for Niflheim.";
-    next;
-    mes "[Kirkena]";
-    mes "Although she's in the";
-    mes "world of the dead, Serin";
-    mes "has never accepted death and";
-    mes "has desired to return to life. Of";
-    mes "course, That's the natural response";
-    mes "for everyone that comes here...";
-    next;
-    mes "[Kirkena]";
-    mes "However, unlike the others";
-    mes "who have despaired, lost";
-    mes "hope and accepted their fate,";
-    mes "Serin has never given up her hope";
-    mes "to return to life. With her hope";
-    mes "she retains her beauty and light.";
-    next;
-    mes "[Kirkena]";
-    mes "But she's only denying";
-    mes "the fate she deserves.";
-    mes "What she's trying to do";
-    mes "is wrong and we need to";
-    mes "stop before it's too late.";
-
-L_Menu:
-    next;
-    menu "What does she want?",-,"What is she going to do?",L_Plans,"What should I do?",L_Should;
-    mes "[Kirkena]";
-    mes "Make no mistake:";
-    mes "Serin wants the Symbol";
-    mes "of the Nine Realms.";
-    next;
-    mes "[Kirkena]";
-    mes "Now, if she could use it";
-    mes "multiple times, she could just";
-    mes "command the guards of Niflheim";
-    mes "to just let her pass and re-enter";
-    mes "the world of the living. But your";
-    mes "symbol can be used just once...";
-    goto L_Menu;
-
-L_Plans:
-    mes "[Kirkena]";
-    mes "I believe Serin is going to";
-    mes "summon the Dark Lord. Since";
-    mes "she used to be a great wizard,";
-    mes "it's entirely possible. However,";
-    mes "she might need the Symbol of the";
-    mes "Nine Realms in order to do it.";
-    next;
-    mes "[Kirkena]";
-    mes "Now, you may believe that";
-    mes "Dark Lord can be defeated by";
-    mes "humans, but what you might not";
-    mes "know is that the manifestation of";
-    mes "Dark Lord in your world is limited";
-    mes "to a fraction of his true power.";
-    next;
-    mes "[Kirkena]";
-    mes "Sometimes, Dark Lord can";
-    mes "cross over into Rune-Midgard,";
-    mes "but travelling from his world into";
-    mes "ours takes vast amounts of energy.";
-    mes "Also the life force in your world";
-    mes "conflicts with his dark powers.";
-    next;
-    mes "[Kirkena]";
-    mes "Now, if the Dark Lord";
-    mes "were summoned into Niflheim,";
-    mes "he would have easy access";
-    mes "to Rune-Midgard and the use";
-    mes "of all of his destructive power.";
-    next;
-    mes "[Kirkena]";
-    mes "Serin plans to strike";
-    mes "a deal with Dark Lord.";
-    mes "In exchange for summoning";
-    mes "him to Niflheim, Serin will";
-    mes "be brought back to life.";
-    next;
-    mes "[Kirkena]";
-    mes "Although you've found";
-    mes "favor with Lady Hell, she";
-    mes "will probably not stop Dark";
-    mes "Lord's approach. Dark Lord";
-    mes "only wants Rune-Midgard.";
-    next;
-    mes "[Kirkena]";
-    mes "Now that I think about";
-    mes "it, massive death would";
-    mes "actually increase Lady Hell's";
-    mes "sphere of influence. I don't think";
-    mes "she'll help Dark Lord, but she";
-    mes "also won't get in his way.";
-    goto L_Menu;
-
-L_Should:
-    mes "[Kirkena]";
-    mes "I need you to take";
-    mes "this tonic and have";
-    mes "Serin drink it. This";
-    mes "special potion will erase";
-    mes "most of her memories.";
-    next;
-    mes "[Kirkena]";
-    mes "Without her memories,";
-    mes "Serin should also lose";
-    mes "her twisted ambitions.";
-    mes "Now, with the Symbol of Nine";
-    mes "Realms, Serin cannot refuse";
-    mes "drinking this potion.";
-    next;
-    mes "[Kirkena]";
-    mes "That's why having the";
-    mes "symbol is so crucial.";
-    mes "Serin is clever enough";
-    mes "to avoid drinking this";
-    mes "for quite a while now...";
-    set Sign_Branch8A,3;
-    close;
-
-L_Complete:
-    mes "[Kirkena]";
-    mes "The potion is finally";
-    mes "completed. Now, take this";
-    mes "and command Serin to drink it.";
-    next;
-    if (serinring > 0) {
-        mes "[Kirkena]";
-        mes "Luckily, I was able to";
-        mes "use Serin's gold ring to";
-        mes "trace her location. I'm going";
-        mes "to send you there, so please";
-        mes "do whatever it takes to stop her.";
-        next;
-    }
-    mes "[Kirkena]";
-    mes "Please take these with you";
-    mes "as they'll probably be useful";
-    mes "when you deal with her. As for";
-    mes "these vouchers, give them to your";
-    mes "allies. They'll send them straight";
-    mes "to where Serin is located.";
-    next;
-    mes "[Kirkena]";
-    mes "When you're finished";
-    mes "dealing with Serin, don't";
-    mes "forget to bring back all";
-    mes "of the vouchers I've";
-    mes "given you, alright?";
-    getitem 7308,1;
-    if (serinring > 0) getitem 2643,1;
-    getitem 7313,5;
-    set Sign_Branch8A,4;
-    close;
-
-L_Serin:
-    if (($signroomfull > 1) || getmapusers("que_sign02") > 0 || getareausers("que_sign01",229,227,166,162) > 0) goto L_Full;
-    if (Sign_Branch8A == 7) set Sign_Branch8A,8;
-    if (countitem(2643) < 1) goto L_NoRing;
-    mes "[Kirkena]";
-    mes "You're finally";
-    mes "back, we might not";
-    mes "have enough time to";
-    mes "stop her, but we have";
-    mes "to try. Are you ready?";
-    next;
-    menu "Yes",-,"No",L_No;
-    if (($signroomfull > 1) || getmapusers("que_sign02") > 0 || getareausers("que_sign01",229,227,166,162) > 0) goto L_Full;
-    close2;
-    donpcevent "#signserin::OnSerin";
-    donpcevent "#signserin::OnCooldown";
-    set $signroomfull,2;
-    set $signparty,getcharid(1);
-    set $signplayer,getcharid(0);
-    warp "que_sign01",195,189;
-    end;
-
-L_No:
-    mes "[Kirkena]";
-    mes "Hurry up, then!";
-    mes "There's no time";
-    mes "to waste!";
-    close;
-
-L_Full:
-    mes "[Kirkena]";
-    mes "Please wait";
-    mes "a bit. I'm still";
-    mes "trying to finish";
-    mes "these preparations.";
-    close;
-
-L_Lack:
-    mes "[Kirkena]";
-    mes "Without a violent wave";
-    mes "of Serin's feelings, I";
-    mes "will not be able to";
-    mes "lead you that close from";
-    mes "her. Well... Nevermind. It will";
-    mes "be enough.";
-    set Sign_Branch8A,2;
-    close;
-
-L_NoRing:
-    mes "[Kirkena]";
-    mes "We've got to";
-    mes "stop Serin before";
-    mes "she does something";
-    mes "truly horrible. Are";
-    mes "you ready to go?";
-    next;
-    menu "Yes",-,"No",L_No;
-    if (($signroomfull > 1) || getmapusers("que_sign02") > 0 || getareausers("que_sign01",229,227,166,162) > 0) goto L_Full;
-    mes "[Kirkena]";
-    mes "Okay then.";
-    mes "Good luck,";
-    mes "" + strcharinfo(0) + "...";
-    close2;
-    if (($signroomfull > 1) || getmapusers("que_sign02") > 0 || getareausers("que_sign01",229,227,166,162) > 0) end;
-    donpcevent "#signserin::OnSerin";
-    donpcevent "#signserin::OnCooldown";
-    set $signroomfull,2;
-    set $signparty,getcharid(1);
-    warp "que_sign02",35,313;
-    end;
-
-L_Medal:
-    callfunc "Sign_Party";
-
-L_NoMedal:
-    if (signquest > 56) goto L_Done;
-    if (sign_fail) goto L_Fail;
-    mes "[Kirkena]";
-    mes "...";
-    close;
-
-L_Success:
-    if (countitem(7313) < 5 && Sign_Branch8A) goto L_Voucher;
-    if (Sign_Branch8A) delitem 7313,5;
-    mes "[Kirkena]";
-    mes "You've done well.";
-    mes "Without her memories of her";
-    mes "previous life, Serin can remain";
-    mes "here in Niflheim peacefully.";
-    next;
-    mes "[Kirkena]";
-    mes "Although she failed to return to";
-    mes "life, I'm sure she is glad to have";
-    mes "met you, I think she's also started";
-    mes "to learn that life's meaning is not";
-    mes "in living alone...";
-    next;
-    mes "[Kirkena]";
-    mes "Once again, thank";
-    mes "you so much for your";
-    mes "help. Once you finish here,";
-    mes "please visit our queen, Lady Hell.";
-    mes "I believe she wants to see you for";
-    mes "some reason...";
-    set signquest,57;
-    getexp 500000,0;
-    close;
-
-L_Voucher:
-    mes "[Kirkena]";
-    mes "Hmmm...?";
-    mes "Where are all the";
-    mes "vouchers I've lent to you?";
-    mes "Please retrieve them all";
-    mes "before coming back to me.";
-    close;
-
-L_Done:
-    mes "[Kirkena]";
-    mes "Hm? Still exploring";
-    mes "Niflheim? Although you're";
-    mes "strong enough to survive,";
-    mes "I still think you're risking";
-    mes "your life by remaining here";
-    mes "when you don't have to.";
-    close;
-
-L_MustHurry:
-    mes "[Kirkena]";
-    mes "You must hurry to stop";
-    mes "Serin from accomplishing her";
-    mes "plan, otherwise your world";
-    mes "will be cast in shadows for all";
-    mes "eternity!";
-    close;
-
-L_Fail:
-    if (sign_fail == 1) {
-        mes "[Kirkena]";
-        mes "Damn! Did you really let";
-        mes "her finish her summoning?";
-        mes "That's terrible! Does she";
-        mes "even know that she will not";
-        mes "have any memory of her past life?";
-        set sign_fail,2;
-        next;
-    }
-    mes "[Kirkena]";
-    mes "So much energy and time wasted";
-    mes "for no rewards. I guess it";
-    mes "can't be helped. Now, return";
-    mes "to your world, and watch its";
-    mes "silent death.";
-    close;
-
-}
-
-//Seals in Glast Heim Lowest Cave
-gl_dun02,262,265,1	script	Mysterious Energy	111,{
-
-    if ((brokenseal == 1 && Sign_Seal1 == 1) || (brokenseal == 2 && Sign_Seal2 == 1) || (brokenseal == 3 && Sign_Seal3 == 1) || (brokenseal == 4 && Sign_Seal4 == 1)) {
-        callfunc "Break_Seal";
-        mes "^3355FFThe weapon you're holding";
-        mes "right now doesn't look like it has";
-        mes "any chance of breaking this seal.";
-        mes "You'll definitely need something";
-        mes "more powerful...";
-        close;
-    } else {
-        mes "^3355FFYou sense a strange";
-        mes "mysterious energy emanating from";
-        mes "this area. For some reason, this";
-        mes "power strikes you with a faint";
-        mes "feeling of sadness.";
-        close;
-    }
-
 }
 
-gl_dun02,270,98,1	script	Mysterious Energy#2	111,{
-
-    if ((brokenseal == 1 && Sign_Seal1 == 2) || (brokenseal == 2 && Sign_Seal2 == 2) || (brokenseal == 3 && Sign_Seal3 == 2) || (brokenseal == 4 && Sign_Seal4 == 2)) {
-        callfunc "Break_Seal";
-        mes "^3355FFThe weapon you're holding";
-        mes "right now doesn't look like it has";
-        mes "any chance of breaking this seal.";
-        mes "You'll definitely need something";
-        mes "more powerful...";
-        close;
-    } else {
-        mes "^3355FFYou sense a strange";
-        mes "mysterious energy emanating from";
-        mes "this area. For some reason, this";
-        mes "power strikes you with a faint";
-        mes "feeling of sadness.";
-        close;
-    }
-
-}
-
-gl_dun02,268,31,1	script	Mysterious Energy#3	111,{
-
-    if ((brokenseal == 1 && Sign_Seal1 == 3) || (brokenseal == 2 && Sign_Seal2 == 3) || (brokenseal == 3 && Sign_Seal3 == 3) || (brokenseal == 4 && Sign_Seal4 == 3)) {
-        callfunc "Break_Seal";
-        mes "^3355FFThe weapon you're holding";
-        mes "right now doesn't look like it has";
-        mes "any chance of breaking this seal.";
-        mes "You'll definitely need something";
-        mes "more powerful...";
-        close;
-    } else {
-        mes "^3355FFYou sense a strange";
-        mes "mysterious energy emanating from";
-        mes "this area. For some reason, this";
-        mes "power strikes you with a faint";
-        mes "feeling of sadness.";
-        close;
-    }
-
+gl_dun02,262,265,0	script	Mysterious Energy#1	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q < 101) {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
+	else if (sign_q == 101) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFOnce you strike the seal,";
+		mes "it cracks open and a flash of mysterious light floods out of it. Inside of the seal, you find a very peculiar object...^000000";
+		next;
+		mes "^3355FFYou have";
+		mes "obtained a^6E7B8B";
+		mes "Piece of Spirit^3355FF.^000000";
+		set sign_q,105;
+		getitem 7306,1; //Fragment_Of_Soul
+		close;
+	}
+	else {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
 }
 
-gl_dun02,139,72,1	script	Mysterious Energy#4	111,{
-
-    if ((brokenseal == 1 && Sign_Seal1 == 4) || (brokenseal == 2 && Sign_Seal2 == 4) || (brokenseal == 3 && Sign_Seal3 == 4) || (brokenseal == 4 && Sign_Seal4 == 4)) {
-        callfunc "Break_Seal";
-        mes "^3355FFThe weapon you're holding";
-        mes "right now doesn't look like it has";
-        mes "any chance of breaking this seal.";
-        mes "You'll definitely need something";
-        mes "more powerful...";
-        close;
-    } else {
-        mes "^3355FFYou sense a strange";
-        mes "mysterious energy emanating from";
-        mes "this area. For some reason, this";
-        mes "power strikes you with a faint";
-        mes "feeling of sadness.";
-        close;
-    }
-
+// Angrboda's Seal 2 big 4 O'clock 270 198
+gl_dun02,271,100,0	script	Mysterious Energy#2	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q < 101) {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
+	else if ((sign_q == 102) || (sign_q == 104)) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFOnce you strike the seal,";
+		mes "it cracks open and a flash of mysterious light floods out of it. Inside of the seal, you find a very peculiar object...^000000";
+		next;
+		mes "^3355FFYou have";
+		mes "obtained a^6E7B8B";
+		mes "Piece of Spirit^3355FF.^000000";
+		if (sign_q == 102) {
+			set sign_q,106;
+		}
+		else if (sign_q == 104) {
+			set sign_q,108;
+		}
+		getitem 7306,1; //Fragment_Of_Soul
+		close;
+	}
+	else {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
 }
 
-gl_dun02,16,26,1	script	Mysterious Energy#5	111,{
-
-    if ((brokenseal == 1 && Sign_Seal1 == 5) || (brokenseal == 2 && Sign_Seal2 == 5) || (brokenseal == 3 && Sign_Seal3 == 5) || (brokenseal == 4 && Sign_Seal4 == 5)) {
-        callfunc "Break_Seal";
-        mes "^3355FFThe weapon you're holding";
-        mes "right now doesn't look like it has";
-        mes "any chance of breaking this seal.";
-        mes "You'll definitely need something";
-        mes "more powerful...";
-        close;
-    } else {
-        mes "^3355FFYou sense a strange";
-        mes "mysterious energy emanating from";
-        mes "this area. For some reason, this";
-        mes "power strikes you with a faint";
-        mes "feeling of sadness.";
-        close;
-    }
-
+// Angrboda's Seal 3 big 5 O'clock 268 32
+gl_dun02,268,32,0	script	Mysterious Energy#3	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q < 101) {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
+	else if ((sign_q == 103) || (sign_q == 105) || (sign_q == 108)) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFOnce you strike the seal,";
+		mes "it cracks open and a flash of mysterious light floods out of it. Inside of the seal, you find a very peculiar object...^000000";
+		next;
+		mes "^3355FFYou have";
+		mes "obtained a^6E7B8B";
+		mes "Piece of Spirit^3355FF.^000000";
+		if (sign_q == 103) {
+			set sign_q,107;
+		}
+		else if (sign_q == 105) {
+			set sign_q,109;
+		}
+		else if (sign_q == 108) {
+			set sign_q,112;
+		}
+		getitem 7306,1; //Fragment_Of_Soul
+		close;
+	}
+	else {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
 }
 
-gl_dun02,120,180,1	script	Mysterious Energy#6	111,{
-
-    if ((brokenseal == 1 && Sign_Seal1 == 6) || (brokenseal == 2 && Sign_Seal2 == 6) || (brokenseal == 3 && Sign_Seal3 == 6) || (brokenseal == 4 && Sign_Seal4 == 6)) {
-        callfunc "Break_Seal";
-        mes "^3355FFThe weapon you're holding";
-        mes "right now doesn't look like it has";
-        mes "any chance of breaking this seal.";
-        mes "You'll definitely need something";
-        mes "more powerful...";
-        close;
-    } else {
-        mes "^3355FFYou sense a strange";
-        mes "mysterious energy emanating from";
-        mes "this area. For some reason, this";
-        mes "power strikes you with a faint";
-        mes "feeling of sadness.";
-        close;
-    }
-
+// Angrboda's Seal 4 big 7 O'clock 16 26
+gl_dun02,16,26,0	script	Mysterious Energy#4	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q < 101) {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
+	else if (sign_q == 109) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFOnce you strike the seal,";
+		mes "it cracks open and a flash of mysterious light floods out of it. Inside of the seal, you find a very peculiar object...^000000";
+		next;
+		mes "^3355FFYou have";
+		mes "obtained a^6E7B8B";
+		mes "Piece of Spirit^3355FF.^000000";
+		if (sign_q == 109) {
+			set sign_q,113;
+		}
+		getitem 7306,1; //Fragment_Of_Soul
+		close;
+	}
+	else {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
 }
 
-gl_dun02,42,251,1	script	Mysterious Energy#7	111,{
-
-    if ((brokenseal == 1 && Sign_Seal1 == 7) || (brokenseal == 2 && Sign_Seal2 == 7) || (brokenseal == 3 && Sign_Seal3 == 7) || (brokenseal == 4 && Sign_Seal4 == 7)) {
-        callfunc "Break_Seal";
-        mes "^3355FFThe weapon you're holding";
-        mes "right now doesn't look like it has";
-        mes "any chance of breaking this seal.";
-        mes "You'll definitely need something";
-        mes "more powerful...";
-        close;
-    } else {
-        mes "^3355FFYou sense a strange";
-        mes "mysterious energy emanating from";
-        mes "this area. For some reason, this";
-        mes "power strikes you with a faint";
-        mes "feeling of sadness.";
-        close;
-    }
-
+// Angrboda's Seal 5 big 11 O'clock 42 251
+gl_dun02,42,251,0	script	Mysterious Energy#5	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q < 101) {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
+	else if ((sign_q == 106) || (sign_q == 112)) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFOnce you strike the seal,";
+		mes "it cracks open and a flash of mysterious light floods out of it. Inside of the seal, you find a very peculiar object...^000000";
+		next;
+		mes "^3355FFYou have";
+		mes "obtained a^6E7B8B";
+		mes "Piece of Spirit^3355FF.^000000";
+		if (sign_q == 106) {
+			set sign_q,110;
+		}
+		else if (sign_q == 112) {
+			set sign_q,116;
+		}
+		getitem 7306,1; //Fragment_Of_Soul
+		close;
+	}
+	else {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
 }
 
-gl_dun02,124,231,1	script	Mysterious Energy#8	111,{
-
-    if ((brokenseal == 1 && Sign_Seal1 == 8) || (brokenseal == 2 && Sign_Seal2 == 8) || (brokenseal == 3 && Sign_Seal3 == 8) || (brokenseal == 4 && Sign_Seal4 == 8)) {
-        callfunc "Break_Seal";
-        mes "^3355FFThe weapon you're holding";
-        mes "right now doesn't look like it has";
-        mes "any chance of breaking this seal.";
-        mes "You'll definitely need something";
-        mes "more powerful...";
-        close;
-    } else {
-        mes "^3355FFYou sense a strange";
-        mes "mysterious energy emanating from";
-        mes "this area. For some reason, this";
-        mes "power strikes you with a faint";
-        mes "feeling of sadness.";
-        close;
-    }
+// Angrboda's Seal 6 small 11 O'clock 123 234
+gl_dun02,123,234,0	script	Mysterious Energy#6	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q < 101) {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
+	else if (sign_q == 107) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFOnce you strike the seal,";
+		mes "it cracks open and a flash of mysterious light floods out of it. Inside of the seal, you find a very peculiar object...^000000";
+		next;
+		mes "^3355FFYou have";
+		mes "obtained a^6E7B8B";
+		mes "Piece of Spirit^3355FF.^000000";
+		if (sign_q == 107) {
+			set sign_q,111;
+		}
+		getitem 7306,1; //Fragment_Of_Soul
+		close;
+	}
 
+	else if (sign_q == 116) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFUpon obtaining the last piece";
+		mes "of Agrboda's soul, all four soul pieces emitted a strange light, rose to the air and combined into";
+		mes "a single transparent jewel.^000000";
+		next;
+		mes "^3355FFThe jewel floated";
+		mes "down to your waiting";
+		mes "hands, and you hear its";
+		mes "voice speak directly into";
+		mes "the depths of your heart...";
+		next;
+		mes "[Agrboda's Soul]";
+		mes "^333333I'm...";
+		mes "I'm leaving my soul";
+		mes "with you. Please guide";
+		mes "me to the queen of the dead...";
+		delitem 7306,3; //Fragment_Of_Soul
+		set sign_q,117;
+		getitem 7307,1; //Whisper_Of_Soul
+		close;
+	}
+	else {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
 }
 
-
-function	script	Break_Seal	{
-
-	getinventorylist;
-	set @i,-1;
-L_Check:
-	set @i,@i+1;
-	if(getiteminfo(@inventorylist_id[@i],13) == 4) goto L_Break;
-	if(@i < @inventorylist_count -1) goto L_Check;
-	return;
-
-L_Break:
-	set @sealbreak,rand(100);
-	if(@sealbreak < 11) goto L_Broken;
-	mes "^3355FFYou hit the seal as hard";
-	mes "as you can with the weapon in your";
-	mes "hand. However, the seal is merely";
-	mes "shaken by the force of your blow.";
-	mes "Perhaps you need something";
-	mes "more powerful to break the seal...";
-	close;
-
-L_Broken:
-	mes "^3355FFOnce you strike the seal,";
-	mes "it cracks open and a flash of";
-	mes "mysterious light floods out of it.";
-	mes "Inside of the seal, you find a very";
-	mes "peculiar object...";
-	next;
-	set brokenseal,brokenseal +1;
-	set @sealbreak,0;
-	if(brokenseal > 4) goto L_Soul;
-	mes "You have";
-	mes "obtained a";
-	mes "^C9CACBPiece of Spirit.^000000";
-	getitem 7306,1;
-	close;
-
-L_Soul:
-	mes "^3355FFUpon obtaining the last piece";
-	mes "of Angrboda's soul, all four soul";
-	mes "pieces emitted a strange light,";
-	mes "rose to the air and combined into";
-	mes "a single transparent jewel.";
-	next;
-	mes "^3355FFThe jewel floated";
-	mes "down to your waiting";
-	mes "hands, and you hear its";
-	mes "voice speak directly into";
-	mes "the depths of your heart...^000000";
-	next;
-	mes "[Angrboda's Soul]";
-	mes "I'm...";
-	mes "I'm leaving my soul";
-	mes "with you. Please guide";
-	mes "me to the queen of the dead...";
-	delitem 7306,countitem(7306);
-	getitem 7307,1;
-	set signquest,54;
-	close;
+// Angrboda's Seal 7 small 6 O'clock 140 72
+gl_dun02,140,72,0	script	Mysterious Energy#7	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q < 101) {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
+	else if ((sign_q == 110) || (sign_q == 111)) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFOnce you strike the seal,";
+		mes "it cracks open and a flash of mysterious light floods out of it. Inside of the seal, you find a very peculiar object...^000000";
+		next;
+		mes "^3355FFYou have";
+		mes "obtained a^6E7B8B";
+		mes "Piece of Spirit^3355FF.^000000";
+		if (sign_q == 110) {
+			set sign_q,114;
+		}
+		else if (sign_q == 111) {
+			set sign_q,115;
+		}
+		getitem 7306,1; //Fragment_Of_Soul
+		close;
+	}
+	else if (sign_q == 113) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFUpon obtaining the last piece";
+		mes "of Agrboda's soul, all four soul pieces emitted a strange light, rose to the air and combined into";
+		mes "a single transparent jewel.^000000";
+		next;
+		mes "^3355FFThe jewel floated";
+		mes "down to your waiting";
+		mes "hands, and you hear its";
+		mes "voice speak directly into";
+		mes "the depths of your heart...";
+		next;
+		mes "[Agrboda's Soul]";
+		mes "^333333I'm...";
+		mes "I'm leaving my soul";
+		mes "with you. Please guide";
+		mes "me to the queen of the dead...";
+		delitem 7306,3; //Fragment_Of_Soul
+		set sign_q,117;
+		getitem 7307,1; //Whisper_Of_Soul
+		close;
+	}
+	else {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
 }
 
-//End of Seals
-
-que_sign01,46,55,1	script	Fountain	111,{
-	if(signquest > 54) goto L_Bottle;
-	mes "^3355FFThe water in this";
-	mes "fountain looks clean";
-	mes "enough to drink...";
-	next;
-	menu "Drink.",-,"Don't Drink.",L_No;
-	mes "...";
-	close2;
-	percentheal -100,0;
-	end;
-	
-L_No:
-	mes "...";
-	close;
-
-L_Bottle:
-	mes "^3355FFThe water in this";
-	mes "fountain looks clean";
-	mes "enough to be bottled...";
-	next;
-	menu "Bottle.",-,"Don't bottle.",L_No;
-	if(!countitem(713))goto L_Nobottle;
-	delitem 713,1;
-	getitem 12020,1;
-	close;
-
-L_Nobottle:
-	mes "^3355FFUnfortunately, it";
-	mes "looks like you don't";
-	mes "have any Empty Bottles";
-	mes "to carry any of this water...";
-	close;
-
+// Angrboda's Seal 8 °¡Àå small 119 182
+gl_dun02,119,182,0	script	Mysterious Energy#8	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q < 101) {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
+	else if ((sign_q == 114) || (sign_q == 115)) {
+		if ((countitem(1558) > 0) || (countitem(1963) > 0)) {
+			if (.@crash_s < 980) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1227) > 0) || (countitem(1228) > 0) || (countitem(1240) > 0) || (countitem(1241) > 0) || (countitem(1962) > 0) || (countitem(1813) > 0)) {
+			if (.@crash_s < 960) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1719) > 0) || (countitem(1130) > 0) || (countitem(1133) > 0) || (countitem(1223) > 0) || (countitem(1229) > 0) || (countitem(1231) > 0) || (countitem(1413) > 0) || (countitem(1814) > 0) || (countitem(1242) > 0)) {
+			if (.@crash_s < 940) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1131) > 0) || (countitem(1230) > 0) || (countitem(1232) > 0)) {
+			if (.@crash_s < 920) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1132) > 0) || (countitem(1134) > 0) || (countitem(1233) > 0) || (countitem(1234) > 0) || (countitem(1235) > 0) || (countitem(1414) > 0) || (countitem(1523) > 0) || (countitem(1236) > 0)) {
+			if (.@crash_s < 900) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1237) > 0) || (countitem(1524) > 0) || (countitem(1525) > 0) || (countitem(1557) > 0) || (countitem(1415) > 0) || (countitem(1964) > 0)) {
+			if (.@crash_s < 880) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1135) > 0) || (countitem(1140) > 0) || (countitem(1141) > 0) || (countitem(1527) > 0)) {
+			if (.@crash_s < 860) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1164) > 0) || (countitem(1165) > 0) || (countitem(1467) > 0) || (countitem(1138) > 0) || (countitem(1139) > 0) || (countitem(1224) > 0) || (countitem(1225) > 0) || (countitem(1416) > 0) || (countitem(1526) > 0)) {
+			if (.@crash_s < 840) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1305) > 0) || (countitem(1720) > 0) || (countitem(1136) > 0) || (countitem(1137) > 0) || (countitem(1166) > 0)) {
+			if (.@crash_s < 820) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1261) > 0) || (countitem(1528) > 0) || (countitem(1167) > 0)) {
+			if (.@crash_s < 800) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1364) > 0) || (countitem(1913) > 0)) {
+			if (.@crash_s < 780) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1170) > 0) || (countitem(1468) > 0) || (countitem(1168) > 0) || (countitem(1169) > 0)) {
+			if (.@crash_s < 760) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1365) > 0) || (countitem(1366) > 0) || (countitem(1473) > 0)) {
+			if (.@crash_s < 740) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1367) > 0) || (countitem(1368) > 0) || (countitem(1466) > 0) || (countitem(1469) > 0)) {
+			if (.@crash_s < 720) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1369) > 0) || (countitem(1470) > 0)) {
+			if (.@crash_s < 700) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1722) > 0) || (countitem(1471) > 0)) {
+			if (.@crash_s < 680) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1363) > 0)) {
+			if (.@crash_s < 660) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else if ((countitem(1530) > 0)) {
+			if (.@crash_s < 500) {
+				mes "^3355FFYou hit the seal as hard";
+				mes "as you can with the weapon in your hand. However, the seal is merely shaken by the force of your blow. Perhaps you need something";
+				mes "more powerful to break the seal...^000000";
+				close;
+			}
+		}
+		else {
+			mes "^3355FFThe weapon you're holding";
+			mes "right now doesn't look like it has any chance of breaking this seal. You'll definitely need something";
+			mes "more powerful...^000000";
+			close;
+		}
+		mes "^3355FFUpon obtaining the last piece";
+		mes "of Agrboda's soul, all four soul pieces emitted a strange light, rose to the air and combined into";
+		mes "a single transparent jewel.^000000";
+		next;
+		mes "^3355FFThe jewel floated";
+		mes "down to your waiting";
+		mes "hands, and you hear its";
+		mes "voice speak directly into";
+		mes "the depths of your heart...";
+		next;
+		mes "[Agrboda's Soul]";
+		mes "^333333I'm...";
+		mes "I'm leaving my soul";
+		mes "with you. Please guide";
+		mes "me to the queen of the dead...";
+		delitem 7306,3; //Fragment_Of_Soul
+		set sign_q,117;
+		getitem 7307,1; //Whisper_Of_Soul
+		close;
+	}
+	else {
+		mes "^3355FFYou sense a strange,";
+		mes "mysterious energy emanating from this area. For some reason, this power strikes you with a faint feeling of sadness.^000000";
+		close;
+	}
 }
 
-que_sign01,45,227,5	script	Queen of the Dead	856,{
-
-	if(signquest > 65) goto L_Greet;
-	if(signquest > 64) goto L_Work;
-	if(signquest > 63) goto L_Sense;
-	if(signquest > 54) goto L_Power;
-	mes "[Lady Hell]";
-	mes "^881010I have been told";
-	mes "by Ganglati that you";
-	mes "are the mortal that has";
-	mes "guided Mother's soul to me.";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010Do not fear me,";
-	mes "hero of Rune-Midgard.";
-	mes "You have won the favor";
-	mes "of the Queen of the Dead";
-	mes "and may ask me of any";
-	mes "reward if I deem it fair.";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010The true Symbol of the";
-	mes "of Nine Realms cannot be freely";
-	mes "given or lent. However, I sense";
-	mes "your purpose and will give you";
-	mes "a symbol imbued with enough";
-	mes "power to be used only once.";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010With the symbol I give you,";
-	mes "you can command the dead to";
-	mes "carry out your will without";
-	mes "question. However, keep in";
-	mes "mind that after one use,";
-	mes "its power will be consumed.";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010I have also decided";
-	mes "to reward you with one";
-	mes "more special permission.";
-	mes "You may now freely draw";
-	mes "water from the fountain";
-	mes "in my mansion, brave hero.";
-	next;
-	mes "^3355FFYou received";
-	mes "the Symbol of the Nine Realms.";
-	delitem 7307,1;
-	getitem 7305,1;
-	set signquest,55;
-	close;
-
-L_Power:
-	mes "[Lady Hell]";
-	mes "^881010Greetings, mortal.";
-	mes "Make sure that you";
-	mes "use the power of the";
-	mes "symbol wisely. You will";
-	mes "be responsible for the";
-	mes "consequences...";
-	if(signquest == 57) set signquest,58;
-	close;
-
-L_Sense:
-	mes "[Lady Hell]";
-	mes "^881010Ah.";
-	mes "You are the";
-	mes "mortal called";
-	mes "" + strcharinfo(0) + ", are you not?";
-	mes "Yes, you are known to me.";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010I've wanted to see you";
-	mes "as I've sensed that you";
-	mes "carry something which feels";
-	mes "very familiar to me. Do you";
-	mes "have something extraordinarily";
-	mes "special in your possesion?";
-	if(!countitem(2644) && !countitem(7178)) close;
-	next;
-	if(countitem(2644) && countitem(7178)) menu "The Sign",L_Sign,"Sobbing Starlight",-;
-	if(!countitem(2644) && countitem(7178)) menu "Sobbing Starlight",-;
-	if(countitem(2644) && !countitem(7178)) menu "The Sign",L_Sign;
-	mes "[Lady Hell]";
-	mes "^881010Yes, that's it!";
-	mes "I never expected a mortal";
-	mes "to have such an interesting";
-	mes "artifact in his possession.";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010As queen of Niflheim,";
-	mes "I command you to lend the";
-	mes "Sobbing Starlight to me! Fear";
-	mes "not, I shall quickly return it. For";
-	mes "a mortal, it must have";
-	mes "taken great pains to obtain";
-	mes "this...";
-	next;
-	menu "Please take it...",-,"N-no! Don't take it!",L_No;
-	mes "[Lady Hell]";
-	mes "^881010Thank you mortal.";
-	mes "Now, I shall show";
-	mes "you something truly";
-	mes "interesting...";
-	delitem 7178,1;
-	set signquest,65;
-	close;
-
-L_Sign:
-	mes "[Lady Hell]";
-	mes "^881010The Sign...?";
-	mes "Hmm, no, that's not";
-	mes "what I sensed. It's actually";
-	mes "something quite different...";
-	close;
-
-L_No:
-	mes "[Lady Hell]";
-	mes "^881010Ha ha ha!";
-	mes "You amuse me,";
-	mes "mortal! To think,";
-	mes "you even have courage";
-	mes "to refuse the queen of";
-	mes "Niflheim! Ha ha ha!";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010Mercy is not a quality";
-	mes "that I am known for, but";
-	mes "since you are my favored";
-	mes "mortal, I shall not kill you.";
-	mes "Still, it would be unwise";
-	mes "to displease me~";
-	close2;
-	warp "niflheim",29,154;
-	end;
-
-L_Work:
-	mes "[Lady Hell]";
-	mes "^881010As queen of this realm";
-	mes "I am unaccustomed to labor.";
-	mes "But give me a moment to finish";
-	mes "my work on this priceless";
-	mes "artifact, mortal.";
-	next;
-	misceffect 13;
-	next;
-	misceffect 32;
-	next;
-	misceffect 183;
-	next;
-	misceffect 90;
-	next;
-	mes "[Lady Hell]";
-	mes "^881010It is done.";
-	mes "This is the true";
-	mes "form of the object";
-	mes "you humans call the";
-	mes "Sobbing Starlight.";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010Although you may also know";
-	mes "this object as God's Tear Drop,";
-	mes "keep in mind that history, as you";
-	mes "humans know it, may actually be";
-	mes "different than the truth.";
-	getitem 7025,1;
-	if (countitem(2642)) delitem 2642,1;
-	set signquest,66;
-	next;
-	mes "[Lady Hell]";
-	mes "^881010In other words, there";
-	mes "are some older tales about";
-	mes "the gods and their enemies that";
-	mes "may have been confused and twisted";
-	mes "as they were handed down from";
-	mes "generation to generation.";
-	next;
-	mes "[Lady Hell]";
-	mes "^881010That is all I can tell";
-	mes "you for now, mortal. It will";
-	mes "be your job to discover the";
-	mes "truth of the legends...";
-	close;
-
-L_Greet:
-	mes "[Lady Hell]";
-	mes "^881010Greetings, mortal.";
-	mes "Is the realm of the living";
-	mes "that boring and tedious?";
-	mes "Ha ha ha! Well, there shall";
-	mes "always be a place for you";
-	mes "here in Niflheim.";
-	close;
-
+que_sign01,46,56,0	script	Fountain#sign	111,{
+	callfunc "F_UpdateSignVars";
+	if (sign_q < 118) {
+		mes "^3355FFThe water in this";
+		mes "fountain looks clean";
+		mes "enough to drink...^000000";
+		next;
+		switch(select("Drink.:Don't Drink.")) {
+		case 1:
+			mes "...";
+			close2;
+			percentheal -100,0;
+			end;
+		case 2:
+			mes "...";
+			close;
+		}
+	}
+	else {
+		mes "^3355FFThe water in this";
+		mes "fountain looks clean";
+		mes "enough to be bottled...^000000";
+		next;
+		switch(select("Bottle the water.:Don't bottle the water.")) {
+		case 1:
+			if (checkweight(1201,1) == 0) {
+				mes "^3355FFUnfortunately, it";
+				mes "looks like you don't";
+				mes "have enough inventory";
+				mes "space to carry any more items...^000000";
+				close;
+			}
+			else {
+				if (countitem(713) > 0) {
+					delitem 713,1; //Empty_Bottle
+					getitem 12020,1; //Water_Of_Darkness
+					close;
+				}
+				else {
+					mes "^3355FFUnfortunately, it";
+					mes "looks like you don't";
+					mes "have any Empty Bottles";
+					mes "to carry any of this water... ^000000";
+					close;
+				}
+			}
+		case 2:
+			mes "...";
+			close;
+		}
+	}
 }
 
-que_sign01,1,1,1	script	#signserin	-1,{
-
+geffen,119,55,0	script	Geffenia Warp	45,1,1,{
 OnInit:
-	disablenpc "Serin#serin";
-	set $signroomfull,0;
-	set $signparty,0;
+	disablenpc "Geffenia Warp";
 	end;
 
-OnSerin:
-	enablenpc "Serin#serin";
+OnTouch:
+	set geffenia_warp,rand(1,4);
+	if (geffenia_warp == 1) {
+		warp "gefenia01",58,169;
+	}
+	else if (geffenia_warp == 2) {
+		warp "gefenia02",116,115;
+	}
+	else if (geffenia_warp == 3) {
+		warp "gefenia03",130,206;
+	}
+	else if (geffenia_warp == 4) {
+		warp "gefenia04",133,88;
+	}
+	else {
+		warp "geffen",116,115;
+	}
 	end;
 
-OnSummon:
-	disablenpc "Serin#serin";
-	set $@Sign_Summon,10;
-	monster "que_sign01",180,200,"Rotten Corpse",1423,1,"#signserin::OnSignDead";
-	monster "que_sign01",205,205,"Rotten Corpse",1423,1,"#signserin::OnSignDead";
-	monster "que_sign01",190,190,"Rotten Corpse",1423,1,"#signserin::OnSignDead";
-	monster "que_sign01",205,190,"Rotten Corpse",1423,1,"#signserin::OnSignDead";
-	monster "que_sign01",190,205,"Rotten Corpse",1423,1,"#signserin::OnSignDead";
-	monster "que_sign01",200,200,"Ancient Wraith",1475,1,"#signserin::OnSignDead";
-	monster "que_sign01",200,180,"Ancient Wraith",1475,1,"#signserin::OnSignDead";
-	monster "que_sign01",210,210,"Ancient Mummy",1522,1,"#signserin::OnSignDead";
-	monster "que_sign01",180,180,"Ancient Mummy",1522,1,"#signserin::OnSignDead";
-	monster "que_sign01",196,195,"Dark Lord Incarnation",1605,1,"#signserin::OnSignDead";
-	end;
-
-OnSignDead:
-	set $@Sign_Summon,$@Sign_Summon -1;
-	if($@Sign_Summon > 0) end;
-	set $signroomfull,3;
-	stopnpctimer;
-	goto OnSerin;
-
-OnCooldown:
+OnEnable:
 	initnpctimer;
+	enablenpc "Geffenia Warp";
+	specialeffect EF_MAPPILLAR2;
 	end;
 
-OnTimer600000:
-	disablenpc "Serin#serin";
-	killmonster "que_sign01","#signserin::OnSignDead";
-	set $signroomfull,1;
-	set $signparty,0;
-	areawarp "que_sign01",229,227,166,162,"niflheim",30,156;
-	areawarp "que_sign02",1,1,400,400,"niflheim",30,156;
-	stopnpctimer;
+OnDisable:
+	disablenpc "Geffenia Warp";
 	end;
-}
 
-que_sign01,1,1,1	script	#signserin2	-1,{
-
-OnInit:
-	disablenpc "Serin#serin2";
-	set $signroom2full,0;
+OnTimer10000:
+	specialeffect EF_MAPPILLAR2;
 	end;
 
-OnSerin:
-	enablenpc "Serin#serin2";
+OnTimer20000:
+	specialeffect EF_MAPPILLAR2;
 	end;
 
-OnSummon:
-	disablenpc "Serin#serin2";
-	set $@Sign_Summon2,1;
-	areamonster "que_sign01",188,34,205,55,"Dark Lord Incarnation",1605,1,"#signserin2::OnSignDead";
+OnTimer30000:
+	specialeffect EF_MAPPILLAR2;
 	end;
 
-OnSignDead:
-	set $@Sign_Summon2,$@Sign_Summon2 -1;
-	if($@Sign_Summon2 > 0) end;
-	set $signroom2full,3;
-	stopnpctimer;
-	goto OnSerin;
-
-OnCooldown:
-	initnpctimer;
+OnTimer40000:
+	specialeffect EF_MAPPILLAR2;
 	end;
 
-OnTimer600000:
-	disablenpc "Serin#serin2";
-	killmonster "que_sign01","#signserin2::OnSignDead";
-	set $signroom2full,1;
-	areawarp "que_sign01",229,77,166,12,"niflheim",30,156;
+OnTimer45000:
+	donpcevent "Geffenia Warp::OnDisable";
+	mapannounce "geffen","The portal to Geffenia is now closed.",bc_map,"0x9CFF00";
 	stopnpctimer;
 	end;
 }
 
-que_sign01,197,195,5	script	Serin#serin	90,{
-
-	if(signquest > 55) goto L_Done;
-	if(Sign_Branch8A > 7) goto L_TryAgain;
-	if(Sign_Branch8A > 6) goto L_Success;
-	if(Sign_Branch8A > 4) goto L_Summon;
-	if(Sign_Branch8A < 4) goto L_NoWord;
-	mes "[Serin]";
-	mes "You're finally here.";
-	mes "That witch has been watching";
-	mes "my every move, so she probably";
-	mes "knows what I'm up to by now...";
-	next;
-	menu "Why are you doing this...",-;
-	mes "[Serin]";
-	mes "You don't understand";
-	mes "the horrific experience";
-	mes "of being bound to Niflheim.";
-	mes "I'm sick of breathing death";
-	mes "and feeding on despair.";
-	mes "I want to live again!";
-	next;
-	menu "Is that why you want Dark Lord...?",-;
-	mes "[Serin]";
-	mes "Unfortunately, the symbol";
-	mes "which Lady Hell gave you is";
-	mes "limited to a one time use. Its";
-	mes "power wasn't enough to bring me";
-	mes "back, so summoning Dark Lord is";
-	mes "my last chance.";
-	next;
-	menu "But if Dark Lord comes to Rune-Midgard...",-;
-	mes "[Serin]";
-	mes "Oh, I'm pretty sure of";
-	mes "what will happen if Dark Lord";
-	mes "enters the realm of the living.";
-	mes "He'll destroy Rune-Midgard and";
-	mes "bring death to thousands and";
-	mes "thousands of people.";
-	next;
-	mes "[Serin]";
-	mes "So if I came back to life";
-	mes "and everyone else were dead,";
-	mes "however, by summoning Dark";
-	mes "Lord, you might be thinking it'd be";
-	mes "pretty pointless for me to come";
-	mes "back. But I don't care.";
-	next;
-	mes "[Serin]";
-	mes "The living don't appreciate";
-	mes "what they have, so they ought";
-	mes "to be punished. They can all go to";
-	mes "Niflheim while I enjoy the warmth";
-	mes "of the sun and the fresh outside";
-	mes "air. Everyone should die...";
-	next;
-	mes "[Serin]";
-	mes "Maybe you might not";
-	mes "pity my situation since you've";
-	mes "never been bound to Niflheim,";
-	mes "but I'm begging you. Don't get";
-	mes "in my way, " +strcharinfo(0) + ".";
-	next;
-	menu "Let Her",L_Go,"Stop Her",-;
-	set Sign_Branch8A,5;
-	close;
-
-L_Go:
-	mes "[Serin]";
-	mes "Are you really willing";
-	mes "to throw so much away for";
-	mes "my sake? You do understand";
-	mes "that you'll be failing the ordeals set before you by the gods...";
-	next;
-	switch( select( "I changed my mind for Rune-Midgard.","I do, and it's alright..." ) )
-	{
+geffen,119,48,0	script	Fountain#s	111,{
+	callfunc "F_UpdateSignVars";
+	if (countitem(7025) > 0) {
+		mes "^3355FFAs you approach the fountain,";
+		mes "a strange light begins to emit from the Lucifer's Lament in your pocket and from something deep within";
+		mes "the fountain's water.^000000";
+		specialeffect EF_LEVEL99;
+		specialeffect2 EF_LEVEL99;
+		next;
+		switch(select("Throw Lucifer's Lament into the fountain.:Ignore the light.")) {
 		case 1:
-			set Sign_Branch8A,5;
+			mapannounce "geffen","With a flash of light from Geffen Fountain, the door to Geffenia has opened.",bc_map,"0x9CFF00";
+			mes "^3355FFOnce the Lucifer's Lament";
+			mes "splashes into the water, the";
+			mes "light reveals a peculiar warp";
+			mes "in front of the fountain...^000000";
+			specialeffect EF_MAPPILLAR2;
+			donpcevent "Geffenia Warp::OnEnable";
 			close;
-		
 		case 2:
-			mes "[Serin]";
-			mes "The least I can";
-			mes "do is send you back";
-			mes "to Rune-Midgard and";
-			mes "ask the Dark Lord to spare";
-			mes "you. Thank you so much...";
-			set sign_fail,1;
-			getexp 200000,0;
-			close2;
-			set $signroomfull,0;
-			warp "umbala",132,203;
-			end;
+			mes ".......";
+			close;
+		}
+	}
+	else {
+		mes "^3355FFThis is the";
+		mes "Geffen Fountain.^000000";
+		close;
 	}
+}
 
-L_Summon:
-	mes "[Serin]";
-	mes "If you think that";
-	mes "I can't summon Dark Lord";
-	mes "without the symbol, then you're";
-	mes "mistaken. I've been collecting";
-	mes "the power of despair!";
-	next;
-	mes "[Serin]";
-	mes "Do you remember what";
-	mes "happened to the dead that you";
-	mes "helped on my behalf? Even if they";
-	mes "seemed to have found shelter at";
-	mes "first, they cannot escape my";
-	mes "deep hollow of despair...";
-	next;
-	mes "[Serin]";
-	mes "And that poor little girl,";
-	mes "Alakina Ann? She still";
-	mes "hasn't realized that she's dead!";
-	next;
-	mes "[Serin]";
-	mes "You gave her hope,";
-	mes "but ultimately, you can't";
-	mes "keep your promise to bring her";
-	mes "home. Oh, her disappointment";
-	mes "must be so crushing...";
-	next;
-	mes "[Serin]";
-	mes "Yes...";
-	mes "By trying to help";
-	mes "you gave them nothing";
-	mes "but pain, just as I planned.";
-	mes "Now I have enough despair";
-	mes "to summon Dark Lord!";
-	next;
-	mes "[Serin]";
-	mes "I don't want us to fight,";
-	mes "but I can't let you stop me.";
-	mes "I've already sold my soul to";
-	mes "Dark Lord to become a living";
-	mes "human again so I can't give up";
-	mes "now! We'll have to battle!";
-	close2;
-	donpcevent "#signserin::OnSummon";
-	set Sign_Branch8A,7;
+que_sign01,196,44,0	script	Starter#serin	-1,32,32,{
+OnTouch:
+	donpcevent "Timer#serin::Onstart";
+	disablenpc "Starter#serin";
 	end;
 
-L_TryAgain:
-	mes "[Serin]";
-	mes "Haven't you";
-	mes "given up yet?";
-	mes "Please don't";
-	mes "try to stop me!";
-	close2;
-	set Sign_Branch8A,7;
-	donpcevent "#signserin::OnSummon";
+OnEnable:
+	enablenpc "Starter#serin";
 	end;
+}
 
-L_Success:
-	mes "[Serin]";
-	mes "I see now.";
-	mes "Soon, I'll lose my memories";
-	mes "and remain dead in Niflheim.";
-	mes "Just like all the others. Still,";
-	mes "may I ask you one question?";
-	next;
-	mes "[Serin]";
-	mes "With that symbol, you";
-	mes "could order the dead to do";
-	mes "whatever you want. Why didn't";
-	mes "you use it to command me to quit?";
-	next;
-	mes "[Serin]";
-	mes "...";
-	mes "......";
-	mes "..........";
-	next;
-	mes "[Serin]";
-	mes "I see it now.";
-	mes "The kindness in your eyes";
-	mes "tells me everything. You wanted to";
-	mes "give me another chance. But in the";
-	mes "end, I managed to destroy the";
-	mes "chance you had given me.";
-	next;
-	mes "[Serin]";
-	mes "Even though I'm nothing but";
-	mes "a spirit now, it was an honor";
-	mes "for me to meet somebody like you.";
-	mes "Although I'll lose my memories,";
-	mes "I'll try not to forget you.";
-	next;
-	mes "[Serin]";
-	mes "My memories of your";
-	mes "courage and kindness";
-	mes "are more precious to";
-	mes "me than life itself.";
-	next;
-	mes "[Serin]";
-	mes "Farewell, now.";
-	mes "And good luck on";
-	mes "your travels, my friend...";
-	delitem 7308,1;
-	set signquest,56;
-	close;
-
-L_NoWord:
-	mes "[Serin]";
-	mes "...";
-	close;
+que_sign01,196,44,0	script	Warp#serin	-1,35,35,{
+OnInit:
+	disablenpc "Warp#serin";
+	end;
 
-L_Done:
-	mes "^3355FFYou helped the";
-	mes "unconscious Serin";
-	mes "and returned to Niflheim.";
-	close2;
-	set $signroomfull,0;
+OnTouch:
 	warp "niflheim",30,156;
 	end;
-}
 
-que_sign01,197,45,5	script	Serin#serin2	90,{
+OnEnable:
+	enablenpc "Warp#serin";
+	end;
 
-	if (signquest > 55) goto L_Done;
-	if (Sign_Branch8B > 3) goto L_TryAgain;
-	if (Sign_Branch8B > 2) goto L_Success;
-	if (Sign_Branch8B > 1) goto L_Summon;
-	mes "[Serin]";
-	mes "As its magic power grows,";
-	mes "the Magic Circle is nearing completion. The symbol which I've asked you for is the last material needed for summoning Dark Lord.";
-	next;
-	mes "[Serin]";
-	mes "However, the power of that";
-	mes "symbol can be used to complete";
-	mes "the Magic Circle or destroy it. Would you hand it over to me? I choose to destroy this...";
-	next;
-	mes "[Serin]";
-	mes "Please...";
-	mes "Let me have the symbol.";
-	next;
-	select( "Give Serin the symbol." );
-	mes "[Serin]";
-	mes "This could be";
-	mes "pretty dangerous";
-	mes "so please step back...";
-	delitem 7305,1;
-	set Sign_Branch8B,2;
-	close;
-	
-L_Summon:
-	mes "[Serin]";
-	mes "I'm sorry.";
-	mes "But I have to do this";
-	mes "to summon Dark Lord.";
-	next;
-	select( "But why...?" );
-	mes "[Serin]";
-	mes "It was never the witch";
-	mes "that wanted Dark Lord summoned,";
-	mes "but me. I've always wanted to return to my human form. I'm sick and tired of being bound here in Niflheim!";
-	next;
-	mes "[Serin]";
-	mes "Unfortunately, the symbol";
-	mes "which Lady Hell gave you is";
-	mes "limited to a one time use. Its";
-	mes "power wasn't enough to bring me";
-	mes "back, so summoning Dark Lord is";
-	mes "my last chance.";
-	next;
-	select( "But if Dark Lord comes to Rune-Midgard..." );
-	mes "[Serin]";
-	mes "Oh, I'm pretty sure of";
-	mes "what will happen if Dark Lord";
-	mes "enters the realm of the living. He'll destroy Rune-Midgard and bring death to thousands and thousands of people.";
-	next;
-	mes "[Serin]";
-	mes "So if I came back to life";
-	mes "and everyone else were dead,";
-	mes "However, by summoning Dark Lord,";
-	mes "you might be thinking it'd be pretty pointless for me to come back. But you know what? I don't care.";
-	next;
-	mes "[Serin]";
-	mes "The living don't appreciate";
-	mes "what they have, so they ought";
-	mes "to be punished. They can all go to Niflheim while I enjoy the warmth of the sun and the fresh outside air.";
-	next;
-	mes "[Serin]";
-	mes "Maybe you might not";
-	mes "pity my situation since you've";
-	mes "never been bound to Niflheim,";
-	mes "but I'm begging you. Don't get";
-	mes "in my way.";
-	next;
-	switch( select( "Alright. I'll let you go.","No, you have to be stopped." ) )
-	{
-		case 1:
-			mes "[Serin]";
-			mes "Are you really willing";
-			mes "to throw so much away for";
-			mes "my sake? You do understand";
-			mes "that you'll be failing the ordeals set before you by the gods...";
-			next;
-			switch( select( "I changed my mind for Rune-Midgard.","I do, and it's alright..." ) )
-			{
-				case 1:
-					break;
-					
-				case 2:
-					mes "[Serin]";
-					mes "The least I can";
-					mes "do is send you back";
-					mes "to Rune-Midgard and";
-					mes "ask the Dark Lord to spare";
-					mes "you. Thank you so much...";
-					set signfail,1;
-					getexp 200000,0;
-					set $signroom2full,0;
-					close2;
-					warp "umbala",132,203;
-					end;
-			}
-					
-		case 2:
-			mes "[Serin]";
-			mes "...";
-			mes "I really don't want to fight you,";
-			mes "but I've come too far to give up now. If you insist on interfering, then you leave me no choice...";
-			next;
-			mes "[Dark Lord]";
-			mes "^330033Insolent mortal!";
-			mes "Do you really think";
-			mes "you have a chance of";
-			mes "stopping me? Hmpf.";
-			mes "Every fool must learn.";
-			mes "Prepare to die!^000000";
-			donpcevent "#signserin2::OnSummon";
-			set Sign_Branch8B,3;
-			close;
-	}
-
-L_TryAgain:
-    mes "[Serin]";
-    mes "Haven't you";
-    mes "given up yet?";
-    mes "Please don't";
-    mes "try to stop me!";
-    close2;
-    set Sign_Branch8B,3;
-    donpcevent "#signserin2::OnSummon";
-    end;
-
-L_Success:
-    mes "[Serin]";
-    mes "I see now.";
-    mes "Soon, I'll lose my memories";
-    mes "and remain dead in Niflheim.";
-    mes "Just like all the others. Still,";
-    mes "may I ask you one question?";
-    next;
-    mes "[Serin]";
-    mes "With that symbol, you";
-    mes "could order the dead to do";
-    mes "whatever you want. Why didn't";
-    mes "you use it to command me to quit?";
-    next;
-    mes "[Serin]";
-    mes "...";
-    mes "......";
-    mes "..........";
-    next;
-    mes "[Serin]";
-    mes "I see it now.";
-    mes "The kindness in your eyes";
-    mes "tells me everything. You wanted to";
-    mes "give me another chance. But in the";
-    mes "end, I managed to destroy the";
-    mes "chance you had given me.";
-    next;
-    mes "[Serin]";
-    mes "Even though I'm nothing but";
-    mes "a spirit now, it was an honor";
-    mes "for me to meet somebody like you.";
-    mes "Although I'll lose my memories,";
-    mes "I'll try not to forget you.";
-    next;
-    mes "[Serin]";
-    mes "My memories of your";
-    mes "courage and kindness";
-    mes "are more precious to";
-    mes "me than life itself.";
-    next;
-    set signquest,56;
-    mes "[Serin]";
-    mes "Farewell, now.";
-    mes "And good luck on";
-    mes "your travels, my friend...";
-    close;
-
-L_NoWord:
-    mes "[Serin]";
-    mes "...";
-    close;
-
-L_Done:
-    mes "^3355FFYou helped the";
-    mes "unconscious Serin";
-    mes "and returned to Niflheim.";
-    close2;
-    set $signroom2full,0;
-    warp "niflheim",30,156;
-    end;
+OnDisable:
+	disablenpc "Warp#serin";
+	end;
 }
 
-
-function	script	Sign_Party	{
-
-	getpartymember $signparty,1;
-	set @i,-1;
-
-L_Check:
-	set @i,@i+1;
-	if(getcharid(0) == $@partymembercid[@i]) goto L_Party;
-	if(@i < $@partymembercount -1) goto L_Check;
-	return;
-
-L_Party:
-	mes "[Kirkena]";
-	mes "That Witch's Medal...";
-	mes "You must be here to";
-	mes "help your friend take";
-	mes "care of Serin. Are you";
-	mes "ready to go, " + strcharinfo(0) + "?";
-	next;
-	menu "Yes.",-,"Not yet...",L_Notyet;
-	menu "Go directly to Serin.",-,"Path towards Serin.",L_Path;
-	mes "[Kirkena]";
-	mes "Thank you";
-	mes "for your help.";
-	mes "Serin's threat may";
-	mes "be too much for just";
-	mes "one adventurer alone...";
-	close2;
-	warp "que_sign01",195,189;
+que_sign01,1,0,0	script	Timer#serin	-1,{
+Onstart:
+	initnpctimer;
 	end;
-	
-
-L_Notyet:
-	mes "[Kirkena]";
-	mes "Please hurry...";
-	mes "Time is of the essence...";
-	close;
 
-L_Path:
-	mes "[Kirkena]";
-	mes "Thank you";
-	mes "for your help.";
-	mes "Serin's threat may";
-	mes "be too much for just";
-	mes "one adventurer alone...";
-	close2;
-	warp "que_sign02",135,313;
+OnTimer600000:
+	donpcevent "Warp#serin::OnEnable";
 	end;
 
+OnTimer620000:
+	set $@sign_w2,0;
+	donpcevent "Starter#serin::OnEnable";
+	donpcevent "Warp#serin::OnDisable";
+	donpcevent "Serin#serin::OnEnable";
+	donpcevent "Dark Lord#serin::OnDisable";
+	donpcevent "Serin#dummy::OnDisable";
+	donpcevent "CallMonster#serin::Onreset";
+	stopnpctimer;
+	end;
 }
 
-// Warp to leave Serin's room
+que_sign01,50,1,0	script	CallMonster#serin	-1,{
+Oncall:
+	monster "que_sign01",196,44,"Dark Lord Incarnation",1605,1,"CallMonster#serin::OnMyMobDead";
+	end;
 
-que_sign01,178,169,0	script	#serinwarp	45,1,1,{
+OnMyMobDead:
+	if (mobcount("que_sign01","CallMonster#serin::OnMyMobDead") < 1) {
+		donpcevent "Serin#serin::OnEnable";
+	}
+	end;
 
-    if ($signroomfull > 2) {
-        if (getmapusers("que_sign02") > 0 || getareausers("que_sign01",229,227,166,162) > 0) end;
-        donpcevent "#signserin::OnInit";
-    }
-    warp "niflheim",30,156;
-    end;
+Onreset:
+	killmonster "que_sign01","CallMonster#serin::OnMyMobDead";
 }
 
-que_sign01,178,19,0	script	#serinwarp2	45,1,1,{
+que_sign01,197,195,0	script	Starter#witch	-1,32,32,{
+OnTouch:
+	donpcevent "Timer#witch::Onstart";
+	disablenpc "Starter#witch";
+	end;
 
-	set $signroom2full,0;
-	warp "niflheim",30,156;
+OnEnable:
+	enablenpc "Starter#witch";
 	end;
 }
 
-// Fountain script
-
-geffen,119,55,1	script	GeffeniaWarper	45,2,2,{
-
-    switch ($GeffeniaWarp) {
-
-    case 1:
-        warp "gefenia01",58,169;
-        break;
+que_sign01,1,1,0	script	Timer#witch	-1,{
+Onstart:
+	initnpctimer;
+	end;
 
-    case 2:
-        warp "gefenia02",116,115;
-        break;
+OnTimer600000:
+	donpcevent "Warp#witch::OnEnable";
+	end;
 
-    case 3:
-        warp "gefenia03",130,206;
-        break;
+OnTimer620000:
+	donpcevent "Starter#witch::OnEnable";
+	donpcevent "Warp#witch::OnDisable";
+	donpcevent "CallMonster#witch::Onreset";
+	donpcevent "Serin#witch::OnEnable";
+	set $@sign_w1,0;
+	stopnpctimer;
+	end;
+}
 
-    case 4:
-        warp "gefenia04",133,88;
-        break;
+que_sign01,197,195,0	script	Warp#witch	-1,35,35,{
+OnInit:
+	disablenpc "Warp#witch";
+	end;
 
-    }
+OnEnable:
+	enablenpc "Warp#witch";
+	end;
 
-OnWarping:
-    misceffect 215;
-    mapannounce "geffen","With a flash of light from Geffen Fountain, the door to Geffenia has opened.",1,0x9CFF00;
-    misceffect 247;
-    initnpctimer;
-    end;
+OnDisable:
+	disablenpc "Warp#witch";
+	end;
 
-OnTimer15000:
-    misceffect 247;
-    end;
+OnTouch:
+	warp "niflheim",30,156;
+	end;
+}
 
-OnTimer30000:
-    misceffect 247;
-    end;
+que_sign01,1,2,0	script	CallMonster#witch	-1,{
+Oncall:
+	monster "que_sign01",196,195,"Dark Lord Incarnation",1605,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",180,180,"Ancient Mummy",1522,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",210,210,"Ancient Mummy",1522,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",200,200,"Ancient Wraith",1475,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",200,180,"Ancient Wraith",1475,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",180,200,"Rotten Corpse",1423,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",205,205,"Rotten Corpse",1423,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",190,190,"Rotten Corpse",1423,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",205,190,"Rotten Corpse",1423,1,"CallMonster#witch::OnMyMobDead";
+	monster "que_sign01",190,205,"Rotten Corpse",1423,1,"CallMonster#witch::OnMyMobDead";
+	end;
 
-OnTimer45000:
-    stopnpctimer;
-    mapannounce "geffen","The portal to Geffenia is now closed.",1,0x9CFF00;
-    misceffect 16;
+OnMyMobDead:
+	if (mobcount("gue_sign01","CallMonster#witch::OnMyMobDead") < 1) {
+		donpcevent "Serin#witch::OnEnable";
+	}
+	end;
 
-OnInit:
-    disablenpc "GeffeniaWarper";
-    set $GeffeniaWarp,0;
-    end;
+Onreset:
+	killmonster "que_sign01","CallMonster#witch::OnMyMobDead";
+	end;
+}
 
+que_sign02,0,0,0,0	monster	Ancient Mummy	1522,8,0,0,0
+que_sign02,0,0,0,0	monster	Evil Druid	1435,8,0,0,0
+que_sign02,0,0,0,0	monster	Ghoul	1423,20,0,0,0
+que_sign02,0,0,0,0	monster	Incubus	1580,8,0,0,0
+que_sign02,0,0,0,0	monster	Injustice	1446,8,0,0,0
+que_sign02,0,0,0,0	monster	Skeleton Prisoner	1479,15,0,0,0
+que_sign02,0,0,0,0	monster	Zombie Prisoner	1480,15,0,0,0
+que_sign02,0,0,0,0	monster	Wraith	1475,15,0,0,0
+que_sign02,0,0,0,0	monster	Wraith Dead	1566,8,0,0,0
+
+que_sign02,378,235,0	script	sign_w6	45,1,1,{
+OnTouch:
+	callfunc "F_UpdateSignVars";
+	if ((countitem(7313) == 1) && ((sign_q != 124) || (sign_q != 125) || (sign_q != 126))) {
+		warp "que_sign01",197,190;
+		end;
+	}
+	if ($@sign_w1 == 1) {
+		mes "^3355FFSome sort of";
+		mes "strange force";
+		mes "is blocking you";
+		mes "from entering.^000000";
+		close;
+	}
+	else {
+		set $@sign_w1,1;
+		warp "que_sign01",197,190;
+		end;
+	}
 }
 
-geffen,119,49,1	script	Fountain#SignFountain	111,{
+function	script	F_UpdateSignVars	{
+	if (!sign_q) {
+		// Attempt to save current progress, to some degree...
+		// P.S. I want to slit someone's throat.
+
+		// Attmept to save using the main (old) tracting variable
+		if (signquest <= 4) { set sign_q,signquest; }
+		// ariantest = 5-11
+		// gaanantest = 12 & 13
+		else if (signquest == 5) { set sign_q,14; }
+		else if (signquest == 6) { set sign_q,15; }
+		// SighJore = 16
+		else if (signquest == 7) { set sign_q,17; }
+		// ScareAlchSign = 18
+		else if (signquest == 8) { set sign_q,19; }
+		else if (signquest == 9) { set sign_q,20; }
+		// There is noequivilent for sign_q 21-24
+		else if (signquest == 10) { set sign_q,25; }
+		// There is noequivilent for sign_q 26
+		else if (signquest == 11) { set sign_q,27; }
+		// deales_test = 28-30
+		// 31 is not used.
+		// SignDance = 32 & 33
+		// there is no equivilent to sign_q 34
+		else if (signquest == 12) { set sign_q,35; }
+		// bakerlan_test - 36-42
+		// there is no equivilent to sign_q 43-45
+		// bakerlan_test - 46-52
+		else if (signquest == 13) { set sign_q,53; }
+		else if ((signquest >= 14) && (signquest <= 15)) { set sign_q,54; }
+		else if ((signquest >= 16) && (signquest <= 18)) { set sign_q,signquest+39; }
+		// signanvil = 58-61
+		else if ((signquest == 19) && (countitem(7278))) { set sign_q,61; }
+		// there is no equivilent to sign_q 62-64
+		else if (signquest == 20) { set sign_q,65; }
+		// there is no equivilent to sign_q 66-68
+		else if (signquest == 21) { set sign_q,69; }
+		else if ((signquest >= 22) && (signquest <= 28)) { set sign_q,signquest+48; } // 70-76
+		// there is no equivilent to sign_q 77
+		else if ((signquest >= 29) && (signquest <= 34)) { set sign_q,signquest+49; } // 78-83
+		else if (signquest == 35) { set sign_q,83; set sign_sq,1; }
+		else if (signquest == 36) { set sign_q,83; set sign_sq,1; }
+		else if (signquest == 37) { set sign_q,83; set sign_sq,2; }
+		else if (signquest == 38) { set sign_q,83; set sign_sq,3; }
+		// there is no equivilent to sign_sq 4
+		else if (signquest == 39) { set sign_q,83; set sign_sq,5; }
+		else if (signquest == 40) { set sign_q,83; set sign_sq,6; }
+		else if (signquest == 41) { set sign_q,83; set sign_sq,7; }
+		else if (signquest == 42) { set sign_q,83; set sign_sq,8; }
+		// there is no equivilent to sign_q 84
+		else if ((signquest >= 43) && (signquest <= 48)) { set sign_q,signquest+42; } // 85-90
+		// 91-92
+		else if ((signquest >= 49) && (signquest <= 52)) { set sign_q,signquest+44; } // 93-96
+		// signlaichin97-99
+		else if (signquest == 53) { set sign_q,100; }
+		// 101-116
+		else if (signquest == 54) { set sign_q,117; }
+		else if (signquest == 55) { set sign_q,118; }
+		// 119-126
+		else if (signquest == 56) { set sign_q,127; }
+		// 128
+		else if (signquest == 57) { set sign_q,129; }
+		else if (signquest == 58) { set sign_q,130; }
+		// 131-136
+		else if ((signquest >= 59) && (signquest <= 66)) { set sign_q,signquest+78; } // 137-144
+		// 144-199
+
+		// Attmept to save using the intermediate variables.
+		if (sign_fail == 1) { set sign_q,200; }
+		else if (sign_fail >= 2) { set sign_q,201; }
+
+		if (ariantest >= 2) { set sign_q,ariantest+3; }
+		if (gaanantest == 1) { set sign_q,12; }
+
+		if (SignJore == 1) { set sign_q,16; }
+		if (ScareAlchSign == 1) { set sign_q,18; }
+
+		if (dearles_test == 1) { set sign_q,28; }
+		else if (dearles_test == 2) { set sign_q,29; }
+		else if (dearles_test == 3) { set sign_q,30; }
+
+		if (SignDance == 1) { set sign_q,32; }
+		else if (SignDance == 2) { set sign_q,33; }
+
+		if ((bakerlan_test >= 1) && (bakerlan_test <= 3)) { set sign_q,bakerlan_test+35; }
+		else if ((bakerlan_test >= 4) && (bakerlan_test <= 6)) { set sign_q,bakerlan_test+36; }
+		else if ((bakerlan_test >= 7) && (bakerlan_test <= 13)) { set sign_q,bakerlan_test+39; }
+
+		if ((signanvil >= 1) && (signanvil <= 4)) { set sign_sq,signanvil+57; }
+
+		// Because of the horrible way this was scripted, it's incompatable
+		// With the new script, So I am resetting the quest to the start
+		// of this step.
+		if (signlaichin >= 1) { 
+			mes "^FF0000You stumble and drop the your^000000";
+			if (countitem(7306)) {
+				mes "^FF0000"+getitemname(7306)+"^000000";
+			}
+			if (countitem(7306) && countitem(7307)) {
+				mes "^FF0000and^000000";
+			}
+			if (countitem(7307)) {
+				mes "^FF0000"+getitemname(7307)+"^000000";
+			}
+			mes "^FF0000pieces on the ground and they vanish! Perhaps you should talk to Lachin.^000000";
+			delitem 7306,countitem(7306); //Fragment_Of_Soul
+			delitem 7307,countitem(7307); //Whisper_Of_Soul
+			set sign_q,rand(97,100); 
+		}
 
-	if(countitem(7025) && !$GeffeniaWarp)goto L_Lament;
-	mes "^3355FFThis is the";
-	mes "Geffen Fountain.";
-	close;
+		// Same BS as above, unable to save pickup time for 'The Sign' from Engel.
+		if (signengelhour) { 
+			mes "^FF0000You see that Engel has forgotten to look at 'The Sign', how you got it back is a mystery too you, but you should remind Engel that he needs to look at it.^000000";
+			getitem 7314,1; //The_Sign
+			set sign_q,139;
+		}
 
-L_Lament:
-	specialeffect2 EF_LEVEL99;
-	mes "^3355FFAs you approach the fountain, a strange light begins to emit from the Lucifer's Lament in your pocket and from something deep within the fountain's water.";
-	next;
-	menu "Throw Lucifer's Lament into the fountain.",L_Throw,"Ignore the light.",-;
+		if (Sign_Branch8A == 1) { set sign_q,119; }
+		else if (Sign_Branch8A == 2) { set sign_q,120; }
+		else if (Sign_Branch8A == 3) { set sign_q,122; }
+		else if (Sign_Branch8A == 4) { set sign_q,124; }
+		else if (Sign_Branch8A == 5) { set sign_q,134; }
+		else if ((Sign_Branch8A == 7) || (Sign_Branch8A == 8)) { set sign_q,126; }
+
+		// Incompatable with the new version.
+		if (Sign_Branch8B > 0) {
+			mes "^FF0000Something is wrong, perhaps you should go talk to Serin again.^000000";
+			set sign_q,132;
+		}
 
-	mes "......";
-	close;
+		// Incompatable with the new version. Again.
+		if (Sign_Branch2B) {
+			set sign_q,91;
+		}
 
-L_Throw:
-	misceffect 247;
-	set $GeffeniaWarp,rand(1,4);
-	enablenpc "GeffeniaWarper";
-	donpcevent "GeffeniaWarper::OnWarping";
-	mes "^3355FFOnce the Lucifer's Lament";
-	mes "splashes into the water, the";
-	mes "light reveals a peculiar warp";
-	mes "in front of the fountain...";
-	close;
+		// Unable to save when the Sign should be picked up from Metz
+		if (signmetzhour) { 
+			mes "^FF0000You see that Metz has forgotten to look at 'The Sign', how you got it back is a mystery too you, but you should remind Metz that he needs to look at it.^000000";
+			getitem 7314,1; //The_Sign
+			set sign_q,138;
+		}
 
+		// Clear old variables.
+		set signquest,0;
+		set sign_fail,0;
+		set gaananpoint,0;
+		set gaanantest,0;
+		set arianstest,0;
+		set SignJore,0;
+		set ScareAlchSign,0;
+		set dearles_test,0;
+		set SignDance,0;
+		set bakerlan_test,0;
+		set signanvil,0;
+		set signengelhour,0;
+		set signlaichin,0;
+		set Sign_Seal1,0;
+		set Sign_Seal2,0;
+		set Sign_Seal3,0;
+		set Sign_Seal4,0;
+		set Sign_Seal1$,"";
+		set Sign_Seal2$,"";
+		set Sign_Seal3$,"";
+		set Sign_Seal4$,"";
+		set brokenseal,0;
+		set Sign_Branch8A,0;
+		set Sign_Branch8B,0;
+		set Sign_Branch2B,0;
+		set serinring,0;
+		set signmetzhour,0;
+	}
+	return;
 }
 
-//==================================================
-// que_sign02 - Monster Spawns
-//==================================================
-
-que_sign02,0,0,0,0	monster	Incubus	1580,1,0,0,0
-que_sign02,0,0,0,0	monster	Wraith Dead	1566,3,0,0,0
-que_sign02,0,0,0,0	monster	Evil Druid	1435,5,0,0,0
-que_sign02,0,0,0,0	monster	Wraith	1475,5,0,0,0
-que_sign02,0,0,0,0	monster	Injustice	1446,10,0,0,0
-que_sign02,0,0,0,0	monster	Skeleton Prisoner	1479,10,0,0,0
-que_sign02,0,0,0,0	monster	Zombie Prisoner	1480,10,0,0,0
-que_sign02,0,0,0,0	monster	Ghoul	1423,15,0,0,0
+//============================================================ 
+// Old changelog
+//============================================================ 
+//= 1.0 First version, beware of potential nasty bugs :x [MasterOfMuppets]
+//= 1.1 Finalized for stable, might still contain bugs though. [MasterOfMuppets]
+//= 1.1a moved #aldesignwarp to fix enless warp [Lupus]
+//= 1.2 Fixed a minor bug that prevented people from advancing [MasterOfMuppets]
+//= 	quest at one point.
+//= 1.3 Removed duplicates [Toms]
+//= 1.4 Fixed a bug in Dearles script where it was checking for the wrong items.
+//=     Fixed a major bug that was allowing players to continue before
+//=     getting all the Sobbing Starlight pieces.
+//=     Also moved the Alberta sign since another NPC was on top of it. [Llyr]
+//= 1.5 Fixed exploits and bugs. Plus add a removal of exttra sobbing pieces
+//= 	as suggested Tantarian, to let people Reborn [Lupus]
+//= 1.6 Minor fix, thanks to theultramage for pointing it out. [MasterOfMuppets]
+//= 1.7 Fixed exploit [KarLaeda]
+//= 1.7a Fixed wrong dialogue [Lupus]
+//= 1.7b Fixed possible exploit [Lupus]
+//= 1.7c Reformatted for future bughunt. WIP [Lupus]
+//= 1.8 Fixed some bugs and exploit which allowed players helping in the final
+//= fight to finish the quest as well. Completely revamped quiz system. [SinSloth]
+//= 1.9 Made some changes in last event to reflect recent bug exploit fix. [SinSloth]
+//= 2.0 Fixed some various minor bugs. [SinSloth]
+//= 2.1 Fixed experience gains to match upcoming rate adjustments. [SinSloth]
+//= 2.2 Fixed a small bug which occured when people had to return The Sign around midnight. [SinSloth]
+//= 2.3 Made some adjustments in last event with dialogs/summoning and fixed a possible exploit earlier. [SinSloth]
+//= 2.4 Optimized/simplified some poorly written code; fixed wrong quiz answers [ultramage]
+//= 2.5 Updated to fall within proper name restrictions. [L0ne_W0lf]
+//= 2.5a Corrected a Typo error ";;". [Samuray22]
+//= 2.6 Fixed Engel giving back 7 Sobbing Starlight on failing to refine it, bugreport:1473 [Brainstorm]
+//= 2.7 Replaced effect numerics with constants. [Samuray22]
+//= 2.8 Fixed some bugs with itemids and leftover questitems [Fish0r]
+//= 2.9 Made a delitem causing script to fault use countitem when deleting. [L0ne_W0lf]
+//= 2.9a Added a check for Sign_Branch8A before attempting to run a delitem on items not needed based on Path taken. [Paradox924X]
diff --git a/npc/quests/quests_niflheim.txt b/npc/quests/quests_niflheim.txt
index de68c8db1..177a7ad23 100644
--- a/npc/quests/quests_niflheim.txt
+++ b/npc/quests/quests_niflheim.txt
@@ -3,7 +3,7 @@
 //===== By: ================================================== 
 //= The eAthena Dev Team
 //===== Current Version: ===================================== 
-//= 1.3
+//= 1.4
 //===== Compatible With: ===================================== 
 //= eAthena 7.15 +
 //===== Description: ========================================= 
@@ -22,7 +22,8 @@
 //= 1.2 Fixed bad NPC header data to comply with rev. 11603. [L0ne_W0lf]
 //= 1.3 Moved the Book of Devil quest to custom folder. [L0ne_W0lf]
 //=	Updated to Aegis 10.3 Standed, added Message Delivery Quest.
-//=	Rescripted Piano Quest. Prior quest progress will be lost. 
+//=	Rescripted Piano Quest. Prior quest progress will be lost.
+//= 1.4 Fixed NPCs using ID 111 when it shoudl have been 139. [L0ne_W0lf]
 //============================================================ 
 
 //=============================================================
@@ -177,7 +178,7 @@ nif_in,31,20,3	script	Kuzkahina#nif	794,{
 	close;
 }
 
-niflheim,208,103,1	script	#Graveyard1	111,1,1,{
+niflheim,208,103,1	script	#Graveyard1	139,1,1,{
 OnTouch:
 	if (nif_esc == 5 || nif_esc == 7 || nif_esc == 8 || nif_esc == 10) {
 		mes "^3355FFYou found something";
@@ -199,7 +200,7 @@ OnTouch:
 	end;
 }
 
-niflheim,169,71,1	script	#Graveyard2	111,1,1,{
+niflheim,169,71,1	script	#Graveyard2	139,1,1,{
 OnTouch:
 	if (nif_esc == 6 || nif_esc == 9) {
 		mes "^3355FFYou found something";
@@ -216,7 +217,7 @@ OnTouch:
 	end;
 }
 
-nif_in,115,181,0	script	#Piano	111,1,1,{
+nif_in,115,181,0	script	#Piano	139,1,1,{
 OnTouch:
 	if (nif_esc == 0 && (MISC_QUEST & 32) == 0) {
 		mes "^3355FFYou see a big, heavy piano.";
@@ -247,7 +248,7 @@ OnTouch:
 	end;
 }
 
-nif_in,114,181,0	script	#Piano3	111,1,1,{
+nif_in,114,181,0	script	#Piano3	139,1,1,{
 OnTouch:
 	if (nif_esc == 12 || nif_esc == 13 || MISC_QUEST & 32) {
 		mes "^3355FFAs you bend towards";