* Massive cleaning of "The Sign Quest" script, ~90kb reduction (quests\The_Sign_Quest.txt)

* Removed OnInit label of "Card Trader" NPC, since it most likely won't be used (other\card_trader.txt)

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

1 files changed, 466 insertions, 2832 deletions

diff --git a/npc/quests/The_Sign_Quest.txt b/npc/quests/The_Sign_Quest.txt
index e1350cdfe..e5cd814b5 100644
--- a/npc/quests/The_Sign_Quest.txt
+++ b/npc/quests/The_Sign_Quest.txt
@@ -3,7 +3,7 @@
 //===== By: ================================================== 
 //= SinSloth(Most of the NPCs), MasterOfMuppets(Some of the NPCs + bug fixes) & Kargha(The quiz NPCs)
 //===== Current Version: ===================================== 
-//= 3.6
+//= 3.7
 //===== Compatible With: ===================================== 
 //= rAthena SVN
 //===== Description: ========================================= 
@@ -24,6 +24,7 @@
 //= 3.4 Updated 'waitingroom' to support required zeny/lvl. [Kisuka]
 //= 3.5 Fixed two bugs. 4230 & 4404 [CalciumKid]
 //= 3.6 Corrected the Level Requirements for 'Standby Room' [tr0n]
+//= 3.7 Massive cleaning/optimization (more can still be done). [Euphy]
 //============================================================ 
 
 //============================================================ 
@@ -71,15 +72,14 @@ 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;
+	mes "[Metz]";
 	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;
@@ -121,7 +121,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 			}
 			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;
@@ -157,7 +156,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 			set sign_q,3;
 			break;
 		case 3:
-			mes "[Metz]";
 			mes "Hm...?";
 			mes "Shouldn't you leave";
 			mes "for Morroc to see Arian?";
@@ -168,7 +166,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		}
 	}
 	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";
@@ -183,7 +180,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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,";
@@ -191,7 +187,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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";
@@ -200,7 +195,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		mes "should be alright.";
 	}
 	else if (sign_q < 25) {
-		mes "[Metz]";
 		mes "Jesqurienne is";
 		mes "a brilliant woman.";
 		mes "Although I worry a";
@@ -209,7 +203,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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.";
@@ -223,7 +216,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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.";
@@ -231,7 +223,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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";
@@ -303,7 +294,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 	}
 	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";
@@ -326,7 +316,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 			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";
@@ -336,7 +325,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		}
 	}
 	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";
@@ -352,7 +340,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		mes "on the Sobbing Starlight.";
 	}
 	else if (sign_q == 71) {
-		mes "[Metz]";
 		mes "Amazing...! You've";
 		mes "managed to restore";
 		mes "the Sobbing Starlight!";
@@ -378,7 +365,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		set sign_q,72;
 	}
 	else if (sign_q == 72) {
-		mes "[Metz]";
 		mes "Now that the";
 		mes "Sobbing Starlight";
 		mes "is restored, we need";
@@ -395,14 +381,12 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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";
@@ -472,7 +456,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		}
 	}
 	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.";
@@ -489,7 +472,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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";
@@ -506,7 +488,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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";
@@ -521,7 +502,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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,";
@@ -530,7 +510,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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";
@@ -560,14 +539,12 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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";
@@ -577,42 +554,18 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		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;
-		}
+		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);
@@ -677,7 +630,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 			}
 		}
 		if (.@pass_s == 1) {
-			mes "[Metz]";
 			mes "Fascinating...";
 			mes "This was made with";
 			mes "a material outside of";
@@ -709,7 +661,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 			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";
@@ -718,7 +669,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		}
 	}
 	else if (sign_q < 141) {
-		mes "[Metz]";
 		mes "Have you visited";
 		mes "Engel Howard yet?";
 		mes "He's the only one";
@@ -727,7 +677,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 	}
 	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,";
@@ -748,7 +697,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 			getexp 200000,0;
 		}
 		else {
-			mes "[Metz]";
 			mes "Have you visited";
 			mes "Engel Howard yet?";
 			mes "He's the only one";
@@ -757,7 +705,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		}
 	}
 	else if (sign_q == 201) {
-		mes "[Metz]";
 		mes "You failed?";
 		mes "It's disappointing,";
 		mes "but I know that you";
@@ -785,7 +732,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 	}
 	else if (sign_q > 201) {
 		if (countitem(7178) == 1) {
-			mes "[Metz]";
 			mes "I'm sorry...";
 			mes "But I'm taking";
 			mes "back the Sobbing";
@@ -799,7 +745,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 			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";
@@ -807,7 +752,6 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 		}
 	}
 	else {
-		mes "[Metz]";
 		mes "Thank you so much";
 		mes "for helping me make";
 		mes "my dream come true.";
@@ -827,8 +771,8 @@ prt_in,227,45,0	script	Archeologist#sign	804,{
 
 prt_in,228,26,5	script	Steward#sign	55,{
 	callfunc "F_UpdateSignVars";
+	mes "[Vandez]";
 	if (sign_q < 3) {
-		mes "[Vandez]";
 		mes "Welcome to the";
 		mes "Brayde Estate. How";
 		mes "may I be of service?";
@@ -843,12 +787,7 @@ prt_in,228,26,5	script	Steward#sign	55,{
 			close;
 		case 2:
 			mes "[Vandez]";
-			if (Sex == 1) {
-				mes "Very good, sir.";
-			}
-			else {
-				mes "Very good, madam.";
-			}
+			mes "Very good, "+((Sex)?"sir.":"madam.");
 			mes "Please wait a moment";
 			mes "while I consult with";
 			mes "the master in his study.";
@@ -866,7 +805,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		}
 	}
 	else if (sign_q < 14) {
-		mes "[Vandez]";
 		mes "Ah, Master "+ strcharinfo(0) +".";
 		mes "Welcome. How may I be";
 		mes "of service today?";
@@ -901,7 +839,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		}
 	}
 	else if (sign_q < 13) {
-		mes "[Vandez]";
 		mes "I recall that";
 		mes "Master Arian visited";
 		mes "the master a while ago.";
@@ -918,7 +855,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		close;
 	}
 	else if (sign_q < 15) {
-		mes "[Vandez]";
 		mes "Sometimes I worry";
 		mes "about Mistress Elle.";
 		mes "She's one of the most";
@@ -933,7 +869,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		close;
 	}
 	else if (sign_q < 20) {
-		mes "[Vandez]";
 		mes "Many travellers have";
 		mes "begun to visit the master";
 		mes "lastly. Apparently, they've";
@@ -949,7 +884,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		close;
 	}
 	else if (sign_q < 25) {
-		mes "[Vandez]";
 		mes "It's most curious,";
 		mes "but Elle seems to";
 		mes "consider that unrefined";
@@ -959,7 +893,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		close;
 	}
 	else if (sign_q < 35) {
-		mes "[Vandez]";
 		mes "Avarice knows no bounds.";
 		mes "The pastime of gambling";
 		mes "seems to best represent";
@@ -973,7 +906,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		close;
 	}
 	else if (sign_q < 54) {
-		mes "[Vandez]";
 		mes "Bakerlan is a young,";
 		mes "brilliant man. Although";
 		mes "he inherited his company,";
@@ -990,7 +922,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		close;
 	}
 	else if (sign_q == 54) {
-		mes "[Vandez]";
 		mes "Oh, congratulations~";
 		mes "You finally passed all";
 		mes "of the tests. I know they";
@@ -1007,7 +938,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		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";
@@ -1022,7 +952,6 @@ prt_in,228,26,5	script	Steward#sign	55,{
 		close;
 	}
 	else {
-		mes "[Vandez]";
 		mes "There will always";
 		mes "be situations where";
 		mes "you won't be getting";
@@ -1037,8 +966,8 @@ prt_in,248,23,3	script	Maid#sign	1275,{
 }
 prt_in,248,23,0	script	Maid#sign2	111,{
 	callfunc "F_UpdateSignVars";
+	mes "[Elle]";
 	if (sign_q < 3) {
-		mes "[Elle]";
 		mes "Wh-what are you";
 		mes "doing in Master Metz's";
 		mes "room? Please leave";
@@ -1046,7 +975,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		close;
 	}
 	else if (sign_q < 14) {
-		mes "[Elle]";
 		mes "Oh...?";
 		mes ""+ strcharinfo(0) +"?";
 		mes "Is there anything that";
@@ -1115,7 +1043,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		}
 	}
 	else if (sign_q < 13) {
-		mes "[Elle]";
 		mes "I'm not so busy";
 		mes "nowadays, but I was";
 		mes "working hard for a while";
@@ -1126,7 +1053,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		close;
 	}
 	else if (sign_q < 15) {
-		mes "[Elle]";
 		mes "Guys never understand";
 		mes "what a girl really wants!";
 		mes "They're always too afraid";
@@ -1143,7 +1069,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		close;
 	}
 	else if (sign_q < 20) {
-		mes "[Elle]";
 		mes "^333333*Phew....*^000000";
 		mes "I'm so tired, even";
 		mes "though I didn't work";
@@ -1159,23 +1084,20 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		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;
-			}
+			select("Why don't you take this?");
+			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";
@@ -1191,7 +1113,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		close;
 	}
 	else if (sign_q < 35) {
-		mes "[Elle]";
 		mes "Have you been";
 		mes "in Comodo before?";
 		mes "It's such a beautiful";
@@ -1207,7 +1128,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		close;
 	}
 	else if (sign_q < 54) {
-		mes "[Elle]";
 		mes "I remember that";
 		mes "there was a lady";
 		mes "working for Master";
@@ -1226,7 +1146,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 	}
 	else if (sign_q == 54) {
 		emotion e_ho;
-		mes "[Elle]";
 		mes "La la la~~";
 		mes "Oh, hello.";
 		mes "Long time no see.";
@@ -1264,7 +1183,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		}
 	}
 	else if (sign_q == 97) {
-		mes "[Elle]";
 		mes "Ah~ Hello!";
 		mes "Nice to see";
 		mes "you again~";
@@ -1274,7 +1192,6 @@ prt_in,248,23,0	script	Maid#sign2	111,{
 		close;
 	}
 	else {
-		mes "[Elle]";
 		mes "^333333*Sigh...*^000000";
 		mes "Lately, there've";
 		mes "been too many guests";
@@ -1578,21 +1495,11 @@ morocc_in,115,154,5	script	Rogue#sign	810,{
 			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 300,0;
-			}
-			else if (BaseLevel < 70) {
-				getexp 750,0;
-			}
-			else if (BaseLevel < 80) {
-				getexp 1000,0;
-			}
-			else if (BaseLevel < 90) {
-				getexp 1300,0;
-			}
-			else if (BaseLevel < 150) {
-				getexp 1800,0;
-			}
+			if (BaseLevel < 60) getexp 300,0;
+			else if (BaseLevel < 70) getexp 750,0;
+			else if (BaseLevel < 80) getexp 1000,0;
+			else if (BaseLevel < 90) getexp 1300,0;
+			else if (BaseLevel < 150) getexp 1800,0;
 			set sign_q,14;
 			getitem 7177,1; //Part_Of_Star's_Sob
 			close;
@@ -1621,8 +1528,8 @@ morocc_in,115,154,5	script	Rogue#sign	810,{
 
 morocc_in,114,162,4	script	Young Man#sign	118,{
 	callfunc "F_UpdateSignVars";
+	mes "[Gaanan]";
 	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";
@@ -1633,7 +1540,6 @@ morocc_in,114,162,4	script	Young Man#sign	118,{
 		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";
@@ -1763,16 +1669,11 @@ morocc_in,114,162,4	script	Young Man#sign	118,{
 		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;
-		}
+		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";
@@ -1782,7 +1683,6 @@ morocc_in,114,162,4	script	Young Man#sign	118,{
 		close;
 	}
 	else {
-		mes "[Gaanan]";
 		mes "^333333*Sigh...*^000000";
 		mes "I wish the weather'd";
 		mes "cool down, even just a little.";
@@ -2457,21 +2357,11 @@ payon_in03,11,31,4	script	Daewoon#sign	808,{
 			if (.@pay_point > 29) {
 				set sign_q,15;
 				getitem 7177,1; //Part_Of_Star's_Sob
-				if (BaseLevel < 60) {
-					getexp 300,0;
-				}
-				else if (BaseLevel < 70) {
-					getexp 700,0;
-				}
-				else if (BaseLevel < 80) {
-					getexp 1000,0;
-				}
-				else if (BaseLevel < 90) {
-					getexp 1300,0;
-				}
-				else if (BaseLevel < 150) {
-					getexp 1800,0;
-				}
+				if (BaseLevel < 60) getexp 300,0;
+				else if (BaseLevel < 70) getexp 700,0;
+				else if (BaseLevel < 80) getexp 1000,0;
+				else if (BaseLevel < 90) getexp 1300,0;
+				else if (BaseLevel < 150) getexp 1800,0;
 				emotion e_heh;
 				mes "[Daewoon]";
 				mes "Well, I must say that I've";
@@ -2503,21 +2393,11 @@ payon_in03,11,31,4	script	Daewoon#sign	808,{
 			else if ((.@pay_point > 26) && (.@pay_point < 30)) {
 				set sign_q,15;
 				getitem 7177,1; //Part_Of_Star's_Sob
-				if (BaseLevel < 60) {
-					getexp 300,0;
-				}
-				else if (BaseLevel < 70) {
-					getexp 700,0;
-				}
-				else if (BaseLevel < 80) {
-					getexp 1000,0;
-				}
-				else if (BaseLevel < 90) {
-					getexp 1300,0;
-				}
-				else if (BaseLevel < 150) {
-					getexp 1800,0;
-				}
+				if (BaseLevel < 60) getexp 300,0;
+				else if (BaseLevel < 70) getexp 700,0;
+				else if (BaseLevel < 80) getexp 1000,0;
+				else if (BaseLevel < 90) getexp 1300,0;
+				else if (BaseLevel < 150) getexp 1800,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.";
@@ -3020,7 +2900,7 @@ aldeba_in,155,101,3	script	Sir Jore#sign	805,7,7,{
 	close;
 
 OnTouch:
-	if (rand(1,2) == 1) {
+	if (rand(2)) {
 		emotion e_ic;
 		specialeffect EF_PHARMACY_OK;
 	}
@@ -3033,10 +2913,10 @@ OnTouch:
 
 aldeba_in,156,118,4	script	Piru Piru#sign	102,{
 	callfunc "F_UpdateSignVars";
+	mes "[Piru Piru]";
 	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";
@@ -3091,7 +2971,6 @@ aldeba_in,156,118,4	script	Piru Piru#sign	102,{
 		}
 		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";
@@ -3116,7 +2995,6 @@ aldeba_in,156,118,4	script	Piru Piru#sign	102,{
 		}
 	}
 	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";
@@ -3135,7 +3013,6 @@ aldeba_in,156,118,4	script	Piru Piru#sign	102,{
 		close;
 	}
 	else {
-		mes "[Piru Piru]";
 		mes "....Zzz...Zzz...";
 		mes "Zzz....Zzz......";
 		next;
@@ -3163,15 +3040,9 @@ prt_maze02,57,151,1	script	Pleur#warp	91,{
 	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;
-	}
+	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;
 }
 
@@ -3184,15 +3055,9 @@ OnTouch:
 	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;
-	}
+	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;
 }
 
@@ -3227,18 +3092,16 @@ OnMyMobDead:
 
 prt_maze02,16,183,3	script	Pleur#sign	91,{
 	callfunc "F_UpdateSignVars";
+	mes "[Pleur]";
 	if (sign_q < 19) {
-		mes "[Pleur]";
 		mes "La la la~";
 		mes "La la la~";
-		close;
 	}
 	else {
-		mes "[Pleur]";
 		mes "Hmmm...?";
 		mes "The Stone of Sage...";
-		close;
 	}
+	close;
 
 OnHo:
 	emotion e_ho;
@@ -3256,9 +3119,9 @@ OnOmg:
 
 prt_maze02,14,183,4	script	Gordon#sign	51,{
 	callfunc "F_UpdateSignVars";
+	mes "[Gordon]";
 	if (sign_q < 18) {
 		emotion e_ho;
-		mes "[Gordon]";
 		mes "Hello darling.";
 		mes "What did you do today?";
 		next;
@@ -3287,9 +3150,7 @@ prt_maze02,14,183,4	script	Gordon#sign	51,{
 		mes "our work, but sometimes";
 		mes "I do wish for a more";
 		mes "carefree life for you...";
-		if (sign_q < 17) {
-			close;
-		}
+		if (sign_q < 17) close;
 		else if (sign_q == 17) {
 			next;
 			switch(select("Roar~!:Excuse me.")) {
@@ -3416,7 +3277,6 @@ prt_maze02,14,183,4	script	Gordon#sign	51,{
 	}
 	else if (sign_q == 18) {
 		emotion e_pif;
-		mes "[Gordon]";
 		mes "Oh...!";
 		mes "You scared us!";
 		mes "Roaring like some";
@@ -3520,7 +3380,6 @@ prt_maze02,14,183,4	script	Gordon#sign	51,{
 		}
 	}
 	else if (sign_q > 18) {
-		mes "[Gordon]";
 		mes "Sometimes I miss";
 		mes "being an alchemist.";
 		mes "But then again, a man";
@@ -3544,24 +3403,18 @@ prt_maze02,14,183,4	script	Gordon#sign	51,{
 
 geffen_in,59,74,4	script	Jesqurienne#sign	803,{
 	callfunc "F_UpdateSignVars";
+	mes "[Jesqurienne]";
 	if (sign_q < 21) {
-		mes "[Jesqurienne]";
 		mes "Bartender~?";
 		mes "Give me another drink.";
-		if (sign_q < 20) {
-			close;
-		}
+		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~";
-			}
+			if (Sex) 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;
@@ -3706,7 +3559,6 @@ geffen_in,59,74,4	script	Jesqurienne#sign	803,{
 		}
 	}
 	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";
@@ -3723,7 +3575,6 @@ geffen_in,59,74,4	script	Jesqurienne#sign	803,{
 		close;
 	}
 	else if (sign_q == 23) {
-		mes "[Jesqurienne]";
 		mes "Bwahahahaha!";
 		mes "You should have known";
 		mes "from the beginning that you";
@@ -3761,7 +3612,6 @@ geffen_in,59,74,4	script	Jesqurienne#sign	803,{
 		}
 	}
 	else if (sign_q == 24) {
-		mes "[Jesqurienne]";
 		mes "What...?";
 		mes "I... I...";
 		mes "I don't b-believe it.";
@@ -3809,7 +3659,6 @@ geffen_in,59,74,4	script	Jesqurienne#sign	803,{
 		close;
 	}
 	else if (sign_q == 25) {
-		mes "[Jesqurienne]";
 		mes "Ooooh...";
 		mes "My head...";
 		mes "Oh...! It's you...!";
@@ -3824,7 +3673,6 @@ geffen_in,59,74,4	script	Jesqurienne#sign	803,{
 		close;
 	}
 	else {
-		mes "[Jesqurienne]";
 		mes "OoOooOhh~";
 		mes "Sooooo dizzy.";
 		mes "Maybe I drank";
@@ -3843,8 +3691,8 @@ OnHo:
 
 geffen_in,61,72,7	script	Aaron#sign	754,{
 	callfunc "F_UpdateSignVars";
+	mes "[Aaron]";
 	if (sign_q == 21) {
-		mes "[Aaron]";
 		mes "Alright, before";
 		mes "we begin, let me";
 		mes "tell you the rules...";
@@ -3870,7 +3718,6 @@ geffen_in,61,72,7	script	Aaron#sign	754,{
 	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?";
@@ -3878,7 +3725,6 @@ geffen_in,61,72,7	script	Aaron#sign	754,{
 			if (select("Baisulist:Wickebine:Barcardi:Krongast") == 3) set .@user_p,.@user_p+1;
 			break;
 		case 2:
-			mes "[Aaron]";
 			mes "1. Which item is not";
 			mes "relevant to the creation";
 			mes "of a Counteragent?";
@@ -3886,7 +3732,6 @@ geffen_in,61,72,7	script	Aaron#sign	754,{
 			if (select("Karvodailnirol:Detrimindexta:Alcohol") != 1) set .@user_p,.@user_p+1;
 			break;
 		case 3:
-			mes "[Aaron]";
 			mes "1. Choose the";
 			mes "monster that is";
 			mes "a different size";
@@ -4503,7 +4348,6 @@ geffen_in,61,72,7	script	Aaron#sign	754,{
 		close;
 	}
 	else {
-		mes "[Aaron]";
 		emotion e_omg;
 		mes "Goodness...!";
 		mes "Either these beer";
@@ -4548,8 +4392,8 @@ OnSmile:
 
 cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 	callfunc "F_UpdateSignVars";
+	mes "[Dearles]";
 	if (sign_q < 25) {
-		mes "[Dearles]";
 		mes "No...! Damn it,";
 		mes "not again! When's";
 		mes "my lucky streak";
@@ -4575,7 +4419,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 		}
 	}
 	else if (sign_q == 25) {
-		mes "[Dearles]";
 		mes "No...! Damn it,";
 		mes "not again! When's";
 		mes "my lucky streak";
@@ -4631,7 +4474,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 		}
 	}
 	else if (sign_q == 26) {
-		mes "[Dearles]";
 		mes "Eh heh heh~";
 		mes "Soooooo, did you";
 		mes "bring the money?";
@@ -4668,7 +4510,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 	}
 	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";
@@ -4685,7 +4526,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 			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...";
@@ -4693,7 +4533,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 		}
 	}
 	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";
@@ -4728,55 +4567,24 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 	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;
-			}
+			if (countitem(734)) set .@diaris_t,.@diaris_t+1;
+			if (countitem(735)) set .@diaris_t,.@diaris_t+1;
+			if (countitem(736)) set .@diaris_t,.@diaris_t+1;
+			if (countitem(7149)) set .@diaris_t,.@diaris_t+1;
+			if (countitem(747)) set .@diaris_t,.@diaris_t+2;
+			if (countitem(749)) set .@diaris_t,.@diaris_t+4;
+			if (countitem(740)) set .@diaris_t,.@diaris_t+1;
+			if (countitem(741)) set .@diaris_t,.@diaris_t+1;
+			if (countitem(742)) set .@diaris_t,.@diaris_t+2;
+			if (countitem(743)) set .@diaris_t,.@diaris_t+3;
+			if (countitem(752)) set .@diaris_t,.@diaris_t+3;
+			if (countitem(753)) set .@diaris_t,.@diaris_t+4;
+			if (countitem(754)) set .@diaris_t,.@diaris_t+4;
+			if (countitem(750)) set .@diaris_t,.@diaris_t+7;
+			if (countitem(751)) set .@diaris_t,.@diaris_t+7;
 			next;
 			if (.@diaris_t > 10) {
 				mes "[Dearles]";
@@ -4791,67 +4599,27 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 				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
-				}
+				if (countitem(734)) delitem 734,1; //Red_Frame
+				if (countitem(735)) delitem 735,1; //Blue_Porcelain
+				if (countitem(736)) delitem 736,1; //White_Platter
+				if (countitem(7149)) delitem 7149,1; //Yellow_Plate
+				if (countitem(747)) delitem 747,1; //Crystal_Mirror
+				if (countitem(749)) delitem 749,1; //Frozen_Rose
+				if (countitem(740)) delitem 740,1; //Stuffed_Doll
+				if (countitem(741)) delitem 741,1; //Poring_Doll
+				if (countitem(742)) delitem 742,1; //Chonchon_Doll
+				if (countitem(743)) delitem 743,1; //Spore_Doll
+				if (countitem(752)) delitem 752,1; //Grasshopper_Doll
+				if (countitem(753)) delitem 753,1; //Monkey_Doll
+				if (countitem(754)) delitem 754,1; //Raccoondog_Doll
+				if (countitem(750)) delitem 750,1; //Baphomet_Doll
+				if (countitem(751)) delitem 751,1; //Osiris_Doll
 				set sign_q,30;
-				if (BaseLevel < 60) {
-					getexp 300,0;
-				}
-				else if (BaseLevel < 70) {
-					getexp 500,0;
-				}
-				else if (BaseLevel < 80) {
-					getexp 800,0;
-				}
-				else if (BaseLevel < 90) {
-					getexp 1000,0;
-				}
-				else if (BaseLevel < 150) {
-					getexp 1300,0;
-				}
+				if (BaseLevel < 60) getexp 300,0;
+				else if (BaseLevel < 70) getexp 500,0;
+				else if (BaseLevel < 80) getexp 800,0;
+				else if (BaseLevel < 90) getexp 1000,0;
+				else if (BaseLevel < 150) getexp 1300,0;
 				next;
 				warp "cmd_in01",33,29;
 				end;
@@ -4882,7 +4650,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 			}
 		case 30:
 		case 31:
-			mes "[Dearles]";
 			mes "Hey, you gotta";
 			mes "finish Part Two of";
 			mes "my test. I'm gonna send";
@@ -4891,7 +4658,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 			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";
@@ -4920,7 +4686,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 				close;
 			}
 		case 33:
-			mes "[Dearles]";
 			mes "Alright, Lamadin";
 			mes "tells me you passed.";
 			mes "Not the best performance,";
@@ -4933,21 +4698,11 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 			mes "um, ''Bakerlan'' in Alberta.";
 			set sign_q,35;
 			getitem 7177,1; //Part_Of_Star's_Sob
-			if (BaseLevel < 60) {
-				getexp 300,0;
-			}
-			else if (BaseLevel < 70) {
-				getexp 700,0;
-			}
-			else if (BaseLevel < 80) {
-				getexp 1900,0;
-			}
-			else if (BaseLevel < 90) {
-				getexp 1200,0;
-			}
-			else if (BaseLevel < 150) {
-				getexp 1700,0;
-			}
+			if (BaseLevel < 60) getexp 300,0;
+			else if (BaseLevel < 70) getexp 700,0;
+			else if (BaseLevel < 80) getexp 1900,0;
+			else if (BaseLevel < 90) getexp 1200,0;
+			else if (BaseLevel < 150) getexp 1700,0;
 			next;
 			mes "[Dearles]";
 			mes "Well, that's it.";
@@ -4958,7 +4713,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 			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";
@@ -4974,21 +4728,11 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 			set sign_q,35;
 			getitem 7177,1; //Part_Of_Star's_Sob
 			set zeny,zeny+20000;
-			if (BaseLevel < 60) {
-				getexp 300,0;
-			}
-			else if (BaseLevel < 70) {
-				getexp 700,0;
-			}
-			else if (BaseLevel < 80) {
-				getexp 1000,0;
-			}
-			else if (BaseLevel < 90) {
-				getexp 1400,0;
-			}
-			else if (BaseLevel < 150) {
-				getexp 1900,0;
-			}
+			if (BaseLevel < 60) getexp 300,0;
+			else if (BaseLevel < 70) getexp 700,0;
+			else if (BaseLevel < 80) getexp 1000,0;
+			else if (BaseLevel < 90) getexp 1400,0;
+			else if (BaseLevel < 150) getexp 1900,0;
 			next;
 			mes "[Dearles]";
 			mes "Well, that's it.";
@@ -5001,7 +4745,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 		}
 	}
 	else if (sign_q == 97) {
-		mes "[Dearles]";
 		mes "No...! Damn it,";
 		mes "not again! When's";
 		mes "my lucky streak";
@@ -5026,7 +4769,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 		}
 	}
 	else if (sign_q == 98) {
-		mes "[Dearles]";
 		mes "Whaaaaaaaaaat are";
 		mes "you doing back here?";
 		if (Zeny > 9999) {
@@ -5046,7 +4788,6 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 		close;
 	}
 	else {
-		mes "[Dearles]";
 		mes "Hey, why are you";
 		mes "still talkin' to me?";
 		mes "You finished my test.";
@@ -5080,8 +4821,8 @@ cmd_in02,88,51,4	script	Strange Guy#sign	806,{
 
 cmd_in01,33,25,5	script	Examiner#sign	724,{
 	callfunc "F_UpdateSignVars";
+	mes "[Lamadin]";
 	if (sign_q == 30) {
-		mes "[Lamadin]";
 		mes "Welcome to";
 		mes "Part Two of Dearles'";
 		mes "exam where your sense";
@@ -5117,7 +4858,6 @@ cmd_in01,33,25,5	script	Examiner#sign	724,{
 	}
 	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";
@@ -5146,7 +4886,6 @@ cmd_in01,33,25,5	script	Examiner#sign	724,{
 		close;
 	}
 	else if (sign_q == 32) {
-		mes "[Lamadin]";
 		mes "Let's see...";
 		mes "You're "+ strcharinfo(0) +"?";
 		mes "Oh, what a shame!";
@@ -5162,7 +4901,6 @@ cmd_in01,33,25,5	script	Examiner#sign	724,{
 		close;
 	}
 	else if (sign_q == 33) {
-		mes "[Lamadin]";
 		mes "Let's see...";
 		mes "You're "+ strcharinfo(0) +"?";
 		mes "Congratulations!";
@@ -5176,7 +4914,6 @@ cmd_in01,33,25,5	script	Examiner#sign	724,{
 		close;
 	}
 	else if (sign_q == 34) {
-		mes "[Lamadin]";
 		mes "Let's see...";
 		mes "You're "+ strcharinfo(0) +"?";
 		mes "Congratulations!";
@@ -5193,7 +4930,6 @@ cmd_in01,33,25,5	script	Examiner#sign	724,{
 		close;
 	}
 	else {
-		mes "[Lamadin]";
 		mes "H-how did you";
 		mes "find your way here?";
 		mes "This is private property,";
@@ -5254,12 +4990,16 @@ OnDisable:
 	end;
 
 Onbutton_off:
+	callsub OnDisableAll;
+	end;
+
+OnDisableAll:
 	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;
+	return;
 
 OnTimer2000:
 	mapannounce "cmd_in01","The test will be begin shortly. Please do your best~",bc_map,"0xFFFF00";
@@ -5272,110 +5012,70 @@ OnTimer4000:
 	end;
 
 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";
+	callsub OnDisableAll;
 	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";
+	callsub OnDisableAll;
 	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";
+	callsub OnDisableAll;
 	mapannounce "cmd_in01"," DOWN RIGHT",bc_map,"0xFFFF00";
 	donpcevent "s_dance#down::Onup";
 	donpcevent "s_dance#down::OnEnable";
 	end;
 
 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";
+	callsub OnDisableAll;
 	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;
 
 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";
+	callsub OnDisableAll;
 	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";
+	callsub OnDisableAll;
 	mapannounce "cmd_in01"," DOWN RIGHT & CENTER & DOWN RIGHT",bc_map,"0xFFFF00";
 	donpcevent "s_dance#down::Onup";
 	donpcevent "s_dance#down::OnEnable";
 	end;
 
 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";
+	callsub OnDisableAll;
 	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;
 
 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";
+	callsub OnDisableAll;
 	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";
+	callsub OnDisableAll;
 	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;
 
 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";
+	callsub OnDisableAll;
 	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";
@@ -5754,8 +5454,8 @@ OnDisable:
 
 alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 	callfunc "F_UpdateSignVars";
+	mes "[Bakerlan]";
 	if (sign_q < 35) {
-		mes "[Bakerlan]";
 		mes "Umm...well then...";
 		mes "I shall take the action for Prontera...";
 		mes "And for Juno...";
@@ -5765,7 +5465,6 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 		close;
 	}
 	else if (sign_q == 35) {
-		mes "[Bakerlan]";
 		mes "Gosh.....";
 		mes "I do not know what I should do about Juno...";
 		mes "?";
@@ -5791,7 +5490,6 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 		}
 	}
 	else if (sign_q == 36) {
-		mes "[Bakerlan]";
 		mes "Hmm...? You've";
 		mes "finished all of the";
 		mes "tests up until Dearle's";
@@ -5841,7 +5539,6 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 		}
 	}
 	else if (sign_q < 40) {
-		mes "[Bakerlan]";
 		mes "Please speak to my";
 		mes "steward for all matters";
 		mes "related to the delivery";
@@ -5850,7 +5547,6 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 		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";
@@ -5861,14 +5557,12 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 		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.";
@@ -5897,25 +5591,14 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 		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 500,0;
-		}
-		else if (BaseLevel < 70) {
-			getexp 800,0;
-		}
-		else if (BaseLevel < 80) {
-			getexp 1100,0;
-		}
-		else if (BaseLevel < 90) {
-			getexp 1500,0;
-		}
-		else if (BaseLevel < 150) {
-			getexp 2000,0;
-		}
+		if (BaseLevel < 60) getexp 500,0;
+		else if (BaseLevel < 70) getexp 800,0;
+		else if (BaseLevel < 80) getexp 1100,0;
+		else if (BaseLevel < 90) getexp 1500,0;
+		else if (BaseLevel < 150) getexp 2000,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.";
@@ -5923,7 +5606,6 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 		close;
 	}
 	else if (sign_q == 98) {
-		mes "[Bakerlan]";
 		mes "Umm...well then...";
 		mes "I shall take the action for Prontera...";
 		mes "And for Juno...";
@@ -5933,7 +5615,6 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 		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...";
@@ -5945,8 +5626,8 @@ alberta_in,125,101,5	script	Wealthy-looking Merchant	807,{
 
 alberta_in,154,171,5	script	Maid#s10	758,{
 	callfunc "F_UpdateSignVars";
+	mes "[Seylin]";
 	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";
@@ -5956,7 +5637,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 		close;
 	}
 	else if (sign_q == 38) {
-		mes "[Seylin]";
 		mes "Leibech...?";
 		mes "I remember that he's";
 		mes "a regular customer who";
@@ -5974,7 +5654,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 		close;
 	}
 	else if (sign_q < 42) {
-		mes "[Seylin]";
 		mes "Ooooh...";
 		mes "What am I going";
 		mes "to do?! Oh-- You";
@@ -5988,7 +5667,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 		close;
 	}
 	else if (sign_q == 42) {
-		mes "[Seylin]";
 		mes "Ooooh...";
 		mes "What am I going";
 		mes "to do?! Oh-- You";
@@ -6005,7 +5683,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 	else if (sign_q < 51) {
 		switch(sign_q) {
 		case 43:
-			mes "[Seylin]";
 			mes "^333333*Sigh...*^000000";
 			mes "Oh dear...";
 			mes "What can I do";
@@ -6094,7 +5771,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 				}
 			}
 		case 44:
-			mes "[Seylin]";
 			mes "Hello there~";
 			mes "Oh, have you";
 			mes "changed your mind";
@@ -6132,7 +5808,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 				close;
 			}
 		case 45:
-			mes "[Seylin]";
 			mes "Hello there~";
 			mes "So have you decided";
 			mes "yet? If you help me,";
@@ -6167,20 +5842,7 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 				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";
@@ -6194,7 +5856,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 			close;
 		case 48:
 			if (countitem(7044) < 1) {
-				mes "[Seylin]";
 				mes "Oh, you know where";
 				mes "you can get Vigorgra?";
 				mes "That's great news!";
@@ -6203,7 +5864,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 				close;
 			}
 			else {
-				mes "[Seylin]";
 				mes "Hurray~!";
 				mes "You brought the";
 				mes "Vigorgra! I hope";
@@ -6228,7 +5888,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 				close;
 			}
 		case 49:
-			mes "[Seylin]";
 			mes "Would you please";
 			mes "deliver the Vigorgra";
 			mes "and my letter to my brother";
@@ -6236,7 +5895,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 			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";
@@ -6250,7 +5908,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 		}
 	}
 	else if (sign_q == 97) {
-		mes "[Seylin]";
 		mes "Oh no~!";
 		mes "Please don't";
 		mes "drag your muddy";
@@ -6259,7 +5916,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 		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";
@@ -6269,7 +5925,6 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 		close;
 	}
 	else {
-		mes "[Seylin]";
 		mes "Although the master isn't";
 		mes "a messy person, he's pretty";
 		mes "unorganized. I wish he'd make";
@@ -6288,8 +5943,8 @@ alberta_in,154,171,5	script	Maid#s10	758,{
 
 prt_castle,107,58,5	script	Soldier#s11	105,{
 	callfunc "F_UpdateSignVars";
+	mes "[Maruin]";
 	if (sign_q < 49) {
-		mes "[Maruin]";
 		mes "Welcome to";
 		mes "Prontera Castle.";
 		mes "Please be careful";
@@ -6305,7 +5960,6 @@ prt_castle,107,58,5	script	Soldier#s11	105,{
 	}
 	else if (sign_q == 49) {
 		if ((countitem(7044) < 1) && (countitem(7183) < 1)) {
-			mes "[Maruin]";
 			mes "Welcome to";
 			mes "Prontera Castle.";
 			mes "Please be careful";
@@ -6320,7 +5974,6 @@ prt_castle,107,58,5	script	Soldier#s11	105,{
 			close;
 		}
 		else {
-			mes "[Maruin]";
 			mes "Welcome to";
 			mes "Prontera Castle.";
 			mes "Please be careful";
@@ -6332,63 +5985,60 @@ prt_castle,107,58,5	script	Soldier#s11	105,{
 			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;
-			}
+			select("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 "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";
@@ -6403,7 +6053,6 @@ prt_castle,107,58,5	script	Soldier#s11	105,{
 		close;
 	}
 	else {
-		mes "[Maruin]";
 		mes "Oh hey, how's";
 		mes "it going? Thanks";
 		mes "again for helping";
@@ -6426,8 +6075,8 @@ prt_castle,107,58,5	script	Soldier#s11	105,{
 
 alde_alche,169,162,7	script	Alchemist#sign	749,{
 	callfunc "F_UpdateSignVars";
+	mes "[Melkaba]";
 	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...";
@@ -6454,7 +6103,6 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 		}
 	}
 	else if (sign_q == 46) {
-		mes "[Melkaba]";
 		mes "Eh...?";
 		mes "What do you need?";
 		mes "If it's not important,";
@@ -6529,7 +6177,6 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 		}
 	}
 	else if (sign_q == 47) {
-		mes "[Melkaba]";
 		mes "Hmmm...";
 		mes "So did you";
 		mes "bring everything";
@@ -6566,8 +6213,8 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 			mes "to see if you have";
 			mes "everything ready...";
 			next;
+			mes "[Melkaba]";
 			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";
@@ -6583,7 +6230,6 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 				close;
 			}
 			else {
-				mes "[Melkaba]";
 				mes "Good work.";
 				mes "Everything's here.";
 				mes "Alright, just this once";
@@ -6596,8 +6242,8 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 				mes "And I'll need to charge";
 				mes "you 10,000 zeny.";
 				next;
+				mes "[Melkaba]";
 				if (Zeny < 10000) {
-					mes "[Melkaba]";
 					mes "Huh...";
 					mes "It doesn't look like";
 					mes "you have enough zeny";
@@ -6606,7 +6252,6 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 					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";
@@ -6628,9 +6273,9 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 					mes "......";
 					mes ".........";
 					next;
+					mes "[Melkaba]";
 					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";
@@ -6662,7 +6307,6 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 						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";
@@ -6676,7 +6320,6 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 		}
 	}
 	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...";
@@ -6703,7 +6346,6 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 		}
 	}
 	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...";
@@ -6730,7 +6372,6 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 		}
 	}
 	else {
-		mes "[Melkaba]";
 		mes "Vigorgra is";
 		mes "a miracle of";
 		mes "modern science,";
@@ -6743,8 +6384,8 @@ alde_alche,169,162,7	script	Alchemist#sign	749,{
 
 alberta_in,114,178,5	script	Refined Steward	109,{
 	callfunc "F_UpdateSignVars";
+	mes "[Mahatra]";
 	if (sign_q < 37) {
-		mes "[Mahatra]";
 		mes "Welcome to the";
 		mes "Alchesh Estate.";
 		mes "The Alcheshs are the";
@@ -6761,7 +6402,6 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 		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";
@@ -6788,8 +6428,7 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 		getnameditem 7049,strcharinfo(0);
 		close;
 	}
-	else if (sign_q == 38) {
-		mes "[Mahatra]";
+	else if (sign_q == 38 || (sign_q == 39 && countitem(7181) < 1)) {
 		mes "You haven't delivered";
 		mes "the Stone yet? Please take";
 		mes "good care of it since it's very";
@@ -6799,31 +6438,17 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 		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;
-		}
+		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";
@@ -6831,7 +6456,6 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 		close;
 	}
 	else if (sign_q == 41) {
-		mes "[Mahatra]";
 		mes "Greetings. Hm?";
 		mes "Did the master ask";
 		mes "you to perform another";
@@ -6856,7 +6480,6 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 		}
 	}
 	else if (sign_q < 51) {
-		mes "[Mahatra]";
 		mes "Although you may only";
 		mes "be doing it for the Sobbing";
 		mes "Starlight, I really appreciate";
@@ -6866,7 +6489,6 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 		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.";
@@ -6881,13 +6503,12 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 		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 "[Mahatra]";
 		mes "Well, I suppose";
 		mes "that's the nature";
 		mes "of the testing. They're";
@@ -6897,7 +6518,6 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 		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";
@@ -6909,19 +6529,16 @@ alberta_in,114,178,5	script	Refined Steward	109,{
 }
 
 alberta,98,202,5	script	Guard#s10	105,{
+	mes "[Hurubu]";
+	mes "Welcome to the";
+	mes "Alchesh Estate.";
 	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.";
@@ -6943,28 +6560,13 @@ alberta,98,202,5	script	Guard#s10	105,{
 			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.";
+	else if (sign_q == 97 || sign_q == 98) {
 		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";
@@ -6975,8 +6577,8 @@ alberta,98,202,5	script	Guard#s10	105,{
 
 alberta,43,49,5	script	Poor-looking Merchant	89,{
 	callfunc "F_UpdateSignVars";
+	mes "[Machen]";
 	if (sign_q < 35) {
-		mes "[Machen]";
 		mes "Why...?";
 		mes "How did my";
 		mes "family's wealth";
@@ -6992,7 +6594,6 @@ alberta,43,49,5	script	Poor-looking Merchant	89,{
 		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";
@@ -7042,7 +6643,6 @@ alberta,43,49,5	script	Poor-looking Merchant	89,{
 		}
 	}
 	else if (sign_q == 97) {
-		mes "[Machen]";
 		mes "Why...?";
 		mes "How did my";
 		mes "family's wealth";
@@ -7058,7 +6658,6 @@ alberta,43,49,5	script	Poor-looking Merchant	89,{
 		close;
 	}
 	else {
-		mes "[Machen]";
 		mes "You know, if the Alcheshs";
 		mes "were greedy, they actually";
 		mes "wouldn't be as big as they";
@@ -7077,8 +6676,8 @@ alberta,43,49,5	script	Poor-looking Merchant	89,{
 
 yuno,330,100,4	script	Knight#ss	734,{
 	callfunc "F_UpdateSignVars";
+	mes "[Leibech]";
 	if (sign_q < 38) {
-		mes "[Leibech]";
 		mes "I have a great";
 		mes "interest in collecting";
 		mes "unique and uncommon";
@@ -7095,7 +6694,6 @@ yuno,330,100,4	script	Knight#ss	734,{
 	}
 	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";
@@ -7171,7 +6769,6 @@ yuno,330,100,4	script	Knight#ss	734,{
 			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";
@@ -7186,7 +6783,6 @@ yuno,330,100,4	script	Knight#ss	734,{
 				close;
 			}
 			else {
-				mes "[Leibech]";
 				mes "Finally, it's here!";
 				mes "Yes, this is what I ordered.";
 				mes "Thanks for the delivery!";
@@ -7201,27 +6797,16 @@ yuno,330,100,4	script	Knight#ss	734,{
 				delitem2 7049,1,1,0,0,.@sign1,.@sign2,.@sign3,.@sign4;
 				set sign_q,39;
 				getitem 7181,1; //Receipt_01
-				if (BaseLevel < 60) {
-					getexp 100,0;
-				}
-				else if (BaseLevel < 70) {
-					getexp 200,0;
-				}
-				else if (BaseLevel < 80) {
-					getexp 400,0;
-				}
-				else if (BaseLevel < 90) {
-					getexp 700,0;
-				}
-				else if (BaseLevel < 150) {
-					getexp 1100,0;
-				}
+				if (BaseLevel < 60) getexp 100,0;
+				else if (BaseLevel < 70) getexp 200,0;
+				else if (BaseLevel < 80) getexp 400,0;
+				else if (BaseLevel < 90) getexp 700,0;
+				else if (BaseLevel < 150) getexp 1100,0;
 				close;
 			}
 		}
 	}
 	else if (sign_q == 97) {
-		mes "[Leibech]";
 		mes "I have a great";
 		mes "interest in collecting";
 		mes "unique and uncommon";
@@ -7237,7 +6822,6 @@ yuno,330,100,4	script	Knight#ss	734,{
 		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;
@@ -7248,7 +6832,6 @@ yuno,330,100,4	script	Knight#ss	734,{
 		close;
 	}
 	else {
-		mes "[Leibech]";
 		mes "Hey, thanks for";
 		mes "delivering my order";
 		mes "for me. It was a great";
@@ -7269,8 +6852,8 @@ yuno,330,100,4	script	Knight#ss	734,{
 
 geffen_in,159,48,5	script	Lonely-looking Woman	711,{
 	callfunc "F_UpdateSignVars";
+	mes "[Brenda Howard]";
 	if (sign_q < 54) {
-		mes "[Brenda Howard]";
 		mes "Hmm...";
 		mes "What should I make for";
 		mes "dinner today? Pickled cabbage?";
@@ -7278,7 +6861,6 @@ geffen_in,159,48,5	script	Lonely-looking Woman	711,{
 		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";
@@ -7322,14 +6904,12 @@ geffen_in,159,48,5	script	Lonely-looking Woman	711,{
 		}
 	}
 	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";
@@ -7347,7 +6927,6 @@ geffen_in,159,48,5	script	Lonely-looking Woman	711,{
 	}
 	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";
@@ -7362,7 +6941,6 @@ geffen_in,159,48,5	script	Lonely-looking Woman	711,{
 			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;
@@ -7370,7 +6948,6 @@ geffen_in,159,48,5	script	Lonely-looking Woman	711,{
 		}
 	}
 	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";
@@ -7383,7 +6960,6 @@ geffen_in,159,48,5	script	Lonely-looking Woman	711,{
 		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...";
@@ -7398,8 +6974,8 @@ geffen_in,171,42,3	script	Cute Girl	703,{
 		mes "you have too many items in your inventory. Please come back after you've made more available inventory space.^000000";
 		close;
 	}
+	mes "[Liana]";
 	if (sign_q < 54) {
-		mes "[Liana]";
 		mes "*Pout*";
 		mes "When's my daddy";
 		mes "coming home?!";
@@ -7409,7 +6985,6 @@ geffen_in,171,42,3	script	Cute Girl	703,{
 		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!";
@@ -7417,7 +6992,6 @@ geffen_in,171,42,3	script	Cute Girl	703,{
 		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;
@@ -7426,12 +7000,7 @@ geffen_in,171,42,3	script	Cute Girl	703,{
 			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~";
-			}
+			mes "Mom said that some "+((Sex)?"guy":"lady")+" is gonna try to find my dad, so I'm making this so "+((Sex)?"":"s")+"he can take it him~";
 			close;
 		case 2:
 			mes "[Liana]";
@@ -7459,12 +7028,7 @@ geffen_in,171,42,3	script	Cute Girl	703,{
 				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?";
-					}
+					mes "This nice "+((Sex)?"man":"lady")+" is going to look for your dad. Why don't you ask "+((Sex)?"him":"her")+" to take your letter to him for you?";
 					next;
 					mes "[Liana]";
 					mes "You are...?";
@@ -7492,21 +7056,18 @@ geffen_in,171,42,3	script	Cute Girl	703,{
 	}
 	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?";
@@ -7515,7 +7076,6 @@ geffen_in,171,42,3	script	Cute Girl	703,{
 		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;
 	}
@@ -7528,9 +7088,9 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 		mes "you have too many items in your inventory. Please come back after you've freed up more inventory space.^000000";
 		close;
 	}
+	mes "[Engel]";
 	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";
@@ -7559,7 +7119,6 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 			}
 		}
 		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;
@@ -7569,7 +7128,6 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 		}
 	}
 	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;
@@ -7578,7 +7136,6 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 	}
 	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";
@@ -7658,7 +7215,6 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 			}
 		}
 		else {
-			mes "[Engel]";
 			mes "^333333*Sigh*^000000";
 			mes "It's been a long";
 			mes "time since I've seen";
@@ -7674,91 +7230,50 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 		}
 	}
 	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))) {
+			mes "[Engel]";
 			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;
+				set .@anvil,0;
 			}
 			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;
+				set .@anvil,1;
 			}
 			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;
+				set .@anvil,2;
 			}
 			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;
+				set .@anvil,3;
 			}
+			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+.@anvil),1; //Anvil-Oridecon_Anvil-Golden_Anvil-Emperium_Anvil
+			set sign_q, (58+.@anvil);
+			getitem 7278,1; //Wellbeing_Letter
+			close;
 		}
 		else {
 			if (rand(1,6) == 3) {
@@ -7783,79 +7298,29 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 		}
 	}
 	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;
-			}
+		if ((sign_q == 66 && rand(1,100) < 38) || (sign_q == 67 && rand(1,100) < 67) || (sign_q == 68 && rand(1,100) < 91) || (sign_q== 69)) {
+			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 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]";
+		else switch(sign_q) {
+			case 66:
+			case 67:
 				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;
@@ -7883,27 +7348,7 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 				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]";
+			case 68:
 				mes "Oh good, you're back.";
 				mes "I've got some bad news,";
 				mes "so please don't overreact~";
@@ -7926,29 +7371,11 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 				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]";
@@ -7957,12 +7384,10 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 				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;
@@ -8000,12 +7425,8 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 			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
-			}
+			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;
@@ -8013,7 +7434,6 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 		}
 		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]";
@@ -8027,19 +7447,16 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 				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";
@@ -8072,42 +7489,18 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 		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;
-		}
+		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) {
@@ -8173,7 +7566,6 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 			}
 		}
 		if (.@pass_s1 == 1) {
-			mes "[Engel]";
 			mes "It's so...";
 			mes "Beautiful! I don't know";
 			mes "if I'll ever see anything";
@@ -8193,13 +7585,11 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 			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;
@@ -8210,8 +7600,8 @@ mjo_dun02,88,295,4	script	Flaming Spirit Man	85,{
 
 gef_tower,118,36,4	script	Annoyed Man	64,{
 	callfunc "F_UpdateSignVars";
+	mes "[Dhota]";
 	if (sign_q < 72) {
-		mes "[Dhota]";
 		mes "Hmmm...";
 		mes "That can't be right...";
 		mes "What could possibly be";
@@ -8222,12 +7612,10 @@ gef_tower,118,36,4	script	Annoyed Man	64,{
 	}
 	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, Sage, Warlock or a Sorcerer.";
 			mes "Why bother climbing this tower?";
@@ -8284,7 +7672,6 @@ gef_tower,118,36,4	script	Annoyed Man	64,{
 		}
 	}
 	else {
-		mes "[Dhota]";
 		mes "Hmmm...";
 		mes "That can't be right...";
 		mes "What could possibly be";
@@ -8298,8 +7685,8 @@ gef_tower,118,36,4	script	Annoyed Man	64,{
 umbala,163,256,3	script	Native#_s	781,{
 	callfunc "F_UpdateSignVars";
 	if (event_umbala >= 3) {
+		mes "[Laotan]";
 		if (sign_q < 73) {
-			mes "[Laotan]";
 			mes "Oh, I wish I had";
 			mes "a Mr. Smile mask!";
 			mes "But where can I get";
@@ -8310,13 +7697,12 @@ umbala,163,256,3	script	Native#_s	781,{
 			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;
+			mes "[Laotan]";
 			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?";
@@ -8346,7 +7732,6 @@ umbala,163,256,3	script	Native#_s	781,{
 				}
 			}
 			else {
-				mes "[Laotan]";
 				mes "Waaaait.";
 				mes "I knooow~!";
 				mes "I know if you get";
@@ -8355,7 +7740,6 @@ umbala,163,256,3	script	Native#_s	781,{
 			}
 		}
 		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";
@@ -8571,8 +7955,8 @@ alberta,165,83,4	script	Fastidious Old Man	755,{
 		mes "you have too many items in your inventory. Please come back after you've freed up more inventory space.^000000";
 		close;
 	}
+	mes "[Frank]";
 	if (sign_q < 77) {
-		mes "[Frank]";
 		mes "My back~";
 		mes "It's so sore!";
 		mes "And my eyes are";
@@ -8581,7 +7965,6 @@ alberta,165,83,4	script	Fastidious Old Man	755,{
 		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";
@@ -8592,7 +7975,6 @@ alberta,165,83,4	script	Fastidious Old Man	755,{
 	}
 	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";
@@ -8656,7 +8038,6 @@ alberta,165,83,4	script	Fastidious Old Man	755,{
 			}
 		}
 		else {
-			mes "[Frank]";
 			mes "My vision's getting";
 			mes "blurrier and I get headaches";
 			mes "when I read. I guess this old";
@@ -8667,7 +8048,6 @@ alberta,165,83,4	script	Fastidious Old Man	755,{
 	}
 	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;
@@ -8679,14 +8059,12 @@ alberta,165,83,4	script	Fastidious Old Man	755,{
 			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;
@@ -8749,8 +8127,8 @@ OnTouch:
 
 himinn,48,86,5	script	Valkyrie#sign	811,{
 	callfunc "F_UpdateSignVars";
+	mes "[Valkyrie Sandra]";
 	if (sign_q < 81) {
-		mes "[Valkyrie Sandra]";
 		mes "Only the chosen";
 		mes "can enter this place.";
 		mes "I will not ask how you've";
@@ -8761,7 +8139,6 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 		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.";
@@ -8805,39 +8182,20 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 		mes "one of the hearts there...";
 		set sign_q,82;
 		percentheal 100,100;
-		if (BaseLevel < 56) {
-			getexp 900,0;
-		}
-		else if ((BaseLevel > 55) && (BaseLevel < 61)) {
-			getexp 1200,0;
-		}
-		else if ((BaseLevel > 60) && (BaseLevel < 66)) {
-			getexp 2000,0;
-		}
-		else if ((BaseLevel > 65) && (BaseLevel < 71)) {
-			getexp 3500,0;
-		}
-		else if ((BaseLevel > 70) && (BaseLevel < 76)) {
-			getexp 7000,0;
-		}
-		else if ((BaseLevel > 75) && (BaseLevel < 81)) {
-			getexp 12000,0;
-		}
-		else if ((BaseLevel > 80) && (BaseLevel < 86)) {
-			getexp 16000,0;
-		}
-		else if ((BaseLevel > 85) && (BaseLevel < 91)) {
-			getexp 21000,0;
-		}
-		else if (BaseLevel > 90) {
-			getexp 35000,0;
-		}
+		if (BaseLevel < 56) getexp 900,0;
+		else if ((BaseLevel > 55) && (BaseLevel < 61)) getexp 1200,0;
+		else if ((BaseLevel > 60) && (BaseLevel < 66)) getexp 2000,0;
+		else if ((BaseLevel > 65) && (BaseLevel < 71)) getexp 3500,0;
+		else if ((BaseLevel > 70) && (BaseLevel < 76)) getexp 7000,0;
+		else if ((BaseLevel > 75) && (BaseLevel < 81)) getexp 12000,0;
+		else if ((BaseLevel > 80) && (BaseLevel < 86)) getexp 16000,0;
+		else if ((BaseLevel > 85) && (BaseLevel < 91)) getexp 21000,0;
+		else if (BaseLevel > 90) getexp 35000,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";
@@ -8846,7 +8204,6 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 		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";
@@ -8867,7 +8224,6 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 		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;
@@ -8887,7 +8243,6 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 		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";
@@ -8896,7 +8251,6 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 		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";
@@ -8904,7 +8258,6 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 		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";
@@ -8921,7 +8274,6 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 	}
 	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";
@@ -8932,7 +8284,6 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 			end;
 		}
 		else {
-			mes "[Valkyrie Sandra]";
 			mes "Great warrior,";
 			mes "your time has not yet";
 			mes "come. Please focus on";
@@ -8950,11 +8301,8 @@ himinn,48,86,5	script	Valkyrie#sign	811,{
 que_sign01,196,39,4	script	Serin#dummy	90,{
 	end;
 
-OnInit:
-	disablenpc "Serin#dummy";
-	end;
-
 OnDisable:
+OnInit:
 	disablenpc "Serin#dummy";
 	end;
 
@@ -8989,11 +8337,8 @@ OnTimer13000:
 que_sign01,196,44,4	script	Dark Lord#serin	737,{
 	end;
 
-OnInit:
-	disablenpc "Dark Lord#serin";
-	end;
-
 OnDisable:
+OnInit:
 	disablenpc "Dark Lord#serin";
 	end;
 
@@ -10339,8 +9684,8 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		mes "- after you loose some weight. -";
 		close;
 	}
+	mes "[Kirkena]";
 	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";
@@ -10380,7 +9725,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 	}
 	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";
@@ -10396,7 +9740,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 			close;
 		}
 		else {
-			mes "[Kirkena]";
 			mes "Some bastard stole";
 			mes "two of my spell books.";
 			mes "I'd be grateful if you can";
@@ -10407,7 +9750,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 	}
 	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";
@@ -10490,7 +9832,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 			close;
 		}
 		else {
-			mes "[Kirkena]";
 			mes "Hmm...?";
 			mes "Why haven't you";
 			mes "brought my books";
@@ -10501,7 +9842,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 	}
 	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";
@@ -10524,7 +9864,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 			close;
 		}
 		else {
-			mes "[Kirkena]";
 			mes "I almost hate";
 			mes "suggesting it, but";
 			mes "I think Serin might";
@@ -10540,7 +9879,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		}
 	}
 	else if (sign_q < 118) {
-		mes "[Kirkena]";
 		mes "It may be almost";
 		mes "impossible to obtain";
 		mes "the Symbol of Nine Realms.";
@@ -10555,7 +9893,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		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~";
@@ -10602,7 +9939,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 	}
 	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";
@@ -10612,7 +9948,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 			close;
 		}
 		else {
-			mes "[Kirkena]";
 			mes "Hmm, you don't have";
 			mes "anything related to Serin.";
 			mes "This isn't good. She's hid";
@@ -10623,7 +9958,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		}
 	}
 	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";
@@ -10672,12 +10006,8 @@ que_sign01,122,141,4	script	Witch#s	792,{
 				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;
-					}
+					if (sign_q == 120) set sign_q,122;
+					else if (sign_q == 121) set sign_q,123;
 				}
 				break;
 			case 2:
@@ -10729,12 +10059,8 @@ que_sign01,122,141,4	script	Witch#s	792,{
 				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;
-					}
+					if (sign_q == 120) set sign_q,122;
+					else if (sign_q == 121) set sign_q,123;
 				}
 				break;
 			case 3:
@@ -10760,28 +10086,21 @@ que_sign01,122,141,4	script	Witch#s	792,{
 				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 == 120) set sign_q,122;
+					else if (sign_q == 121) set sign_q,123;
 				}
 			}
-			if ((sign_q == 122) || (sign_q == 123)) {
-				close;
-			}
+			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;
+		mes "[Kirkena]";
 		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";
@@ -10807,7 +10126,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 			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";
@@ -10845,7 +10163,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 	}
 	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";
@@ -10853,7 +10170,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 			close;
 		}
 		if (countitem(2643) == 1) {
-			mes "[Kirkena]";
 			mes "You're finally";
 			mes "back. We might not";
 			mes "have enough time to";
@@ -10875,7 +10191,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 			}
 		}
 		else {
-			mes "[Kirkena]";
 			mes "We've got to";
 			mes "stop Serin before";
 			mes "she does something";
@@ -10903,7 +10218,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 	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?";
@@ -10912,7 +10226,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 				close;
 			}
 			else {
-				mes "[Kirkena]";
 				mes "You've done well.";
 				mes "Without her memories of her";
 				mes "previous life, Serin can remain";
@@ -10934,7 +10247,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		}
 		else {
 			if (countitem(7313) < 5) {
-				mes "[Kirkena]";
 				mes "Hmmm...?";
 				mes "Where are all the";
 				mes "vouchers I've lent to you?";
@@ -10943,7 +10255,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 				close;
 			}
 			else {
-				mes "[Kirkena]";
 				mes "You've done well.";
 				mes "Without her memories of her";
 				mes "previous life, Serin can remain";
@@ -10965,7 +10276,6 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		}
 	}
 	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.";
@@ -10984,17 +10294,12 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		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;
-		}
+		if (countitem(2643) == 1) set sign_q,129;
+		else set sign_q,130;
 		getexp 30000,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";
@@ -11018,18 +10323,13 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		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
-		}
+		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 20000,0;
 		close;
 	}
 	else if (sign_q > 200) {
-		mes "[Kirkena]";
 		mes "Hmpf.";
 		mes "I don't really";
 		mes "want to talk to";
@@ -11037,13 +10337,11 @@ que_sign01,122,141,4	script	Witch#s	792,{
 		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,";
@@ -11336,46 +10634,44 @@ OnTouch:
 		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;
-		}
+		select("How can I 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...";
+		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;
 }
 
 que_sign01,45,227,4	script	Queen of the Dead	856,{
 	callfunc "F_UpdateSignVars";
+	mes "[Lady Hell]";
 	if (sign_q < 117) {
-		mes "[Lady Hell]";
 		mes "^8C1717You wish to have";
 		mes "an audience with the";
 		mes "Queen of the Dead without";
@@ -11386,7 +10682,6 @@ que_sign01,45,227,4	script	Queen of the Dead	856,{
 		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";
@@ -11433,7 +10728,6 @@ que_sign01,45,227,4	script	Queen of the Dead	856,{
 		close;
 	}
 	else if (sign_q < 142) {
-		mes "[Lady Hell]";
 		mes "^8C1717Greetings, mortal.";
 		mes "Make sure that you";
 		mes "use the power of the";
@@ -11443,7 +10737,6 @@ que_sign01,45,227,4	script	Queen of the Dead	856,{
 		close;
 	}
 	else if (sign_q == 142) {
-		mes "[Lady Hell]";
 		mes "^8C1717Ah.";
 		mes "You are the";
 		mes "mortal called";
@@ -11470,13 +10763,8 @@ que_sign01,45,227,4	script	Queen of the Dead	856,{
 			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";
-			}
+			mes "to have such an interesting";
+			mes "artifact in "+((Sex)?"his":"her")+" possession.^000000";
 			next;
 			mes "[Lady Hell]";
 			mes "^8C1717As queen of Niflheim,";
@@ -11518,7 +10806,6 @@ que_sign01,45,227,4	script	Queen of the Dead	856,{
 		}
 	}
 	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";
@@ -11560,7 +10847,6 @@ que_sign01,45,227,4	script	Queen of the Dead	856,{
 		close;
 	}
 	else {
-		mes "[Lady Hell]";
 		mes "^8C1717Greetings, mortal.";
 		mes "Is the realm of the living";
 		mes "that boring and tedious?";
@@ -11606,12 +10892,8 @@ niflheim,146,241,0	script	Depressing Man	735,{
 			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;
-				}
+				if (sign_sq > 2) set sign_sq,0;
+				else set sign_sq,sign_sq+1;
 			case 2:
 				break;
 			}
@@ -11847,9 +11129,7 @@ nif_in,140,177,0	script	#Switch	111,{
 		end;
 	}
 	if (sign_q > 89) {
-		if (sign_q == 126) {
-			set sign_q,198;
-		}
+		if (sign_q == 126) set sign_q,198;
 		warp "que_sign01",115,135;
 		end;
 	}
@@ -11858,8 +11138,8 @@ nif_in,140,177,0	script	#Switch	111,{
 
 niflheim,102,54,4	script	Mad Man#s	739,{
 	callfunc "F_UpdateSignVars";
+	mes "[Laichin]";
 	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";
@@ -11868,7 +11148,6 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 		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";
@@ -11889,7 +11168,6 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 		close;
 	}
 	else if (sign_q == 96) {
-		mes "[Laichin]";
 		mes "Angrboda...?";
 		mes "Yeah, yeah!";
 		mes "I remember hearing something";
@@ -12010,18 +11288,10 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 					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;
-					}
+					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!";
@@ -12047,18 +11317,10 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 						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;
-						}
+						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~";
@@ -12091,18 +11353,10 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 							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;
-							}
+							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";
@@ -12122,7 +11376,6 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 		}
 	}
 	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";
@@ -12161,18 +11414,10 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 				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;
-				}
+				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!";
@@ -12189,7 +11434,6 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 		}
 	}
 	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;
@@ -12281,7 +11525,6 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 		}
 	}
 	else if (sign_q < 150) {
-		mes "[Laichin]";
 		mes "Dude, Niflheim rocks.";
 		mes "It's like, a million times";
 		mes "better than that boring";
@@ -12321,14 +11564,12 @@ niflheim,102,54,4	script	Mad Man#s	739,{
 		close;
 	}
 	else if (sign_q == 200) {
-		mes "[Laichin]";
 		mes "Whoa...";
 		mes ".................";
 		mes "My freakin' head hurts.";
 		close;
 	}
 	else {
-		mes "[Laichin]";
 		mes "Whoa...";
 		mes ".................";
 		close;
@@ -12453,9 +11694,7 @@ OnMyMobDead:
 nif_in,102,81,1	script	#Crayu	-1,1,1,{
 OnTouch:
 	callfunc "F_UpdateSignVars";
-	if (sign_q < 75) {
-		end;
-	}
+	if (sign_q < 75) end;
 	else if (sign_q < 82) {
 		mes "[Crayu]";
 		mes "Mountain sunset to the west";
@@ -12485,13 +11724,8 @@ OnTouch:
 		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;
+			if (sign_sq > 1) set sign_sq,0;
+			else set sign_sq,sign_sq+1;
 		case 2:
 			break;
 		}
@@ -12650,173 +11884,94 @@ OnTouch:
 	end;
 }
 
-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";
+function	script	F_SignSeal	{
+	function F_SealFail;
+	function F_SealFail {
+		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;
+	}
+	if (countitem(1558) || countitem(1963)) {
+		if (getarg(0) < 980) F_SealFail; }
+	else if (countitem(1227) || countitem(1228) || countitem(1240) || countitem(1241) || countitem(1962) || countitem(1813)) {
+		if (getarg(0) < 960) F_SealFail; }
+	else if (countitem(1719) || countitem(1130) || countitem(1133) || countitem(1223) || countitem(1229) || countitem(1231) || countitem(1413) || countitem(1814) || countitem(1242)) {
+		if (getarg(0) < 940) F_SealFail; }
+	else if (countitem(1131) || countitem(1230) || countitem(1232)) {
+		if (getarg(0) < 920) F_SealFail; }
+	else if (countitem(1132) || countitem(1134) || countitem(1233) || countitem(1234) || countitem(1235) || countitem(1414) || countitem(1523) || countitem(1236)) {
+		if (getarg(0) < 900) F_SealFail; }
+	else if (countitem(1237) || countitem(1524) || countitem(1525) || countitem(1557) || countitem(1415) || countitem(1964)) {
+		if (getarg(0) < 880) F_SealFail; }
+	else if (countitem(1135) || countitem(1140) || countitem(1141) || countitem(1527)) {
+		if (getarg(0) < 860) F_SealFail; }
+	else if (countitem(1164) || countitem(1165) || countitem(1467) || countitem(1138) || countitem(1139) || countitem(1224) || countitem(1225) || countitem(1416) || countitem(1526)) {
+		if (getarg(0) < 840) F_SealFail; }
+	else if (countitem(1305) || countitem(1720) || countitem(1136) || countitem(1137) || countitem(1166)) {
+		if (getarg(0) < 820) F_SealFail; }
+	else if (countitem(1261) || countitem(1528) || countitem(1167)) {
+		if (getarg(0) < 800) F_SealFail; }
+	else if (countitem(1364) || countitem(1913)) {
+		if (getarg(0) < 780) F_SealFail; }
+	else if (countitem(1170) || countitem(1468) || countitem(1168) || countitem(1169)) {
+		if (getarg(0) < 760) F_SealFail; }
+	else if (countitem(1365) || countitem(1366) || countitem(1473)) {
+		if (getarg(0) < 740) F_SealFail; }
+	else if (countitem(1367) || countitem(1368) || countitem(1466) || countitem(1469)) {
+		if (getarg(0) < 720) F_SealFail; }
+	else if (countitem(1369) || countitem(1470)) {
+		if (getarg(0) < 700) F_SealFail; }
+	else if (countitem(1722) || countitem(1471)) {
+		if (getarg(0) < 680) F_SealFail; }
+	else if (countitem(1363)) {
+		if (getarg(0) < 660) F_SealFail; }
+	else if (countitem(1530)) {
+		if (getarg(0) < 500) F_SealFail; }
+	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;
 	}
-	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;
-		}
+	if (getarg(1,0)) {
+		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...^000000";
+		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...^000000";
+		delitem 7306,3; //Fragment_Of_Soul
+		set sign_q,117;
+		getitem 7307,1; //Whisper_Of_Soul
+	}
+	else {
 		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
+	}
+	return;
+}
+
+gl_dun02,262,265,0	script	Mysterious Energy#1	111,{
+	callfunc "F_UpdateSignVars";
+	set .@crash_s,rand(1,1000);
+	if (sign_q == 101) {
+		callfunc "F_SignSeal",.@crash_s;
+		set sign_q,105;
 		close;
 	}
 	else {
@@ -12830,175 +11985,10 @@ gl_dun02,262,265,0	script	Mysterious Energy#1	111,{
 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
+	if ((sign_q == 102) || (sign_q == 104)) {
+		callfunc "F_SignSeal",.@crash_s;
+		if (sign_q == 102) set sign_q,106;
+		else if (sign_q == 104) set sign_q,108;
 		close;
 	}
 	else {
@@ -13012,178 +12002,11 @@ gl_dun02,271,100,0	script	Mysterious Energy#2	111,{
 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
+	if ((sign_q == 103) || (sign_q == 105) || (sign_q == 108)) {
+		callfunc "F_SignSeal",.@crash_s;
+		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;
 		close;
 	}
 	else {
@@ -13197,172 +12020,9 @@ gl_dun02,268,32,0	script	Mysterious Energy#3	111,{
 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
+	if (sign_q == 109) {
+		callfunc "F_SignSeal",.@crash_s;
+		if (sign_q == 109) set sign_q,113;
 		close;
 	}
 	else {
@@ -13376,175 +12036,10 @@ gl_dun02,16,26,0	script	Mysterious Energy#4	111,{
 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
+	if ((sign_q == 106) || (sign_q == 112)) {
+		callfunc "F_SignSeal",.@crash_s;
+		if (sign_q == 106) set sign_q,110;
+		else if (sign_q == 112) set sign_q,116;
 		close;
 	}
 	else {
@@ -13558,344 +12053,13 @@ gl_dun02,42,251,0	script	Mysterious Energy#5	111,{
 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
+	if (sign_q == 107) {
+		callfunc "F_SignSeal",.@crash_s;
+		if (sign_q == 107) set sign_q,111;
 		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
+		callfunc "F_SignSeal",.@crash_s,1;
 		close;
 	}
 	else {
@@ -13909,346 +12073,14 @@ gl_dun02,123,234,0	script	Mysterious Energy#6	111,{
 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
+	if ((sign_q == 110) || (sign_q == 111)) {
+		callfunc "F_SignSeal",.@crash_s;
+		if (sign_q == 110) set sign_q,114;
+		else if (sign_q == 111) set sign_q,115;
 		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
+		callfunc "F_SignSeal",.@crash_s,1;
 		close;
 	}
 	else {
@@ -14262,180 +12094,8 @@ gl_dun02,140,72,0	script	Mysterious Energy#7	111,{
 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
+	if ((sign_q == 114) || (sign_q == 115)) {
+		callfunc "F_SignSeal",.@crash_s,1;
 		close;
 	}
 	else {
@@ -14505,21 +12165,11 @@ OnInit:
 
 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;
-	}
+	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;
 
 OnEnable:
@@ -14533,17 +12183,8 @@ OnDisable:
 	end;
 
 OnTimer10000:
-	specialeffect EF_MAPPILLAR2;
-	end;
-
 OnTimer20000:
-	specialeffect EF_MAPPILLAR2;
-	end;
-
 OnTimer30000:
-	specialeffect EF_MAPPILLAR2;
-	end;
-
 OnTimer40000:
 	specialeffect EF_MAPPILLAR2;
 	end;
@@ -14598,6 +12239,7 @@ OnEnable:
 }
 
 que_sign01,196,44,0	script	Warp#serin	-1,35,35,{
+OnDisable:
 OnInit:
 	disablenpc "Warp#serin";
 	end;
@@ -14609,10 +12251,6 @@ OnTouch:
 OnEnable:
 	enablenpc "Warp#serin";
 	end;
-
-OnDisable:
-	disablenpc "Warp#serin";
-	end;
 }
 
 que_sign01,1,0,0	script	Timer#serin	-1,{
@@ -14642,9 +12280,8 @@ Oncall:
 	end;
 
 OnMyMobDead:
-	if (mobcount("que_sign01","CallMonster#serin::OnMyMobDead") < 1) {
+	if (mobcount("que_sign01","CallMonster#serin::OnMyMobDead") < 1)
 		donpcevent "Serin#serin::OnEnable";
-	}
 	end;
 
 Onreset:
@@ -14682,6 +12319,7 @@ OnTimer620000:
 }
 
 que_sign01,197,195,0	script	Warp#witch	-1,35,35,{
+OnDisable:
 OnInit:
 	disablenpc "Warp#witch";
 	end;
@@ -14690,10 +12328,6 @@ OnEnable:
 	enablenpc "Warp#witch";
 	end;
 
-OnDisable:
-	disablenpc "Warp#witch";
-	end;
-
 OnTouch:
 	warp "niflheim",30,156;
 	end;