* Added all Hugel-related quests. Thanks to MasterOfMuppets for scripting most of them.

- Updated some Hugel, Lighthalzen, Einbroch and Airship NPCs regarding those new quests.
- Moved a lot of Hugel NPCs to proper quest file.
* Added Odin Temple Excavation quest.
- Updated Hugel warps and Odin Temple Sailor according to the quest.
* Added Heart Fragment quest.
* Updated Ayothaya's Ring quest to official. Credits to MasterOfMuppets.

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

1 files changed, 1364 insertions, 22 deletions

diff --git a/npc/quests/quests_airship.txt b/npc/quests/quests_airship.txt
index 54b32e315..71eade43c 100644
--- a/npc/quests/quests_airship.txt
+++ b/npc/quests/quests_airship.txt
@@ -3,7 +3,7 @@
 //===== By: ================================================== 

 // Samuray22

 //===== Current Version: ===================================== 

-//= 1.0

+//= 1.1

 //===== Compatible With: ===================================== 

 //= eAthena SVN

 //===== Description: ========================================= 

@@ -15,6 +15,7 @@
 //=	    -Job Experience 10.000

 //===== Additional Comments: ================================= 

 //= 1.0 First Beta.

+//= 1.1 Added Heart Fragment quest. [SinSloth]

 //============================================================ 

 

 //=======================================================================================================//

@@ -1067,7 +1068,7 @@ while($@mobinv >= 9 && $@mobrand == 3)
 {

 	Initnpctimer;

 	end;

-OnTimer1764000:

+OnTimer6000:

 	mapannounce "airplane_01","Captain: Attention, all passengers.",1,0x00FF00;

 	end;

 OnTimer10000:

@@ -1237,7 +1238,7 @@ OnTimer67000:
 	end;

 OnTimer67500:

 	donpcevent "boom#air-2::OnAttack"; //2

-	//ShowEffect "Airship Captain#02" EF_HIT5

+	donpcevent "Airship Captain#02::OnAttack";

 	end;

 OnTimer68000:

 	donpcevent "boom#air-3::OnAttack"; //3

@@ -1372,6 +1373,8 @@ OnAttack:
 //========Captain Tarlock (Inside the Captain Cabin)=======================

 

 airplane_01,238,154,5	script	Airship Captain#01	873,{

+

+	cutin "fly_trock.bmp",2;

 	mes "[Tarlock]";

 	mes "I am Tarlock,";

 	mes "captain of this";

@@ -1404,7 +1407,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 		mes "and the loyalty of my crew.";

 		mes "We'll do everything we can to";

 		mes "make sure your flight is safe.";

-		close;

+		close2;

+		cutin "",255;

+		end;	

 	case 2:

 		if(lght_air == 1) {

 			if (BaseLevel <= 59) {

@@ -1414,7 +1419,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 				mes "before? Well, in any case";

 				mes "I apologize, but I'm still not";

 				mes "allowed to tell you that secret.";

-				close;

+				close2;

+				cutin "",255;

+				end;	

 			} else {

 				mes "[Tarlock]";

 				mes "Mm...?";

@@ -1430,7 +1437,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 					mes "figure out how this Airship";

 					mes "is able to stay aloft and";

 					mes "fly through the skies.";

-					close;

+					close2;

+					cutin "",255;

+					end;	

 				case 2:

 					mes "[Tarlock]";

 					mes "In all honestly, the";

@@ -1456,7 +1465,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 						mes "to ask you to do anything";

 						mes "that you can't handle. Come";

 						mes "back after you decide, alright?";

-						close;

+						close2;

+						cutin "",255;

+						end;	

 					case 2:

 						set lght_air, 2;

 						mes "[Tarlock]";

@@ -1485,7 +1496,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 						mes "Captain Tarlock's letter";

 						mes "to deliver to his younger";

 						mes "brother, Captain Ferlock.";

-						close;

+						close2;

+						cutin "",255;

+						end;	

 					}

 				}

 			}

@@ -1498,7 +1511,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 			mes "expecting that too much...";

 			mes "Please wait a little,";

 			mes "I'll read his letter.";

-			close;

+			close2;

+			cutin "",255;

+			end;	

 		} else if(lght_air == 5) {

 			set lght_air, 6;

 			mes "[Tarlock]";

@@ -1511,7 +1526,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 			next;

 			mes "^3131ffHe continue reading";

 			mes "the letter.^000000";

-			close;

+			close2;

+			cutin "",255;

+			end;	

 		} else if(lght_air== 6) {

 			mes "[Tarlock]";

 			mes "Yes, I finished.";

@@ -1578,7 +1595,7 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 					mes "exaggeration.";

 					mes "It has really a strong power.";

 					next;

-					specialeffect2 231;

+					specialeffect2 253;

 					mes "[Tarlock]";

 					mes "Did you understand?";

 					mes "I'll rest a little.";

@@ -1587,7 +1604,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 					mes "letters.";

 					set lght_air, 7;

 					getexp 200000, 10000;

-					close;

+					close2;

+					cutin "",255;

+					end;	

 				}

 			}

 		} else if(lght_air == 7) {

@@ -1595,7 +1614,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 			mes "Didn't I teach you before?";

 			mes "I won't explain such a long";

 			mes "tale again!";

-			close;

+			close2;

+			cutin "",255;

+			end;	

 		} else if(lght_air == 2) {

 			mes "[Tarlock]";

 			mes "Hahahah! Don't worry, I'll";

@@ -1603,7 +1624,9 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 			mes "flies once you deliver that";

 			mes "letter to my brother, Ferlock,";

 			mes "and bring back his reply.";

-			close;

+			close2;

+			cutin "",255;

+			end;	

 		}

 		mes "[Tarlock]";

 		mes "Hahaha! How this";

@@ -1613,14 +1636,18 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 		mes "let me assure you that it's";

 		mes "nothing weird or dangerous.";

 		set lght_air, 1;

-		close;

+		close2;

+		cutin "",255;

+		end;	

 	case 3:

 		mes "[Tarlock]";

 		mes "Alright, then.";

 		mes "Thanks for flying";

 		mes "with us, and I hope";

 		mes "you enjoy your travels.";

-		close;

+		close2;

+		cutin "",255;

+		end;	

 	}

 }

 

@@ -1628,6 +1655,314 @@ airplane_01,238,154,5	script	Airship Captain#01	873,{
 //===========Captain Ferlock=======================

 

 airplane,236,163,5	script	Airship Captain#03	873,{

+

+	cutin "fly_trock.bmp",2;

+	if(hg_ma1 == 3 || hg_ma1 == 4)

+	{

+		mes "[Ferlock]";

+		mes "Welcome to the airship. I am Ferlock, captain of this airship. What do you want from me? ";

+		next;

+		switch( select( "Ask him about Thierry" ) )

+		{

+			case 1:

+				break;

+		}

+		mes "[Ferlock]";

+		mes "Hmm, this is the first time I hear of this name. I'm sure he's not the employee of this place.";

+		next;

+		switch( select( "Request for the passenger list. " ) )

+		{

+			case 1:

+				break;

+		}

+		mes "[Ferlock]";

+		mes "The passenger list is not opened to public unfortunately. Sorry I couldn't help you. ";

+		if(hg_ma1 == 3) close;

+		next;

+		switch( select( "Follow Kaci's request and tell him the story." ) )

+		{

+			case 1:

+				break;

+		}

+		mes "^3355FFWhen you tell him why you need to find Thierry, the captain listens to you quietly and nods his head.^000000";

+		next;

+		mes "[Ferlock]";

+		mes "Hmm... I understand what you mean. However, the rules says that the passenger list cannot be showed to public.";

+		next;

+		mes "[Ferlock]";

+		mes "......However, rules can be broken which brings greater value than its existence. Ok, I will help you. Please wait for a while.";

+		next;

+		mes "^3355FFThe captain takes out a book and writes the name of 'Thierry' on the first page where nothing is written. The entry slowly disappears and the pages of the book start to flip magically^000000";

+		next;

+		mes "^3355FFThe book continues to flip and finally stops at one page. You see the record of Thierry boarding the airship on that page^000000";

+		next;

+		mes "[Ferlock]";

+		mes "Haha, does it frighten you? This is a magically enchanted book. Once you've written the name in it, you will be able to find the answer you want in an instant.";

+		next;

+		mes "[Ferlock]";

+ 		mes "It must have surprised you to find that the people of Schwaltzvalt make use of magical items too.";

+		next;

+		mes "[Ferlock]";

+		mes "This is something I acquired from an old friend.... Hmm, but that has nothing to do with this.";

+		next;

+		mes "[Ferlock]";

+		mes "Thierry... Let's see. He boarded the airship a month ago and headed for Hugel. Looks like he took the ship to Hugel the first day this flight was implemented.";

+		next;

+		mes "[Ferlock]";

+		mes "....Oh, didn't you say that this friend of yours is involved with a research job? I remember now. It's that young man.";

+		next;

+		mes "[Ferlock]";

+		mes "The flight to Hugel which had just been added to the schedule faced a great danger the first day since the airship had not prepared any counter-measures for sudden attacks by the dragons.";

+		next;

+		mes "[Ferlock]";

+		mes "To think about it, I have to admit that I made a mistake by not taking the fact that the dragons make approaching Hugel dangerous into consideration.";

+		next;

+		mes "[Ferlock]";

+		mes "Anyway, the ship was in critical condition due to an unexpected mechanical failure. Fortunately, a young skillful man managed to solve the problem. Now I remember his name; Thierry.";

+		next;

+		mes "[Ferlock]";

+		mes "Now I can tell why he was so quiet and had such a sad face. You know where he was heading now. So, please bring the news to his fiance.";

+		next;

+		mes "[Ferlock]";

+		mes "And if you ever meet him, please send him my gratitude and regards.";

+		set hg_ma1,5;

+		close2;

+		cutin "",255;

+		end;

+	}

+	else if(hg_ma1 == 5)

+	{

+		mes "[Ferlock]";

+		mes "You better get going and send the news to the fiance.";

+		close2;

+		cutin "",255;

+		end;

+	}

+	if (lght_air == 7 && lhz_heart == 11)

+	{

+		mes "[Ferlock]";

+		mes "Ah, thank you for coming.";

+		mes "Now, I wanted to ask you";

+		mes "why you were investigating";

+		mes "Ymir's Heart Piece. Are you";

+		mes "merely curious, or did you";

+		mes "have some special reason?";

+		next;

+		switch( select( "Just curious...","Well, there's someone I need to help..." ) )

+		{

+			case 1:

+				mes "[Ferlock]";

+				mes "Just curious...?";

+				mes "I don't know if satisfying";

+				mes "your curiosity is worth the";

+				mes "risks that you have already";

+				mes "taken. You should be more ";

+				mes "careful in the future...";

+				close2;

+				cutin "",255;

+				end;

+			

+			case 2:

+				mes "[Ferlock]";

+				mes "Well, I shouldn't be";

+				mes "trusting you this much,";

+				mes "but since you've helped";

+				mes "me and my brother, I feel";

+				mes "that you must be one of those altruistic adventurers. Very well.";

+				next;

+				mes "[Ferlock]";

+				mes "If you promise that you'll";

+				mes "never tell what I reveal to";;

+				mes "you, then I suppose I can";

+				mes "tell you know about the Rune";

+				mes "Stone and Ymir's Heart Piece.";

+				next;

+				switch( select( "I promise..." ) )

+				{

+					case 1:

+						break;

+				}

+				mes "[Ferlock]";

+				mes "Alright, then. I expect you";

+				mes "to keep your word. Now, you";

+				mes "already know that the Airships";

+				mes "are powered by Rune Stones, imitations of Ymir's Heart pieces.";

+				next;

+				mes "[Ferlock]";

+				mes "Although Rune Stones are";

+				mes "inferior to true Ymir Heart";

+				mes "pieces, we can make as many";

+				mes "as want. As for true Ymir Heart";

+				mes "Pieces, they're difficult to find or effectively reproduce.";

+				next;

+				mes "[Ferlock]";

+				mes "You may have already";

+				mes "figured this out, but all";

+				mes "Rune Stones are produced";

+				mes "in the Einbroch Laboratory";

+				mes "for use in the Airships. So";

+				mes "you see what's going on?";

+				next;

+				switch( select( "Wait, what's the Varmunt Project?" ) )

+				{

+					case 1:

+						break;

+				}

+				mes "[Ferlock]";

+				mes "The Varmunt Project is";

+				mes "a continuation of one of";

+				mes "the projects started by the";

+				mes "great Sage, Varmunt. Even as";

+				mes "a child, he was renown as an";

+				mes "incredible genius, a prodigy.";

+				next;

+				mes "[Ferlock]";

+				mes "However, no matter how";

+				mes "much academic success he";

+				mes "enjoyed--he even became a";

+				mes "tenured professor at Juno";

+				mes "University--Varmunt was never able to finance his own research.";

+				next;

+				mes "[Ferlock]";

+				mes "Eventually, he accepted an";

+				mes "offer from Rekenber Co. to";

+				mes "develop an energy source in";

+				mes "exchange for funding. The";

+				mes "result of his work for them is the invention of the Rune Stone.";

+				next;

+				mes "[Ferlock]";

+				mes "However, the public isn't";

+				mes "supposed to know that Varmunt";

+				mes "invented the Rune Stones. Now,";

+				mes "Varmunt disappeared before he";

+				mes "could perfect the Rune Stone";

+				mes "creation process.";

+				next;

+				mes "[Ferlock]";

+				mes "Therefore, the Rune Stones";

+				mes "we have now are unstable and";

+				mes "become useless after a while.";

+				mes "The Varmunt Project aims to";

+				mes "correct these flaws and perfect";

+				mes "the Ymir Heart replication...";

+				next;

+				mes "[Ferlock]";

+				mes "Er, anyway, that's why";

+				mes "I was at the Einbroch";

+				mes "Laboratory today. My Rune";

+				mes "Stone was close to empty,";

+				mes "so I went there to pick up";

+				mes "a fully charged one.";

+				next;

+				mes "[Ferlock]";

+				mes "^333333*Phew...*^000000";

+				mes "Would you give me";

+				mes "a moment to catch";

+				mes "my breath before";

+				mes "I continue? Yes,";

+				mes "there's a little more...";

+				set lhz_heart,12;

+				close2;

+				cutin "",255;

+				end;

+		}

+	}

+	else if(lght_air == 7 && lhz_heart == 12)

+	{

+		mes "[Ferlock]";

+		mes "Now, "+strcharinfo(0)+",";

+		mes "you must be wondering";

+		mes "why I'm telling you all";

+		mes "this. I believe that some";

+		mes "party wishes to steal the";

+		mes "Rune Stones from the Airships.";

+		next;

+		mes "[Ferlock]";

+		mes "Have you noticed the";

+		mes "Gremlins and Beholders";

+		mes "that attack my brother's";

+		mes "ship? Believe it or not,";

+		mes "Gremlins are usually just";

+		mes "harmless and mischievous.";

+		next;

+		mes "[Ferlock]";

+		mes "Gremlin wings also aren't";

+		mes "naturally powerful enough to";

+		mes "enable them to fly. However,";

+		mes "if someone implants Wills of";

+		mes "the Darkness into them, their";

+		mes "powers increase exponentially.";

+		next;

+		mes "[Ferlock]";

+		mes "Although Gremlins tend";

+		mes "not to attack humans unless";

+		mes "provoked, and that they tend";

+		mes "to shy away from people, they";

+		mes "are being controlled to steal";

+		mes "our Airships' Rune Stones.";

+		next;

+		mes "[Ferlock]";

+		mes "Whoever is controlling the";

+		mes "Gremlins also sends those";

+		mes "Beholder monsters in order";

+		mes "to monitor their progress";

+		mes "and observe our resistance.";

+		next;

+		mes "[Ferlock]";

+		mes "My brother and I have been";

+		mes "investigating this matter, but";

+		mes "so far, we haven't learned very";

+		mes "much. Now, my Airship only";

+		mes "provides domestic flights";

+		mes "and hasn't been attacked.";

+		next;

+		mes "[Ferlock]";

+		mes "Now, my brother's Airship";

+		mes "specializes in international";

+		mes "flights and suffers from the";

+		mes "Gremlin invasions, so we are";

+		mes "guessing the attackers are from outside the Schwaltzvalt Republic.";

+		next;

+		mes "[Ferlock]";

+		mes "In any case, that is all";

+		mes "I really know. Please keep";

+		mes "this information to yourself";

+		mes "and let me know if you learn anything new about this situation.";

+		next;

+		mes "[Ferlock]";

+		mes "If I manage to uncover";

+		mes "anything about the ones";

+		mes "that are using the Wills";

+		mes "of Darkness to control the";

+		mes "Gremlins and steal our Rune";

+		mes "Stones, I'll let you know.";

+		next;

+		mes "[Ferlock]";

+		mes "Who is sending these";

+		mes "monsters to invade our";

+		mes "Airships, and for what";

+		mes "purpose do they want the";

+		mes "Rune Stones? Hmm. Well, this";

+		mes "is goodbye for now, adventurer.";

+		close2;

+		specialeffect2 253;

+		set lhz_heart,13;

+		getexp 700000,400000;

+		cutin "",255;

+		end;

+	}

+	else if(lght_air == 7 && lhz_heart == 13)

+	{

+		mes "[Ferlock]";

+		mes "I'll be quite busy with my";

+		mes "captaining duties and my";

+		mes "private investigation of the";

+		mes "attempted Rune Stone robberies.";

+		mes "Hopefully, we'll be able to meet again later. For now, take care.";

+		close2;

+		cutin "",255;

+		end;

+	}

 	mes "[Ferlock]";

 	mes "Hey there, welcome";

 	mes "aboard the Airship. I'm";

@@ -1654,7 +1989,10 @@ airplane,236,163,5	script	Airship Captain#03	873,{
 		mes "It's too important to the";

 		mes "security and safety of";

 		mes "this Airship, you see.";

-		close;

+		close2;

+		cutin "",255;

+		end;

+		

 	case 2:

 		if (lght_air == 2) {

 		set lght_air, 3;

@@ -1676,7 +2014,7 @@ airplane,236,163,5	script	Airship Captain#03	873,{
 		mes "up to. Huh. Hahaha! Oh, that's";

 		mes "funny. Ah, it's always good to";

 		mes "hear from Tarlock. Anyway,";

-		mes "I'm sorry to make you next;.";

+		mes "I'm sorry to make you wait.";

 		next;

 		mes "[Ferlock]";

 		mes "Anyway, my brother wrote";

@@ -1715,7 +2053,9 @@ airplane,236,163,5	script	Airship Captain#03	873,{
 		mes "it if you'd help me out on";

 		mes "this, adventurer. Thanks";

 		mes "in advance and good luck~";

-		close;

+		close2;

+		cutin "",255;

+		end;

 		} else if(lght_air == 3) {

 			if (countitem(7340) >= 2 && countitem(576) >= 2) {

 				delitem 7340, 2;

@@ -1734,7 +2074,9 @@ airplane,236,163,5	script	Airship Captain#03	873,{
 				mes "Please give the best regards";

 				mes "to my big brother.";

 				mes "Well then, good bye.";

-				close;

+				close2;

+				cutin "",255;

+				end;

 			}

 				mes "[Ferlock]";

 				mes "Oh, I'm sorry, but it looks";

@@ -1743,7 +2085,9 @@ airplane,236,163,5	script	Airship Captain#03	873,{
 				mes "^ff00002 Will of the Darkness^000000 and";

 				mes "^ff00002 Prickly Fruit^000000? Thanks,";

 				mes "brave adventurer~";

-				close;

+				close2;

+				cutin "",255;

+				end;

 		}

 		mes "[Ferlock]";

 		mes "Well, I hope that";

@@ -1751,7 +2095,9 @@ airplane,236,163,5	script	Airship Captain#03	873,{
 		mes "here on the Airship";

 		mes "and that you have a";

 		mes "very pleasant journey.";

-		close;		

+		close2;

+		cutin "",255;

+		end;	

 	case 3:

 		mes "[Ferlock]";

 		mes "Well, I hope that";

@@ -1759,8 +2105,1004 @@ airplane,236,163,5	script	Airship Captain#03	873,{
 		mes "here on the Airship";

 		mes "and that you have a";

 		mes "very pleasant journey.";

+		close2;

+		cutin "",255;

+		end;

+	}

+}

+

+//=======================================================================================================//

+//				Heart Fragment Quest

+//=======================================================================================================//

+

+airplane,236,63,4	script	Hallen	706,{

+

+	if(hg_ma1 == 3)

+	{

+		mes "[Hallen]";

+		mes "Sha Sha~ ";

+		next;

+		mes "[Hallen]";

+		mes "Just let me handle this! Hehe. ";

+		next;

+		switch( select( "Ask whether he knows Thierry" ) )

+		{

+			case 1:

+				break;

+		}

+		mes "[Hallen]";

+		mes "Hmm?! Thierry?! I'm not sure. Why don't you ask the crew of the airship.";

+		mes "Kaci might know this person.";

+		close;

+	}

+	if(BaseLevel < 60)

+	{

+		mes "[Hallen]";

+		mes "If you need me to";

+		mes "do anything, just";

+		mes "give me a holler.";

+		mes "Bweh heh... hollah~";

+		close;

+	}

+	if(!lhz_heart)

+	{

+		mes "[Hallen]";

+		mes "Howdy, howdy~";

+		mes "Welcome to the Airship.";

+		next;

+		switch( select( "I'm not a passenger.","Hey kid, what are you doing?" ) )

+		{

+			case 1:

+				emotion e_what,0;

+				mes "[Hallen]";

+				mes "Does that mean you're";

+				mes "one of the crewmen, then?";

+				mes "I don't think we've met before,";

+				mes "and I should be familiar with";

+				mes "everyone working here by now...";

+				next;

+				emotion e_gasp,0;

+				mes "[Hallen]";

+				mes "Hey...!";

+				mes "If you're on duty,";

+				mes "shouldn't you be in";

+				mes "uniform? I guess you";

+				mes "don't work here after all!";

+				mes "Heh, figured it out myself~";

+				next;

+				mes "[Hallen]";

+				mes "Eh, I need to finish";

+				mes "sweeping this deck. Then,";

+				mes "on my break, I can play a";

+				mes "little game for Apples with";

+				mes "Kaci. That's how I roll, yo.";

+				next;

+				break;

+				

+			case 2:

+				mes "[Hallen]";

+				mes "Ummm... Isn't it obvious?";

+				mes "I'm sweeping the deck. I'm";

+				mes "the youngest crewman, so";

+				mes "I get stuck with the lamest";

+				mes "jobs. But once I'm done, it's";

+				mes "Dice time with Kaci. Oh yeah~";

+				next;

+				break;

+		}

+		switch( select( "Kaci?" ) )

+		{

+			case 1:

+				break;

+		}

+		mes "[Hallen]";

+		mes "Kaci... You know, the";

+		mes "dealer of the Dice game?";

+		mes "You should try it out: just";

+		mes "roll some dice for a chance";

+		mes "to win some Apples. Hey,";

+		mes "you could get really lucky!";

+		next;

+		mes "[Hallen]";

+		mes "Heh, there's one guy that";

+		mes "won so many Apples from Kaci";

+		mes "that he was able to become";

+		mes "an Apple Merchant. Can you";

+		mes "believe that? Yeah... Kaci";

+		mes "doesn't like him so much...";

+		close2;

+		set lhz_heart,1;

+		end;

+	}

+	else if(lhz_heart == 1)

+	{

+		mes "[Hallen]";

+		mes "Oh hey, it's you~";

+		mes "We talked earlier,";

+		mes "didn't we? Yeah...";

+		mes "I'm still here sweeping";

+		mes "this floor. It's gonna";

+		mes "take quite a while.";

+		next;

+		emotion e_gasp,0;

+		mes "[Hallen]";

+		mes "It doesn't look like";

+		mes "I'm gonna finish this";

+		mes "anytime soon. Hey, do";

+		mes "you think you could do";

+		mes "me a favor since I can't";

+		mes "really leave this joint?";

+		next;

+		switch( select( "Sorry, but I'm busy...","What is it?" ) )

+		{

+			case 1:

+				mes "[Hallen]";

+				mes "Eh, alright. I guess";

+				mes "I can understand. But";

+				mes "still, I coulda made it";

+				mes "worth your while, if you";

+				mes "know what I mean~";

+				close;

+

+			case 2:

+				mes "[Hallen]";

+				mes "Don't worry, it's not much";

+				mes "work. I'm supposed to deliver";

+				mes "letters from Juno Airport to";

+				mes "the other crewmen, but I don't";

+				mes "got the time. Now, I have";

+				mes "this letter for Kaci here...";

+				next;

+				mes "[Hallen]";

+				mes "Would you go and";

+				mes "deliver this letter";

+				mes "to her for me? It's";

+				mes "from some guy named";

+				mes "Mr. Mawong, her mentor";

+				mes "or something like that.";

+				next;

+				mes "^3355FFHallen gave you";

+				mes "Mawong's letter to";

+				mes "be delivered to Kaci.^000000";

+				set lhz_heart,2;

+				next;

+				mes "[Hallen]";

+				mes "Hey, thanks a lot, pal~";

+				mes "You can find Kaci hosting";

+				mes "the Dice game in the Airship.";

+				close;

+		}

+	}

+	else if(lhz_heart == 2)

+	{

+		mes "[Hallen]";

+		mes "^333333*Sigh...*^000000";

+		mes "I'm so sick and";

+		mes "tired of sweeping.";

+		mes "It's like I'm some";

+		mes "kinda lame cabin boy.";

+		mes "But... I guess I am!";

+		next;

+		mes "[Hallen]";

+		mes "Oh hey, were you";

+		mes "able to give that";

+		mes "letter to Kaci yet?";

+		mes "I think it's pretty";

+		mes "important, so try not";

+		mes "to take too long, okay?";

+		close;

+	}

+	else if(lhz_heart == 3)

+	{

+		mes "[Hallen]";

+		mes "^333333*Sigh...*^000000";

+		mes "I'm so sick and";

+		mes "tired of sweeping.";

+		mes "It's like I'm some";

+		mes "kinda lame cabin boy.";

+		mes "But... I guess I am!";

 		close;

 	}

+	else if(lhz_heart == 4)

+	{

+		mes "[Hallen]";

+		mes "Hey, thanks for delivering";

+		mes "that letter to Kaci for me.";

+		mes "She wasn't too happy that";

+		mes "I asked a passenger to do";

+		mes "it, but she understood that";

+		mes "I'm totally swamped with work.";

+		next;

+		mes "[Hallen]";

+		mes "Wouldn't you agree";

+		mes "that people should";

+		mes "help each other in";

+		mes "times of crisis?";

+		next;

+		switch( select( "Not at all. Every man for himself!","Yes, I do." ) )

+		{

+			case 1:

+				mes "[Hallen]";

+				mes "Wh-what...?";

+				mes "I can't think";

+				mes "that you really";

+				mes "believe that...";

+				set lhz_heart,5;

+				close;

+

+			case 2:

+				mes "[Hallen]";

+				mes "Aww, really?";

+				mes "I knew that you'd";

+				mes "feel the same way";

+				mes "I do. You and me, we're";

+				mes "on the same wavelength~";

+				next;

+				if(checkweight(501,1) != 1)

+				{

+					mes "[Hallen]";

+					mes "Oh... Hey, I was";

+					mes "going to give you";

+					mes "a little something,";

+					mes "but you're carrying";

+					mes "too much stuff right now...";

+					close;

+				}

+				set lhz_heart,5;

+				getitem 501,1;

+				mes "[Hallen]";

+				mes "I know this isn't";

+				mes "much, but I'd like you";

+				mes "to have it. Besides, you";

+				mes "never know what'll come in";

+				mes "handy during an emergency.";

+				mes "Alright then, see you later~";

+				close;

+		}

+	}

+	else if(lhz_heart == 5)

+	{

+		mes "[Hallen]";

+		mes "Hey, hey~ How's it going?";

+		mes "I know, I know, I'm supposed";

+		mes "to be sweeping, and I'm not";

+		mes "finished yet, but sometimes,";

+		mes "you know, you just have to";

+		mes "rest and take a break, yeah?";

+		next;

+		mes "[Hallen]";

+		mes "Ahh, busy days like these";

+		mes "remind me of working back";

+		mes "home in Juno with my neighbor,";

+		mes "Gyver. He's a genius inventor,";

+		mes "you know, and sort of like";

+		mes "a hero or role model to me.";

+		next;

+		mes "[Hallen]";

+		mes "Guyver is so brilliant,";

+		mes "he can pretty much make";

+		mes "anything he wants. Someday,";

+		mes "I want to reach his level, and";

+		mes "create things that will help";

+		mes "people and make them happy.";

+		next;

+		mes "[Hallen]";

+		mes "That's pretty much my";

+		mes "life ambition-- you know,";

+		mes "the kind of thing I want to";

+		mes "contribute to the world. Of";

+		mes "course, I doubt I can compare";

+		mes "to the great Sage Varmunt.";

+		next;

+		switch( select( "Sage Varmunt?" ) )

+		{

+			case 1:

+				break;

+		}

+		mes "[Hallen]";

+		mes "Yeah, Varmunt... He's like";

+		mes "one of the greatest Sages in";

+		mes "history. Well, nobody know too";

+		mes "much about him, but 300 years";

+		mes "ago, he was responsible for most ground breaking accomplishments.";

+		next;

+		mes "[Hallen]";

+		mes "Supposedly, he single handedly";

+		mes "revolutionized science. Many of";

+		mes "the machines that are convenient to life today are his inventions.";

+		mes "Sadly, he disappeared from history and no one know how he vanished.";

+		next;

+		mes "[Hallen]";

+		mes "The great Sage Varmunt...";

+		mes "It's a pretty well known";

+		mes "legend in the Schwaltzvalt";

+		mes "Republic. Anyway, for my";

+		mes "project, I wanted to learn";

+		mes "more about these Airships.";

+		next;

+		mes "[Hallen]";

+		mes "These Airships are so huge";

+		mes "and heavy, and I can scarcely";

+		mes "believe that they can fly. How";

+		mes "is it even possible? Well, if";

+		mes "you could find out for me, ";

+		mes "it'd be a really big help.";

+		set lhz_heart,6;

+		close;

+	}

+	else if(lhz_heart == 6)

+	{

+		mes "[Hallen]";

+		mes "Hey, have you learned";

+		mes "what makes such a big,";

+		mes "heavy Airship like this fly";

+		mes "for so long in the sky?";

+		next;

+		if(lght_air == 7)

+		{

+			switch( select( "Umm, yeah, kind of." ) )

+			{

+				case 1:

+					break;

+			}

+			mes "[Hallen]";

+			mes "Really...?";

+			mes "Are you serious?";

+			mes "So what's the secret?";

+			mes "Tell me, I'm dying to know!";

+			next;

+			mes "^3355FFYou tell Hallen everything";

+			mes "that you've learned from";

+			mes "Captain Tarlock, but you're";

+			mes "careful not to make any";

+			mes "mention of Ymir's Heart Piece.^000000";

+			next;

+			mes "[Hallen]";

+			mes "So... The propellers are";

+			mes "powered through steam?";

+			mes "That doesn't make sense.";

+			mes "No way, it can't be that simple. Besides, steam has its limits.";

+			mes "Are you sure that's everything?";

+			next;

+			switch( select( "Actually, there's another power source." ) )

+			{

+				case 1:

+					break;

+			}

+			mes "^3355FFYou reveal what you";

+			mes "learn about the Rune Stone,";

+			mes "an imitation of Ymir's Heart";

+			mes "Piece: Hallen is a well meaning";

+			mes "kid who probably won't use this";

+			mes "knowledge for evil purposes.";

+			next;

+			mes "[Hallen]";

+			mes "A-awesome! So there is";

+			mes "some special magic power";

+			mes "source that helps this Airship";

+			mes "fly! I knew it! Now, what was";

+			mes "it called again? Ah, the";

+			mes "Rune Stone, right?";

+			next;

+			mes "[Hallen]";

+			mes "An imitation of Ymir's";

+			mes "Heart Piece. Now where";

+			mes "have I heard about that";

+			mes "before? Mm, let me think...";

+			set lhz_heart,7;

+			close;

+		}

+		else

+		{

+			switch( select( "Actually..." ) )

+			{

+				case 1:

+					break:;

+			}

+			mes "[Hallen]";

+			mes "You didn't learn anything";

+			mes "about the Airship yet, huh?";

+			mes "Maybe Captain Ferlock might";

+			mes "know something, or any one";

+			mes "of the other Airship captains.";

+			mes "Hopefully, one will tell you...";

+			next;

+			mes "[Hallen]";

+			mes "I know that the secrets of";

+			mes "Airship flight is considered";

+			mes "classified information, but if";

+			mes "anyone can wrest those secrets,";

+			mes "it'll be one of you adventurers. So please help me out here...";

+			close;

+		}

+	}

+	else if(lhz_heart == 7)

+	{

+		mes "[Hallen]";

+		mes "So the Rune Stone";

+		mes "is an imitation of just";

+		mes "a piece of Ymir's Heart.";

+		mes "But where have I heard";

+		mes "about that before...?";

+		next;

+		emotion e_gasp,0;

+		mes "[Hallen]";

+		mes "Oh, that's right!";

+		mes "Kaci told me about a";

+		mes "drunkard that always";

+		mes "mentions Ymir's Heart";

+		mes "when he plays the Dice";

+		mes "game for Apples!";

+		next;

+		if(Shinokas_Quest > 9)

+		{

+			mes "["+strcharinfo(0)+"]";

+			mes "(^333333Wait, I met that guy when";

+			mes "I was helping Shinokas. He";

+			mes "was one of the directors of";

+			mes "the Einbroch Laboratory that";

+			mes "had a piece of Ymir's Heart.";

+			mes "It's worth investigating...^000000)";

+			next;

+		}

+		mes "[Hallen]";

+		mes "Anyway, it's not much,";

+		mes "but let me give you a little";

+		mes "something for going through";

+		mes "the trouble of learning that";

+		mes "secret information for me...";

+		next;

+		if(checkweight(501,1) != 1)

+		{

+			mes "[Hallen]";

+			mes "Aw, nuts...";

+			mes "You don't have";

+			mes "enough room to";

+			mes "receive my little gift.";

+			mes "Please free up more space";

+			mes "in your inventory for me, okay?";

+			close;

+		}

+		if(Shinokas_Quest > 9) set lhz_heart,9;

+		else set lhz_heart,8;

+		getitem 501,1;

+		mes "[Hallen]";

+		mes "Here you go~";

+		mes "I know it's pretty paltry";

+		mes "compared to the rewards ";

+		mes "you adventurers usually get,";

+		mes "but hey... It's my thought that";

+		mes "counts, right? See you later~";

+		close;

+	}

+	else if(lhz_heart == 8)

+	{

+		mes "[Hallen]";

+		mes "Hey, why don't you";

+		mes "ask Kaci about that";

+		mes "drunkard that's always";

+		mes "playing her Dice game?";

+		mes "You might learn more about";

+		mes "Ymir's Heart Piece, you know?";

+		close;

+	}

+	else

+	{

+		mes "[Hallen]";

+		mes "Thanks for helping me";

+		mes "out that last time. I guess";

+		mes "learning about the Rune Stone";

+		mes "kinda inspired me to build an";

+		mes "Airship of my own someday...";

+		close;

+	}

+}

+

+airplane,33,69,4	script	Kaci	73,{

+

+	if(hg_ma1 == 3)

+	{

+		mes "[Kaci]";

+		mes "Hello there. My name is Kaci. If you feel bored boarding the airship, why don't you play a game of dice with me.";

+		next;

+		switch( select( "Ask whether she knows Thierry" ) )

+		{

+			case 1:

+				break;

+		}

+		mes "[Kaci]";

+		mes "Thierry ....That name sounds familiar...";

+		next;

+		mes "[Kaci]";

+		mes "....................";

+		mes ".............";

+		mes ".......";

+		mes "...";

+		next;

+		mes "[Kaci]";

+		mes "Ahhh! Thierry Thierry Thierry !!";

+		next;

+		mes "^3355FFShe seems to recall something and starts to call out the name loudly.^000000";

+		next;

+		mes "[Kaci]";

+		mes "Hahaha, I'm sorry about that. It has been a while since I last heard that name...";

+		next;

+		mes "[Kaci]";

+		mes "He was the youngster who lived beside my master when I was learning how games work. I still remember that he is very bright and that he did different kinds of researches.";

+		next;

+		mes "[Kaci]";

+		mes "I also recall that he likes the Euslan's sister who's being taught about the game by my master too. I wonder how the two of them are getting along nowadays.";

+		next;

+		mes "^3355FFI tell the girl that Euslan has engaged with Thierry and in order to cure Euslan, Thierry boarded an airship but his whereabouts is a mystery now.^000000";

+		next;

+		mes "[Kaci]";

+		mes "Oh, how could Euslan fall sick? Oh...";

+		next;

+		mes "^3355FFKaci is so shocked to learn about Thierry that she loses herself in her thoughts for a while until regaining conciousness.^000000";

+		next;

+		mes "[Kaci]";

+		mes "Honestly, I would like to help but I haven't heard anything new from them since we haven't seen eachother for such a long time.";

+		next;

+		mes "[Kaci]";

+		mes "Isn't there any other way?";

+		next;

+		mes "[Kaci]";

+		mes "Ah...! The captain might know something. He is the one who manages the list of the passengers.";

+		next;

+		mes "[Kaci]";

+		mes "However, the passenger list cannot be shown to the public...";

+		next;

+		mes "[Kaci]";

+		mes "However, I think the captain will be willing to help if you tell him the whole story. You should give it a try.";

+		next;

+		mes "[Kaci]";

+		mes "As for Euslan, please tell her about me and let her know that I hope she gets well soon.";

+		next;

+		mes "^3355FFSince she's begging, I guess I should send her message.";

+		set hg_ma1,4;

+		close;

+	}

+	else if(hg_ma1 == 4)

+	{

+		mes "[Kaci]";

+		mes "You can ask the captain for the whereabouts of Thierry. I am sure that the captain will be willing to help if you tell him what happened.";

+		close;

+	}

+	else if(lhz_heart == 2)

+	{

+		mes "[Kaci]";

+		mes "You must be sooo";

+		mes "bored, adventurer~";

+		mes "How would you like";

+		mes "to play a game of Dice?";

+		next;

+		switch( select( "Give her the letter from Hallen." ) )

+		{

+			case 1:

+				break;

+		}

+		mes "[Kaci]";

+		mes "Oh, Hallen must have";

+		mes "asked you to deliver this.";

+		mes "He should be doing this sort";

+		mes "of thing himself, instead of";

+		mes "asking customers for favors!";

+		mes "But still, he's really busy...";

+		next;

+		set lhz_heart,3;

+		mes "[Kaci]";

+		mes "Thank you for bringing";

+		mes "this to me. If you ever";

+		mes "need a little favor from";

+		mes "me, feel free to ask me,";

+		mes "alright? See you later~";

+		close;

+	}

+	else if(lhz_heart == 3)

+	{

+		mes "[Kaci]";

+		mes "Oh, hello. Thanks for";

+		mes "delivering that letter from";

+		mes "Mr. Mawong to me, especially";

+		mes "since Hallen was too busy to";

+		mes "do it himself. Reading that";

+		mes "letter really made my day~";

+		next;

+L_Ask:

+		switch( select( "Ask about Hallen","Ask about Mawong","Ask about the Airship" ) )

+		{

+			case 1:

+				set .@mesa,1;

+				mes "[Kaci]";

+				mes "Hallen? Well, he and I are";

+				mes "pretty close. Did you know";

+				mes "that we're cousins? In fact,";

+				mes "his dad, my uncle, brought";

+				mes "me as a child after my father";

+				mes "passed away 20 years ago.";

+				next;

+				mes "[Kaci]";

+				mes "There was some kind of";

+				mes "mine explosion accident in";

+				mes "Einbech. I don't remember.";

+				mes "Anyway, me and Hallen are";

+				mes "like sister and brother, and";

+				mes "we always stick together.";

+				next;

+				mes "[Kaci]";

+				mes "When Captain Ferlock saw me";

+				mes "host a Dice game by coincidence";

+				mes "and then hired me to work on his Airship, Hallen insisted on coming";

+				mes "along. He's stubborn like that,";

+				mes "but he's also very sweet.";

+				next;

+				break;

+				

+			case 2:

+				set .@mesb,1;

+				mes "[Kaci]";

+				mes "Mr. Mawong? Oh, don't get";

+				mes "the wrong idea! He's my";

+				mes "mentor, the one who taught";

+				mes "me how to play all of these";

+				mes "wonderful games. He's pretty";

+				mes "famous around Juno, you know.";

+				next;

+				mes "[Kaci]";

+				mes "I used to be so depressed,";

+				mes "not caring about the world";

+				mes "at all, after my father died.";

+				mes "Then, I ran into Mr. Mawong,";

+				mes "and he taught me how to find";

+				mes "the joy in life once again.";

+				next;

+				mes "[Kaci]";

+				mes "Because of him, I decided";

+				mes "to learn his games and to";

+				mes "help people forget their";

+				mes "worries and just enjoy";

+				mes "themselves, even if it's";

+				mes "just for a little while.";

+				next;

+				break;

+				

+			case 3:

+				set .@mesc,1;

+				mes "[Kaci]";

+				mes "The Airship? It's so";

+				mes "huge and beautiful, and";

+				mes "I'm always amazed that it";

+				mes "can fly so gracefully through";

+				mes "the air. I've always wanted to live someplace close to the sky...";

+				next;

+				mes "[Kaci]";

+				mes "A place where I can see";

+				mes "the clouds and bask in the";

+				mes "sun. So, when Captain Ferlock";

+				mes "invited me to work here, it was";

+				mes "like a dream come true~";

+				next;

+				break;

+		}

+		mes "[Kaci]";

+		mes "Please don't hesitate";

+		mes "to ask me anything if";

+		mes "you need a small favor,";

+		mes "or if you're just curious";

+		mes "about me in general~";

+		next;

+		if(!.@mesa || !.@mesb || !.@mesc) goto L_Ask;

+		mes "[Kaci]";

+		mes "By the way, if Hallen";

+		mes "bothers you with another";

+		mes "request, please refuse to";

+		mes "help him next time, okay?";

+		mes "I won't allow him to get";

+		mes "spoiled! Ho ho ho ho~";

+		next;

+		mes "[Kaci]";

+		mes "Well, I better get";

+		mes "back to work now.";

+		mes "Have a nice day,";

+		mes "and I'll see you later~";

+		set lhz_heart,4;

+		close;

+	}

+	else if(lhz_heart == 8)

+	{

+		mes "[Kaci]";

+		mes "Hello, "+strcharinfo(0)+".";

+		mes "It's nice to see you again.";

+		mes "So is there anything I can";

+		mes "help you with today?";

+		next;

+		switch( select( "Who's that drunk over there?" ) )

+		{

+			case 1:

+				break;

+		}

+		mes "[Kaci]";

+		mes "Oh, him? He's one of my";

+		mes "regulars, some guy who's";

+		mes "supposed to be an Einbroch";

+		mes "Lab Director. He keeps losing";

+		mes "Apples whenever he plays Dice:";

+		mes "I think he's a gambling addict~";

+		next;

+		mes "[Kaci]";

+		mes "In fact, his losses make up";

+		mes "for all the Apples I lost when";

+		mes "that Apple Merchant played here. Now, it's a legendary tale that";

+		mes "we all think fondly of, but at";

+		mes "the time, it nearly broke me.";

+		next;

+		mes "[Kaci]";

+		mes "Anyway, aside from the fact";

+		mes "that the Einbroch Lab Director";

+		mes "is kind of a whiny person when";

+		mes "he's drunk, and a poor gambler,";

+		mes "I don't know much about him.";

+		next;

+		mes "["+strcharinfo(0)+"]";

+		mes "(^333333Einbroch Laboratory...";

+		mes "It's so suspicious. That";

+		mes "director knows about Ymir's";

+		mes "Heart Piece, so they must be";

+		mes "keeping something really";

+		mes "important over there.^000000)";

+		next;

+		mes "["+strcharinfo(0)+"]";

+		mes "(^333333I better investigate";

+		mes "that laboratory in Einbroch";

+		mes "as soon as I can, even if it's";

+		mes "a heavily restricted area.^000000)";

+		set lhz_heart,9;

+		close;

+	}

+	mes "[Kaci]";

+	mes "You must be sooo";

+	mes "bored, adventurer~";

+	mes "How would you like";

+	mes "to play a game of Dice?";

+	next;

+	callfunc "applegamble","Kaci";

+	end;

+}

+

+ein_in01,279,25,0	script	#lab01_heart	139,1,1,{

+

+OnTouch:

+	if(lhz_heart == 9)

+	{

+		mes "["+strcharinfo(0)+"]";

+		mes "(^333333I've... I've just";

+		mes "got to investigate";

+		mes "that laboratory and";

+		mes "see if anything funny";

+		mes "is going on in there.^000000)";

+		close;

+	}

+}

+

+ein_in01,264,17,0	script	#lab02_heart	139,1,1,{

+

+OnTouch:

+	if(lhz_heart == 9)

+	{

+		mes "["+strcharinfo(0)+"]";

+		mes "What the...";

+		mes "It's some sort of";

+		mes "weird device. The label";

+		mes "here says, ''Password";

+		mes "Checker?'' Well, this";

+		mes "might come in handy later.";

+		next;

+		mes "^3355FFYou decide to bring";

+		mes "the Password Checker";

+		mes "device with you into";

+		mes "the laboratory.^000000";

+		set lhz_heart,10;

+		close;

+	}

+}

+

+ein_in01,263,35,3	script	Ferlock#lab	873,{

+

+OnInit:

+	disablenpc "Ferlock#lab";

+	stopnpctimer;

+	end;

+

+OnEnter:

+	enablenpc "Ferlock#lab";

+	initnpctimer;

+	end;

+	

+OnEmote:

+	emotion e_omg,0;

+	end;

+

+OnTimer120000:

+	donpcevent "Ferlock#lab::OnInit";

+	end;

+}

+

+ein_in01,261,35,0	script	lab03#heart	139,1,1,{

+

+OnTouch:

+	if(lhz_heart == 9)

+	{

+		mes "[Security System]";

+		mes "^FF0000Unauthorized person";

+		mes "detected. Password";

+		mes "Checker not detected.";

+		mes "Access denied.^000000";

+		close;

+	}

+	else if(lhz_heart == 10)

+	{

+		mes "[Security System]";

+		mes "^FF0000Enter the 3 digit password.";

+		mes "You will be allowed 5 tries";

+		mes "within 3 minutes to enter";

+		mes "the correct password, or";

+		mes "the password will reset.^000000";

+		next;

+		mes "[Password Checker]";

+		mes "^333333Hint:";

+		mes "Do not use the";

+		mes "number 0, and do";

+		mes "not enter any number";

+		mes "more than once. Make";

+		mes "sure the password is 3 digits.";

+		next;

+L_Recode:

+		set @thanacode1,rand(1,9);

+		set @thanacode2,rand(1,9);

+		set @thanacode3,rand(1,9);

+		if((@thanacode1 == @thanacode2) || (@thanacode1 == @thanacode3) || (@thanacode2 == @thanacode3)) goto L_Recode;

+L_Input:

+		input @thanainput;

+		if((@thanainput < 100) || (@thanainput > 999))

+		{

+			mes "[Security System]";

+			mes "^FF0000Error.";

+			mes "The password entered";

+			mes "exceeds the number digit";

+			mes "limit. You must only enter";

+			mes "3 digit passwords.^000000";

+			close;

+		}

+		set @thanainput1,@thanainput / 100;

+		set @thanainput2,(@thanainput % 100) / 10;

+		set @thanainput3,@thanainput % 10;

+		if ((@thanainput1 == 0) || (@thanainput2 == 0) || (@thanainput3 == 0))

+		{

+			mes "[Security System]";

+			mes "^FF0000Error.";

+			mes "You cannot enter the";

+			mes "number 0, or use any";

+			mes "other number more than";

+			mes "once. Please try again.^000000";

+			next;

+			goto L_Input;

+		}

+		mes "[Security System]";

+		mes "^ff0000"+strcharinfo(0)+"^000000";

+		mes "has entered the following:";

+		mes "^0000ff"+@thanainput1+"^000000 - ^0000ff"+@thanainput2+"^000000 - ^0000ff"+@thanainput3+"^000000. Please wait for";

+		mes "authorization to complete.";

+		set @thanatry,@thanatry +1;

+		next;

+		set @strike,0;

+		set @ball,0;

+		if(@thanainput1 == @thanacode1) set @strike,@strike +1;

+		if(@thanainput2 == @thanacode2) set @strike,@strike +1;

+		if(@thanainput3 == @thanacode3) set @strike,@strike +1;

+		if((@thanainput1 == @thanacode2) || (@thanainput1 == @thanacode3)) set @ball,@ball +1;

+		if((@thanainput2 == @thanacode1) || (@thanainput2 == @thanacode3)) set @ball,@ball +1;

+		if((@thanainput3 == @thanacode1) || (@thanainput3 == @thanacode2)) set @ball,@ball +1;

+		if(@strike == 3)

+		{

+			mes "[Security System]";

+			mes "Authorization complete.";

+			mes "Archive access granted.";

+			next;

+			mes "^3355FFThe archive door opens,";

+			mes "revealing a series of";

+			mes "filed documents. Out";

+			mes "of all of them, one of the";

+			mes "files grabs your attention.^000000";

+			next;

+			mes "Varmunt Project No. 3";

+			mes "Security Level : Grade 1-C";

+			mes " ";

+			mes "Caution: Only project members";

+			mes "of the Ymir Heart Synthesization project are authorized to view";

+			mes "this classified document.";

+			next;

+			mes "Varmunt Project No. 3";

+			mes "Security Level : Grade 1-C";

+			mes " ";

+			mes "All others found reading";

+			mes "this document are subject";

+			mes "to punishment or dismissal.";

+			next;

+			mes "^3355FFYou perceive the sound of";

+			mes "footsteps and quickly try to";

+			mes "return the document to its";

+			mes "original place. However,";

+			mes "the person that has come";

+			mes "to the archive has already";

+			mes "seen you holding the file.^000000";

+			next;

+			donpcevent "Ferlock#lab::OnEnter";

+			mes "[Ferlock]";

+			mes "Excuse me, but are";

+			mes "you an employee here?";

+			mes "I've come to pick up a";

+			mes "new Rune Stone for the";

+			mes "Airship. Wait, wait...";

+			mes "You look familiar...";

+			next;

+			donpcevent "Ferlock#lab::OnEmote";

+			mes "[Ferlock]";

+			mes "That's right, aren't you the";

+			mes "one who brought me my";

+			mes "brother's letter? Yeah, you";

+			mes "were asking me about the";

+			mes "Airship's flight mechanics.";

+			mes "So you're not an employee...";

+			next;

+			mes "[Ferlock]";

+			mes "Boy, you must be more than";

+			mes "curious to be looking up that";

+			mes "information in a restricted";

+			mes "area. But don't worry, you";

+			mes "must have your reasons,";

+			mes "so I won't call the guards.";

+			next;

+			mes "[Ferlock]";

+			mes "Still, you better get out";

+			mes "of here. The guards patrol";

+			mes "this place regularly, so you're";

+			mes "almost sure to get caught. Hmm,";

+			mes "come and see me later at the";

+			mes "Airship, alright? Now hurry!";

+			close2;

+			donpcevent "Ferlock#lab::OnInit";

+			set lhz_heart,11;

+			end;

+		}

+		mes "[Password Checker]";

+		mes " ";

+		mes "^333333Total of correct numbers";

+		mes "in correct sequence: ^ff0000"+@strike+"^333333";

+		mes "Total of correct numbers: ^ff0000"+@ball+"^333333.";

+		mes "Please use these results";

+		mes "to make a more accurate guess.^000000";

+		next;

+		if(@thanatry > 4)

+		{

+			mes "[Security System]";

+			mes "^FF0000The correct password";

+			mes "for this session was";

+			mes "^000000"+@thanacode1+"^FF0000 - ^000000"+@thanacode2+"^000000 - ^000000"+@thanacode3+"^FF0000. Password";

+			mes "will now be reset.^000000";

+			set @thanatry,0;

+			close;

+		}

+		mes "[Security System]";

+		mes "Beeeeep!";

+		mes "Incorrect password.";

+		mes " ";

+		if(@thanatry == 1) mes "Initialing 2nd attempt...^000000";

+		if(@thanatry == 2) mes "Initialing 3rd attempt...^000000";

+		if(@thanatry == 3) mes "Initialing 4th attempt...^000000";

+		if(@thanatry == 4) mes "Initialing final attempt...^000000";

+		next;

+		goto L_Input;

+	}

 }

 

 //========Explosions=======================