//===== rAthena Script =======================================
//= Banquet Quests
//===== Description: =========================================
//= [Official Conversion]
//--- NPCs quests for Episode 16.1
//===== Changelogs: ==========================================
//= 1.0 First version. [Capuche]
//= 1.1 Fixed spelling mistakes [crazy-arashi]
//= 2.0 Official Conversion. [Capuche]
//============================================================

function	script	F_Mysterious_box	{
	.@r = rand(1,1000);
	if (.@r < 122) getitem 6919,8;
	else if (.@r < 321) getitem 6919,16;
	else if (.@r < 356) getitem 6919,55;
	else if (.@r < 402) getitem 6936,3;
	else if (.@r < 453) getitem 6937,3;
	else if (.@r < 513) getitem 6938,3;
	else if (.@r < 552) getitem 6939,3;
	else if (.@r < 606) getitem 6940,3;
	else if (.@r < 623) getitem 6941,1;
	else if (.@r < 671) getitem 6942,3;
	else if (.@r < 705) getitem 11600,2;
	else if (.@r < 797) getitem 22847,3;
	else if (.@r < 844) getitem 22848,1;
	else if (.@r < 887) getitem 22849,1;
	else if (.@r < 888) getitem 22854,1;
	else if (.@r < 892) getitem 22856,1;
	else getitem 22899,2;
	return;
}

// Main Quest
prontera,121,72,3	script	Royal Messenger#e16_pr	4_M_ZONDAOYAJI,5,5,{
	if (checkweight(1301,5) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	switch( ep16_royal ) {
	case 0:
		if (BaseLevel < 100 || (ep13_ryu < 100 && ep13_start < 100)) {// Access to the New World pre-req (Onward to the New World Quest or Cat Paw Agent Quest)
			mes "[Royal Messenger]";
			mes "Hello!";
			mes "Now ^4d4dffthe palace is hosting a banquet for the returning heroes from Vacuum^000000.";
			mes "Please tell me ^4d4dffwhere the heroes who have participated in the expedition are^000000 if you know any.";
			next;
			mes "[Royal Messenger]";
			mes "I wonder where they are. They are so scattered that it is difficult to locate each one of them. Hahaha!";
			close;
		}
		mes "[Royal Messenger]";
		mes "Oh, wait. You are...";
		mes "" + strcharinfo(0) + ", right?";
		mes "Let's see.";
		next;
		mes "[Royal Messenger]";
		mes "I am right. You look exactly the same as the montage from the guild. Hahahaha!";
		mes "My eyes are doing what they are supposed to do now, I guess.";
		next;
		mes "[Royal Messenger]";
		mes "It is difficult to find the freelance adventurers who don't belong to the military.";
		mes "It was very difficult to find you since you are not bound to anywhere.";
		next;
		select("May I help you?");
		mes "[Royal Messenger]";
		mes "Help? Sure thing!";
		mes "You know that there is a banquet taking place in celebration of subjugating Morocc.";
		mes "An invitation has been issued for you. But it was just impossible to meet you.";
		next;
		mes "[Royal Messenger]";
		mes "I am sure that all the Royal Messengers of the city must be looking for with the portrait of you.";
		mes "Hey, since we don't have enough time, please take this invitation for you.";
		next;
		mes "[Royal Messenger]";
		mes "You must attend the banquet. Do you understand? ^4d4dffYou've been invited as a special guest^000000.";
		next;
		unittalk getcharid(3), "" + strcharinfo(0) + " : A special guest?", bc_self;
		mes "[Royal Messenger]";
		mes "The people in the palace will fill you up with the details.";
		mes "I am just a messenger after all.";
		mes "Although the banquet will be held for quite a while, don't take too much time to get there.";
		next;
		mes "[Royal Messenger]";
		mes "Make sure to bring the invitation with you. Don't forget!";
		mes "Why don't you go right now? ^4d4dffI can teleport you there now if you want^000000.";
		getitem 6933,1;// Banquet_Invitation
		setquest 7681;// Invitation to Royal Banquet
		ep16_royal = 1;
		next;
		if (select( "I'll go on my own.", "I'll go right away." ) == 1) {
			mes "[Royal Messenger]";
			mes "You can visit the Prontera Palace.";
			mes "You may show the invitation to the guard at the gate or";
			mes "A servant in charge of the banquet.";
			next;
			mes "[Royal Messenger]";
			mes "Since I have delivered the invitation to you, I shall wait for another one.";
			mes "I hope you have a good time there, dear hero.";
			close;
		}
		mes "[Royal Messenger]";
		mes "Let me teleport you there right away.";
		mes "When you arrive, there will be a servant for reception. You can show the invitation then.";
		close2;
		warp "prontera",156,327;
		end;
	case 1:
		mes "[Royal Messenger]";
		mes "Why are you still here?";
		mes "What can I do for you?";
		next;
		if (select( "Send me to the Banquet Hall.", "I have lost the invitation." ) == 2) {
			if (countitem(6933) < 1) {
				mes "[Royal Messenger]";
				mes "What a shame! What happened?";
				mes "Well, since the message that you'll be there has already been sent there,";
				mes "You may not really need the invitation anyways.";
				next;
				mes "[Royal Messenger]";
				mes "When you go to the palace, the servant in charge will recognize you.";
				mes "Don't worry, and you may go to the palace now.";
				close;
			}
			mes "[Royal Messenger]";
			mes "Eh? What is that you have in your pocket? It looks like an invitation to me.";
			mes "I may have a tiny set of eyes, but I wouldn't miss it.";
			next;
			mes "[Royal Messenger]";
			mes "Since you have found your invitation, let's get going! Hahahaha!";
			close;
		}
		mes "[Royal Messenger]";
		mes "Let me teleport you there right away.";
		mes "When you arrive, there will be a servant for reception. You can show the invitation then.";
		close2;
		warp "prontera",156,327;
		end;
	default:
		mes "[Royal Messenger]";
		mes "I have heard that you have attended the banquet safely.";
		mes "I need to find the others and send them to the banquet as well.";
		close2;
		npctalk "I want to go home...", "", bc_self;
		end;
	}

OnTouch:
	if (ep16_royal == 0 && BaseLevel > 99 && (ep13_ryu > 99 || ep13_start > 99))
		npctalk "Wait! You must be... " + strcharinfo(0) + ". I have something to tell you!", "", bc_self;
	else
		npctalk "I am looking for the hero who returned from the expedition...", "", bc_self;
	end;
}
rachel,119,131,3	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_ra	4_M_ZONDAOYAJI,5,5
aldebaran,159,113,3	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_ald	4_M_ZONDAOYAJI,5,5
alberta,119,59,3	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_alb	4_M_ZONDAOYAJI,5,5
veins,200,108,5	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_ve	4_M_ZONDAOYAJI,5,5
geffen,123,68,3	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_ge	4_M_ZONDAOYAJI,5,5
payon,168,65,3	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_pa	4_M_ZONDAOYAJI,5,5
morocc,152,97,5	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_mo	4_M_ZONDAOYAJI,5,5
yuno,162,132,3	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_yu	4_M_ZONDAOYAJI,5,5
lighthalzen,152,100,5	duplicate(Royal Messenger#e16_pr)	Royal Messenger#e16_lh	4_M_ZONDAOYAJI,5,5

prontera,150,331,4	script	Royal Guard#ep16_ect01	8W_SOLDIER,4,4,{
	if (ep16_royal == 1) {
		mes "[Guard]";
		mes "Here comes the hero!";
		mes "The Banquet Hall is inside the palace. You may follow the passage to get there.";
		mes "Let me send a message for the Chamberlain to find you.";
		close;
	}
	npctalk "Welcome to the glorious Prontera Palace in the heart of Rune-Midgarts!", "Royal Guard#ep16_ect01", bc_self;// Royal Guard#ep16_ect01 only
	end;

OnTouch:
	if (ep16_royal > 0) {
		npctalk "Eternal glory to the hero of the Midgards!", "Royal Guard#ep16_ect01", bc_self;
		npctalk "Eternal glory to the hero of the Midgards!", "Royal Guard#ep16_ect02", bc_self;
	}
	end;
}
prontera,161,331,4	duplicate(Royal Guard#ep16_ect01)	Royal Guard#ep16_ect02	8W_SOLDIER

prt_cas,215,146,0	script	#ep16_evt_01_on	HIDDEN_WARP_NPC,1,1,{
	end;
OnTouch:
	if (isbegin_quest(7681) == 1) {
		cloakoffnpc "Chamberlain Bell#ep16_01", getcharid(0);
		setpcblock PCBLOCK_NPC, true;
		sleep2 3000;
		setpcblock PCBLOCK_NPC, false;
		npctalk "I've been waiting for you. Sir " + strcharinfo(0) + "...", "Chamberlain Bell#ep16_01", bc_self;
	}
	end;
}

prt_cas,217,150,3	script	Chamberlain Bell#ep16_01	4_M_RUSMAN1,{
	if (isbegin_quest(7681) == 1) {
		mes "[Chamberlain Bell]";
		mes "You must be Sir " + strcharinfo(0) + "... Am I right?";
		mes "You are here at last.";
		mes "I've been waiting for you.";
		mes "I am glad that the invitation have found you in time.";
		next;
		mes "[Belle]";
		mes "I am Chamberlain Bell Twilight. I will be at your service during your stay at the palace.";
		mes "You can call me Belle.";
		next;
		mes "[Belle]";
		mes "" + strcharinfo(0) + " since you have been invited as a special guest here, a separate guest room is prepared for you.";
		mes "You may go upstairs and walk ^4d4dffstraight to the left corridor^000000.";
		next;
		mes "[Belle]";
		mes "Let me go ahead and mall all the preparations.";
		mes "Come with me, please.";
		close2;
		cloakonnpc "Chamberlain Bell#ep16_01", getcharid(0);
		end;
	}
	end;
OnInit:
	cloakonnpc "Chamberlain Bell#ep16_01";
	cloakonnpc "Chamberlain Bell#ep16_02";
	cloakonnpc "Chamberlain Bell#ep16_03";
	end;
}

// Corridor left
prt_cas,163,163,0	script	#ep16_evt_02_on	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (isbegin_quest(7681) == 1) {
		cloakoffnpc "Chamberlain Bell#ep16_02", getcharid(0);
		npctalk "This way. Sir " + strcharinfo(0) + "...", "Chamberlain Bell#ep16_02", bc_self;
	}
	end;
}

prt_cas,155,165,4	script	Chamberlain Bell#ep16_02	4_M_RUSMAN1,{
	if (isbegin_quest(7681) == 1) {
		mes "[Chamberlain Bell]";
		mes "The special guestroom is prepared this way.";
		mes "It is the ^4d4dfffirst room^000000 you'll see in there.";
		next;
		mes "[Chamberlain Bell]";
		mes "Let me tell you the story in detail after moving into the room.";
		mes "Come this way.";
		close2;
		cloakonnpc "Chamberlain Bell#ep16_02", getcharid(0);
	}
	end;
}

prt_cas_q,150,8,0	script	#ep16_evt_03_on	HIDDEN_WARP_NPC,1,1,{
	end;
OnTouch:
	if (isbegin_quest(7681) == 1) {
		cloakoffnpc "Chamberlain Bell#ep16_03", getcharid(0);
		npctalk "This way. Sir " + strcharinfo(0) + "...", "Chamberlain Bell#ep16_03", bc_self;
	}
	end;
}

prt_cas_q,135,10,4	script	Chamberlain Bell#ep16_03	4_M_RUSMAN1,{
	if (isbegin_quest(7681) == 1) {
		mes "[Chamberlain Bell]";
		mes "Let me tell you about the detailed schedule inside.";
		mes "Let's go inside.";
	}
	else {
		mes "[Chamberlain Bell]";
		mes "I'll be waiting for you here in this room at all times.";
		mes "You may find me when you need a help.";
	}
	close2;
	cloakonnpc "Chamberlain Bell#ep16_03", getcharid(0);
	end;
}

// Belle Room
prt_cas_q,26,30,3	script	Chamberlain Bell#ep16_main	4_M_RUSMAN1,{
	switch( ep16_royal ) {
	case 0:
		mes "[Belle]";
		mes "This is the guest room for the officially invited guest.";
		mes "Since this place forbids the access of outsiders, please leave.";
		close;
	case 1:
		if (countitem(6933) > 0)
			delitem 6933,1;// Banquet_Invitation
		mes "[Belle]";
		mes "You must have come a long way here. Thank you.";
		mes "Since you are a special guest, you have been assigned with a room in the royal villa.";
		next;
		mes "[Belle]";
		mes "I'll tell you about the schedule at all times. You can ask me anytime.";
		next;
		select("What do you mean by the special guest?");
		mes "[Belle]";
		mes "The banquet hosted by the palace is to celebrate the return of the expedition and cherish their hard work...";
		next;
		mes "[Belle]";
		mes "However, more importantly, it is to fulfill the Royal Assembly.";
		mes "The candidates for the throne have been evaluated before.";
		mes "And heir to the throne will be determined.";
		next;
		mes "[Belle]";
		mes "There is a secret ritual passed down in the palace, which is held before the official coronation. The heir will be named the king upon passing the ritual.";
		next;
		mes "[Belle]";
		mes "Unless the heavens fall, the ritual will be finished safely, and Rune-Midgarts will meet the new king.";
		next;
		select("What's it got to do with me?");
		mes "[Belle]";
		mes "I have told you just before.";
		mes "There is a ritual to be held after the final decision.";
		mes "You have been invited as an observer to the ritual.";
		unittalk getcharid(3), "" + strcharinfo(0) + " : Me? An observer?", bc_self;
		next;
		mes "[Belle]";
		mes "It is the secret ritual of the palace to designate the king for the eternal glory of the seven royal families.";
		mes "So that our new king is acknowledged by all the people of this land.";
		next;
		mes "[Belle]";
		mes "However, since special evaluation is allowed by the Royal Assembly,";
		mes "It has been decided to select a personnel recommended by each guild";
		next;
		mes "[Belle]";
		mes "Or a hero who made a great contribution in the expedition as the observer of this ritual.";
		next;
		mes "[Belle]";
		mes "Consequently, you have been assigned. I have heard that you were recommended unanimously.";
		next;
		select("When will the ritual take place?");
		mes "[Belle]";
		mes "As far as I know, it is supposed to be in the final stage.";
		mes "Since the late king passed away all of a sudden, the palace has been in a state of disorder.";
		next;
		mes "[Belle]";
		mes "Fortunately, Rune-Midgarts is supported by the seven royal families.";
		mes "It is the time to welcome our new king.";
		next;
		npctalk "If Morocc hadn't been resurrected...", "", bc_self;
		mes "[Belle]";
		mes "Since you are invited as the observer,";
		mes "You need to visit each facility and exchange greetings before attending the banquet.";
		next;
		mes "[Belle]";
		mes "This royal villa happens to be the place where the people from each family stays when they come to the capital. All other rooms except this one are occupied by other families.";
		next;
		mes "[Belle]";
		mes "They must have heard the news of your arrival by now.";
		mes "How about ^4d4dffvisiting the Heine family near here^000000?";
		next;
		mes "[Belle]";
		mes "In the west villa, I mean, where we are now,";
		mes "There are the residences for Heine, Nerius and Walther.";
		next;
		mes "[Belle]";
		mes "In the east across the corridor, there are residences for Wigner, Richard, Geoborg and Roegenburg.";
		next;
		mes "[Belle]";
		mes "You need to exchange greetings with the members of each families so make sure to visit them all.";
		erasequest 7681;// Invitation to Royal Banquet
		setquest 7682;// Socializing Starts from an Eye Contact
		ep16_royal = 2;
		close;
	case 2:
		if (isbegin_quest(7682) != 2) {// Socializing Starts from an Eye Contact
			if (isbegin_quest(7683) < 2) .@string$ = "Heine";
			if (isbegin_quest(7684) < 2) .@string$ += ( .@string$ != "" ? ", " : "" ) + "Nerius";
			if (isbegin_quest(5402) < 2) .@string$ += ( .@string$ != "" ? ", " : "" ) + "Richard";
			if (ep16_wal < 2) .@string$ += ( .@string$ != "" ? ", " : "" ) + "Walther";
			if (ep16_wig < 2) .@string$ += ( .@string$ != "" ? ", " : "" ) + "Wigner";
			if (ep16_lug < 2) .@string$ += ( .@string$ != "" ? ", " : "" ) + "Roegenburg";
			if (ep16_gaobs < 2) .@string$ += ( .@string$ != "" ? ", " : "" ) + "Geoborg";

			if (.@string$ == "") {	// it shouldn't happen
				completequest 7682;// Socializing Starts from an Eye Contact
				setquest 7685;// What Is the Next Thing on the Schedule ?
			}
			else {
				mes "[Belle]";
				mes "The news of your arrival must have reached each family by now.";
				mes "They must be waiting. Pay a visit and exchange greetings.";
				next;
				mes "[Belle]";
				mes "You have not visited the";
				mes .@string$;
				mes "family yet.";
				next;
				mes "[Belle]";
				mes "They are the most blue-blooded people, not used to be kept waiting.";
				next;
				mes "[Belle]";
				mes "In order to keep a smooth relationship with them, you may to there quickly.";
				mes "Then, good bye.";
				close;
			}
		}
		mes "[Belle]";
		mes "Oh, you are back.";
		mes "The assembly seems to take some time.";
		next;
		mes "[Belle]";
		mes "Since you have some time to spare, why don't you go enjoy the banquet in the Banquet Hall.";
		next;
		mes "[Belle]";
		mes "The ^4d4dffladies of the Nerius family have just asked to see you in the Banquet Hall^000000 .";
		mes "" + strcharinfo(0) + ", you must have made a good impression.";
		next;
		mes "[Belle]";
		mes "When the time comes, the Court Mage will come to guide you. You may enjoy the banquet by then.";
		next;
		mes "[Belle]";
		mes "And this is some sort of reward which has been sent to you as a token of gratitude...";
		next;
		mes "[Belle]";
		mes "You can collect them and exchange with useful items.";
		mes "You may get more in return for your help around the palace.";
		next;
		mes "[Belle]";
		mes "There must be someone ^4d4dffnear the Crusader's Office who would exchange^000000 them.";
		mes "If you have some time, pay a visit.";
		erasequest 7685;// What Is the Next Thing on the Schedule ?
		setquest 7687;// Participating in the Banquet
		getexp 300000,300000;
		getitem 6919,10;// TokenOfHonor
		ep16_royal = 3;
		next;
		mes "[Belle]";
		mes "When the time comes, the Court Mage will come to guide you. You may enjoy the banquet by then.";
		next;
		mes "[Belle]";
		mes "If you go to the Banquet Hall, ^4d4dffmake sure to find the people from the Nerius family.^000000";
		close;
	case 3:
	case 4:
	case 5:
	case 6:
		mes "[Belle]";
		mes "When the time comes, the Court Mage will come to guide you. You may enjoy the banquet by then.";
		next;
		mes "[Belle]";
		mes "If you go to the Banquet Hall, ^4d4dffmake sure to find the people from the Nerius family.^000000";
		close;
	case 7:
		mes "[Belle]";
		mes "Oh, how was the banquet?";
		mes "The banquet is supposed to last long since it is held to welcome all the returning heroes from Ash-Vacuum...";
		next;
		mes "[Belle]";
		mes "By the way, the Court Mage has visited just before.";
		mes "The Court Magician will be back soon after visiting other families.";
		next;
		cloakoffnpc "Court Mage Nillem#ep16_wiz01", getcharid(0);
		npctalk "Yeah! Here comes Nillem the genius mage!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 1000;
		mes "[Belle]";
		mes "There... Is the magician.";
		mes "The Court Mage will give you the details.";
		erasequest 7691;// Waiting for the Ritual
		setquest 7692;// Attend the Ritual
		ep16_royal = 8;
		sleep2 3000;
		npctalk "You must be the famous " + strcharinfo(0) + "!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Oh, nice to meet you.", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "There are a lot of things that I would like to talk about with you...", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "But I guess we don't have enough time for that.", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Let's move to the Room of Consciousness now.", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Don't be surprised by the sudden disappearance!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Three!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 1000;
		npctalk "Two!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 1000;
		npctalk "One!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 500;
		warp "prt_lib",89,44;
		end;
	case 8:
	case 9:
	case 10:
	case 11:
	case 12:
	case 13:
		npctalk "You are back already?", "", bc_self;
		setpcblock PCBLOCK_NPC, true;
		sleep2 1000;
		cloakoffnpc "Court Mage Nillem#ep16_wiz01", getcharid(0);
		npctalk "Oh! Here you are!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 500;
		npctalk "Eh?", "", bc_self;
		sleep2 3000;
		npctalk "Oh, there must have been a mistake!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Well, let's go back! You shouldn't be here now!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Let's count it as my mistake this time-", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Let's move to the Room of Consciousness now.", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Are you ready?", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 3000;
		npctalk "Three!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 1000;
		npctalk "Two!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 1000;
		npctalk "One!", "Court Mage Nillem#ep16_wiz01", bc_self;
		sleep2 500;
		setpcblock PCBLOCK_NPC, false;
		warp "prt_lib",89,44;
		end;
	case 14:
		mes "[Belle]";
		mes "You are back.";
		mes "There has been a message for you.";
		mes "It says 'There will be an important meeting. Please wait until then.";
		next;
		mes "[Belle]";
		mes "You will be notified as soon as everything is settled.";
		mes "Please enjoy the banquet until then.'";
		next;
		mes "[Belle]";
		mes "This is about it.";
		mes "Apart from it, well, I am not supposed to be curious about this kind of things...";
		next;
		mes "[Belle]";
		mes "However, ^4d4dffI saw the court doctors and priests moving fast to the Heine family^000000.";
		next;
		mes "[Belle]";
		mes "They seemed to be in a hurry. Do you know what has happened?";
		next;
		select("This is a difficult question for me to answer...");
		mes "[Belle]";
		mes "I am sorry that I asked.";
		mes "Well, there is one more news.";
		next;
		mes "[Belle]";
		mes "The lady of the ^4d4dffNerius^000000 family has invited you to have a cup of tea with her.";
		next;
		mes "[Belle]";
		mes "She asked me to let her know as soon as you come. Shall I send her a message now?";
		erasequest 7696;// What's Next?
		ep16_royal = 15;
		next;
		if (select( "I'll visit her now.", "I'll visit her later." ) == 2) {
			mes "[Belle]";
			mes "Let me know when you are ready.";
			mes "I'll send her the message then.";
			close;
		}
		mes "[Belle]";
		mes "Let me send the message now.";
		mes "Good bye.";
		setquest 7697;// Invitation from the Nerius
		close;
	case 15:
		if (isbegin_quest(7697) == 0) {
			mes "[Belle]";
			mes "Would you accept the invitation from the Nerius family now?";
			next;
			if (select( "I'll visit her now.", "I'll visit her later." ) == 2) {
				mes "[Belle]";
				mes "Let me know when you are ready.";
				mes "I'll send her the message then.";
				close;
			}
			mes "[Belle]";
			mes "Let me send the message now.";
			mes "Good bye.";
			setquest 7697;// Invitation from the Nerius
			close;
		}
		mes "[Belle]";
		mes "The Nerius family stays in the second room from this room.";
		mes "The room next to the room of the Heine family.";
		next;
		mes "[Belle]";
		mes "I have sent the message that you would visit them soon. You may go there anytime.";
		close;
	case 16:
		mes "[Belle]";
		mes "There has been a request from the Heine family to meet you.";
		mes "They asked you to visit the Heine family as soon as you come back.";
		close;
	case 17:
		mes "[Belle]";
		mes "Oh, you are back!";
		mes "Let me call the Mage.";
		next;
		select("What is that about?");
		mes "[Belle]";
		mes "Court Mage Nillem opened the door and left right away.";
		mes "Saying, 'Where are you?' " + strcharinfo(0) + " The magician must be looking for you.";
		close2;
		cloakoffnpc "Court Mage Nillem#ep16_wiz01", getcharid(0);
		npctalk "There you are!", "Court Mage Nillem#ep16_wiz01", bc_self;
		setpcblock PCBLOCK_NPC, true;
		sleep2 500;
		setpcblock PCBLOCK_NPC, false;
		npctalk "What an impeccable timing...", bc_self;
		end;
	default:
		mes "[Chamberlain]";
		mes "I am at your service.";
		next;
		switch( select( "Call Nillem", "What is the next thing on the schedule?", "Please prepare some refreshments.", "Call Convenience Service" ) ) {
		case 1:
			mes "[Belle]";
			mes "Shall I call the Court Mage for you?";
			mes "Wait a second.";
			mes "I have just sent a message. The magician will arrive here soon.";
			close2;
			setpcblock PCBLOCK_NPC, true;
			sleep2 500;
			cloakoffnpc "Court Mage Nillem#ep16_wiz01", getcharid(0);
			sleep2 500;
			if (ep16_royal < 24) {
				npctalk "Thank you for using the million-call ticket today!", "Court Mage Nillem#ep16_wiz01", bc_self;
				sleep2 3000;
				npctalk "You must have missed me so much-", "Court Mage Nillem#ep16_wiz01", bc_self;
				sleep2 3000;
				npctalk "I am almost falling for your merciless calls...", "Court Mage Nillem#ep16_wiz01", bc_self;
				sleep2 3000;
				npctalk "Just kidding.", "Court Mage Nillem#ep16_wiz01", bc_self;
				sleep2 3000;
				npctalk "Shall we get going now?", "Court Mage Nillem#ep16_wiz01", bc_self;
			}
			else {
				switch( rand(5) ) {
				case 0:
					npctalk "I was wondering when you'd call me! I knew you would-", "Court Mage Nillem#ep16_wiz01", bc_self;
					break;
				case 1:
					npctalk "I am thrilled that you called me so mercilessly-", "Court Mage Nillem#ep16_wiz01", bc_self;
					break;
				case 2:
					npctalk "Haha, we are going again! To the past!", "Court Mage Nillem#ep16_wiz01", bc_self;
					break;
				case 3:
					npctalk "Thank you for using the million-call ticket today!", "Court Mage Nillem#ep16_wiz01", bc_self;
					break;
				case 4:
					npctalk "Here comes Genius Mage Nillem!", "Court Mage Nillem#ep16_wiz01", bc_self;
					break;
				}
			}
			setpcblock PCBLOCK_NPC, false;
			end;
		case 2:
			mes "[Belle]";
			mes "There is no special invitation for today.";
			close;
		case 3:
			mes "[Belle]";
			.@r = rand(1,5);
			if (.@r == 1)
				mes "Here are some chamomile tea and ginger cookies. They will help you take a rest and get recovered from fatigue.";
			else if (.@r == 2)
				mes "You seemed hungry, so I have prepared some afternoon tea, scones and clotted cream.";
			else if (.@r == 3)
				mes "Here are some chocolate and cinnamon-flavored rooibos tea for refreshment.";
			else if (.@r == 4)
				mes "Here is some strong mint tea mixed with milk and chocolate chips. A great after-meal treat.";
			else
				mes "Here is some cold milk with citron jelly and cream. It is a sweet and sour drink.";
			mes "Do you like it?";
			next;
			specialeffect2 EF_SANCTUARY;
			mes "^4d4dff All HP and SP are recovered!";
			percentheal 100,100;
			close;
		case 4:
			mes "[Belle]";
			mes "Which service should I call for you?";
			mes "All calls are available, but additional charge may apply to each service.";
			next;
			switch( select( "Kafra", "Giant Beast Manager", "No need." ) ) {
			case 1:
				mes "[Belle]";
				mes "You want the Kafra Service.";
				mes "Let me make a call right away.";
				close2;
				setpcblock PCBLOCK_NPC, true;
				sleep2 500;
				setpcblock PCBLOCK_NPC, false;
				cloakoffnpc "Kafra Employee#ep16_s01", getcharid(0);
				npctalk "Kafra Service.", "Kafra Employee#ep16_s01", bc_self;
				end;
			case 2:
				mes "[Belle]";
				mes "You need a Giant Beast Manager.";
				mes "Let me make a call right away.";
				close2;
				setpcblock PCBLOCK_NPC, true;
				sleep2 500;
				setpcblock PCBLOCK_NPC, false;
				cloakoffnpc "Giant Beast Manager#ep16_s02", getcharid(0);
				npctalk "I am at your service.", "Giant Beast Manager#ep16_s02", bc_self;
				end;
			case 3:
				mes "[Belle]";
				mes "I see.";
				close2;
				cloakonnpc "Kafra Employee#ep16_s01", getcharid(0);
				cloakonnpc "Giant Beast Manager#ep16_s02", getcharid(0);
				end;
			}
		}
	}
}

prt_cas_q,29,30,3	script	Giant Beast Manager#ep16_s02	8W_SOLDIER,{
	.@thirdmask = eaclass() & EAJ_THIRDMASK;
	if (.@thirdmask != EAJ_RUNE_KNIGHT && .@thirdmask != EAJ_ROYAL_GUARD) {
		mes "I am managing the Dragons and Griffons for the Rune Knights and Royal Guards.";
		close;
	}
	mes "[Giant Beast Manager]";
	if (.@thirdmask == EAJ_RUNE_KNIGHT)
		.@string$ = "Dragon";
	else
		.@string$ = "Griffon";
	mes "Thank you for calling me. Shall I bring a " + .@string$ + " for you?";
	next;
	if (select( "Use", "Cancel" ) == 2) {
		mes "[Giant Beast Manager]";
		mes "I see. Then, good bye.";
		close2;
		cloakonnpc "Giant Beast Manager#ep16_s02", getcharid(0);
		end;
	}
	if (getskilllv("KN_RIDING") < 1) {
		mes "[Giant Beast Manager]";
		mes "You need to learn how to ride a " + .@string$ + " first.";
		close;
	}
	if (checkriding() || checkdragon()) {
		mes "[Giant Beast Manager]";
		mes "You are already using a " + .@string$ + ".";
		close;
	}
	if (ismounting()) {
		mes "[Giant Beast Manager]";
		mes "You are already riding something else.";
		mes "You need to take off the ride to ride a " + .@string$ + ".";
		close;
	}
	if (.@thirdmask == EAJ_RUNE_KNIGHT)
		setdragon();
	else
		setriding();
	close;
}

prt_cas_q,28,30,3	script	Kafra Employee#ep16_s01	4_F_KAFRA2,{
	cutin "kafra_02.bmp",2;
	mes "[Kafra Employee]";
	mes "Hello. This is Kafra Service.";
	mes "What can I do for you?";
	next;
	switch( select( "Use Cargo Service", "Use Cart Service", "Quit" ) ) {
	case 1:
		if (!callfunc("F_CanOpenStorage")) {
			mes "[Kafra Employee]";
			mes "I am sorry, dear customer.";
			mes "You need to raise the novice skill level to 6 or higher to use the cargo service.";
			close3;
		}
		if (countitem(7059) == 0 && Zeny < 50) {
			mes "[Kafra Employee]";
			mes "You don't have enough money.";
			mes "The Cargo Service costs 50 Zeny.";
			close3;
	}
		if (countitem(7059) != 0)
			delitem 7059,1;	// Cargo_Free_Ticket
		else
			Zeny -= 50;
		mes "[Kafra Employee]";
		mes "Let me open the warehouse for you.";
		mes "Thank you for using Kafra Service.";
		close2;
		cutin "",255;
		openstorage;
		end;
	case 2:
		if (BaseClass != Job_Merchant) {
			mes "[Kafra Employee]";
			mes "I am sorry,";
			mes "The Cart Service is available for Merchant classes only.";
			close3;
		}
		if (checkcart() == true) {
			mes "[Kafra Employee]";
			mes "You are already equipped with a cart.";
			close3;
		}
		if (getskilllv("MC_PUSHCART") == 0) {
			mes "[Kafra Employee]";
			mes "You can use the cart after learning the 'Push Cart' skill.";
			close3;
		}
		if (countitem(7061) > 0) {
			delitem 7061,1;	// Cart_Free_Ticket
			setcart();
			close3;
		}
		mes "[Kafra Employee]";
		mes "The Cart Service costs 800 Zeny.";
		mes "Would you use it?";
		next;
		if (select( "Use", "Cancel" ) == 2)
			close3;
		if (Zeny < 800) {
			mes "[Kafra Employee]";
			mes "You don't have enough money, dear customer.";
			mes "The Cart Service costs 800 Zeny.";
			close3;
		}
		RESRVPTS += 8;
		Zeny -= 800;
		setcart();
		close3;
	case 3:
		mes "[Kafra Employee]";
		mes "Thank you for using Kafra Service as always.";
		close2;
		cutin "",255;
		cloakonnpc "Kafra Employee#ep16_s01", getcharid(0);
		end;
	}
	end;
}

prt_cas_q,28,28,3	script	Court Mage Nillem#ep16_wiz01	4_M_JOB_WIZARD,{
	if (ep16_royal == 17) {
		mes "[Nillem]";
		mes "Oh, it's you, darling! I've been waiting for you!";
		next;
		select("Darling...");
		mes "[Nillem]";
		mes "Oh, I am sorry that I was overly excited.";
		mes "Exploring through the fissure of dimensions to uncover the secret of the palace...!";
		next;
		mes "[Nillem]";
		mes "No mage would say no to that! No wonder I am excited!";
		next;
		select("By the way, why did you choose me?");
		mes "[Nillem]";
		mes "Well, because a royalty is picky and useless...";
		next;
		mes "[Nillem]";
		mes "See, the current head of the family and the heir are not supposed to do anything dangerous.";
		mes "So are the heirs to the throne.";
		next;
		mes "[Nillem]";
		mes "Did you see Peter in bed?";
		mes "......No harm should be done to him, you know.";
		next;
		mes "[Nillem]";
		mes "Not this, not that... After removing all those things, there aren't many left for the aristocrats other than paper work and socializing.";
		mes "What can they do?";
		next;
		mes "[Nillem]";
		mes "Moreover, it doesn't suit me to take care of them. Hahahahahaha!";
		next;
		select("And, why are you working as a Court Mage.");
		mes "[Nillem]";
		mes "For the stability and high income-";
		mes "The palace has paid the tuition during my study in Eclage as well! How generous!";
		next;
		mes "[Nillem]";
		mes "Ahem. Anyways, it has all been prepared.";
		mes "Since the distortion appeared in the Past Memories of the Royal Family, I installed the gate there.";
		next;
		mes "[Nillem]";
		mes "From now on, you can ^4d4dffcome to the Past Memories of the Royal Family right away^000000, or...";
		mes "Right. Let me give you the ^4d4dffmillion Nillem call ticket^000000.";
		mes "My treat!";
		next;
		select("The... Million Nillem call ticket?");
		mes "[Nillem]";
		mes "Yes. You can call me anytime via this Chamberlain here if you wan to see me!";
		next;
		mes "[Nillem]";
		mes "I'll be here immediately like a flash of lightning-";
		mes "Well, then, shall we get going?";
		ep16_royal = 18;
		next;
		if (select( "Let's go now!", "I need to make some preparations." ) == 2) {
			mes "[Nillem]";
			mes "Then, let me know when you are ready.";
			mes "If I don't show up, come to the ^4d4dffPast Memories of the Royal Family^000000 right away.";
			next;
			mes "[Nillem]";
			mes "You know how to get there.";
			close;
		}
		mes "[Nillem]";
		mes "Then, close your eyes...";
		mes "One!";
		close2;
		warp "prt_lib",89,44;
		end;
	}
	if (ep16_royal > 17) {
		mes "[Nillem]";
		mes "Haha, then, let's go to the Past Memories of the Royal Family!";
		next;
		if (select( "Move to the Past Memories of the Royal Family", "I don't need it!" ) == 2) {
			mes "[Nillem]";
			mes "I like how you refuse so flatly";
			mes "May I hang out here for a while since I am already here?";
			close;
		}
		mes "[Nillem]";
		mes "Then, close your eyes...";
		mes "One!";
		close2;
		warp "prt_lib",89,44;
		end;
	}
	end;
OnInit:
	cloakonnpc "Court Mage Nillem#ep16_wiz01";
	cloakonnpc "Kafra Employee#ep16_s01";
	cloakonnpc "Giant Beast Manager#ep16_s02";
	end;
}

prt_cas,177,164,0	script	#ep16_evt_7688	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (ep16_royal == 3) {
		mes "I hear voices from somewhere.";
		sleep2 2000;
		cloakoffnpc "Mysterious Guest#ep16_01", getcharid(0);
		cloakoffnpc "Chamberlain#ep16_01", getcharid(0);
		npctalk "The story you just have told must be true, right?", "Mysterious Guest#ep16_01", bc_self;
		sleep2 3000;
		npctalk "Sure. It will meet the condition you are looking for just right.", "Chamberlain#ep16_01", bc_self;
		sleep2 3000;
		npctalk "Hum...", "Mysterious Guest#ep16_01", bc_self;
		sleep2 3000;
		npctalk "He also is heir to the throne. You will get the information you want.", "Chamberlain#ep16_01", bc_self;
		sleep2 3000;
		npctalk "There must be no mistake in the arrangement. He must be called here without doubt.", "Mysterious Guest#ep16_01", bc_self;
		sleep2 3000;
		npctalk "It has all been prepared... However, let me tell you the details later.", "Chamberlain#ep16_01", bc_self;
		sleep2 3000;
		npctalk "It is the time for you to join the banquet.", "Chamberlain#ep16_01", bc_self;
		sleep2 3000;
		npctalk "Right. I'll see you later. Don't you dare disappoint me.", "Mysterious Guest#ep16_01", bc_self;
		sleep2 3000;
		cloakonnpc "Mysterious Guest#ep16_01", getcharid(0);
		sleep2 1000;
		npctalk "What a bossy pants...", "Chamberlain#ep16_01", bc_self;
		sleep2 1000;
		cloakonnpc "Chamberlain#ep16_01", getcharid(0);
		next;
		mes "I happen to eavesdrop on a fishy conversation.";
		ep16_royal = 4;
		erasequest 7687;// Participating in the Banquet
		setquest 7688;// Suspicious Movement
	}
	end;
OnInit:
	cloakonnpc "Mysterious Guest#ep16_01";
	cloakonnpc "Chamberlain#ep16_01";
	end;
}
prt_cas,179,155,6	script	Mysterious Guest#ep16_01	4_LGTSCIENCE,{ end; }
prt_cas,181,154,2	script	Chamberlain#ep16_01	1_M_01,{ end; }

// Hall
function	script	F_banquet_main_4_spica	{
	.@char_id = getcharid(0);
	.@char_name$ = strcharinfo(0);

	mes "[Spica]";
	mes "I get to see you again. " + .@char_name$ + ".";
	mes "Chamberlain must have been a great messenger.";
	mes "I saw you coming this way right away.";
	cutin "ep16_spica_nerius01",2;
	next;
	mes "[Spica]";
	mes "I was surprised when you were introduced as a special guest. You seem to be more extraordinary than I have thought.";
	mes "You were introduced as...";
	unittalk getcharid(3), "" + .@char_name$ + " : Let's not mention that since I am embarrassed by it so much...", bc_self;
	next;
	mes "[Spica]";
	mes "But it is true.";
	mes "This banquet is for the heroes like you.";
	mes "You should be proud.";
	next;
	cutin "ep16_skia_nerius01",0;
	mes "[Skia]";
	mes "That's right!";
	mes "No one will stop you from hanging out with us. Please visit us often.";
	next;
	mes "[Skia]";
	mes "Since there are only us around here, we can loosen up a little...";
	next;
	cutin "ep16_spica_nerius07",2;
	mes "[Spica]";
	mes "Hahaha.... I'll make sure the words don't get out.";
	mes "Did you hear, Crux?";
	mes "My sister wants to hang out quietly.";
	npctalk "What... Yes...?", "Crux Findel#ep16_02", bc_self;
	next;
	cutin "ep16_crux_findel03",2;
	mes "[Crux]";
	mes "I mean, my ladies?";
	mes "What do you mean by...?";
	npctalk "You better not tell my mother!", "Skia Nerius#ep16_02", bc_self;
	npctalk "You shouldn't.", "Spica Nerius#ep16_02", bc_self;
	next;
	mes "[Crux]";
	mes "You know that I am on your side, my lady, right?";
	next;
	cutin "ep16_spica_nerius06",2;
	mes "[Spica]";
	mes "Oh, don't make me laugh.";
	mes "I know you have come here to spy on us this time.";
	npctalk "Oh, my! Crux, are you going to tell on us?", "Skia Nerius#ep16_02", bc_self;
	next;
	cutin "ep16_crux_findel03",2;
	mes "[Crux]";
	mes "No! No, please!";
	mes "...Oh? Isn't that Lord Heine?";
	next;
	cutin "ep16_skia_nerius01",0;
	mes "[Skia]";
	mes "Oh, you are right? Nyhill! This way!";
	npctalk "Nyhill?", "Spica Nerius#ep16_02", bc_self;
	next;
	cloakoffnpc "Nyhill M. Heine#ep16_02", .@char_id;
	cutin "ep16_nihi_miseria_heine01",2;
	mes "[Nyhill]";
	mes "You don't have to scream like that, Skia.";
	mes "" + .@char_name$ + " is here too.";
	mes "Indeed, you won't be mistaken when you hang out with the people of the Nerius family.";
	mes "Good decision.";
	npctalk "Skia?", "Spica Nerius#ep16_02", bc_self;
	next;
	cutin "ep16_spica_nerius06",0;
	mes "[Spica]";
	mes "Skia and Lord of the Heine family.";
	mes "Since when did you call each other by the first name?";
	npctalk "Did you know?", "Spica Nerius#ep16_02", bc_self;
	sleep2 1000;
	npctalk "...No, no. I didn't.", "Crux Findel#ep16_02", bc_self;
	next;
	cutin "ep16_skia_nerius01",0;
	mes "[Skia]";
	mes "Hum, we exchanged greetings earlier in the corridor.";
	mes "The Heine residence is next to that of the Nerius family.";
	next;
	cutin "ep16_nihi_miseria_heine02",2;
	mes "[Nyhill]";
	mes "It was refreshing, and I am grateful to you.";
	mes "And...";
	next;
	cutin "ep16_nihi_miseria_heine01",2;
	mes "[Nyhill]";
	mes "" + .@char_name$ + ", I visited your room to give you my apology, but you had already left for the Banquet Hall.";
	unittalk getcharid(3), "" + .@char_name$ + " : Apology?", bc_self;
	next;
	cutin "ep16_nihi_miseria_heine04",2;
	mes "[Nyhill]";
	mes "Earlier...";
	mes "I was rude to you out of impulse.";
	mes "Please forgive me.";
	next;
	npctalk "You must have done something wrong, right?", "Spica Nerius#ep16_02", bc_self;
	sleep2 1000;
	cloakoffnpc "Violeta#ep16_02", .@char_id;
	npctalk "I am not surprised since it was Mijeria who had nothing!", "Violeta#ep16_02", bc_self;
	cutin "",255;
	mes "[Drunk Woman]";
	mes "Haha... Hahaha... Poor Lord Nyhill, what a pity.";
	mes "He has not been selected as the heir to the throne...";
	next;
	mes "[Drunk Woman]";
	mes "Oh, well! Who are these?";
	mes "Aren't they the Nerius sisters who are from that famous family led by a woman?";
	mes "Lord, are you even going to ditch your own household for the Nerius family?";
	npctalk "Violeta, watch your manners!", "Nyhill M. Heine#ep16_02", bc_self;
	next;
	mes "[Violeta]";
	mes "I am not telling a lie. Am I?";
	mes "You are not welcome in your own family anyway. Why don't you flirt with a lady here to change your life?";
	mes "Hahahahaha!";
	npctalk "It was harsh.", "Spica Nerius#ep16_02", bc_self;
	npctalk "Violeta! I told you to stop.", "Nyhill M. Heine#ep16_02", bc_self;
	next;
	mes "[Violeta]";
	mes "Oh, my! My lord, I didn't know you could get angry.";
	mes "That's right. You better get angry and show your emotions...";
	next;
	cutin "ep16_crux_findel01",2;
	mes "[Crux]";
	mes "...I don't know which family you are from, but you need to strop.";
	mes "If you keep insulting my lady, I won't let it pass.";
	next;
	cutin "ep16_spica_nerius06",2;
	mes "[Spica]";
	mes "Hold it, Crux.";
	mes "You shouldn't regard me on the same level as the coarse thing who doesn't even know what she is talking about.";
	mes "I don't tend to bear a grudge against the Heine family for this.";
	next;
	cutin "ep16_spica_nerius07",2;
	mes "[Spica]";
	mes "Isn't it right? Violeta Collette Heine?";
	mes "I understand your feelings for the lord, but your behavior will just bring disgrace to your family.";
	unittalk getcharid(3), "" + .@char_name$ + " : Heine...?", bc_self;
	next;
	npctalk "...Phew... She is a collateral relative of mine...", "Nyhill M. Heine#ep16_02", bc_self;
	mes "[Spica]";
	mes "You do what you please if you want to damage his reputation.";
	mes "However, you should keep us, the Nerius family, out of the mess.";
	cutin "ep16_spica_nerius02",2;
	next;
	cutin "ep16_nihi_miseria_heine03",2;
	mes "[Nyhill]";
	mes "That is true.";
	mes "Violeta. I will let it slide this time. You should get back now.";
	mes "Or, I'll have to punish you in the name of the family.";
	next;
	cutin "",255;
	mes "[Violeta]";
	mes "Well, I'll get back.";
	mes "Since things have turned out this way, you better go to join the Nerius family, then! He!";
	next;
	cloakonnpc "Violeta#ep16_02", .@char_id;
	cutin "ep16_skia_nerius01",0;
	mes "[Skia]";
	mes "How does the story go that way?";
	next;
	cutin "ep16_nihi_miseria_heine01",2;
	mes "[Nyhill]";
	mes "I am sorry, I apologize for her bad manners.";
	mes ".....";
	next;
	cutin "ep16_skia_nerius02",0;
	mes "[Skia]";
	mes "You keep saying sorry.";
	mes "But you didn't do anything wrong, Nyhill.";
	next;
	cutin "ep16_spica_nerius01",1;
	mes "[Spica]";
	mes "Well, Skia. You don't understand.";
	mes "Whether willing or not, as the head of the family, every fault of the family becomes his burden.";
	next;
	cutin "ep16_nihi_miseria_heine01",2;
	mes "[Nyhill]";
	mes "She is right. I bear the name of Heine, and I am in the position to take care of every matter which comes with the family.";
	mes "Whether willing or not...";
	next;
	cutin "",255;
	mes "[Nyhill]";
	mes "Skia, it is the same for you. You sometimes have to become a shadow yourself.";
	cloakoffnpc "Royal Chamberlain#ep16_02", .@char_id;
	npctalk "Light champagne. Would you like some?", "Royal Chamberlain#ep16_02", bc_self;
	next;
	npctalk "Thanks.", "Nyhill M. Heine#ep16_02", bc_self;
	npctalk "May I have a glass too?", "Skia Nerius#ep16_02", bc_self;
	sleep2 1000;
	mes "[Spica]";
	mes "However, I didn't know you have been treated like that by the members of your own family.";
	next;
	cloakonnpc "Royal Chamberlain#ep16_02", .@char_id;
	npctalk ".....", "Nyhill M. Heine#ep16_02", bc_self;
	cutin "ep16_nihi_miseria_heine04",2;
	mes "[Nyhill]";
	mes "I must have interrupted the joy of the banquet. I should get going.";
	mes "I hope we get to share more stories sometime.";
	next;
	cutin "ep16_spica_nerius05",1;
	mes "[Spica]";
	mes "Not at all. Let us give you the official invitation next time.";
	mes "Please don't turn down then.";
	next;
	cutin "ep16_nihi_miseria_heine02",2;
	mes "[Nyhill]";
	mes "How can I turn down the invitation from the next head of the Nerius family?";
	mes "Now... then.";
	npctalk "It was fun!", "Skia Nerius#ep16_02", bc_self;
	npctalk "...Which part of it was fun...?", "Crux Findel#ep16_02", bc_self;
	next;
	cloakonnpc "Nyhill M. Heine#ep16_02", .@char_id;
	cutin "ep16_spica_nerius01",2;
	mes "[Spica]";
	mes "...Hum...";
	mes "Umm...";
	mes "Skia, can I take a look at the drink you got?";
	next;
	npctalk "Why?", "Skia Nerius#ep16_02", bc_self;
	cutin "ep16_spica_nerius02",2;
	mes "[Spica]";
	mes "And, Crux.";
	mes "Go dig out the Chamberlain who has given us the drink.";
	sleep2 1000;
	npctalk "Yes, my lady.", "Crux Findel#ep16_02", bc_self;
	next;
	mes "[Spica]";
	mes "No one can fool my eyes like this.";
	mes "" + .@char_name$ + ", you take a look too.";
	mes "Doesn't something seem strange to you?";
	next;
	select("Well, you do seem to talk a little casually now...");
	cutin "ep16_spica_nerius06",2;
	mes "[Spica]";
	mes "I am not used to talk in the formal form.";
	mes "I tried to be courteous to you since you are a special guest. But I'd rather bite my own tongue than keep talking that way.";
	npctalk "Crux, did you see that?", "Spica Nerius#ep16_02", bc_self;
	next;
	cutin "ep16_skia_nerius01",0;
	mes "[Skia]";
	mes "Oh, shaking. He is shaking!";
	mes "Crux, did you see? Nyhill's steps shook.";
	npctalk "I see why you have given me such an order.", "Crux Findel#ep16_02", bc_self;
	next;
	cutin "ep16_spica_nerius06",2;
	mes "[Spica]";
	mes "The champagne is supposed to be as light as fruit juice.";
	mes "He must have not been drunk on that.";
	mes "I think there must be something wrong.";
	next;
	cutin "ep16_spica_nerius05",2;
	mes "[Spica]";
	mes "" + .@char_name$ + ".";
	mes "Don't you think something funny is about to happen now?";
	mes "Oh, how suspicious.";
	mes "Since it seems suspicious, let's get back now.";
	next;
	cutin "ep16_skia_nerius02",0;
	mes "[Skia]";
	mes "Eh? Are you going off like that?";
	mes "What if he is sick? What if he passes out on the way?";
	next;
	cutin "ep16_spica_nerius06",2;
	mes "[Spica]";
	mes "If you are curious, you may follow him.";
	mes "I am well taken care of by Crux.";
	npctalk "Crux, let's get back to the room.", "Spica Nerius#ep16_02", bc_self;
	sleep2 1000;
	npctalk "Yes, my lady.", "Crux Findel#ep16_02", bc_self;
	next;
	cloakonnpc "Spica Nerius#ep16_02", .@char_id;
	cloakonnpc "Crux Findel#ep16_02", .@char_id;
	npctalk "How cold-hearted...", "Skia Nerius#ep16_02", bc_self;
	mes "[Skia]";
	mes "Well, hero?";
	mes "Would you follow him first?";
	mes "If I follow him like this, everyone will find me strange.";
	cutin "ep16_skia_nerius01",0;
	next;
	mes "[Skia]";
	mes "I'll be after you quietly.";
	mes "Spica never jokes about something like that.";
	mes "There must be something.";
	next;
	select("I guess I have no choice.");
	mes "[Skia]";
	mes "Nyhill must have left the Banquet Hall.";
	mes "He must have headed to the Royal Villa. Let's go that way.";
	erasequest 7688;// Suspicious Movement
	setquest 7689;// Find Nyhill
	ep16_royal = 5;
	close3;
}

prt_cas,107,237,2	script	Nyhill M. Heine#ep16_02	4_EP16_NIHIL,{ end; }
prt_cas,103,235,7	script	Violeta#ep16_02	4_F_RUSWOMAN1,{ end; }
prt_cas,108,235,2	script	Royal Chamberlain#ep16_02	1_F_PUBGIRL,{ end; }

prt_cas,104,240,5	script	Skia Nerius#ep16_02	4_EP16_SKIA,{
	if (ep16_royal < 4) {
		if (isbegin_quest(7684) == 0) {
			npctalk "......", "Skia Nerius#ep16_02", bc_self;
			end;
		}
		cutin "ep16_skia_nerius01",0;
		mes "[Skia]";
		mes "Iwine.";
		mes "How are you enjoying the banquet?";
		mes "I am a little nervous since it's my first time to attend a banquet like this...";
		next;
		mes "[Skia]";
		mes "Not that I have never been to a banquet...";
		mes "How can I explain?";
		next;
		cutin "ep16_spica_nerius01",2;
		mes "[Spica]";
		mes "You don't have to explain.";
		mes "It is just a family matter.";
		next;
		cutin "ep16_skia_nerius01",0;
		mes "[Skia]";
		mes "Right.";
		mes "Please excuse my babbling.";
		mes "I am sorry.";
		close3;
	}
	if (ep16_royal == 4)
		F_banquet_main_4_spica();
	if (ep16_royal == 5) {
		cutin "ep16_skia_nerius01",0;
		mes "[Skia]";
		mes "Nyhill must have left the Banquet Hall.";
		mes "He must have headed to the Royal Villa. Let's go that way.";
		close3;
	}
	if (ep16_royal >= 6) {
		cutin "ep16_skia_nerius02",0;
		mes "[Skia]";
		mes "Bad things seem to keep happening.";
		close3;
	}
}

prt_cas,106,240,3	script	Spica Nerius#ep16_02	4_EP16_SPICA,{
	if (ep16_royal < 4) {
		if (isbegin_quest(7684) == 0) {
			npctalk "...Pardon me.", "Spica Nerius#ep16_02", bc_self;
			end;
		}
		mes "[Spica]";
		mes "You are here to enjoy the banquet, right?";
		mes "Have you visit all other families?";
		cutin "ep16_spica_nerius01",2;
		next;
		mes "[Spica]";
		mes "It is almost impossible to meet them usually. What a great chance you have to be able to visit them officially.";
		mes "They are even waiting for you...";
		next;
		mes "[Spica]";
		mes "What a successful debut to the society!";
		mes "Do not miss the chance when you have it.";
		next;
		mes "[Spica]";
		mes "You never know what would happen!";
		close3;
	}
	if (ep16_royal == 4)
		F_banquet_main_4_spica();
	if (ep16_royal == 5) {
		mes "[Spica]";
		mes "Hum? You are still here. I thought you went after the lord from the Heine family.";
		cutin "ep16_spica_nerius05",2;
		next;
		select("Didn't you go back to your room?");
		mes "[Spica]";
		mes "I was just giving my sister a push in the back.";
		mes "I was curious how Skia would react.";
		mes "...Aren't you following him?";
		next;
		cutin "ep16_spica_nerius02",2;
		mes "[Spica]";
		mes "I have a hunch that something big is about to happen.";
		mes "You better go after the lord to make sure he is OK.";
		mes "I have advised you as so, remember.";
		close3;
	}
	if (ep16_royal >= 6) {
		cutin "ep16_spica_nerius02",2;
		mes "[Spica]";
		mes "I don't like how things have been going these days.";
		mes "...I guess I am about to stop holding it down.";
		close3;
	}
}

prt_cas,108,240,3	script	Crux Findel#ep16_02	4_EP16_CRUX,{
	if (ep16_royal < 4) {
		if (isbegin_quest(7684) == 0) {
			npctalk "......", "Crux Findel#ep16_02", bc_self;
			end;
		}
		cutin "ep16_crux_findel01.bmp",2;
		mes "[Crux]";
		mes "Don't mind me.";
		mes "I am just a bodyguard.";
		close3;
	}
	if (ep16_royal == 4) {
		cutin "ep16_crux_findel01",2;
		mes "[Crux]";
		mes "I get to see you again.";
		mes "The lady has been waiting for you.";
		close3;
	}
	if (ep16_royal == 5) {
		cutin "ep16_crux_findel01",2;
		mes "[Crux]";
		mes "I am thinking about the order given by the lady.";
		mes "I need to be apart from her to look into it...";
		next;
		mes "[Crux]";
		mes "Frankly, it makes me feel uneasy leaving her alone.";
		next;
		cutin "ep16_spica_nerius03",0;
		mes "[Spica]";
		mes "I am not a child, you know.";
		mes "Or do I remind you of your daughter running along the river bank?";
		next;
		cutin "ep16_crux_findel02",2;
		mes "[Crux]";
		mes "Daughter?";
		mes "Hahaha. That is funny.";
		mes "But you don't look your age to be honest.";
		next;
		mes "[Crux]";
		mes "You can be attacked by the kids again.";
		next;
		cutin "ep16_spica_nerius04",0;
		mes "[Spica]";
		mes "He! Who can top you?";
		mes "You shouldn't worry about me.";
		close3;
	}
	if (ep16_royal >= 6) {
		cutin "ep16_crux_findel01",2;
		mes "[Crux]";
		mes "I guess we won't be able to return to the head house anytime soon.";
		mes "Well, this actually could be a good thing.";
		npctalk "...Oh, good. It is a good thing.", bc_self;
		close3;
	}
	end;
OnInit:
	cloakonnpc "Nyhill M. Heine#ep16_02";
	cloakonnpc "Violeta#ep16_02";
	cloakonnpc "Royal Chamberlain#ep16_02";
	end;
}

prt_cas,183,164,0	script	#ep16_evt_7689	HIDDEN_WARP_NPC,2,3,{
	end;
OnTouch:
	if (ep16_royal == 5) {
		.@name$ = strcharinfo(0);
		.@char_id = getcharid(0);
		unittalk getcharid(3), "" + .@name$ + " : ...Hum? Who's coming?", bc_self;
		setpcblock PCBLOCK_NPC, true;
		sleep2 2000;
		cloakoffnpc "#ep16_7689_01", .@char_id;
		cloakoffnpc "#ep16_7689_02", .@char_id;
		npctalk "How did it go?", "#ep16_7689_02", bc_self;
		sleep2 2000;
		npctalk "Hum... Not as much as I have wanted, but I seem to have a clue now.", "#ep16_7689_01", bc_self;
		sleep2 3000;
		npctalk "Not bad.", "#ep16_7689_01", bc_self;
		sleep2 3000;
		npctalk "It has been only a while...", "#ep16_7689_02", bc_self;
		sleep2 3000;
		npctalk "The drug worked wonders. Hahah... That lord had no tolerance to it as I was told.", "#ep16_7689_01", bc_self;
		sleep2 1000;
		unittalk getcharid(3), "" + .@name$ + " : (Lord?)", bc_self;
		sleep2 3000;
		npctalk "What should we do now?", "#ep16_7689_02", bc_self;
		sleep2 3000;
		npctalk "Just leave him there. They will think that he is just drunk a little.", "#ep16_7689_01", bc_self;
		sleep2 3000;
		npctalk "Then, let's get prepared for the big event.", "#ep16_7689_01", bc_self;
		sleep2 1000;
		cloakonnpc "#ep16_7689_01", .@char_id;
		cloakonnpc "#ep16_7689_02", .@char_id;
		cloakoffnpc "Skia Nerius#ep16_7689", .@char_id;
		npctalk "Did you find Nyhill?", "Skia Nerius#ep16_7689", bc_self;
		sleep2 1000;
		unittalk getcharid(3), "" + .@name$ + " : What the!", bc_self;
		sleep2 2000;
		npctalk "Why are you so surprised? What are you looking at?", "Skia Nerius#ep16_7689", bc_self;
		sleep2 3000;
		npctalk "By the way, it is about to start. Where has Nyhill gone?", "Skia Nerius#ep16_7689", bc_self;
		sleep2 3000;
		npctalk "Would Nyhill be in that room? He told me that he didn't like to stay in the Royal Villa because of grandpa archduke.", "Skia Nerius#ep16_7689", bc_self;
		sleep2 3000;
		npctalk "Let's get into that room!", "Skia Nerius#ep16_7689", bc_self;
		if (ep16_royal == 5) {
			setquest 7690;// Where Is Nyhill?
			erasequest 7689;// Find Nyhill
			ep16_royal = 6;
		}
		sleep2 3000;
		setpcblock PCBLOCK_NPC, false;
		cloakonnpc "Skia Nerius#ep16_7689", .@char_id;
	}
	end;
OnInit:
	cloakonnpc "Skia Nerius#ep16_7689";
	cloakonnpc "#ep16_7689_02";
	cloakonnpc "#ep16_7689_01";
	end;
}
prt_cas,186,163,3	script	Skia Nerius#ep16_7689	4_EP16_SKIA,{ end; }
prt_cas,181,157,3	script	#ep16_7689_02	1_M_01,{ end; }
prt_cas,179,158,4	script	#ep16_7689_01	4_LGTSCIENCE,{ end; }

prt_cas,25,35,5	script	Skia Nerius#ep16_7690	4_EP16_SKIA,{
	if (ep16_royal == 6) {
		cutin "ep16_nihi_miseria_heine01",2;
		mes "[Nyhill]";
		mes "...Who's there?";
		mes "" + strcharinfo(0) + "...?";
		mes "What are you doing here?";
		next;
		npctalk "...Ha...", "Unstable Nyhill#ep16_7690", bc_self;
		cutin "ep16_nihi_miseria_heine04",2;
		mes "[Nyhill]";
		mes "...Am I drunk?";
		mes "My head hurts.";
		mes "...I feel dizzy...";
		next;
		cutin "ep16_skia_nerius01",0;
		mes "[Skia]";
		mes "Why are you here?";
		next;
		cutin "ep16_nihi_miseria_heine01",2;
		mes "[Nyhill]";
		mes "...Oh... I felt tipsy and asked a chamberlain to guide me to somewhere I can take a rest.";
		mes "......Umm...";
		next;
		cutin "ep16_nihi_miseria_heine04",2;
		mes "[Nyhill]";
		mes "He told me it was light champagne...";
		mes ".....";
		next;
		select("Has anything happened to you?");
		cutin "ep16_nihi_miseria_heine01",2;
		mes "[Nyhill]";
		mes "I don't remember.";
		mes "I believe there was a guest here...";
		mes "By the way, what brought you here?";
		next;
		cutin "ep16_skia_nerius01",0;
		mes "[Skia]";
		mes "Well, it is almost the time, so...";
		unittalk getcharid(3), "" + strcharinfo(0) + " : Time?", bc_self;
		next;
		cutin "ep16_nihi_miseria_heine01",2;
		mes "[Nyhill]";
		mes "I see. I guess all the preparation must have been made by now.";
		mes "I will be damned if I waste more time here.";
		next;
		mes "[Nyhill]";
		mes "I should get back now.";
		mes "Phew... Fortunately, my head is clearing up.";
		next;
		mes "[Nyhill]";
		mes "Well, then. Please excuse me.";
		next;
		cloakonnpc "Unstable Nyhill#ep16_7690", getcharid(0);
		cutin "ep16_skia_nerius03",0;
		mes "[Skia]";
		mes "Whoa! He is fast.";
		mes "Well, hero. Shall we get back too?";
		mes "I'll see you again soon though.";
		next;
		cutin "ep16_skia_nerius01",0;
		mes "[Skia]";
		mes "The Court Mage must have arrived by now.";
		mes "You should go back to your room.";
		erasequest 7690;// Where Is Nyhill?
		setquest 7691;// Waiting for the Ritual
		ep16_royal = 7;
		close3;
	}
	else {
		if (strnpcinfo(0) == "Skia Nerius#ep16_7690")
			npctalk "We should go back too.", "Skia Nerius#ep16_7690", bc_self;
		end;
	}
}
prt_cas,27,34,3	duplicate(Skia Nerius#ep16_7690)	Unstable Nyhill#ep16_7690	4_EP16_NIHIL

prt_cas,27,43,0	script	#ep16_evt_7690	HIDDEN_WARP_NPC,1,1,{
	end;
OnTouch:
	if (ep16_royal == 6) {
		cloakoffnpc "Unstable Nyhill#ep16_7690", getcharid(0);
		cloakoffnpc "Skia Nerius#ep16_7690", getcharid(0);
		setpcblock PCBLOCK_NPC, true;
		sleep2 1000;
		setpcblock PCBLOCK_NPC, false;
		npctalk "Are you OK?", "Skia Nerius#ep16_7690", bc_self;
	}
	end;
OnInit:
	cloakonnpc "Skia Nerius#ep16_7690";
	cloakonnpc "Unstable Nyhill#ep16_7690";
	end;
}

// prt_lib
prt_lib,76,80,3	script	Lindt the Librarian#ep16_lindt	1_M_01,{
	if (ep16_royal == 11) {
		mes "[Librarian]";
		mes "Do you want to take a look at the material?";
		mes "It is still here since I haven't taken it away.";
		next;
		mes "The document is the royal record about the Room of Consciousness.";
		npctalk "It would be no use though...", "", bc_self;
		next;
		mes "There are several blank pages in-between.";
		unittalk getcharid(3), "" + strcharinfo(0) + " : Why are these blank pages here?", bc_self;
		next;
		mes "[Librarian]";
		mes "Read the text written above.";
		mes "Yes, it's here.";
		next;
		mes "[Librarian]";
		mes "^4d4dffOnly the ones who know the truth can read this.^000000";
		mes "See?";
		next;
		mes "[Librarian]";
		mes "Considering the time which has passed, there must be no one who knows this truth left now.";
		mes "In other words, this part will remain a mystery forever.";
		next;
		mes "[Librarian]";
		mes "That's why Archduke Stoltze gave up and left.";
		mes "Since you have seen this, let me put this back in place.";
		ep16_royal = 12;
		close;
	}
	if (ep16_royal == 22) {
		mes "[Librarian]";
		mes "Oh, you are here.";
		mes "Archduke Grantz has been waiting for you for a while.";
		close;
	}
	mes "[Librarian]";
	mes "My family has been managing the Past Memories of the Royal Family for generations.";
	mes "No wonder since it is the exclusive scriptorium for the royal family.";
	next;
	mes "[Librarian]";
	mes "It has not been long since I took over this position so I am not really that used to this.";
	mes "I never expected to be visited by these many archdukes...";
	close;
}

prt_lib,91,85,3	script	Mage Nillem#ep16_warp	4_M_JOB_WIZARD,{
	if (ep16_royal < 8)
		end;
	switch( ep16_royal ) {
	case 8:
		if (getcharid(1) == 0 || is_party_leader() == false) {// solo instance
			mes "^4d4dffIt is an event which proceeds as a memorial.";
			mes "Only the party leader can proceed with a memorial event. Try again after forming a party.^000000";
			close;
		}
		mes "[Nillem]";
		mes "Phew, did you see? We are the last ones entering.";
		mes "Others must have entered already.";
		next;
		if (select( "Enter now.", "Do not enter." ) == 2) {
			mes "[Nillem]";
			mes "Haha, it is not good either when it is too late...";
			close;
		}
		if (instance_create("Ritual of Blessing") < 0) {
			mes "[Nillem]";
			mes "Hum? I don't know what is going on. We don't seem to be able to enter now.";
			mes "It is a secret area which is made to open upon showing magical power.";
			next;
			mes "[Nillem]";
			mes "Let's wait until it stabilizes.";
			close;
		}
		mes "[Nillem]";
		mes "Whoa! The gate to the next area has been activated!";
		mes "Well, let's get in there!";
		cloakoffnpc "Room of Consciousness#evt_gate01", getcharid(0);
		close;
	case 9:
		mes "[Nillem]";
		mes "Has anything happened in there?";
		mes "What on earth...";
		next;
		mes "[Nillem]";
		mes "It is nothing that I should know and nowhere I should be part of. But still, I am curious about it.";
		next;
		mes "[Nillem]";
		mes "The movement of magical flow seems peculiar.";
		mes "...I wonder if it is my imagination that the gate looks unstable.";
		close;
	case 10:
		mes "[Nillem]";
		mes "Oh, this is troublesome.";
		mes "There seems to be a problem with the gate now.";
		next;
		mes "[Nillem]";
		mes "Use of magic is restricted in this area. All I can do is to activate the gate here...";
		next;
		select("Where you are going with this...");
		mes "[Nillem]";
		mes "Oh, I mean...";
		mes "You should get out here on foot.";
		mes "Well, since things have turned out this way.";
		next;
		mes "[Nillem]";
		mes "^4d4dffHere is the material what the archduke has seen earlier.^000000";
		mes "" + strcharinfo(0) + ", why don't you take a look too?";
		next;
		mes "[Nillem]";
		mes "Well, not that I am curious about it.";
		npctalk "(I really am...!)", "", bc_self;
		next;
		mes "[Nillem]";
		mes "Just out of curiosity.... No, I mean ardor for study. Haha...";
		mes "...Yes? Let's take a look... Make sure to share what is in there with me-";
		next;
		mes "[Nillem]";
		mes "Aren't you curious?";
		mes "Since you are out here with the archduke, the librarian would show it to you with no doubt, you know.";
		next;
		mes "[Nillem]";
		mes "I'll try to find a way to reactivate the gate.";
		ep16_royal = 11;
		setquest 7694;// I'd Like to See that Too
		close;
	case 11:
		mes "[Nillem]";
		mes "Aren't you curious?";
		mes "Since you are out here with the archduke, the librarian would show it to you with no doubt, you know.";
		next;
		mes "[Nillem]";
		mes "I'll try to find a way to reactivate the gate.";
		close;
	case 12:
		mes "[Nillem]";
		mes "...Oh well. ^4d4dffOnly open to the ones who know the truth^000000...";
		mes "Argh, what a waste.";
		next;
		mes "[Nillem]";
		mes "Well, it is no use to stick around here.";
		mes "I could cut the air with a knife earlier. Let's get out now.";
		next;
		mes "[Nillem]";
		mes "I took a look at the gate.";
		mes "Has there been a big explosion of magic inside before?";
		next;
		mes "[Nillem]";
		mes "I sense some sort of magical distortion, which is similar to...";
		mes "The ^4d4dffCrack of Dimension^000000!";
		next;
		mes "[Nillem]";
		mes "Can we make a gate of dimension here?";
		mes "That would be fun too.";
		unittalk getcharid(3), "" + strcharinfo(0) + " : So how can we get out?", bc_self;
		next;
		mes "[Nillem]";
		mes "Right.";
		mes "Since the gate has become useless...";
		mes "Let's walk out of here.";
		next;
		mes "[Nillem]";
		mes "Do you see the crusader there?";
		mes "He manages the entrance.";
		mes "He will guide you.";
		erasequest 7694;// I'd Like to See that Too
		setquest 7695;// Escape from the Past Memories of the Royal Family
		ep16_royal = 13;
		close;
	case 13:
	case 14:
	case 15:
	case 16:
	case 17:
		mes "[Nillem]";
		mes "Although there are direct gates installed in the palace for convenience,";
		mes "There are passages you can walk directly in.";
		next;
		mes "[Nillem]";
		mes "This is one of the rare chances to use the secret passage.";
		mes "Hahahaha...";
		close;
	case 18:
		mes "[Nillem]";
		mes "Haha, shall I get ready?";
		mes "Come here! ^4d4dffDimension Warper MkII^000000!!";
		next;
		mes "[Nillem]";
		mes "Well, let's go, dear customer.";
		mes "I wonder what we are going to see this time!";
		setquest 7700;// Once More!
		erasequest 7699;// To the Past
		cloakoffnpc "Dimension Warper MkII#ep16_lib", getcharid(0);
		close;
	case 19:
	case 20:
	case 21:
		mes "[Nillem]";
		mes "We haven't solved all the secrets yet!";
		mes "Well, we have to go back!";
		next;
		cloakoffnpc "Dimension Warper MkII#ep16_lib", getcharid(0);
		mes "[Nillem]";
		mes "Let's finish it off this time!";
		close;
	case 22:
		mes "[Nillem]";
		mes "What are you doing?";
		mes "Go grill the librarian to dig out the truth!";
		next;
		cloakoffnpc "Kronecker G. Heine#ep16_01_lib01", getcharid(0);
		mes "[Nillem]";
		mes "What did we go through all the trouble for?";
		mes "Look, there is Archduke Grantz.";
		close;
	case 23:
		mes "[Nillem]";
		mes "^4d4dffThe Heine family will get the approval to enter the 'Past Memories of the Royal Family'^000000, right?";
		mes "We will see each other more often from now on then.";
		mes "Haha, this must be what others call the destiny-ยก?";
		next;
		mes "[Nillem]";
		mes "What are you doing?";
		mes "Let's go see ^4d4dffDuke Friedrich to check if the approval has been issued!^000000";
		close;
	default:
		mes "[Nillem]";
		mes "Today, we are going on a secret journey together again!";
		mes "Hahaha. You'd better get excited!";
		mes "I'll let you travel in the first class!";
		next;
		mes "[Nillem]";
		mes "Well, let's go, dear customer.";
		mes "What would be waiting for us today?";
		mes "I guess this would end up a failure again, though.";
		mes "Hahaha-";
		cloakoffnpc "Dimension Warper MkII#ep16_lib", getcharid(0);
		close;
	}
}

prt_lib,88,90,1	script	Room of Consciousness#evt_gate01	PORTAL,{
	if (getcharid(1) == 0 || is_party_leader() == false) {
		mes "^4d4dffOnly the party leader can enter MD [Ritual of Blessing].^000000";
		close;
	}
	if (ep16_royal == 8) {
		mes "You can move to where the ritual of blessing is held.";
		next;
		if (select( "Enter.", "Do not enter." ) == 2) {
			mes "[Nillem]";
			mes "Hum... This gate is only activated temporarily so that it doesn't last long.";
			close;
		}
		if (getcharid(1) == 0 || is_party_leader() == false) {
			mes "^4d4dffOnly the party leader can enter MD [Ritual of Blessing].^000000";
			close;
		}
		switch( instance_enter("Ritual of Blessing") ) {
		case IE_OTHER:
			mes "[Nillem]";
			mes "Oh, well, the movement of magic seems uneasy.";
			mes "Hum, shall we try again later?";
			close;
		case IE_NOINSTANCE:
			mes "[Nillem]";
			mes "The gate to the place where the ritual is held is not activated officially.";
			mes "Wait a minute.";
			close;
		case IE_NOMEMBER:
			mes "^4d4dffThis is an event proceeding through memorial.";
			mes "Only the party leader can enter.^000000";
			close;
		case IE_OK:
			mapannounce "prt_lib", "Party member " + strcharinfo(0) + " of party's " + getpartyname( getcharid(1) ) + " enters Ritual of Blessing.", bc_map,0xFF99,FW_NORMAL,12;
			//warp "2@mir",101,12;
			end;
		}
		end;
	}
	npctalk "It cannot be used now!", "Mage Nillem#ep16_warp", bc_self;
	end;
OnInit:
	cloakonnpc "Room of Consciousness#evt_gate01";
	end;
}

prt_lib,56,61,4	script	Guardian Knight#ep16_roomguard	4_M_CRU,{
	if (ep16_royal < 13)
		npctalk "On duty. No problem.", "", bc_self;
	else {
		mes "[Guardian Knight]";
		mes "Would you go out through the passage?";
		mes "There is another overwatcher where I am about to send you.";
		next;
		mes "[Guardian Knight]";
		mes "Don't be surprised and you may go out with his help.";
		next;
		if (select( "Go out now.", "Go out later." ) == 2) {
			mes "[Guardian Knight]";
			mes "I will send you anytime when you need it.";
			mes "Just don't waste too much time here.";
			close;
		}
		mes "[Guardian Knight]";
		mes "Let's me guide you right away,";
		close2;
		warp "prt_pri00",60,127;
	}
	end;
}

prt_lib,88,80,0	script	#ep16_lib_evt01	HIDDEN_WARP_NPC,1,1,{
	end;
OnTouch:
	if (ep16_royal == 9) {
		cloakoffnpc "Ian Walther#ep16_lib01", getcharid(0);
		cloakoffnpc "Levuiere Wigner#ep16_lib01", getcharid(0);
		cloakoffnpc "Maximilian Roegenburg#ep16_lib01", getcharid(0);
		cloakoffnpc "Kronecker G. Heine#ep16_01_lib01", getcharid(0);
		cloakoffnpc "Nyhill M. Heine#ep16_lib01", getcharid(0);
		setpcblock PCBLOCK_NPC, true;
		sleep2 2000;
		npctalk "You are here at last.", "Ian Walther#ep16_lib01", bc_self;
		sleep2 3000;
		setpcblock PCBLOCK_NPC, false;
		npctalk "I have something to tell you, special guest.", "Ian Walther#ep16_lib01", bc_self;
	}
	if (ep16_royal == 22)
		cloakoffnpc "Kronecker G. Heine#ep16_01_lib01", getcharid(0);
	end;
OnInit:
	cloakonnpc "Ian Walther#ep16_lib01";
	cloakonnpc "Levuiere Wigner#ep16_lib01";
	cloakonnpc "Maximilian Roegenburg#ep16_lib01";
	cloakonnpc "Kronecker G. Heine#ep16_01_lib01";
	cloakonnpc "Nyhill M. Heine#ep16_lib01";
	end;
}

prt_lib,80,79,3	script	Kronecker G. Heine#ep16_01_lib01	4_EP16_GRANZ,{
	if (ep16_royal == 22) {
		cutin "ep16_kronecker_granz_heine",2;
		mes "[Kronecker]";
		mes "Did you find out anything?";
		next;
		select("Tell him what you have seen.");
		mes "[Kronecker]";
		mes "...........Did such thing happen?";
		mes "There has been a record of the disaster in Prontera.";
		next;
		mes "[Kronecker]";
		mes "I didn't know that the Imir Heart in the Room of Consciousness was stolen by the Valkyrie!";
		mes "Why wasn't such a thing recorded?";
		next;
		mes "[Kronecker]";
		mes "Can you read the document now then?";
		mes "If what you have seen is true, the seal would be broken.";
		next;
		cutin "",255;
		mes "When you touch the blank page of the book Kronecker has given you,";
		mes "The text shows up with a glow.";
		next;
		mes "^4d4dff......";
		mes "Due to the battle of the Valkyrie, the Imir Heart sealed in the Room of Consciousness disappeared.";
		next;
		mes "I was terrified that the symbol of legitimacy held by the royal family had been gone.";
		mes "I am afraid that we wouldn't be able to see the light of Terra Gloria in the coronation.";
		next;
		mes "The problem would occur from the next coronation.";
		mes "The people of the kingdom will be disheartened and worried about their future if the blessing of the earth is not given to the crowning of the king.";
		next;
		mes "I consulted Varmunt the Great Sage about this.";
		mes "He told me he could help and installed something in the Room of Consciousness.";
		next;
		mes "I was surprised to see what was installed there reacting with Terra Gloria.";
		mes "It delivered enough magical power to Terra Gloria's Star of Blessing,";
		next;
		mes "And Terra Gloria could give the blessing of the earth as usual.";
		next;
		mes "Everything was all right.";
		mes "Even if it was by the fake Imir Heart.";
		next;
		mes "Terra Gloria, our beautiful crown.";
		mes "In the blessed crown, there remained a piece of Imir Heart which has been guarding Prontera for generations.";
		next;
		mes "It is enough.";
		mes "It would be enough for our descendants.";
		next;
		mes "Therefore, I wish no one else ever read this record,";
		mes "And seal it with a condition which cannot be met.";
		next;
		mes "If one of our descendants happen to read this record,";
		mes "Make sure to guard Terra Gloria.";
		mes "It is the last piece of Imir Heart left to us.^000000";
		next;
		mes "......";
		next;
		select("That's it...");
		mes "[Nillem]";
		mes "Am I going to be killed now?";
		mes "I think I have just found out all the secrets of the royal family.";
		mes "Aren't you going to execute me?";
		next;
		mes "[Kronecker]";
		mes "..............Hum...";
		mes "If you want, I will fulfill your wish.";
		mes "But not now.";
		next;
		npctalk "Wow...", "Mage Nillem#ep16_warp", bc_self;
		mes "[Librarian]";
		mes "Then... How about me?";
		next;
		mes "[Kronecker]";
		mes "If you say another word, I'll hang you with my own hands.";
		next;
		cutin "ep16_kronecker_granz_heine",2;
		mes "[Kronecker]";
		mes "I am surprised.";
		mes "It means that we can bring a ^4d4dfffake Imir Heart^000000 or";
		mes "The real piece of Imir Heart to replace what has been destroyed.";
		next;
		mes "[Kronecker]";
		mes "The real problem is Terra Gloria...";
		mes "It has been one of a kind to begin with.";
		mes "Since it was made by crafting a small piece fallen from the heart...";
		next;
		mes "[Kronecker]";
		mes "Should we negotiate with the cooperation in Schwarzwald?";
		mes "Wait a minute.";
		mes ".....";
		next;
		select("What should I do now?");
		mes "[Kronecker]";
		mes "I am sorry to keep you waiting while I collect my thoughts.";
		mes "Thank you for your work.";
		next;
		mes "[Kronecker]";
		mes "May I ask you a favor?";
		mes "Would you keep on visiting that place with Nillem?";
		next;
		mes "[Kronecker]";
		mes "Although we are going to discuss about it in the official meeting, I don't think the result would be different.";
		next;
		mes "[Kronecker]";
		mes "Please guard Imir Heart there or bring it to us!";
		mes "We don't keep our hope too high, but it would worth the try, wouldn't it?";
		next;
		mes "[Kronecker]";
		mes "Please.";
		mes "I'll get the approval for you to visit the Past Memories of the Royal Family everyday.";
		mes "Please get the task from Frietz... I mean Friedrich.";
		next;
		mes "[Kronecker]";
		mes "It is a shame, but you are the only hope left for us.";
		mes "We are counting on you.";
		erasequest 7703;// Who Knows the Truth
		getitem 6919,30;// TokenOfHonor
		getexp 800000,800000;
		setquest 7706;// Nillem Is Not Almighty
		ep16_royal = 23;
		next;
		cutin "",255;
		mes "^4d4dffFrom now on, you can get daily quests related to the past Room of Consciousness from Friedrich Stoltze.^000000";
		close;
	}
	if (ep16_royal > 22) {
		cutin "ep16_kronecker_granz_heine",2;
		mes "[Kronecker G. Heine]";
		mes "Then, I'll entrust the matter regarding this place to you and Nillem.";
		mes "For the sake of the royal family's legitimacy...";
		next;
		mes "[Kronecker G. Heine]";
		mes "Please carry out this mission in secret.";
		close3;
	}
	end;
OnInit:
	cloakonnpc();
	cloakonnpc "Kronecker G. Heine#ep16_01_lib02";
	cloakonnpc "Nyhill M. Heine#ep16_lib01";
	end;
}

prt_lib,81,79,5	script	Kronecker G. Heine#ep16_01_lib02	4_EP16_GRANZ,{ end; }
prt_lib,83,80,5	script	Nyhill M. Heine#ep16_lib01	4_EP16_NIHIL,{ end; }

prt_lib,85,82,5	script	Ian Walther#ep16_lib01	1_M_JOBTESTER,{
	if (ep16_royal < 9) {
		if (strnpcinfo(1) == "Ian Walther") {
			npctalk "When you are disconcerted, you cannot find a word to say.", "Ian Walther#ep16_lib01", bc_self;
			setpcblock PCBLOCK_NPC, true;
			sleep2 3000;
			setpcblock PCBLOCK_NPC, false;
			npctalk "It describes how I feel now.", "Ian Walther#ep16_lib01", bc_self;
		}
		else if (strnpcinfo(1) == "Levuiere Wigner")
			npctalk "...How will the things turn out from here...", "Levuiere Wigner#ep16_lib01", bc_self;
		else
			npctalk "Incredible.", "Maximilian Roegenburg#ep16_lib01", bc_self;
		end;
	}
	.@char_id = getcharid(0);
	if (ep16_royal == 9) {
		.@name$ = strcharinfo(0);
		.@account_id = getcharid(3);
		mes "[Ian Walther]";
		mes "We have been waiting for you because...";
		mes "We wonder ^4d4dffif you have ever told anyone about the ritual^000000.";
		next;
		npctalk "...Strange, it is blank.", "Kronecker G. Heine#ep16_01_lib01", bc_self;
		mes "[Ian Walther]";
		mes "Only few people know about the Past Memories of the Royal Family and the Ritual of Blessing...";
		next;
		mes "[Maximilian]";
		mes "You need to make it more clear.";
		mes "Just say it.";
		next;
		select("Am I a suspect here?");
		mes "[Ian Walther]";
		mes "Ah, it is....";
		mes "That you are the only outsider who know about it, and there has been no precedent...";
		npctalk "It is just circumstantial... Hum...", "Maximilian Roegenburg#ep16_lib01", bc_self;
		npctalk ".....", "Nyhill M. Heine#ep16_lib01", bc_self;
		next;
		mes "[Nyhill]";
		mes "I don't believe so.";
		mes "The hero doesn't even know the existence of the Past Memories of the Royal Family and where it is.";
		next;
		mes "[Nyhill]";
		mes "We only have told to observe the ritual after the Royal Assembly is completed.";
		mes "Never mentioned about where it would be held or how.";
		next;
		mes "[Nyhill]";
		mes "I understand how upset you all are due to this sudden incident.";
		mes "But, please don't suspect an innocent person.";
		next;
		npctalk "Ha... What on earth!", "Kronecker G. Heine#ep16_01_lib01", bc_self;
		mes "[Nyhill]";
		mes "That must be...";
		next;
		cloakonnpc "Kronecker G. Heine#ep16_01_lib01", .@char_id;
		cloakoffnpc "Kronecker G. Heine#ep16_01_lib02", .@char_id;
		mes "[Kronecker]";
		mes "How troublesome.";
		mes "Have you seen this document before?";
		next;
		mes "[Levuiere]";
		mes "What is it?";
		mes "We are in the middle of something important.";
		next;
		mes "[Kronecker]";
		mes "No matter is more important than this!";
		mes "It has already happened. We need to prepare for the future.";
		next;
		mes "[Kronecker]";
		mes "However, ^4d4dffTerra Gloria^000000 is gone...";
		npctalk "Is Terra Gloria...?", "Ian Walther#ep16_lib01", bc_self;
		npctalk "Is it gone? What happened...?", "Levuiere Wigner#ep16_lib01", bc_self;
		npctalk "!!!!!", "Maximilian Roegenburg#ep16_lib01", bc_self;
		next;
		mes "[Kronecker]";
		mes "It disappeared when we were taking care of fallen Peter.";
		mes "I guess those intruders must have taken it during the explosion.";
		next;
		mes "[Kronecker]";
		mes "And about the Star of Blessing... They said...";
		mes "It was ^4d4dfffake^000000.";
		next;
		mes "[Kronecker]";
		mes "It must refer to the piece of Imir Heart.";
		next;
		mes "[Nyhill]";
		mes "I am sorry to interrupt but I have something to tell you.";
		next;
		npctalk "What are you doing? Watch your manners.", "Kronecker G. Heine#ep16_01_lib02", bc_self;
		mes "[Nyhill]";
		mes "...It is important. I was about to tell you about the cause of all these.";
		next;
		mes "[Ian Walther]";
		mes "The cause of the incident?";
		mes "You mean you know who have told the secret?";
		next;
		npctalk ".....", "Nyhill M. Heine#ep16_lib01", bc_self;
		mes "[Nyhill]";
		mes "The one who told about the ritual...";
		sleep2 1000;
		mes "Was me.";
		sleep2 500;
		npctalk "What?", "Ian Walther#ep16_lib01", bc_self;
		npctalk "!!!", "Levuiere Wigner#ep16_lib01", bc_self;
		npctalk "Ha!", "Maximilian Roegenburg#ep16_lib01", bc_self;
		mes "...So...";
		next;
		mes "[Nyhill]";
		mes "Please punish me for my fault.";
		next;
		mes "[Kronecker]";
		mes "What are you talking about? Nyhill!";
		mes "Why did you...!";
		next;
		mes "[Nyhill]";
		mes "I believe it was me.";
		mes "I have this piece of memory talking to someone while I was drunk.";
		next;
		unittalk .@account_id, "" + .@name$ + " : (Does it mean...)", bc_self;
		mes "[Nyhill]";
		mes "I believe it is how the story got out.";
		mes "I am deeply ashamed.";
		next;
		mes "[Ian Walther]";
		mes "Oh my... Was it the lord of the Heine family...";
		mes "Although us, the Walther family did not attend the Royal Assembly, we won't sit back and watch this matter!";
		next;
		unittalk .@account_id, "" + .@name$ + " : (He must have been drugged then.)", bc_self;
		mes "[Maximilian]";
		mes "Ha, I have heard what people say about you. You really don't seem to be able to do anything right.";
		mes "Why did you do such a thing?";
		next;
		mes "[Maximilian]";
		mes "Did you want to be a king so badly?";
		mes "Peter is a member of your own family!";
		next;
		unittalk .@account_id, "" + .@name$ + " : (They were looking for a target...)", bc_self;
		mes "[Nyhill]";
		mes "........Phew...";
		mes "It is not that...";
		next;
		mes "[Kronecker]";
		mes "Speak for yourself.";
		mes "I need to know how useless you are.";
		next;
		unittalk .@account_id, "" + .@name$ + " : (It was just a misfortune that Nyhill was marked as the target...)", bc_self;
		mes "[Nyhill]";
		mes "I have nothing to say about it.";
		mes "However...";
		next;
		mes "[Nyhill]";
		mes "I am a Heine, one of the seven royal families of Rune-Midgarts.";
		mes "I didn't do such a thing on purpose.";
		next;
		mes "[Maximilian]";
		mes "Are you sure that you didn't do it to avenge for losing your position as a candidate for the throne?";
		next;
		mes "[Nyhill]";
		mes "I have told you that it isn't true!";
		mes "..........";
		unittalk .@account_id, "" + .@name$ + " : ...Oh, my...", bc_self;
		next;
		select("Wait, may I interrupt?");
		mes "[Ian Walther]";
		mes "Please, do so. I am sorry about my bad manners earlier.";
		mes "...Do you know anything about this, dear guest?";
		next;
		select("Tell them about the thing happened in the Banquet Hall.");
		mes "[Levuiere]";
		mes "...Did such thing happen?";
		mes "A person who looks like a scientist and drug...";
		next;
		mes "[Levuiere]";
		mes "If it is true, Lord Heine must have not done such a thing on purpose.";
		mes "Someone must have taken advantage on him according to a plot...";
		next;
		mes "[Maximilian]";
		mes "Do you have a proof?";
		mes "You didn't just come up with the story to help him out, right?";
		unittalk .@account_id, "" + .@name$ + " : (Skia will testify for him since we found him together.)", bc_self;
		next;
		select("Lady Nerius will testify...");
		mes "[Ian Walther]";
		mes "...Hum... The ladies of the Nerius family have seen it too?";
		mes "We need to call for a meeting.";
		next;
		mes "[Ian Walther]";
		mes "Hey, Grantz. What are you going to do?";
		next;
		mes "[Kronecker]";
		mes "Even if it was true, he still has acted so carelessly.";
		mes "I cannot let it slide.";
		next;
		mes "[Kronecker]";
		mes "It is difficult for me to say, but it could have been deemed as a treason.";
		mes "What a shame. I have nothing to say about it.";
		next;
		mes "[Kronecker]";
		mes "This has brought disgrace to the name of Heine.";
		next;
		mes "[Kronecker]";
		mes "Nyhill, you sentence you to disciplinary confinement for a while.";
		mes "You shouldn't contact with anyone other than the ones you must see.";
		next;
		mes "[Kronecker]";
		mes "And about disappeared ^4d4dffTerra Gloria^000000";
		mes "And destroyed Star of Blessing, we need to come up with a solution.";
		next;
		mes "[Ian Walther]";
		mes "It will be a long discussion.";
		mes "Let me convene a meeting right away.";
		next;
		mes "[Ian Walther]";
		mes "I'll see you later then.";
		erasequest 7693;// Surprise Attack
		ep16_royal = 10;
		close2;
		npctalk "Magician! Activate the gate.", "Ian Walther#ep16_lib01", bc_self;
		setpcblock PCBLOCK_NPC, true;
		sleep2 2000;
		npctalk "Oh, yes. The gate has been activated since others used it earlier.", "Mage Nillem#ep16_warp", bc_self;
		sleep2 3000;
		npctalk "Is that so? Well, then. Please excuse me.", "Ian Walther#ep16_lib01", bc_self;
		sleep2 3000;
		cloakonnpc "Ian Walther#ep16_lib01", .@char_id;
		sleep2 500;
		cloakonnpc "Levuiere Wigner#ep16_lib01", .@char_id;
		cloakonnpc "Maximilian Roegenburg#ep16_lib01", .@char_id;
		sleep2 500;
		npctalk "Nyhill, come with me.", "Kronecker G. Heine#ep16_01_lib02", bc_self;
		sleep2 3000;
		setpcblock PCBLOCK_NPC, false;
		cloakonnpc "Kronecker G. Heine#ep16_01_lib02", .@char_id;
		cloakonnpc "Nyhill M. Heine#ep16_lib01", .@char_id;
		end;
	}
	mes "[Ian Walther]";
	mes "Let me fill you in with the details after proceeding with a discussion with my family.";
	close2;
	npctalk "Magician! Activate the gate.", "Ian Walther#ep16_lib01", bc_self;
	setpcblock PCBLOCK_NPC, true;
	sleep2 2000;
	npctalk "Oh, yes. The gate has been activated since others used it earlier.", "Mage Nillem#ep16_warp", bc_self;
	sleep2 3000;
	npctalk "Is that so? Well, then. Please excuse me.", "Ian Walther#ep16_lib01", bc_self;
	sleep2 3000;
	cloakonnpc "Ian Walther#ep16_lib01", .@char_id;
	sleep2 500;
	cloakonnpc "Levuiere Wigner#ep16_lib01", .@char_id;
	cloakonnpc "Maximilian Roegenburg#ep16_lib01", .@char_id;
	sleep2 500;
	npctalk "Nyhill, come with me.", "Kronecker G. Heine#ep16_01_lib02", bc_self;
	sleep2 3000;
	setpcblock PCBLOCK_NPC, false;
	cloakonnpc "Kronecker G. Heine#ep16_01_lib02", .@char_id;
	cloakonnpc "Nyhill M. Heine#ep16_lib01", .@char_id;
	end;
}
prt_lib,88,83,4	duplicate(Ian Walther#ep16_lib01)	Levuiere Wigner#ep16_lib01	4_EP16_LOUVIERE
prt_lib,91,78,2	duplicate(Ian Walther#ep16_lib01)	Maximilian Roegenburg#ep16_lib01	4_EP16_MAX


prt_lib,94,82,3	script	Dimension Warper MkII#ep16_lib	PORTAL,{
	if (ep16_royal < 18) {
		mes "[Nillem]";
		mes "Wait, it is not ready yet.";
		mes "Do not touch that.";
		close;
	}
	mes "[Nillem]";
	mes "Let me connect the gap in the dimension by force.";
	mes "The gap might be invisible, but it still is a crack.";
	next;
	mes "[Nillem]";
	mes "It will be connected to the time when a big event has taken place.";
	mes "Are you ready?";
	next;
	if (select( "I am ready!", "I am not ready!" ) == 2) {
		mes "[Nillem]";
		mes "Phew, don't be such a drag.";
		close;
	}
	mes "[Nillem]";
	mes "Then, sweet dreams!";
	close2;
	warp "prt_lib_q",89,43;
	end;
OnInit:
	cloakonnpc "Dimension Warper MkII#ep16_lib";
	end;
}

// Instance Room of conciousness, daily quest
prt_lib_q,91,85,3	script	Nillem#ep16_lib_q	4_M_JOB_WIZARD,{
	if (ep16_royal == 18) {
		mes "[Nillem]";
		mes "Oh, we did it.";
		mes "I don't know when, but it is the ^4d4dffPast Memories of the Royal Family^000000!";
		next;
		npctalk "Ha! I am a genius!", bc_self;
		mes "[Nillem]";
		mes "However, I have to give it a twist to get to the place we want to go.";
		next;
		mes "[Nillem]";
		mes "Can I?";
		mes "Hahaha, of course I can!";
		npctalk "I am the only magician of dimension in this place, Nillem the Marvelous!", bc_self;
		next;
		mes "[Nillem]";
		mes "It is the first time for me to do this.";
		mes "But let me twist the dimension like this.";
		npctalk "Humph-!", bc_self;
		specialeffect EF_BEGINSPELL;
		next;
		cloakoffnpc "Swaying Space#evt_gate02", getcharid(0);
		mes "[Nillem]";
		mes "Connect the spaces by force!";
		mes "Well, let's see what has happened here.";
		next;
		mes "[Nillem]";
		mes "Are you ready?";
		mes "Talk to me when you are ready-";
		ep16_royal = 19;
		close;
	}
	if (ep16_royal == 19) {
		cloakoffnpc "Swaying Space#evt_gate02", getcharid(0);
		if (getcharid(1) == 0 || is_party_leader() == false) {
			mes "^4d4dffIt is an event which proceeds as a memorial.";
			mes "Only the party leader can proceed with a memorial event. Try again after forming a party.^000000";
			close;
		}
		mes "[Nillem]";
		mes "Then let's go and take a look what has happened in the Room of Consciousness.";
		mes "Since I am connecting the twisted time and space once more by force,";
		mes "I may have to use my full power to maintain this!";
		next;
		mes "[Nillem]";
		mes "Please, come back alive and well-";
		next;
		if (select( "Connect now.", "Do not go." ) == 2) {
			mes "[Nillem]";
			mes "Haha, it is not good either when it is too late...";
			close;
		}
		if (instance_create("Room of Consciousness") < 0) {
			mes "[Nillem]";
			mes "Oh... It doesn't work well.";
			mes "Wait, phew... Let me collect my strength again...";
			next;
			mes "[Nillem]";
			mes "... I'll make it work, wait a minute.";
			close;
		}
		mes "[Nillem]";
		mes "Whoa! The gate to the next area has been activated!";
		mes "Well, let's get in there!";
		cloakoffnpc "Swaying Space#evt_gate02", getcharid(0);
		close;
	}
	if (ep16_royal == 20) {
		mes "[Nillem]";
		mes "You are here now!";
		mes "This place has been chaotic since you were gone.";
		next;
		mes "[Nillem]";
		mes "Do you see the exit over there?";
		mes "Haha, that gate leads to Prontera.";
		next;
		mes "[Nillem]";
		mes "And...";
		next;
		select("Then?");
		mes "[Nillem]";
		mes "Prontera is being destroyed by the undead army-!";
		mes "Right now! It is just a hot mess out there!";
		next;
		mes "[Nillem]";
		mes "I mean, why don't we go to watch the unknown past of Prontera,";
		mes "Since we are already here?";
		next;
		mes "[Nillem]";
		mes "I have been digging around a little, and I guess we can come here anytime when we want...";
		next;
		mes "[Nillem]";
		mes "Well, this could be one of the parallel worlds, but we have nothing to lose anyway.";
		mes "Why don't we go take a look?";
		next;
		select("If you insist.");
		mes "[Nillem]";
		mes "I knew you would! I have been right about you!";
		mes "What are you waiting for! Let's go out there!";
		erasequest 7701;// Lost Imir Heart
		setquest 7702;// Prontera at the Time
		ep16_royal = 21;
		close;
	}
	if (ep16_royal == 21) {
		mes "[Nillem]";
		mes "Aren't we heading out?";
		mes "Let's go!";
		close;
	}
	if (ep16_royal == 22) {
		mes "[Nillem]";
		mes "Whoa, shall we organize the thoughts now?";
		next;
		mes "[Nillem]";
		mes "^4d4dffWhat was in the Room of Consciousness^000000 must have been...";
		mes "Well, this must have something to do with ^4d4dffthe undead army attacking Prontera^000000 now.";
		mes "Well, it must have been ^4d4dfftaken away by them^000000, am I right?";
		next;
		select("Right.");
		mes "[Nillem]";
		mes "Can we stop this?";
		mes "Or, can we take it with us?";
		next;
		mes "[Nillem]";
		mes "I believe our superiors will order us to do so.";
		mes "Try whatever it takes to make it work.";
		next;
		select("I guess so.");
		mes "[Nillem]";
		mes "Perhaps, well it is just my imagination though.";
		mes "Whatever was in the Room of Consciousness was taken, right?";
		mes "However, the royal families have been performing the ritual without knowing that somehow.";
		next;
		mes "[Nillem]";
		mes "They must have done something or it must have returned...";
		mes "This could meet the condition to see the sealed part of the ^4d4dffPast Memories of the Royal Family^000000...";
		next;
		select("You mean, the ones who know the truth?");
		mes "[Nillem]";
		mes "Yes, I mean that. If this is the truth which is the key to open the seal,";
		mes "We are bringing an important piece of information back with us.";
		next;
		mes "[Nillem]";
		mes "We didn't protect or take the thing...";
		mes "But we know the truth now. It will break the seal of the document...";
		next;
		mes "[Nillem]";
		mes "As the secret of the royal family is revealed, we will get the missing pieces of the puzzle.";
		mes "Hahahaha, and you are the one who would be the center of all that, my darling!";
		next;
		select("Don't call me that!");
		mes "[Nillem]";
		mes "What about it?";
		mes "We will see each other everyday from now on, won't we?";
		unittalk getcharid(3), "" + strcharinfo(0) + " : ......Phew..", bc_self;
		next;
		mes "[Nillem]";
		mes "Well, shall we go back then?";
		mes "Our mission here is done for now!";
		next;
		mes "[Nillem]";
		mes "Let's go back!";
		mes "Nothing good can be done staying in a place which is not of our time too long";
		next;
		mes "[Nillem]";
		mes "Well, then get ready!";
		mes "Three!";
		sleep2 2000;
		mes "Two!";
		sleep2 1000;
		mes "One!";
		close2;
		warp "prt_lib",88,80;
		end;
	}
	if (ep16_royal > 23) {
		mes "[Nillem]";
		mes "Hahaha, I like this place now.";
		mes "My darling, what do you want me to do now?";
		next;
		if (select( "Connect to the Room of Consciousness", "Return" ) == 2) {
			mes "[Nillem]";
			mes "As you wish!";
			close2;
			warp "prt_lib_q",89,43;
			end;
		}
		switch( checkquest(7706,PLAYTIME) ) {
		case -1:
			switch( checkquest(7705,HUNTING) ) {
			case -1:
				mes "[Nillem]";
				mes "Did you get the mission from the Heine family?";
				mes "It doesn't seem like it.";
				next;
				mes "[Nillem]";
				mes "Hey, this really is hard work!";
				mes "Let's go there when we are on a mission, OK?";
				next;
				mes "[Nillem]";
				mes "Do you see the dark circles under my eyes?";
				mes "I'll do whatever you like to do, but!";
				next;
				mes "[Nillem]";
				mes "This is too much.";
				mes "We cannot change the past event too much.";
				mes "Those people must have learned it by now.";
				next;
				mes "[Nillem]";
				mes "Well, I guess it would be no use explaining it...";
				next;
				mes "[Nillem]";
				mes "It would have been better if they didn't know about it at all.";
				mes "This may end up another torture for them, tut tut...";
				next;
				mes "[Nillem]";
				mes "Therefore, since I am a dedicated public official!";
				mes "I open the gate when there is a mission.";
				next;
				mes "[Nillem]";
				mes "Why?";
				mes "Because I am tired-";
				close;
			case 0:
			case 1:
				if (getcharid(1) == 0 || is_party_leader() == false) {
					mes "^4d4dffIt is an event which proceeds as a memorial.";
					mes "Only the party leader can proceed with a memorial event. Try again after forming a party.^000000";
					close;
				}
				mes "[Nillem]";
				mes "Then let's go and take a look what has happened in the Room of Consciousness.";
				mes "Since I am connecting the twisted time and space once more by force,";
				mes "I may have to use my full power to maintain this!";
				next;
				mes "[Nillem]";
				mes "Please, come back alive and well-";
				next;
				if (select( "Connect now.", "Do not go." ) == 2) {
					mes "[Nillem]";
					mes "Haha, it is not good either when it is too late...";
					close;
				}
				if (instance_create("Room of Consciousness") < 0) {
					mes "[Nillem]";
					mes "Oh... It doesn't work well.";
					mes "Wait, phew... Let me collect my strength again...";
					next;
					mes "[Nillem]";
					mes "... I'll make it work, wait a minute.";
					close;
				}
				mes "[Nillem]";
				mes "Whoa! The gate to the next area has been activated!";
				mes "Well, let's get in there!";
				cloakoffnpc "Swaying Space#evt_gate02", getcharid(0);
				close;
			case 2:
				mes "[Nillem]";
				mes "Ha, since our work here is done, you shall go and report to Archduke Stoltze, right?";
				mes "Ha, ha, this it for today-";
				next;
				mes "[Nillem]";
				mes "Phew, it was difficult to maintain it. It was very difficult.";
				close;
			}
		case 0:
		case 1:
			mes "[Nillem]";
			mes "Hum... I am afraid it would be difficult.";
			mes "Even for a genius magician like yours truly, there is a certain limit. I am a human after all.";
			next;
			mes "[Nillem]";
			mes "Connecting multiple dimensions is not as easy as it sounds.";
			mes "Please cut me some slack!";
			next;
			mes "[Nillem]";
			mes "Let me do this when the raging magical flow is stabilized-????";
			close;
		case 2:
			erasequest 7706;// Nillem Is Not Almighty
			mes "[Nillem]";
			mes "Hum... Shall I clear the surroundings a little?";
			mes "Wait, I'll get ready.";
			next;
			mes "[Nillem]";
			mes "It won't take long. Please wait.";
			close;
		}
	}
}

prt_lib_q,88,90,1	script	Swaying Space#evt_gate02	4_ENERGY_RED,{
	if (checkquest(7706,PLAYTIME) > 0 || checkquest(7705,HUNTING) > 1) {
		mes "The uneasy flow of magical power can be sensed near the twisted space.";
		mes "The gap connected by force disappeared after serving its duty.";
		cloakonnpc "Swaying Space#evt_gate02", getcharid(0);
		close;
	}
	if (getcharid(1) == 0 || is_party_leader() == false) {// solo instance
		mes "^4d4dffOnly the party leader can enter MD [Room of Consciousness].^000000";
		close;
	}
	if ((ep16_royal == 19 && isbegin_quest(7700) == 1) || (ep16_royal > 19 && (checkquest(7705,HUNTING) == 0 || checkquest(7705,HUNTING) == 1))) {
		mes "You can move to the place where the piece of Ymir Heart was in the past.";
		next;
		if (select( "Enter.", "Do not enter." ) == 2) {
			mes "[Nillem]";
			mes "Hum, I have just torn and connected these spaces by force.";
			mes "Such thing is possible since I am a genius!";
			close;
		}
		if (getcharid(1) == 0 || is_party_leader() == false) {
			mes "^4d4dffOnly the party leader can enter MD [Room of Consciousness].^000000";
			close;
		}
		switch( instance_enter("Room of Consciousness") ) {
		case IE_OTHER:
			mes "[Nillem]";
			mes "Oh, well, the movement of magic seems uneasy.";
			mes "Hum, shall we try again later?";
			close;
		case IE_NOINSTANCE:
			mes "[Nillem]";
			mes "Hum, is it too difficult to connect it by force?";
			mes "Wait a minute.";
			close;
		case IE_NOMEMBER:
			mes "^4d4dffThis is an event proceeding through memorial.";
			mes "Only the party leader can enter.^000000";
			close;
		case IE_OK:
			mapannounce strnpcinfo(4), "Party member " + strcharinfo(0) + " of party's " + getpartyname( getcharid(1) ) + " enters Room of Consciousness.", bc_map,0xFF99,FW_NORMAL,12;
			//warp "1@mir",101,10;
			end;
		}
	}
	end;
OnInit:
	cloakonnpc();
	end;
}

prt_lib_q,110,58,4	script	Document#EP161DBOOK	CLEAR_NPC,{
	mes "More than a half of this document is edited in black.";
	next;
	select("Keep reading.");
	mes "Suspect Interrogation Record";
	mes "Suspect: กแกแกแ(Prisoner No.: 243AD265)";
	mes "In regard to the monster above, ^2EA4FFthe charges include taking of bribery, embezzlement, violence.^000000";
	mes "On day กแกแกแกแกแ, Paladin กแกแกแ in the Royal Crusader Office had Crusader กแกแกแ participate and informed the suspect that he/she has the right to remain silent to interrogate the suspect. What is set forth below is the statement of the suspect.";
	next;
	mes "It's all colored in black except a few modifiers and it's illegible.";
	next;
	select("Keep reading.");
	mes "Suspect Interrogation Record";
	mes "Suspect: กแกแกแ(Prisoner No.: 267BD184)";
	mes "In regard to the monster above, ^2EA4FFthe charges include marriage fraud and marriage scam.^000000";
	mes "On day กแกแกแกแกแ, Paladin กแกแกแ in the Royal Crusader Office had Crusader กแกแกแ participate and informed the suspect that he/she has the right to remain silent to interrogate the suspect. What is set forth below is the statement of the suspect.";
	next;
	mes "It's all colored in black except a few modifiers and it's illegible.";
	next;
	select("Keep reading.");
	mes "Suspect Interrogation Record";
	mes "Suspect: กแกแกแ(Prisoner No.: 265CM154)";
	mes "In regard to the monster above, ^2EA4FFthe charge includes the corruption of public morals.^000000";
	mes "On day กแกแกแกแกแ, Paladin กแกแกแ in the Royal Crusader Office had Crusader กแกแกแ participate and informed the suspect that he/she has the right to remain silent to interrogate the suspect. What is set forth below is the statement of the suspect.";
	next;
	mes "It's all colored in black except a few modifiers and it's illegible.";
	next;
	select("Keep reading.");
	mes "Suspect Interrogation Record";
	mes "Suspect: กแกแกแ(Prisoner No.: 243DV17)";
	mes "In regard to the monster above, ^2EA4FFthe charge includes กแกแกแ.^000000";
	mes "On day กแกแกแกแกแ, Paladin กแกแกแ in the Royal Crusader Office had Crusader กแกแกแ participate and informed the suspect that he/she has the right to remain silent to interrogate the suspect. What is set forth below is the statement of the suspect.";
	next;
	mes "It's all colored in black except a few modifiers and it's illegible.";
	next;
	select("Keep reading.");
	mes "Suspect Interrogation Record";
	mes "Suspect: กแกแกแ(Prisoner No.: 95EB72)";
	mes "In regard to the monster above, ^2EA4FFthe charges include property damage and town invasion.^000000";
	mes "On day กแกแกแกแกแ, Paladin กแกแกแ in the Royal Crusader Office had Crusader กแกแกแ participate and informed the suspect that he/she has the right to remain silent to interrogate the suspect. What is set forth below is the statement of the suspect.";
	next;
	mes "It's all colored in black except a few modifiers and it's illegible.";
	next;
	select("Keep reading.");
	mes "Suspect Interrogation Record";
	mes "Suspect: กแกแกแ(Prisoner No.: 117FM188)";
	mes "In regard to the monster above, ^2EA4FFthe charge includes hysteria and emotional blowup^000000";
	mes "On day กแกแกแกแกแ, Paladin กแกแกแ in the Royal Crusader Office had Crusader กแกแกแ participate and informed the suspect that he/she has the right to remain silent to interrogate the suspect. What is set forth below is the statement of the suspect.";
	next;
	mes "It's all colored in black except a few modifiers and it's illegible.";
	next;
	select("Keep reading.");
	mes "Suspect Interrogation Record";
	mes "Suspect: กแกแกแ(Prisoner No.: 103GD214)";
	mes "In regard to the monster above, ^2EA4FFthe charges include property damage and town invasion.^000000";
	mes "On day กแกแกแกแกแ, Paladin กแกแกแ in the Royal Crusader Office had Crusader กแกแกแ participate and informed the suspect that he/she has the right to remain silent to interrogate the suspect. What is set forth below is the statement of the suspect.";
	next;
	mes "It's all colored in black except a few modifiers and it's illegible.";
	next;
	select("Keep reading.");
	mes "Suspect Interrogation Record";
	mes "Suspect: กแกแกแ(Prisoner No.: 55HK115)";
	mes "In regard to the monster above, ^2EA4FFthe charges include fake experience certificates, fraud^000000";
	mes "On day กแกแกแกแกแ, Paladin กแกแกแ in the Royal Crusader Office had Crusader กแกแกแ participate and informed the suspect that he/she has the right to remain silent to interrogate the suspect. What is set forth below is the statement of the suspect.";
	next;
	mes "It's all colored in black except a few modifiers and it's illegible.";
	next;
	select("Keep reading.");
	mes "This is the final chapter.";
	close;
}


// Left side
prt_cas,213,177,5	script	Royal Chef#ep16_1	1_ETC_01,4,4,{
	if (ep16_royal >= 2) {
		if (ep16_cookbs == 0)
			callsub S_Text;
	}
	if (ep16_cookbs == 1) {
		mes "[Royal Chef]";
		mes "The Head Chef has been waiting for you. He is enraged now!";
		mes "Go to the kitchen now!";
		close;
	}
	if (ep16_cookbs > 22) {
		mes "[Royal Chef]";
		mes "I am living in a whirl of business!";
		mes "I have been seeing too many people these days that I am even confused about the familiar faces now.";
		next;
		mes "[Royal Chef]";
		mes "I am sorry about the misunderstanding.";
		mes "I have been badgered by the Head Chef too much... Haha...";
		emotion ET_PROFUSELY_SWEAT;
		close;
	}
	mes "[Royal Chef]";
	mes "I am living in a whirl of business!";
	mes "I have been seeing too many people these days that I am even confused about the familiar faces now.";
	close;

S_Text:
	mes "[Royal Chef]";
	mes "Hey, you! I have been looking for you!";
	mes "What are you doing here?";
	emotion ET_SURPRISE;
	next;
	mes "[Royal Chef]";
	mes "The Head Chef has been waiting for you. He is enraged now!";
	mes "Go to the kitchen now!";
	ep16_cookbs = 1;
	setquest 11394;// Call of the Royal Head Chef
	close;

OnTouch:
	if (ep16_cookbs == 0 && ep16_royal >= 2)
		callsub S_Text;
	end;
}

// Kitchen
prt_cas,309,200,5	script	Royal Head Chef#ep16_1	4_EP16_COOK,{
	if (ep16_royal < 2 || ep16_cookbs == 0) {
		mes "[Head Chef]";
		mes "Argh!";
		mes "When will this special assistant chef arrive here?";
		emotion ET_FRET;
		cutin "ep16cook_king_1",2;
		close3;
	}
	if (ep16_cookbs == 1) {
		mes "[Head Chef]";
		mes "Argh!";
		mes "When will this special's assistant chef arrive here?";
		emotion ET_FRET;
		cutin "ep16cook_king_1",2;
		next;
		mes "[Head Chef]";
		mes "Of course!";
		mes "The food for the banquet is perfect!";
		next;
		mes "[Head Chef]";
		mes "More!";
		mes "More!";
		mes "More!";
		mes "Much more!";
		mes "I want to satisfy the guests!";
		next;
		mes "[Head Chef]";
		mes "I can't just let go of the banquet of my life this fabulously!";
		mes "It should be more fabulous!";
		mes "No, much more fabulous!";
		next;
		mes "[Head Chef]";
		mes "Hum...";
		mes "I won't be satisfied if it was not miraculously luxurious and superlatively fabulous!";
		emotion ET_FRET;
		next;
		cutin "",255;
		mes "[Royal Chef Apprentice[Royal Chef]";
		mes "Head Chef!";
		mes "We have a guest for you, Head Chef...";
		next;
		mes "[Head Chef]";
		mes "You are late!";
		mes "How can you be so late when we don't even have a second to spare!";
		emotion ET_FRET;
		cutin "ep16cook_king_1",2;
		next;
		mes "[Head Chef]";
		mes "I would have placed you in the Poring Range for a week!";
		mes "But today is a special day. So I'll punish you later!";
		next;
		select("Ask about the situation.");
		mes "[Head Chef]";
		mes "It is not the most important thing now!";
		mes "Let's stop talking and make the banquet more fabulous!";
		next;
		mes "[Head Chef]";
		mes "Go to the empty spot and get prepared to cook!";
		next;
		mes "[Head Chef]";
		mes "Once you prepare a piece of Griffon meat... You need to pour the sauce... What?";
		mes "The sauce... Eh?";
		emotion ET_SURPRISE;
		next;
		mes "[Head Chef]";
		mes "Wait a minute!";
		mes "The sauce is gone! Unbelievable!";
		mes "We cannot do anything without the sauce!";
		next;
		mes "[Head Chef]";
		mes "You! The new assistant!";
		mes "Go get the sauce from Oriental Oyster the sauce master!";
		emotion ET_HELP;
		next;
		mes "[Head Chef]";
		mes "Now! Quick!";
		mes "Hurry up!";
		erasequest 11394;// Call of the Royal Head Chef
		setquest 11395;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 2;
		close3;
	}
	if (ep16_cookbs < 12) {
		mes "[Head Chef]";
		mes "Isn't the sauce ready?";
		mes "Go get the sauce from Oriental Oyster the sauce master!";
		emotion ET_HELP;
		cutin "ep16cook_king_1",2;
		next;
		mes "[Head Chef]";
		mes "Now! Quick!";
		mes "Hurry up!";
		close3;
	}
	if (ep16_cookbs == 12) {
		mes "[Head Chef]";
		mes "Oh!";
		mes "This exquisite taste made by the master!";
		mes "It is perfect!";
		cutin "ep16cook_king_1",2;
		next;
		mes "[Head Chef]";
		mes "Let's start cooking now!";
		mes "Go to the empty spot and get prepared.";
		erasequest 11397;// Why Should I Prepare for the Banquets?
		setquest 11398;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 13;
		close3;
	}
	if (ep16_cookbs == 13) {
		mes "[Head Chef]";
		mes "Let's start cooking now!";
		mes "Go to the empty spot and get prepared.";
		cutin "ep16cook_king_1",2;
		close3;
	}
	if (ep16_cookbs == 14) {
		mes "[Head Chef]";
		mes "Now, you can bring this to the kitchen. That is the only thing left to do!";
		cutin "ep16cook_king_1",2;
		next;
		mes "[Head Chef]";
		mes "What are you waiting for!";
		mes "Run to the dining room with this dish!";
		next;
		mes "[Head Chef]";
		mes "A Royal Chef must be able to fill the empty plates as fast as possible!";
		close3;
	}
	if (ep16_cookbs < 22) {
		mes "[Head Chef]";
		mes "Arghhhh!";
		mes "The mind for cooking!";
		mes "The mind of the queen!";
		cutin "ep16cook_king_1",2;
		next;
		mes "[Head Chef]";
		mes "With the blazing spirit of mine!";
		mes "I'll make the best dish!";
		close3;
	}
	if (ep16_cookbs == 22) {
		if (checkweight(1119,3) == 0) {
			mes "- You have too many items in possession.";
			mes "Please organize your inventory and try again. -";
			close;
		}
		mes "[Head Chef]";
		mes "Arghhhhh!";
		mes "I am sorry!";
		emotion ET_SORRY;
		cutin "ep16cook_king_1",2;
		next;
		mes "[Head Chef]";
		mes "I thought you were the new assistant chef who was supposed to come. I am sorry about all the trouble!";
		next;
		mes "[Head Chef]";
		mes "I have scolded the one who has brought you, hero. Please forgive us!";
		next;
		mes "[Head Chef]";
		mes "However, you really seem to have a true talent in cooking!";
		mes "Grilled Griffon!";
		mes "It was delicious!";
		next;
		mes "[Head Chef]";
		mes "I hope to be able to cook with you again!";
		cutin "ep16cook_king_2",2;
		getexp 700000,700000;
		getitem 6919,10;// TokenOfHonor
		completequest 11420;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 23;
		close3;
	}
	// daily
	switch( checkquest(11425,PLAYTIME) ) {
	case -1:
		if (isbegin_quest(11424) == 1) {
			mes "[Head Chef]";
			mes "This is not the time!";
			mes "Rush to the dining room before the food goes cold!";
			cutin "ep16cook_king_1",2;
			close3;
		}
		mes "[Head Chef]";
		mes "Haha, I've been waiting for you!";
		cutin "ep16cook_king_2",2;
		next;
		mes "[Head Chef]";
		mes "Let's not waste time and start cooking now!";
		mes "Go to the empty spot and get prepared.";
		cutin "ep16cook_king_1",2;
		if (isbegin_quest(11423) == 0)
			setquest 11423;// Banquet: Griffin Barbecue
		close3;
	case 0:
	case 1:
		mes "[Head Chef]";
		mes "Argh!";
		mes "Take a rest now!";
		cutin "ep16cook_king_1",2;
		next;
		mes "[Head Chef]";
		mes "If I push you too hard, I would be in trouble!";
		close3;
	case 2:
		mes "[Head Chef]";
		mes "As each dish has the best moment to tastes it, each person has the best time to engage in cooking!";
		cutin "ep16cook_king_2",2;
		erasequest 11425;// Complete Today's Grilled Griffin
		close3;
	}
}

prt_cas,313,199,0	script	#ep16_1	HIDDEN_WARP_NPC,2,2,{
	end;
OnTouch:
	if (ep16_royal < 2) {
		mes "[Head Chef]";
		mes "You there!";
		mes "You are getting in the way!";
		cutin "ep16cook_king_1",2;
		close3;
	}
	if (ep16_cookbs == 13) {
		callsub S_Dish;
		erasequest 11398;// Why Should I Prepare for the Banquets?
		setquest 11399;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 14;
		close3;
	}
	if (isbegin_quest(11423) == 1) {
		callsub S_Dish;
		erasequest 11423;// Banquet: Griffin Barbecue
		setquest 11424;// Banquet: Griffin Barbecue
		close3;
	}
	end;

S_Dish:
	mes "[Head Chef]";
	mes "Now... then!";
	mes "Today's main dish is the Grilled Griffon with the special sauce. The crust should be crunchy while the inside is juicy!";
	cutin "ep16cook_king_1",2;
	next;
	mes "[Head Chef]";
	mes "Since it is a dish for the banquet!";
	mes "Each dish should look and taste exactly the same! Don't forget!";
	next;
	mes "[Head Chef]";
	mes "Take a good look at what I do now, and do exactly the same!";
	next;
	mes "[Head Chef]";
	mes "Yap!";
	for ( .@i = 1; .@i <= 6; .@i++ )
		npctalk "Yap!", "Chef#ep16_" + .@i;
	next;
	mes "[Head Chef]";
	mes "Humph!";
	for ( .@i = 1; .@i <= 6; .@i++ )
		npctalk "Humph!", "Chef#ep16_" + .@i;
	next;
	mes "[Head Chef]";
	mes "Whoa!";
	for ( .@i = 1; .@i <= 6; .@i++ )
		npctalk "Whoa!", "Chef#ep16_" + .@i;
	next;
	mes "[Head Chef]";
	mes "Bam!";
	for ( .@i = 1; .@i <= 6; .@i++ )
		npctalk "Bam!", "Chef#ep16_" + .@i;
	next;
	mes "[Head Chef]";
	mes "Hahahaha!";
	mes "An excellent Grilled Griffon DX is made!";
	for ( .@i = 1; .@i <= 6; .@i++ )
		npctalk "Thank you!", "Chef#ep16_" + .@i;
	next;
	mes "[Head Chef]";
	mes "Now, you can bring this to the kitchen. That is the only thing left to do!";
	next;
	mes "[Head Chef]";
	mes "What are you waiting for!";
	mes "Run to the dining room with this dish!";
	next;
	mes "[Head Chef]";
	mes "A Royal Chef must be able to fill the empty plates as fast as possible!";
	return;
}

prt_cas,319,211,3	script	Royal Sauce Master#ep16	4_M_ALCHE_B,{
	if (ep16_royal < 2) {
		mes "[Oriental Oyster]";
		mes "Hum... How savory!";
		mes "The perfect combinations is just divine...";
		close;
	}
	if (ep16_cookbs == 2) {
		mes "[Oriental Oyster]";
		mes "What?";
		mes "The sauce ran out?";
		emotion ET_SURPRISE;
		next;
		mes "[Oriental Oyster]";
		mes "I am in trouble!";
		mes "You don't know what the Head Chef would do if I am late...";
		next;
		mes "[Oriental Oyster]";
		mes "Hum... I need to make the sauce fast.";
		mes "I am sorry to ask but would you help me with this?";
		next;
		mes "[Oriental Oyster]";
		mes "My apprentice was sent to the medical office because he slipped on the sauce...";
		emotion ET_CRY;
		next;
		mes "[Oriental Oyster]";
		mes "I cannot stop stirring the sauce. You can bring me the ingredient as I say the name.";
		next;
		mes "[Oriental Oyster]";
		ep16_cookbs = 4;
		erasequest 11395;// Why Should I Prepare for the Banquets?
		setquest 11396;// Why Should I Prepare for the Banquets?
		callsub S_Sauce;
	}
	if (ep16_cookbs == 3 || ep16_cookbs == 25) {
		mes "[Oriental Oyster]";
		mes "Oh my...";
		mes "The ingredient is like the life for a sauce.";
		mes "There shouldn't be a mistake.";
		next;
		mes "[Oriental Oyster]";
		mes "Then, let's start over from the beginning!";
		next;
		ep16_cookbs++;
		callsub S_Sauce;
	}
	if (ep16_cookbs == 4 || ep16_cookbs == 6 || ep16_cookbs == 8 || ep16_cookbs == 10 || ep16_cookbs == 26 || ep16_cookbs == 28 || ep16_cookbs == 30 || ep16_cookbs == 32) {
		mes "[Oriental Oyster]";
		mes "Bring me the ingredient!";
		mes "The Head Chef is looking at me with the set of murderous eyes!";
		close;
	}
	if (ep16_cookbs == 5 || ep16_cookbs == 7 || ep16_cookbs == 9 || ep16_cookbs == 25 || ep16_cookbs == 27 || ep16_cookbs == 29 || ep16_cookbs == 31) {
		mes "[Oriental Oyster]";
		mes "Hum, very good!";
		next;
		ep16_cookbs++;
		callsub S_Sauce;
	}
	if (ep16_cookbs == 11 || ep16_cookbs == 33) {
		if (ep16_cookbs == 33 && checkweight(1119,3) == 0) {
			mes "- You have too many items in possession.";
			mes "Please organize your inventory and try again. -";
			close;
		}
		mes "[Oriental Oyster]";
		mes "Oh!";
		mes "Very good!";
		mes "Thanks to you, I could make the perfect sauce!";
		mes "Bring it to the Head Chef now!";
		next;
		mes "[Oriental Oyster]";
		mes "You seem to be talented in sauce making.";
		mes "Why don't you become a master sauce maker?";
		if (ep16_cookbs == 11) {
			erasequest 11396;// Why Should I Prepare for the Banquets?
			setquest 11397;// Why Should I Prepare for the Banquets?
			ep16_cookbs = 12;
		}
		else {
			erasequest 11421;// Banquet: Unexpected Sauce
			setquest 11422;// Complete Today's Sauce
			getitem 6919,4;// TokenOfHonor
			ep16_cookbs = 23;
		}
		close;
	}
	if (ep16_cookbs == 12) {
		mes "[Oriental Oyster]";
		mes "Oh!";
		mes "Very good!";
		mes "Thanks to you, I could make the perfect sauce!";
		next;
		mes "[Oriental Oyster]";
		mes "You seem to be talented in sauce making.";
		mes "Why don't you become a master sauce maker?";
		close;
	}
	if (ep16_cookbs == 23) {
		switch( checkquest(11422,PLAYTIME) ) {// daily
		case -1:
			mes "[Oriental Oyster]";
			mes "I knew you would come again!";
			mes "That is the magic of the sauce!";
			next;
			mes "[Oriental Oyster]";
			mes "How about making a fabulous sauce today?";
			next;
			ep16_cookbs = 26;
			setquest 11421;// Banquet: Unexpected Sauce
			callsub S_Sauce;
		case 0:
		case 1:
			mes "[Oriental Oyster]";
			mes "Oh my!";
			mes "The palate is very important for a chef.";
			mes "When you are tired the palate doesn't work properly.";
			next;
			mes "[Oriental Oyster]";
			mes "You seem very tired now.";
			next;
			mes "[Oriental Oyster]";
			mes "If you want to make a perfect sauce, take some rest.";
			close;
		case 2:
			mes "[Oriental Oyster]";
			mes "Oh! You are here!";
			mes "Did you take a rest? How about making the sauce again?";
			erasequest 11422;// Complete Today's Sauce
			close;
		}
	}
	mes "[Oriental Oyster]";
	mes "I hope you don't waste your talent.";
	mes "Why don't you become a master sauce maker?";
	close;

S_Sauce:
	mes "[Oriental Oyster]";
	switch( rand(11428,11431) ) {
	case 11428:
		mes "First, bring me the ingredient for the refreshing flavor.";
		setquest 11428;// Ingredient for the Sauce
		break;
	case 11429:
		mes "Bring me the ingredient for the chewy texture.";
		setquest 11429;// Ingredient for the Sauce
		break;
	case 11430:
		mes "Bring me the ingredient that shines brightly.";
		setquest 11430;// Ingredient for the Sauce
		break;
	case 11431:
		mes "First, bring me the ingredient for the soft taste.";
		setquest 11431;// Ingredient for the Sauce
		break;
	}
	close;
}

function	script	check_sauce	{
	.@quest_id = getarg(0);
	.@main_quest = (ep16_cookbs == 4 || ep16_cookbs == 6 || ep16_cookbs == 8 || ep16_cookbs == 10);
	if (.@main_quest || ep16_cookbs == 26 || ep16_cookbs == 28 || ep16_cookbs == 30 || ep16_cookbs == 32) {
		if (isbegin_quest(.@quest_id) > 0) {
			mes "[Oriental Oyster]";
			mes "Yes! That's it!";
			mes "Bring it to me!";
			emotion ET_SURPRISE, getnpcid(0, "Royal Sauce Master#ep16");
			ep16_cookbs++;
			erasequest .@quest_id;
			close;
		}
		mes "[Oriental Oyster]";
		mes "Argh!";
		mes "The sauce is ruined!";
		next;
		mes "[Oriental Oyster]";
		mes "We cannot use this sauce now!";
		mes "We should start again from the beginning!";
		if (.@main_quest)
			ep16_cookbs = 3;
		else
			ep16_cookbs = 25;
		if (isbegin_quest(11428) > 0)
			erasequest 11428;
		if (isbegin_quest(11429) > 0)
			erasequest 11429;
		if (isbegin_quest(11430) > 0)
			erasequest 11430;
		if (isbegin_quest(11431) > 0)
			erasequest 11431;
		close;
	}
	return;
}

prt_cas,303,216,5	script	Muka Juice#ep16_1	4_ENERGY_BLUE,{
	check_sauce(11428);
	mes "The juice made of fresh Muka";
	mes "It is refreshing.";
	close;
}

prt_cas,307,196,5	script	Poring Jelly#ep16_1	4_ENERGY_RED,{
	check_sauce(11429);
	mes "Jelly made of chewy Poring";
	mes "It emphasizes the chewy texture...";
	close;
}

prt_cas,338,206,5	script	Shining Plant#ep16_1	4_ENERGY_WHITE,{
	check_sauce(11430);
	mes "The powder made of Shining Plant";
	mes "It adds some sparkles to the dish.";
	close;
}

prt_cas,330,211,5	script	Giantaurus Butter#ep16_	4_ENERGY_YELLOW,{
	check_sauce(11431);
	mes "Giantaurus Milk Butter";
	mes "It tastes surprisingly soft.";
	close;
}

prt_cas,302,205,5	script	Dishwasher#ep16_1	4_M_ALCHE_D,{
	if (ep16_cookbs == 21) {
		if (countitem(6935) < 15) {
			mes "[Dishwasher]";
			mes "I wash the dishes again... Again... Again...";
			mes "And it never ends!";
			next;
			mes "[Dishwasher]";
			mes "However, this is the fate of a Dishwasher!";
			next;
			mes "[Dishwasher]";
			mes "It is a fate!";
			mes "I have to endure it!";
			next;
			mes "[Dishwasher]";
			mes "Please bring me!";
			mes "More dishes to wash!";
			next;
			mes "[Dishwasher]";
			mes "I'll get over it!";
			mes "My fate!";
			close;
		}
		mes "[Dishwasher]";
		mes "Hahaha... It is a new plate.";
		mes "I'll make it squeaky clean like this!";
		next;
		mes "[Dishwasher]";
		mes "Oh... The Head Chef has been looking for you.";
		mes "Is there any problem?";
		delitem 6935,15;// Luxurious_Dish
		erasequest 11419;// Why Should I Prepare for the Banquets?
		setquest 11420;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 22;
		close;
	}
	if (ep16_cookbs == 22) {
		mes "[Dishwasher]";
		mes "Oh... The Head Chef has been looking for you.";
		mes "Is there any problem?";
		close;
	}
	if (ep16_cookbs > 22) {
		switch( checkquest(11427,PLAYTIME) ) {
		case -1:
			if (isbegin_quest(11426) == 0) {
				mes "[Dishwasher]";
				mes "Oh! Are you here to help me again?";
				mes "Isn't a clean dish makes you feel clean?";
				next;
				mes "[Dishwasher]";
				mes "Well, I guess it is just normal to feel that way!";
				mes "With that spirit! Please bring me 15 more dishes to wash!";
				next;
				mes "[Dishwasher]";
				mes "Please be careful with them, since those are some precious dishes!";
				setquest 11426;// Banquet: Washing 15 Dishes
				close;
			}
			if (countitem(6935) < 15) {
				mes "[Dishwasher]";
				mes "I wash the dishes again... Again... Again...";
				mes "And it never ends!";
				next;
				mes "[Dishwasher]";
				mes "However, this is the fate of a Dishwasher!";
				next;
				mes "[Dishwasher]";
				mes "It is a fate!";
				mes "I have to endure it!";
				next;
				mes "[Dishwasher]";
				mes "Please bring me!";
				mes "Please bring me about 15 more dishes to wash!";
				next;
				mes "[Dishwasher]";
				mes "I'll get over it!";
				mes "My fate!";
				close;
			}
			if (checkweight(1119,3) == 0) {
				mes "- You have too many items in possession.";
				mes "Please organize your inventory and try again. -";
				close;
			}
			mes "[Dishwasher]";
			mes "Hahaha... It is a new plate.";
			mes "I'll make it squeaky clean like this!";
			delitem 6935,15;// Luxurious_Dish
			erasequest 11426;// Banquet: Washing 15 Dishes
			setquest 11427;// Complete Today's Dish Collecting
			getitem 6919,4;// TokenOfHonor
			close;
		case 0:
		case 1:
			mes "[Dishwasher]";
			mes "Don't push yourself too hard.";
			mes "Why don't you go take a rest and come back tomorrow?";
			close;
		case 2:
			mes "[Dishwasher]";
			mes "Thank you for helping me last time!";
			mes "It is very important to take enough rest after work.";
			erasequest 11427;// Complete Today's Dish Collecting
			close;
		}
	}
	mes "[Dishwasher]";
	mes "Argh!";
	npctalk "Argh!", "Dishwasher#ep16_1", bc_self;
	next;
	mes "[Dishwasher]";
	mes "The housewife's eczema is back in action in my right hand!";
	npctalk "The housewife's eczema is back in action in my right hand!", "Dishwasher#ep16_1", bc_self;
	next;
	mes "[Dishwasher]";
	mes "Hode Cream!";
	mes "Please give me the Hode Cream!";
	mes "Arghhhhh!";
	npctalk "Please give me the Hode Cream!", "Dishwasher#ep16_1", bc_self;
	close;
}

prt_cas,315,204,1	script	Chef#ep16_1	4_COOK,{
	mes "[Chef]";
	mes "My cooking was perfect!";
	close;
}

prt_cas,313,204,3	script	Chef#ep16_2	4_COOK,{
	mes "[Chef]";
	mes "I cannot believe that I am able to cook with the Head Chef!";
	mes "It feels like I am dreaming!";
	close;
}

prt_cas,313,202,3	script	Chef#ep16_3	4_COOK,{
	mes "[Chef]";
	mes "Delicious!";
	close;
}

prt_cas,313,200,3	script	Chef#ep16_4	4_COOK,{
	mes "[Chef]";
	mes "I prefer to have it with salt than sugar!";
	close;
}

prt_cas,313,196,3	script	Chef#ep16_5	4_COOK,{
	mes "[Chef]";
	mes "The best way to taste it is to taste it as it is! The best flavor is the flavor of the ingredient itself!";
	close;
}

prt_cas,313,194,3	script	Chef#ep16_6	4_COOK,{
	mes "[Chef]";
	mes "Dear Head Chef! Please marry me!";
	npctalk "Dear Head Chef! Please marry me!", "Chef#ep16_6", bc_self;
	close;
}

// Hall
prt_cas,82,268,5	script	Mark Ishar#ep16_1	4_EP16_MARK,{
	if (ep16_cookbs == 18) {
		mes "[Mark]";
		mes "Hello." + strcharinfo(0) + ".";
		mes "Are you having a good time?";
		mes "May I help you?";
		npctalk "Hello.", "Mark Ishar#ep16_1", bc_self;
		emotion ET_DELIGHT;
		cutin "mark_wt_4",0;
		next;
		select("Tell him about Tamarin.");
		mes "[Mark]";
		mes "Oh!";
		mes "He...";
		mes "He was making fun of me for working here! How great!";
		emotion ET_FRET;
		cutin "mark_wt_2",0;
		next;
		mes "[Mark]";
		mes "Please tell him to work hard!";
		mes "Hahahahaha!";
		cutin "mark_wt_4",0;
		next;
		mes "[Alice]";
		mes "Oh, Tamarin must be the friend who often goes missing, right?";
		cutin "acact_03",2;
		erasequest 11416;// Why Should I Prepare for the Banquets?
		setquest 11417;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 19;
		close3;
	}
	if (ep16_cookbs == 19) {
		mes "[Mark]";
		mes "Oh!";
		mes "He...";
		mes "He was making fun of me for working here! How great!";
		cutin "mark_wt_2",0;
		next;
		mes "[Mark]";
		mes "Please tell him to work hard!";
		mes "Hahahahaha!";
		cutin "mark_wt_4",0;
		next;
		mes "[Alice]";
		mes "Oh, Tamarin must be the friend who often goes missing, right?";
		cutin "acact_03",2;
		close3;
	}
	if (ep16_cookbs == 20) {
		mes "[Mark]";
		mes "" + strcharinfo(0) + ", please tell Tamarin that.";
		mes "I hope to be able to get away from the preparation duty for the banquet.";
		cutin "mark_wt_1",0;
		close3;
	}
	mes "[Mark]";
	mes "Hello. " + strcharinfo(0) + ".";
	mes "Are you having a good time?";
	mes "May I help you?";
	npctalk "Hello.", "Mark Ishar#ep16_1", bc_self;
	emotion ET_DELIGHT;
	cutin "mark_wt_4",0;
	close3;
}

prt_cas,83,270,3	script	Alice Ishar#ep16_1	4_F_ACOLYTE,{
	if (ep16_cookbs < 19) {
		mes "[Alice]";
		mes "Mark! You shouldn't put it there. Put it here...";
		mes "Since we are working at the palace, we shouldn't overlook even the tiniest thing!";
		cutin "acact_01",2;
		close3;
	}
	if (ep16_cookbs == 19) {
		mes "[Alice]";
		mes "Hum... I know you are busy, but you shouldn't just make people work for no good reason since it is the business of the palace.";
		cutin "acact_03",2;
		next;
		mes "[Alice]";
		mes "I'll tell them about it. Would you let Tamarin know?";
		mes "The preparation for the banquet doesn't end until the banquet is over.";
		cutin "acact_01",2;
		erasequest 11417;// Why Should I Prepare for the Banquets?
		setquest 11418;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 20;
		close3;
	}
	if (ep16_cookbs == 20) {
		mes "[Alice]";
		mes "I'll tell them about it. Would you let Tamarin know?";
		mes "The preparation for the banquet doesn't end until the banquet is over.";
		cutin "acact_01",2;
		close3;
	}
	mes "[Alice]";
	mes "Oh! How did it go?";
	mes "Well, anything can happen when everyone is so busy.";
	mes "Hahaha.";
	cutin "acact_02",2;
	close3;
}

prt_cas,111,234,3	script	Magi Steen#ep16_1	4_F_PINKWOMAN,{
	if (ep16_cookbs < 17) {
		mes "[Magi]";
		mes "He... Hello...";
		cutin "bu_maggi2",2;
		close3;
	}
	if (ep16_cookbs == 17) {
		mes "[Magi]";
		mes "Ah...";
		mes "Mark must be...";
		cutin "bu_maggi1",2;
		next;
		mes "[Magi]";
		mes "I met him on the stairs over there.";
		mes "He... He was busy that I couldn't talk to him much...";
		cutin "bu_maggi3",2;
		next;
		mes "[Magi]";
		mes "It... It was great!";
		mes "Whoa...";
		emotion ET_COOL;
		cutin "bu_maggi2",2;
		erasequest 11415;// Why Should I Prepare for the Banquets?
		setquest 11416;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 18;
		close3;
	}
	if (ep16_cookbs == 18) {
		mes "[Magi]";
		mes "Ah...";
		mes "Mark must be...";
		cutin "bu_maggi1",2;
		next;
		mes "[Magi]";
		mes "I met him on the stairs over there.";
		mes "He... He was busy that I couldn't talk to him much...";
		cutin "bu_maggi3",2;
		close3;
	}
	mes "[Magi]";
	mes "...I guess it was no accident; it was inevitable...";
	cutin "bu_maggi2",2;
	close3;
}

prt_cas,111,235,3	script	Dyu Rianne#ep16_1	4_M_REDMAN,{
	if (ep16_cookbs < 16) {
		mes "[Dyu]";
		mes "Yo! Who's this!";
		mes "" + strcharinfo(0) + "!";
		mes "Nice to see you again!";
		emotion ET_SMILE;
		cutin "bu_du1",2;
		next;
		mes "[Dyu]";
		mes "What a great banquet?";
		mes "The food is delicious as well!";
		mes "" + strcharinfo(0) + ", have you tried the Grilled Griffon!";
		mes "It was awesome!";
		cutin "bu_du2",2;
		close3;
	}
	if (ep16_cookbs == 16) {
		mes "[Dyu]";
		mes "Yo! Who's this!";
		mes "" + strcharinfo(0) + "!";
		mes "Nice to see you again!";
		emotion ET_SMILE;
		cutin "bu_du1",2;
		next;
		mes "[Dyu]";
		mes "What a great banquet?";
		mes "The food is delicious as well!";
		mes "" + strcharinfo(0) + ", have you tried the Grilled Griffon!";
		mes "It was awesome!";
		cutin "bu_du2",2;
		next;
		select("Tell him about Tamarin.");
		mes "[Dyu]";
		mes "Eh?";
		mes "No wonder he wasn't coming back!";
		mes "Since he often goes missing, I didn't give it much thought.";
		emotion ET_HUK;
		cutin "bu_du5",2;
		next;
		mes "[Dyu]";
		mes "Since Mark is working here as well. Why don't we ask him?";
		cutin "bu_du3",2;
		next;
		mes "[Dyu]";
		mes "Oh, I was caught by his brother.";
		mes "I was dragged here by force...";
		cutin "bu_du2",2;
		next;
		mes "[Dyu]";
		mes "I think I have seen Mark...";
		mes "Where.... Where was it?";
		cutin "bu_du3",2;
		next;
		mes "[Dyu]";
		mes "Magi, where did we see Mark?";
		erasequest 11414;// Why Should I Prepare for the Banquets?
		setquest 11415;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 17;
		close3;
	}
	if (ep16_cookbs == 17) {
		mes "[Dyu]";
		mes "Since Mark is working here as well. Why don't we ask him?";
		cutin "bu_du3",2;
		next;
		mes "[Dyu]";
		mes "Oh, I was caught by his brother.";
		mes "I was dragged here by force...";
		cutin "bu_du2",2;
		next;
		mes "[Dyu]";
		mes "I think I have seen Mark...";
		mes "Where.... Where was it?";
		cutin "bu_du3",2;
		next;
		mes "[Dyu]";
		mes "Magi, where did we see Mark?";
		close3;
	}
	if (ep16_cookbs == 18) {
		mes "[Dyu]";
		mes "Did you hear?";
		mes "Mark is on the stairs. Go up there and see him.";
		cutin "bu_du2",2;
		close3;
	}
	mes "[Dyu]";
	mes "Haha!";
	mes "How unlucky is Mark for working in the banquet held for the heroes!";
	cutin "bu_du2",2;
	close3;
}

// Dinner room
prt_cas,361,142,5	script	Tamarin#ep16_1	4_EP16_TAMARIN,{
	if (ep16_cookbs < 15) {
		mes "[Tamarin]";
		mes "Haaaaaaa!";
		mes "What is going on...";
		emotion ET_HNG;
		npctalk "Haaaaaaa!", "Tamarin#ep16_1", bc_self;
		cutin "tama_cook_4",2;
		close3;
	}
	if (ep16_cookbs == 15) {
		mes "[Tamarin]";
		mes "Haaaaaaa!";
		mes "What is going on...";
		emotion ET_HNG;
		npctalk "Haaaaaaa!", "Tamarin#ep16_1", bc_self;
		cutin "tama_cook_4",2;
		next;
		mes "[Tamarin]";
		mes "Oh..." + strcharinfo(0) + ", is that you?";
		mes "I wondered if you would come since the heroes from all over the places were supposed to attend the banquet.";
		emotion ET_SURPRISE;
		cutin "tama_cook_2",2;
		next;
		mes "[Tamarin]";
		mes "Are you enjoying the banquet...";
		mes "...Wait! You appear to be...";
		emotion ET_HUK;
		cutin "tama_cook_4",2;
		next;
		mes "[Tamarin]";
		mes "No way!";
		mes "" + strcharinfo(0) + ", did that happen to you too?";
		next;
		mes "[Tamarin]";
		mes "When I was looking around to find more food for Dyu, someone took me to the Head Chef and made me work there!";
		cutin "tama_cook_1",2;
		next;
		mes "[Tamarin]";
		mes "They were so busy preparing for the banquet that I had no time to explain... And I ended up...";
		emotion ET_CRY;
		cutin "tama_cook_4",2;
		next;
		mes "[Tamarin]";
		mes "Haha... They were just so busy that I couldn't just quit working...";
		mes "Haha... Hahahahaha...";
		next;
		mes "[Tamarin]";
		mes "I think it is too late for me...";
		mes "Hahahaha...";
		next;
		mes "[Tamarin]";
		mes "If you find Dyu in the Banquet Hall, please tell him that I won't be able to go back with food since I am too busy.";
		mes "Hahahahaha...";
		cutin "tama_cook_3",2;
		erasequest 11413;// Why Should I Prepare for the Banquets?
		setquest 11414;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 16;
		close3;
	}
	if (ep16_cookbs > 15 && ep16_cookbs < 20) {
		mes "[Tamarin]";
		mes "I think it is too late for me...";
		mes "Hahahaha...";
		cutin "tama_cook_4",2;
		next;
		mes "[Tamarin]";
		mes "If you find Dyu in the Banquet Hall, please tell him that I won't be able to go back with food since I am too busy.";
		mes "Hahahahaha...";
		cutin "tama_cook_3",2;
		close3;
	}
	if (ep16_cookbs == 20) {
		mes "[Tamarin]";
		mes "...Phew, that is my sister.";
		mes "Well then." + strcharinfo(0) + ", why don't you come with me to enjoy the banquet...";
		emotion ET_DELIGHT;
		cutin "tama_cook_3",2;
		next;
		mes "[Tamarin]";
		mes "...I guess we should finish what we have been doing!";
		cutin "tama_cook_1",2;
		next;
		mes "[Tamarin]";
		mes "I should bring the used dishes to the kitchen.";
		mes "It would take less time if we do it together. Let's finish it and go eat something delicious!";
		cutin "tama_cook_3",2;
		erasequest 11418;// Why Should I Prepare for the Banquets?
		setquest 11419;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 21;
		close3;
	}
	if (ep16_cookbs == 21) {
		mes "[Tamarin]";
		mes "I guess we should finish what we have been doing!";
		cutin "tama_cook_1",2;
		next;
		mes "[Tamarin]";
		mes "I should bring the used dishes to the kitchen.";
		mes "It would take less time if we do it together. Let's finish it and go eat something delicious!";
		cutin "tama_cook_3",2;
		close3;
	}
	if (ep16_cookbs == 22) {
		mes "[Tamarin]";
		mes "Hum... What am I supposed to do next...";
		cutin "tama_cook_1",2;
		close3;
	}
	mes "[Tamarin]";
	mes "Whoa..." + strcharinfo(0) + ", thank you.";
	mes "Now I have some room to breathe...";
	cutin "tama_cook_3",2;
	next;
	mes "[Tamarin]";
	mes "Oh... It was just impossible for me to quit...";
	mes "When I was about to leave after reporting to the Head Chef, I was caught by Mark' brother.";
	cutin "tama_cook_1",2;
	next;
	mes "[Tamarin]";
	mes "I guess it would make my life much easier if I just give up.";
	emotion ET_HNG;
	cutin "tama_cook_3",2;
	close3;
}

prt_cas,358,124,0	script	Grilled Griffon#ep16_1	4_EP16_FOOD,{
	if (ep16_royal < 2) {
		mes "A tasty-looking Grilled Griffon.";
		close;
	}
	if (ep16_cookbs == 14) {
		mes "Place the dish carefully on the surface.";
		next;
		mes "[Tamarin]";
		mes "Haaaaaaa!";
		mes "What is going on...";
		npctalk "Haaaaaaa!", "Tamarin#ep16_1", bc_self;
		cutin "tama_cook_4",2;
		erasequest 11399;// Why Should I Prepare for the Banquets?
		setquest 11413;// Why Should I Prepare for the Banquets?
		ep16_cookbs = 15;
		close3;
	}
	if (isbegin_quest(11424) == 1) {
		if (checkweight(1119,3) == 0) {
			mes "- You have too many items in possession.";
			mes "Please organize your inventory and try again. -";
			close;
		}
		mes "Place the dish carefully on the surface.";
		erasequest 11424;// Banquet: Griffin Barbecue
		setquest 11425;// Complete Today's Grilled Griffin
		getitem 6919,4;// TokenOfHonor
	}
	mes "A tasty-looking Grilled Griffon.";
	close;
}

prt_cas_q,30,128,0	script	#ep16_evt_neriusroom	HIDDEN_WARP_NPC,2,2,{
	end;
OnTouch:
	if (ep16_royal == 15) {
		cloakonnpc "Bodyguard Crux#ep16_room01", getcharid(0);
		cloakonnpc "Spica Nerius#ep16_room01", getcharid(0);
		cloakonnpc "Skia Nerius#ep16_room01", getcharid(0);
		cloakoffnpc "Spica Nerius#ep16_room02", getcharid(0);
	}
	else if (ep16_royal > 2 && ep16_royal < 7) {
		cloakonnpc "Bodyguard Crux#ep16_room01", getcharid(0);
		cloakonnpc "Spica Nerius#ep16_room01", getcharid(0);
		cloakonnpc "Skia Nerius#ep16_room01", getcharid(0);
	}
	else if (ep16_royal > 17)
		cloakonnpc "Skia Nerius#ep16_room01", getcharid(0);
	end;
}

// Nerius
prt_cas_q,18,136,5	script	Skia Nerius#ep16_room01	4_EP16_SKIA,{
	cutin "ep16_skia_nerius03",0;
	mes "[Skia]";
	mes "Hello.";
	mes "You must be the hero whom everyone talks about.";
	mes "I am honored to meet you.";
	close3;
}

prt_cas_q,20,139,3	script	Spica Nerius#ep16_room01	4_EP16_SPICA,{
	if (ep16_royal < 2) {
		mes "[Spica]";
		mes "Are you invited to the banquet?";
		mes "This place is not the Banquet Hall.";
		close3;
	}
	if (ep16_royal == 2) {
		switch( isbegin_quest(7684) ) {
		case 0:
			mes "[Spica]";
			mes "You must be " + strcharinfo(0) + " whom everyone talks about.";
			mes "Thank you for visiting us.";
			mes "I am Spica of the Nerius family.";
			cutin "ep16_spica_nerius01",1;
			next;
			mes "[Skia]";
			mes "I am Skia.";
			mes "Nice to meet you.";
			cutin "ep16_skia_nerius01",0;
			next;
			mes "[Spica]";
			mes "And he is my bodyguard.";
			cutin "ep16_spica_nerius01",1;
			next;
			mes "[Crux]";
			mes "My name is Crux Findel.";
			mes "I am learning swordsmanship in the Nerius family.";
			cutin "ep16_crux_findel01",2;
			next;
			mes "[Spica]";
			mes "Our mother, the current head of the family, is supposed to be here.";
			mes "However, since many heroes like you," + strcharinfo(0) + ", are said to attend this banquet,";
			cutin "ep16_spica_nerius01",1;
			next;
			mes "[Spica]";
			mes "Our mother let us come here to meet and learn from them.";
			next;
			select("Where is the candidate for the throne?");
			cutin "ep16_spica_nerius05",1;
			mes "[Spica]";
			mes "Oh, you must be invited as the observer to the ritual...";
			mes "I see.";
			npctalk "He must be in the library.", "Bodyguard Crux#ep16_room01", bc_self;
			next;
			cutin "ep16_spica_nerius01",1;
			mes "[Spica]";
			mes "Erich is in the royal library.";
			mes "I guess he could be looking for blueprints of some sort which interest him.";
			next;
			cutin "ep16_spica_nerius02",1;
			mes "[Spica]";
			mes "Nerius is not interested in the throne.";
			mes "Erich didn't have to participate in the Royal Assembly.";
			next;
			cutin "ep16_spica_nerius01",1;
			mes "[Spica]";
			mes "Since he is just a candidate merely for effect, he must be doing what he wants to do now.";
			next;
			select("Why aren't you interested in the throne?");
			cutin "ep16_spica_nerius05",1;
			mes "[Spica]";
			mes "It is one of the characteristics of the Nerius.";
			mes "The family is led by women for generations. Therefore, we turn out more queens than kings.";
			next;
			cutin "ep16_spica_nerius03",1;
			mes "[Spica]";
			mes "If Erich hasn't come forth, one of us, Skia and I would have been elected as a candidate for the queen.";
			next;
			cutin "ep16_spica_nerius02",1;
			mes "[Spica]";
			mes "Our mother didn't like it.";
			mes "That's why Erich became a candidate for the throne. Poor cousin...";
			next;
			cutin "ep16_spica_nerius01",1;
			mes "[Spica]";
			mes "Well, I guess that's enough information about our family.";
			mes "Have you exchanged greetings with all other families?";
			next;
			mes "[Spica]";
			mes "Since freedom doesn't come often for us, I tend to enjoy it as much as possible.";
			mes "So...";
			next;
			cutin "ep16_skia_nerius03",0;
			mes "[Skia]";
			mes "Why don't you enjoy it with us?";
			mes "I believe the lord of the Heine family would make a good friend too.";
			next;
			cutin "ep16_spica_nerius06",1;
			mes "[Spica]";
			mes "Skia, my beloved twin.";
			mes "You need to learn to speak more elegantly.";
			npctalk "Gosh, stop nagging...", "Skia Nerius#ep16_room01", bc_self;
			next;
			npctalk "I can hear you.", "", bc_self;
			cutin "ep16_spica_nerius07",1;
			mes "[Spica]";
			mes "Anyways, what I want to say is that";
			mes "the Nerius family is always open to you," + strcharinfo(0) + ", so please visit us";
			mes "anytime you want.";
			npctalk "......", "Bodyguard Crux#ep16_room01", bc_self;
			next;
			setquest 7684;// Visit the Nerius
			completequest 7684;// Visit the Nerius
			if (achievementinfo(130000, ACHIEVEINFO_COUNT2) == 0)
				achievementupdate(130000, ACHIEVEINFO_COUNT2, 1);
			break;
		case 1:
			completequest 7684;
			break;
		case 2:
			if (isbegin_quest(7685) == 1) {
				mes "[Spica]";
				mes "I guess other families must be ready by now and about to move soon.";
				mes "We may have some time to spare.";
				cutin "ep16_spica_nerius01.bmp",1;
				next;
				mes "[Spica]";
				mes "" + strcharinfo(0) + ", why don't you go back to your room and wait for the message?";
				close;
			}
			mes "[Spica]";
			mes "Why don't you go visit other families if you have not visited them all?";
			close;
		}
		if (isbegin_quest(7682) == 1 && isbegin_quest(5402) == 2 && isbegin_quest(7683) == 2 && isbegin_quest(7684) == 2 && ep16_wal > 1 && ep16_wig > 1 && ep16_lug > 1 && ep16_gaobs > 1) {
			completequest 7682;// Socializing Starts from an Eye Contact
			setquest 7685;// What Is the Next Thing on the Schedule ?
			mes "[Spica]";
			mes "I guess other families must be ready by now and about to move soon.";
			mes "We may have some time to spare.";
			cutin "ep16_spica_nerius01.bmp",1;
			next;
			mes "[Spica]";
			mes "" + strcharinfo(0) + ", why don't you go back to your room and wait for the message?";
			close3;
		}
		cutin "ep16_spica_nerius01.bmp",1;
		mes "[Spica]";
		mes "We must get prepared for the Banquet now. We need some time to dress up.";
		next;
		mes "[Spica]";
		mes "Why don't you go visit other families if you have not visited them all?";
		next;
		mes "[Spica]";
		mes "I'll send you a formal invitation to make up for this.";
		close3;
	}
	if (ep16_royal < 7)
		end;
	if (ep16_royal == 7) {
		mes "[Spica]";
		mes "I have heard the story briefly from Skia.";
		mes "Lord Nyhill must have a constitutional weakness for alcohol.";
		cutin "ep16_spica_nerius01",1;
		next;
		mes "[Spica]";
		mes "You are not hiding anything, right?";
		next;
		if (select( "I saw someone suspicious.", "No." ) == 2) {
			mes "[Spica]";
			mes "You are lying.";
			mes "I have to let the elders know about this anyway.";
			cutin "ep16_spica_nerius02",1;
			next;
			mes "[Spica]";
			mes "I wonder if the old folks would hear me out though.";
			close;
		}
		mes "[Spica]";
		mes "Skia told me something similar to that.";
		mes "Crux didn't find out much.";
		next;
		mes "[Spica]";
		mes "I guess some shady characters must have mixed in with the bunch of temporary employees hired for the banquet.";
		next;
		cutin "ep16_spica_nerius02",1;
		mes "[Spica]";
		mes "...Anyways, I guess we have to warn the elders about this.";
		close3;
	}
	if (ep16_royal < 17)
		end;
	mes "[Spica]";
	mes "Sorry about all the trouble.";
	mes "How unlucky of you to be involved in this mess.";
	cutin "ep16_spica_nerius01",1;
	next;
	mes "[Spica]";
	mes "Well, I am not doing well either.";
	mes "The royal family is focusing on finding out who is pulling the strings.";
	next;
	mes "[Spica]";
	mes "...All they can do is to sort out the puppets infiltrated into the palace.";
	mes "But it is better than doing nothing.";
	mes "Now... then.";
	next;
	select("Where is Skia?");
	mes "[Spica]";
	mes "She went to hang out with Lord Nyhill!";
	mes "I don't know what she sees in the pretty boy with no substance.";
	cutin "ep16_spica_nerius03",1;
	next;
	mes "[Spica]";
	mes "Could it be...";
	mes "Could it be that?";
	mes "Is she enchanted by his looks?";
	mes "Crux, you answer me!";
	cutin "ep16_spica_nerius05",1;
	next;
	cutin "ep16_crux_findel03",2;
	mes "[Crux]";
	mes "Wha... What? Well...";
	mes "It sounds plausible...";
	mes "By the way, Lord Nyhill is under probation so he is not supposed to leave his room.";
	next;
	mes "[Spica]";
	mes "Well, I stand corrected. She went to visit Nyhill in his room.";
	mes "...Isn't it the same thing?";
	cutin "ep16_spica_nerius06",1;
	next;
	select("Crux, cheer up...");
	cutin "ep16_crux_findel03",2;
	mes "[Crux]";
	mes "Oh, are you leaving now?";
	mes "It sure is wise of you to leave before the lady's head explodes.";
	next;
	cutin "ep16_crux_findel02",2;
	mes "[Crux]";
	mes "See you later.";
	close2;
	cutin "",255;
	npctalk "Why are you letting the guest out?", "", bc_self;
	setpcblock PCBLOCK_NPC, true;
	sleep2 3000;
	npctalk "Yes, yes, my lady. I am at your service. Where are you?", "Bodyguard Crux#ep16_room01", bc_self;
	sleep2 3000;
	npctalk "You are not the one I am looking for!", "", bc_self;
	sleep2 3000;
	npctalk "Shall I leave too?", "Bodyguard Crux#ep16_room01", bc_self;
	sleep2 3000;
	npctalk "I don't mean that!", "", bc_self;
	sleep2 3000;
	setpcblock PCBLOCK_NPC, false;
	unittalk getcharid(3), "" + strcharinfo(0) + " : (Oh my, I'd better get out now.)", bc_self;
	end;
}

prt_cas_q,21,140,3	script	Bodyguard Crux#ep16_room01	4_EP16_CRUX,{
	cutin "ep16_crux_findel01",1;
	mes "[Crux]";
	mes "Don't mind me.";
	close3;
}

prt_cas_q,23,133,2	script	Nyhill M. Heine#ep16_nroom01	4_EP16_NIHIL,{
	if (ep16_royal == 16) {
		cutin "ep16_nihi_miseria_heine01",2;
		mes "[Nyhill]";
		mes "We'd better move now since the situation doesn't look good.";
		close3;
	}
}

prt_cas_q,18,136,3	script	Spica Nerius#ep16_room02	4_EP16_SPICA,{
	if (ep16_royal == 15) {
		mes "[Spica]";
		mes "You are rather slow-footed.";
		mes "It has been a while since I got the message that you came back.";
		cutin "ep16_skia_shadow01",1;
		next;
		mes "[Spica]";
		mes "I invited you for no special reason.";
		mes "Since they keep calling for meetings to discuss what has happened during the ritual.";
		next;
		cloakoffnpc "Nyhill M. Heine#ep16_nroom01", getcharid(0);
		mes "[Spica]";
		mes "There comes lord of the Heine family.";
		mes "You seem to move around rather freely considering that you are under confinement.";
		next;
		mes "[Nyhill]";
		mes "...?";
		mes "" + strcharinfo(0) + ", I have something to tell you.";
		mes "And about the confinement, it is OK as long as I stay in the western wing of the royal villa...";
		cutin "ep16_nihi_miseria_heine01",2;
		next;
		mes "[Nyhill]";
		mes "By the way, Skia? What are you doing?";
		mes ".......";
		next;
		mes "[Spica]";
		mes "Skia?";
		mes "She is not here now.";
		cutin "ep16_skia_shadow03",0;
		next;
		mes "[Nyhill]";
		mes "Oh, this must be it.";
		mes "The shadow duty.";
		mes "What is going on?";
		cutin "ep16_nihi_miseria_heine01",2;
		next;
		mes "[Skia]";
		mes "...How could you tell at a glance?";
		mes "I am busted.";
		mes "Am I a bad actress?";
		cutin "ep16_skia_shadow04",0;
		next;
		mes "[Nyhill]";
		mes "Even if you are twins, you don't look exactly the same.";
		mes "I just noticed certain differences.";
		cutin "ep16_nihi_miseria_heine02",2;
		next;
		mes "[Skia]";
		mes "Really? I am flattered though.";
		mes "I am glad that you have been looking at me, not Spica.";
		cutin "ep16_skia_shadow05",0;
		next;
		select("Why are you in that outfit?");
		mes "[Skia]";
		mes "Hum... It is to protect Spica who will be the head of the Nerius family.";
		mes "Sometimes, I stand forward instead of Spica.";
		cutin "ep16_skia_shadow01",0;
		next;
		mes "[Skia]";
		mes "While my sister learned what the head of the family must know from our mother,";
		mes "I learned to hide and fight.";
		cutin "ep16_skia_shadow02",0;
		next;
		mes "[Skia]";
		mes "That is why people call me the shadow princess.";
		mes "It is my first time attending an official event in the light.";
		next;
		mes "[Skia]";
		mes "Anyways, I am filling in for Spica who has left to run some errands now.";
		mes "I need to show how she is attending the royal banquet with grace.";
		cutin "ep16_skia_shadow04",0;
		next;
		mes "[Nyhill]";
		mes "Thanks to Lady Spica, I get to move around as much as I can now...";
		cutin "ep16_nihi_miseria_heine01",2;
		next;
		mes "[Nyhill]";
		mes "When will she come back?";
		mes "The meeting of the representatives has been over...";
		next;
		select("What brought you here?");
		mes "[Nyhill]";
		mes "I have come to deliver you the message that there is a mission for you.";
		next;
		cutin "ep16_nihi_miseria_heine04",2;
		mes "[Nyhill]";
		mes "To be exact, I volunteered since I heard that you were visiting the Nerius family.";
		npctalk "...The room was stuffy.", "Nyhill M. Heine#ep16_nroom01";
		next;
		cutin "ep16_skia_shadow03",0;
		mes "[Skia]";
		mes "It must be about the incident during the ritual, right?";
		mes "What does the hero have to do with the royal family's business?";
		next;
		cutin "ep16_nihi_miseria_heine01",2;
		mes "[Nyhill]";
		mes "Well, you can ask Spica later.";
		mes "She was there in the meeting, you know.";
		next;
		mes "[Nyhill]";
		mes "This conversation is getting too long.";
		mes "Please go meet my grandfather and father first.";
		next;
		mes "[Nyhill]";
		mes "They must be waiting for you.";
		next;
		cutin "ep16_skia_shadow04",0;
		mes "[Skia]";
		mes "Hum... I see. I shall ask Spica to fill me in with the details when she comes back.";
		next;
		cutin "ep16_nihi_miseria_heine01",2;
		mes "[Nyhill]";
		mes "Then, let's go.";
		next;
		cutin "ep16_skia_shadow04",0;
		mes "[Skia]";
		mes "" + strcharinfo(0) + ", please come to see me again later!";
		ep16_royal = 16;
		setquest 7698;// Heine Now
		erasequest 7697;// Invitation from the Nerius
		close3;
	}
	if (ep16_royal == 16) {
		mes "[Skia]";
		mes "I have to wait for Spica's return and change clothes.";
		mes "I cannot leave now.";
		cutin "ep16_skia_shadow04",1;
		next;
		mes "[Skia]";
		mes "What would happen when I get out like this and encounter Spica on the way?";
		mes "We will be in trouble.";
		close3;
	}
	end;
OnInit:
	cloakonnpc();
	cloakonnpc "Nyhill M. Heine#ep16_nroom01";
	end;
}

prt_cas_q,23,187,3	script	Mysterious Person#ep16wal	4_M_04,{
	end;
OnInit:
	cloakonnpc();
	end;
}

// Walther
prt_cas_q,20,184,3	script	Ian Walther#ep16wal	1_M_JOBTESTER,5,5,{
	if (BaseLevel < 100) {
		mes "[Ian]";
		mes "What are you doing here, you punk?";
		mes "Get out of here now before I call someone to drag you out!";
		close;
	}
	if (ep16_wal == 0) {
		if (isbegin_quest(7682) != 1) {
			mes "[Ian]";
			mes "How did you get in here.";
			mes "Only the people with permission are allowed to be here.";
			next;
			mes "[Ian]";
			mes "Get out of here now before I call someone to drag you out!";
			close;
		}
		mes "[Ian]";
		mes "Are you the hero invited to the banquet? The Royal Assembly to be exact.";
		mes "Nice to meet you. I am ^0000cdIan Walther^000000.";
		next;
		mes "[Ian]";
		mes "Although ^0000cdthe Walther family doesn't participate in the Royal Assembly^000000, we are attending the banquet as one of the seven royal families.";
		next;
		mes "[Ian]";
		mes "This is the ^0000cdheir of the Walther family, Isenhonor^000000. He is my nephew.";
		next;
		mes "[Ian]";
		mes "He will be the head of the family as he attains adulthood this year. As of now, I am in charge of the family business.";
		next;
		mes "[Isenhonor]";
		mes "How do you do? I am ^0000cdIsenhonor Walther^000000.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Why aren't you participating in the Royal Assembly when there is the heir?";
		next;
		mes "[Ian]";
		mes "I wonder of you know this, ^0000cdthe candidate from our family was involved in an unfortunate incident^000000 in the ^0000cdprevious Royal Assembly^000000.";
		next;
		mes "[Ian]";
		mes "^0000cdIsenarm^000000 who was the candidate for the throne acted violently all of a sudden. ^0000cdHe ended up being killed by the heir of the Geoborg family^000000.";
		next;
		mes "[Ian]";
		mes "After discussion, our family decided not to take part in the ^0000cdRoyal Assembly^000000 this time.";
		next;
		mes "[Isenhonor]";
		mes "......";
		next;
		mes "[Ian]";
		mes "Well then. I hope you enjoy the banquet. The banquet is held for you after all.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes. Thank you for sparing me some time.";
		setquest 14469;// Look around the Walther Family
		ep16_wal = 1;
		close;
	}
	if (ep16_wal == 1)
		callsub S_Mysterious;
	mes "[Ian]";
	mes "Are you enjoying the banquet?";
	mes "I hope you enjoy the banquet since it is held for you.";
	close;

S_Mysterious:
	if (isbegin_quest(14516) != 2) {
		cloakoffnpc "Mysterious Person#ep16wal", getcharid(0);
		mes "[Man from the Richard]";
		mes "Long time no see, Ian.";
		next;
		mes "[Ian]";
		mes "Why are you here? I thought we agreed ^0000cdnot to see each other ever again after the previous Royal Assembly^000000.";
		next;
		mes "[Man from the Richard]";
		mes "I remember that, but the heir of your family has been busy these days.";
		next;
		mes "[Man from the Richard]";
		mes "He has been digging around so much that the story has reached me.";
		mes "No one seems to pay much attention, but you never know.";
		next;
		mes "[Ian]";
		mes "I told Isenhonor to ^0000cdstop investigating about his brother's death^000000.";
		next;
		mes "[Man from the Richard]";
		mes "He should. It would get us both in trouble if the fact that ^0000cdwe were going to kill the imperial candidate of the Geoborg family^000000 leaks out.";
		next;
		mes "[Ian]";
		mes "No one knows about it, you know.";
		mes "The ^0000cdplan was ruined ^000000as Isenarm was killed while acting violently.";
		next;
		mes "[Man from the Richard]";
		mes "I am sorry about your heir.";
		next;
		mes "[Ian]";
		mes "I don't care who becomes the heir as long as he leads the family well.";
		mes "I don't understand why Isenarm who has behaved so well acted that way though...";
		next;
		mes "[Ian]";
		mes "He must have sensed something to act like than when he was about to be elected as the king... There is no way to find out now...";
		mes "Geoborg has been silent as well ever since, I hear.";
		next;
		mes "[Man from the Richard]";
		mes "Yes, the word has it.";
		next;
		mes "[Ian]";
		mes "Since Isenarm was killed by Geoborg, ^0000cdthe Walther family has been excluded from the Royal Assembly^000000 this time.";
		mes "He was a great boy. It is a shame since he was the perfect candidate for the throne.";
		next;
		mes "[Man from the Richard]";
		mes "The important thing is that as long as we both keep silent, the truth will remain unknown forever.";
		mes "Then, I guess we will never see each other again.";
		next;
		mes "[Man from the Richard]";
		mes "Make sure to warn your heir not to dig around the incident, no more.";
		mes "If it gets out, my family can deny it.";
		next;
		mes "[Man from the Richard]";
		mes "However, you Ian will be in trouble as the same member of the family since there is no witness or proof left now.";
		next;
		mes "[Ian]";
		mes "Are you threatening me?";
		next;
		mes "[Man from the Richard]";
		mes "Shh... You'd better keep your voice down. Your heir may hear you.";
		mes "I mean, we should be careful.";
		next;
		mes "[Man from the Richard]";
		mes "Well, I cannot be absent for so long anyway. Let me head back now.";
		next;
		cloakonnpc "Mysterious Person#ep16wal", getcharid(0);
		mes "[Ian]";
		mes "Argh... How dare...!";
		mes "I shouldn't have worked with him in the first place. I lost my poor nephew for nothing.";
		setquest 14516;// Suspicious Shadow
		completequest 14516;// Suspicious Shadow
		close;
	}
	return;

OnTouch:
	if (ep16_wal == 1)
		callsub S_Mysterious;
	end;
}

prt_cas_q,14,184,5	script	Isenhonor Walther#ep16wal	4_M_1STPRIN1,{
	if (checkweight(1304,3) == 0) {
		mes "[Isenhonor Walther]";
		mes "You seem to have a lot of luggage. Are you OK?";
		mes "It looks a lot and large.";
		next;
		mes "[Isenhonor Walther]";
		mes "How about cutting down some?";
		close;
	}
	.@name$ = strcharinfo(0);
	if (ep16_wal == 0) {
		mes "[Isenhonor]";
		mes "You must be an adventurer. Thank you for visiting this gloomy place.";
		next;
		mes "[Isenhonor]";
		mes "The representative of our family is over there. I hope you have a good time then.";
		close;
	}
	if (ep16_wal == 1) {
		mes "[" + .@name$ + "]";
		mes "Hello?";
		next;
		mes "[Isenhonor]";
		mes "What are you doing here? The Banquet Hall is over there.";
		next;
		mes "[" + .@name$ + "]";
		mes "I was sorry that I didn't get the time to talk to you then.";
		next;
		mes "[Isenhonor]";
		mes "What story? You mean the story of my brother being killed for his violent behavior? You seemed to hear it so eagerly. I hope you don't believe that bullshit.";
		next;
		mes "[" + .@name$ + "]";
		mes "Oh, well...";
		next;
		mes "[Isenhonor]";
		mes "I cannot believe that my brother has acted violently. Even if he did, there must have been a ^0000cdreason.^000000";
		next;
		mes "[Isenhonor]";
		mes "My brother, he must have done it for something. No one knows the truth, but people seem to believe the gossip.";
		next;
		mes "[" + .@name$ + "]";
		mes "If you want to clear the name of your brother, you can investigate on your own.";
		next;
		mes "[Isenhonor]";
		mes "I am trying. But ^0000cdthe elders of my family don't want me to dig out the dishonorable incident^000000.";
		next;
		mes "[Isenhonor]";
		mes "Also, it is impossible to meet ^0000cdErnst Geoborg^000000.";
		next;
		mes "[" + .@name$ + "]";
		mes "Wouldn't he meet you?";
		next;
		mes "[Isenhonor]";
		mes "No. any access to him is blocked.";
		next;
		mes "[Isenhonor]";
		mes "The ^0000cdGuardian Knight^000000 and ^0000cdErnst Geoborg^000000 are the only people who know what has happened that day. However it is impossible to meet them. I don't know where to begin...";
		next;
		mes "[" + .@name$ + "]";
		mes "A Guardian Knight? Did your brother have a Guardian Knight?";
		next;
		mes "[Isenhonor]";
		mes "Yes. Each member of the Walther family has a Guardian Knight. Our family is in overseas trade so that we often travel by ship.";
		next;
		mes "[Isenhonor]";
		mes "As you know, the sailors are not a gentle bunch and we tend to carry money with us so that we are often threatened. We all have to bring Guardian Knights with us.";
		next;
		mes "[" + .@name$ + "]";
		mes "Where is your Guardian Knight then, Isenhonor?";
		next;
		mes "[Isenhonor]";
		mes "I am sick of Guardian Knights since my brother's Guardian Knight abandoned my brother and ran away. I don't want to call them Guardian Knights.";
		next;
		mes "[Isenhonor]";
		mes "What should I call a Guardian Knight who betrays the master and runs away?";
		next;
		mes "[" + .@name$ + "]";
		mes "I think it would be a good idea to start from your Guardian Knight. Since they worked together as Guardian Knight, he must know something.";
		next;
		mes "[Isenhonor]";
		mes "Well, when I asked, he told me he knew nothing. If he did, he must have told me before I even asked.";
		mes "They were pretty close and often exercised together.";
		next;
		mes "[Isenhonor]";
		mes "Oh, well, since they were so close, he could have tried to defend his friend.";
		mes "Why didn't I think of that...";
		next;
		mes "[" + .@name$ + "]";
		mes "Let me talk to him now. If I hear anything, it would be a good thing. Even if I don't get to hear anything it would still count as a try.";
		next;
		mes "[Isenhonor]";
		mes "Why would you go through such trouble?";
		next;
		mes "[" + .@name$ + "]";
		mes "Well, I have a hunch. As an adventurer, my instinct says that there must be something going on.";
		next;
		mes "[Isenhonor]";
		mes "Do all the adventurers count on their hunch like that? This could be dangerous. It is no matter to approach with a hunch.";
		next;
		mes "[" + .@name$ + "]";
		mes "That is why it is called an adventure. Adventurers where the adventures are.";
		next;
		mes "[Isenhonor]";
		mes "I don't understand.";
		next;
		mes "[" + .@name$ + "]";
		mes "You may call it a needless meddling out of curiosity. However, I cannot neglect anyone in distress.";
		next;
		mes "[Isenhonor]";
		mes "I appreciate your help though. I am desperate enough to accept your favor. However, I don't think you wouldn't hear much from the Guardian Knight though.";
		next;
		mes "[Isenhonor]";
		mes "If you want to meet him anyway, go to ^0000cdour manor in the south of Alberta^000000. He must be there.";
		next;
		mes "[" + .@name$ + "]";
		mes "Well then.";
		completequest 14469;// Look around the Walther Family
		setquest 14470;// In Search of the Guardian Knight
		ep16_wal = 2;
		if (achievementinfo(130000, ACHIEVEINFO_COUNT3) == 0)
			achievementupdate(130000, ACHIEVEINFO_COUNT3, 1);
		if (isbegin_quest(7682) == 1 && isbegin_quest(5402) == 2 && isbegin_quest(7683) == 2 && isbegin_quest(7684) == 2 && ep16_wal > 1 && ep16_wig > 1 && ep16_lug > 1 && ep16_gaobs > 1) {
			completequest 7682;// Socializing Starts from an Eye Contact
			setquest 7685;// What Is the Next Thing on the Schedule ?
		}
		close;
	}
	if (ep16_wal < 6) {
		mes "[Isenhonor]";
		mes "Adventurer, how did your meeting with the Guardian Knight in Alberta go? Not that I expect too much...";
		next;
		mes "[Isenhonor]";
		mes "However, still, I have hoped to hear a good news from you...";
		close;
	}
	if (ep16_wal == 6) {
		if (countitem(6929) < 1) {
			mes "[Isenhonor]";
			mes "Adventurer, you are back. How did it go?";
			next;
			mes "[" + .@name$ + "]";
			mes "Yes, I have something for you...";
			mes "Oh? Where did it go?";
			next;
			mes "[" + .@name$ + "]";
			mes "I must have left it back. Let me go bring it for you.";
			close;
		}
		mes "[Isenhonor]";
		mes "You are back. How did it go?";
		next;
		mes "I told him the story of meeting the Guardian Knight of Isenarm and the conversation with him.";
		next;
		mes "[" + .@name$ + "]";
		mes "This is the ^0000cdletter^000000.";
		next;
		mes "[Isenhonor]";
		mes "Well, this indeed is the seal of our family, and it is my brother's handwriting.";
		next;
		mes "[Isenhonor]";
		mes "As you said, my brother's Guardian Knight must have not betrayed my brother.";
		next;
		mes "[Isenhonor]";
		mes "My brother indeed must have done such a thing for a reason.";
		next;
		mes "[" + .@name$ + "]";
		mes "I guess this is all I can do you now.";
		next;
		mes "[Isenhonor]";
		mes "I understand. I should take on from here. Thank you for your help.";
		next;
		mes "[Isenhonor]";
		mes "Please come back anytime when you need the help of the Walther family.";
		next;
		mes "[Isenhonor]";
		mes "You are a valuable guest for us, the Walther family, from now on, dear adventurer. I'll help you anytime you want.";
		delitem 6929,1;// Letters_Stamped_Seal
		completequest 14474;// Report to Isenhonor
		getitem 6919,10;// TokenOfHonor
		getexp 1000000,500000;
		ep16_wal = 7;
		close;
	}
	mes "[Isenhonor]";
	mes "Based on the piece of information you have brought me, I am collecting other information too. It is not enough year, but I believe that I can unveil the truth someday.";
	next;
	mes "[Isenhonor]";
	mes "I called Simon from Alberta. I need to gather all the help I can get now.";
	next;
	mes "[Isenhonor]";
	mes "I will see you again when the truth is revealed.";
	close;
}

alberta,187,147,7	script	Guardian Knight#ep16wal	4_M_KNIGHT_SILVER,{
	.@name$ = strcharinfo(0);
	if (ep16_wal == 2) {
		mes "[" + .@name$ + "]";
		mes "Well, I am looking for the Guardian Knight of Isenhonor. Where can I find him?";
		next;
		mes "[Simon]";
		mes "I am his Guardian Knight. What's the matter? Has anything happened to him?";
		next;
		mes "[Simon]";
		mes "I shouldn't have stayed behind. Is he all right?";
		next;
		mes "[Simon]";
		mes "Kidnapping? Injury? Robbery? Fall? What is it? Oh, I should go there now...!";
		next;
		mes "[" + .@name$ + "]";
		mes "Calm down. Isenhonor is all right. Nothing happened. I am here to ask you something.";
		next;
		mes "[Simon]";
		mes "Phew, I guess it wasn't my lord who called me. I am still glad that I is OK.";
		next;
		mes "[Simon]";
		mes "What are you going to ask me? Well, who are you by the way?";
		next;
		mes "[I told him the conversation with Isenhonor in the palace briefly.]";
		next;
		mes "[Simon]";
		mes "Oh, sorry about that. I am ^0000cdSimon Walther Marshall^000000.";
		next;
		mes "[Simon]";
		mes "I don't know the whereabouts of ^0000cdKain Walther Walker^000000 who used to be the Guardian Knight of Isenarm, unfortunately.";
		next;
		mes "[" + .@name$ + "]";
		mes "You both have Walther in your names. Is there a special reason for it?";
		next;
		mes "[Simon]";
		mes "Every knight belongs to the Walther who is assigned to a member of the Walther family is given the name, Walther.";
		next;
		mes "[Simon]";
		mes "The name gives a sense of belonging. Also it gives us the pride to have been recognized as excellent knights.";
		next;
		mes "[" + .@name$ + "]";
		mes "Right. By the way, did you say that you know nothing about Kain Walther Walker?";
		next;
		mes "[Simon]";
		mes "No, I don't.";
		mes "However...";
		next;
		mes "[" + .@name$ + "]";
		mes "However...?";
		next;
		mes "[Simon]";
		mes "I heard a ^0000cdstrange gossip^000000 from some of the knights there when I escorted Isenhonor to the palace.";
		next;
		mes "[Simon]";
		mes "They heard ^0000cda pickpocket locked in the basement of the palace^000000 babbling about how he had seen a person from the Walther family in a foreign country.";
		next;
		mes "[Simon]";
		mes "However, no family member left the country due to the royal banquet. It was strange to hear that. I think that person could be ^0000cdKain^000000.";
		next;
		mes "[Simon]";
		mes "I wanted to investigate myself considering the importance of the matter. But Isenhonor ordered me to go back to Alberta so I had to come back here.";
		next;
		mes "[" + .@name$ + "]";
		mes "The pickpocket in the underground prison?";
		next;
		mes "[Simon]";
		mes "Yes. I don't know his real name, but he is called ^0000cdBigfoot^000000 in the underworld.";
		next;
		mes "[Simon]";
		mes "Minor offenders like pickpockets are usually locked in this other place. But that guy was caught pickpocketing in Arunafeltz.";
		next;
		mes "[Simon]";
		mes "Due to diplomatic issues, we have taken his custody and locked him in the underground prison.";
		next;
		mes "[Simon]";
		mes "That guy seems to have a lot of information from all over the continent. Even when his words about seen the person of the Walther family wasn't true, I felt that I could get useful information from him.";
		next;
		mes "[" + .@name$ + "]";
		mes "Whether the information he has is true or not, I would rather go visit him. Thank you for the information.";
		next;
		mes "[Simon]";
		mes "Please say hello to my master when you get back to the palace. Tell him that I will be guarding this place well.";
		next;
		mes "[Simon]";
		mes "And, let him know that he can call me anytime. I would gladly go there to guard him.";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes, I'll let him know for sure.";
		next;
		mes "[Simon]";
		mes "Have a safe trip then!";
		erasequest 14470;// In Search of the Guardian Knight
		setquest 14471;// To the Royal Prison
		ep16_wal = 3;
		close;
	}
	if (ep16_wal == 3) {
		mes "[Simon]";
		mes "How did your visit to the prison go?";
		next;
		mes "[Simon]";
		mes "You can go see the convict called ^0000cdBigfoot^000000 locked in the ^0000cdUnderground prison of the palace^000000.";
		next;
		mes "[Simon]";
		mes "Didn't you hear anything else from Isenhonor? Please extend my greetings to him when you go to Prontera.";
		close;
	}
	if (ep16_wal > 6) {
		mes "[Simon]";
		mes "Dear adventurer! At last, Master Isenhonor called me! I am happy that I can guard my lord nearby.";
		next;
		mes "[" + .@name$ + "]";
		mes "Glad to hear that. Then what are you doing here now?";
		next;
		mes "[Simon]";
		mes "I am waiting for the ship to Izlude. I will rush to the ship when it comes here.";
		next;
		mes "[Simon]";
		mes "I have a lot of questions for you, but I guess I'd better hear the story from my master. Then dear adventurer, have a safe trip!";
		close;
	}
	mes "[Guardian Knight]";
	mes "What if anything happens to my master while I am gone...";
	mes "Shall I leave for Prontera now?";
	next;
	mes "[Guardian Knight]";
	mes "No, he will be mad at me.";
	mes "He will call me someday. Let's wait here.";
	next;
	mes "[Guardian Knight]";
	mes "Just a little more.";
	close;
}

alberta,48,30,7	script	Butler for the Walthers#ep16wal	4_M_MANAGER,{
	if (ep16_wal == 2) {
		mes "[Butler for the Walthers]";
		mes "What a fine day. However, the house feels to empty and lonely.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Hello? Is this the manor of the Walther family?";
		next;
		mes "[Butler for the Walthers]";
		mes "Yes, it is. What brought you here. Since everyone has left for Prontera, you cannot meet the master now.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Isenhonor has sent me here to meet the Guardian Knight.";
		next;
		mes "[Butler for the Walthers]";
		mes "Oh, really? He has been waiting for Isenhonor's call so much! I am happy for him.";
		next;
		mes "[Butler for the Walthers]";
		mes "Simon, the Guardian Knight of Isenhonor is near the ^0000cddock^000000 where the ship leaving for ^0000cdIzlude^000000 is anchored.";
		next;
		mes "[Butler for the Walthers]";
		mes "He is waiting there to go to Prontera as soon as possible when Isenhonor calls him.";
		next;
		mes "[Butler for the Walthers]";
		mes "Go to where the ship to Izlude is anchored.";
		close;
	}
	mes "[Butler for the Walthers]";
	mes "Mahatra Mornen, the butler of the Alkish family, I cannot take his arrogance anymore.";
	next;
	mes "[Butler for the Walthers]";
	mes "They only own a manor. And they call themselves as the best family in Alberta? What do they think of the Walther family!";
	next;
	mes "[Butler for the Walthers]";
	mes "They cannot even make eye contact when they meet us.";
	next;
	mes "[Butler for the Walthers]";
	mes "Our master is just too gentle to leave them alone. How classless.";
	close;
}

prt_pri00,57,119,1	script	Bigfoot#ep16wal	1_M_JOBGUIDER,{
	if (ep16_wal < 3) {
		mes "[Bigfoot]";
		mes "Fried chicken, baked potato, beer, fresh cheese... Ha.... I crave those ordinary dishes now that I am locked in a place like this.";
		mes "I would marry anyone who brings them to me.";
		next;
		emotion ET_HUK;
		mes "[Bigfoot]";
		mes "Argh! Not again! I am terrified!";
		mes "But I would be safe as long as I am locked in here.";
		close;
	}
	.@name$ = strcharinfo(0);
	if (ep16_wal == 3) {
		mes "[Bigfoot]";
		mes "Fried chicken, baked potato, beer, fresh cheese... Ha.... I crave those ordinary dishes now that I am locked in a place like this.";
		next;
		mes "[Bigfoot]";
		mes "I would marry anyone who brings them to me.";
		next;
		emotion ET_HUK;
		mes "[Bigfoot]";
		mes "Argh! Not again! I am terrified! But I would be safe as long as I am locked in here.";
		next;
		mes "[" + .@name$ + "]";
		mes "Bigfoot?";
		next;
		emotion ET_FRET;
		mes "[Bigfoot]";
		mes "Oh no! I won't eat that! I don't want to have another bite of that pigs feed! I may not be a gourmet, but my tongue hasn't been decomposed or anything!";
		next;
		mes "[Bigfoot]";
		mes "Bring me something I can eat! I know that I am locked in the prison, but I deserve to eat something edible!";
		next;
		mes "[" + .@name$ + "]";
		mes "There must have been a misunderstanding. I am not the warden here. I came here to meet you.";
		next;
		mes "[Bigfoot]";
		mes "You are now? I am relieved to hear that. The food here just sucks.";
		next;
		mes "[Bigfoot]";
		mes "Who are you by the way? You look like an adventurer.";
		next;
		mes "[Bigfoot]";
		mes "Well, it is not important. You are here to ask me something, right? You know nothing in this world is free.";
		next;
		emotion ET_SWEAT, playerattached();
		mes "[" + .@name$ + "]";
		mes "...What do you want?";
		next;
		mes "[Bigfoot]";
		mes "Get me out of here.";
		next;
		mes "[" + .@name$ + "]";
		mes "It would be beyond my ability.";
		next;
		mes "[Bigfoot]";
		mes "Don't be such a perfectionist. You must be of a high rank to come down here, aren't you?";
		next;
		mes "[Bigfoot]";
		mes "Well, I understand. I knew it was a difficult favor to ask anyway.";
		next;
		mes "[Bigfoot]";
		mes "I didn't think you would let me out. I just got it out loud.";
		next;
		mes "[Bigfoot]";
		mes "However, you turned it down so firmly. You could at least pretend to consider or think about it.";
		next;
		mes "[" + .@name$ + "]";
		mes "What do you really want then?";
		next;
		mes "[Bigfoot]";
		mes "Money of course. The price depends on the information you want.";
		next;
		mes "[Bigfoot]";
		mes "I don't offer a monthly installment plan. I only take cash. I only accept currencies older than 2 years. I'll spend it meaningfully when I get out here in the future.";
		next;
		mes "[" + .@name$ + "]";
		mes "I don't have much money, but I know where to spend it. I guess I should turn down the deal. Goodbye then.";
		next;
		emotion ET_HNG;
		mes "[Bigfoot]";
		mes "Hey! Don't take the joke too seriously. Don't your friends call you stubborn?";
		next;
		mes "[Bigfoot]";
		mes "I knew it. You give up too easily. You are still young, you know.";
		next;
		mes "[" + .@name$ + "]";
		mes "Please get to the point.";
		next;
		mes "[Bigfoot]";
		mes "Well, you remind me of something...";
		next;
		mes "[Bigfoot]";
		mes "Yes! Bring me fried spicy dumplings and green salad! That's right! Bring me that.";
		next;
		mes "[Bigfoot]";
		mes "I cannot eat the horrible food here much so I keep thinking about the food out there.";
		next;
		mes "[Bigfoot]";
		mes "What I crave the most is that. Would you do this for me at least? ^0000cdThree fried spicy dumplings and one green salad!^000000";
		next;
		mes "[" + .@name$ + "]";
		mes "I can do that. Wait for me.";
		next;
		emotion ET_SMILE;
		mes "[Bigfoot]";
		mes "You don't have to tell me to wait. I cannot go anywhere.";
		erasequest 14471;// To the Royal Prison
		setquest 14472;// Gourmet Bigfoot
		ep16_wal = 4;
		close;
	}
	if (ep16_wal == 4) {
		if (countitem(12055) < 3 || countitem(12065) < 1) {
			mes "[Bigfoot]";
			mes "Wait, you stop there for a moment.";
			mes "I don't smell the greasy dumplings and fresh salad at all.";
			next;
			mes "[Bigfoot]";
			mes "Did you bring the food? ^0000cdThree fried spicy dumplings and one green salad!^000000";
			next;
			mes "[Bigfoot]";
			mes "I won't talk before you bring them to me! Check again and bring them!";
			close;
		}
		mes "[Bigfoot]";
		mes "I smell it! This smell! Take out what you have brought.";
		next;
		mes "[" + .@name$ + "]";
		mes "Here you are.";
		next;
		mes "[Bigfoot]";
		mes "Oh, my love. I'll enjoy every bite of it. Well, ask me the question now.";
		next;
		mes "[" + .@name$ + "]";
		mes "I heard that you saw a person of the Walther family in a foreign country. Where did you see him? How did you know that he was from the Walther family?";
		next;
		mes "[Bigfoot]";
		mes "Oh, you wanted to know that. As you know, it is rare to see seafarer Walthers in other places of Rune-Midgarts, except Alberta and Prontera.";
		mes "They are good at hiding their identities other than those who are well known.";
		next;
		mes "[Bigfoot]";
		mes "However, I saw the distinctive symbol of the family in ^0000cdVeins^000000.";
		next;
		mes "[" + .@name$ + "]";
		mes "Veins? Who did you see there? And how?";
		next;
		mes "[Bigfoot]";
		mes "I don't know who he is. I was working as always. You know you have to work to make ends meet.";
		next;
		mes "[" + .@name$ + "]";
		mes "You mean pickpocketing?";
		next;
		emotion ET_FRET;
		mes "[Bigfoot]";
		mes "You don't have to be so specific about it. Don't you want to hear the story? Well, don't worry. I do have a sense of honor. I'll keep my promise to you who has brought me the dumplings.";
		next;
		mes "[Bigfoot]";
		mes "Anyways, I found a shabby man who seemed so defenseless in the market there. His wallet was fat. So I took it and went off.";
		next;
		mes "[Bigfoot]";
		mes "I opened the wallet in a secluded corner of the market. He turned out to be quite loaded. And I found an ^0000cdold letter^000000 in there. The one stamped with the ^0000cdseal^000000, you know.";
		next;
		mes "[" + .@name$ + "]";
		mes "The fact that he had the letter doesn't prove that he was a person from the Walther family.";
		next;
		mes "[Bigfoot]";
		mes "Hey, I am getting there. After checking what was in the wallet, I was going to call it a day. I had earned enough.";
		next;
		mes "[Bigfoot]";
		mes "Then, that shabby man appeared.";
		next;
		mes "[Bigfoot]";
		mes "I don't have to tell you the rest of the story, right? Whoa... I thought I was fighting three men at the same time. His fist was like...! Phew... When he was punching me, I saw it.";
		next;
		mes "[Bigfoot]";
		mes "There was a hidden ^0000cdsword^000000 under his cloak. The ^0000cdhandle was engraved with the symbol^000000. You see, well. Do you believe my story now?";
		next;
		mes "[" + .@name$ + "]";
		mes "How did you manage to see that when you were beaten up so bad?";
		next;
		emotion ET_FRET;
		mes "[Bigfoot]";
		mes "Oh, have some faith. Don't you know what I do for living?";
		next;
		mes "[" + .@name$ + "]";
		mes "You mean pickpocketing?";
		next;
		emotion ET_ANGER;
		mes "[Bigfoot]";
		mes "Hey, don't be so specific, please!";
		next;
		mes "[Bigfoot]";
		mes "Anyways, my profession required a sharp eye to catch whatever is significant at a glance. That's how I thrive in this field.";
		next;
		mes "[Bigfoot]";
		mes "When I see a person, I need to identify the position of the wallet, any weapon in possession, the target's wits and how fast the target can run in a moment. This job required such a special quality.";
		next;
		mes "[Bigfoot]";
		mes "You don't have to believe me, but you can trust my professional skill.";
		mes "Well, you must have hidden your money inside the belt and your shoes. Nice work. Those are tough spots to steal from.";
		next;
		emotion ET_HUK, playerattached();
		mes "[" + .@name$ + "]";
		mes "OK, I guess I can trust your skill.";
		next;
		mes "[" + .@name$ + "]";
		mes "Anyways, it sure seems suspicious. Thank you for your information.";
		next;
		mes "[Bigfoot]";
		mes "Don't you need anything else? I want to have some dessert now.";
		next;
		mes "[" + .@name$ + "]";
		mes "No. This is enough.";
		next;
		mes "[Bigfoot]";
		mes "Oh, no! Dessert! My dessert!";
		delitem 12055,3;// Spicy Fried Bao
		delitem 12065,1;// Green Salad
		erasequest 14472;// Gourmet Bigfoot
		setquest 14473;// To Veins
		ep16_wal = 5;
		close;
	}
	mes "[Bigfoot]";
	mes "What is it? Did you change your mind?";
	mes "Do you want more information? I'd really like to have some Mastela Fruit Wine.";
	next;
	mes "[Bigfoot]";
	mes "Did you forget where to go?";
	mes "You should go to ^0000cdVeins^000000.";
	next;
	mes "[Bigfoot]";
	mes "Bring me some dessert when you come back!";
	close;
}

veins,156,160,7	script	K#ep16wal	4_M_RASWORD,{
	if (checkweight(1304,3) == 0) {
		mes "[K]";
		mes "You seem to carry a heavy burden.";
		mes "How about cutting down some?";
		close;
	}
	if (ep16_wal < 5) {
		mes "[K]";
		mes "I want to go back...";
		mes "There again...";
		close;
	}
	if (ep16_wal == 5) {
		.@name$ = strcharinfo(0);
		emotion ET_ANGER;
		mes "[K]";
		mes "Who are you? Why are you staring at me? Are you after my wallet too?";
		mes "It hasn't been long since I sent a person who stole my wallet to the prison.";
		next;
		mes "[K]";
		mes "I guess no such information is shared among the pickpockets. Get lost if you don't want to be sent to prison.";
		next;
		mes "[" + .@name$ + "]";
		mes "You are quite quick-tempered, aren't you.";
		mes "^0000cdKain Walther Walker^000000.";
		next;
		mes "[K]";
		mes "I don't know such name.";
		next;
		mes "[" + .@name$ + "]";
		mes "The one who betrayed his master.";
		next;
		mes "[K]";
		mes "Who... Who are you? Reveal yourself!";
		mes "Why are you telling me such a thing?";
		next;
		mes "[" + .@name$ + "]";
		mes "People say that. I don't buy it though.";
		next;
		mes "[K]";
		mes "Why don't you believe it? Why? Do you know anything about it?";
		next;
		mes "[" + .@name$ + "]";
		mes "You are the one who knows the truth, Kain Walther Walker.";
		next;
		mes "[K]";
		mes "Tell me. Who are you? Do you know anything about the death of Isenarm?";
		next;
		mes "[K]";
		mes "Your life depends on your answer. I have enough reason to kill you since you know who I am.";
		next;
		mes "[K]";
		mes "Well, tell me.";
		mes "Who are you? How did you find me? And what do you know about the death of Isenarm?";
		next;
		mes "[" + .@name$ + "]";
		mes "I am asked to investigate the death of Isenarm by Isenhonor.";
		next;
		mes "[" + .@name$ + "]";
		mes "While carrying out the investigation, I got the information that you would be here. I came here to meet you.";
		next;
		mes "[K]";
		mes "Isenhonor? At last, he is in action!";
		next;
		mes "[K]";
		mes "Oh, please excuse my bad manners. I am sorry. Please forgive my earlier behavior.";
		next;
		mes "[" + .@name$ + "]";
		mes "That's OK. It wouldn't hurt to be careful, Kain Walther Walker.";
		next;
		mes "[K]";
		mes "I cannot use the name, Walther, anymore.";
		mes "When a star disappears, its satellite shall lost its name too. Even worse, I am a sinner who haven't been able to my star.";
		next;
		mes "[K]";
		mes "Is Isenhonor investigating the death of Isenarm? I will do my best to help him by his side.";
		next;
		mes "[" + .@name$ + "]";
		mes "Not yet. Isenhonor wants to know the truth behind his brother's death, but he is not in the position to carry out the investigation due to the circumstances.";
		next;
		mes "[" + .@name$ + "]";
		mes "That's why I, who is relatively free to move around, am is doing the research for him.";
		next;
		mes "[K]";
		mes "Is that so... Then what can I do to help you? I'll do whatever I can do to reveal the truth.";
		next;
		mes "[" + .@name$ + "]";
		mes "You can tell me what happened when you were with Isenarm. Why you disappeared before Isenarm's death, why you are here and all.";
		next;
		mes "[K]";
		mes "In fact I know nothing about his death myself. However, he ^0000cdsent me here with a mission^000000 before incident broke out.";
		next;
		mes "[K]";
		mes "When I was going to go back after completing the mission, he sent me a lot of money and a ^0000cdletter^000000. It said ^0000cdnot to return to Rune-Midgarts^000000.";
		next;
		mes "[" + .@name$ + "]";
		mes "And then?";
		next;
		mes "[K]";
		mes "I heard the news of his death after few days. I wanted to go back, but I couldn't because of his last order. I couldn't even be there by his side...";
		next;
		mes "[K]";
		mes "After a long time, I heard the rumor about the violent behavior which caused Isenarm to be killed.";
		next;
		mes "[K]";
		mes "And also the story of the Guardian Knight who betrayed his master...";
		next;
		mes "[K]";
		mes "When I became a wanted man, I wanted to back and tell the truth. However, the letter said ^0000cdnot to return no matter what^000000. I couldn't let down the last order given by my master.";
		next;
		mes "[" + .@name$ + "]";
		mes "I guess Isenarm didn't want you to be involved. If anything happened to him, you would have been the one in the biggest trouble.";
		next;
		mes "[K]";
		mes "Ha... Perhaps... I didn't think of that... Here are the ^0000cdletter and sword Isenarm^000000 has give me.";
		next;
		mes "[K]";
		mes "Please give them to Isenhonor. I hope they help him recover his brother's honor.";
		next;
		mes "[" + .@name$ + "]";
		mes "Keep the sword. The sword is like the life of the knight. I believe Isenarm would want you to have it.";
		next;
		mes "[K]";
		mes "Then, have a safe travel.";
		erasequest 14473;// To Veins
		setquest 14474;// Report to Isenhonor
		getitem 6929,1;// Letters_Stamped_Seal
		ep16_wal = 6;
		close;
	}
	mes "[K]";
	mes "Did you deliver the letter and the words to Isenhonor well?";
	next;
	mes "[K]";
	mes "Please let him know that I am ready to devote my life if he needs my help.";
	close;
}

prt_cas_q,30,78,0	script	#ep16_heine_evt01	HIDDEN_WARP_NPC,1,1,{
	end;
OnTouch:
	if (ep16_royal == 2 && isbegin_quest(7683) == 0) {
		cloakoffnpc "Nyhill M. Heine#ep16_01", getcharid(0);
		cloakoffnpc "Peter Heine#ep16_01", getcharid(0);
		cloakonnpc "Peter Heine#ep16_02", getcharid(0);
	}
	else if (ep16_royal < 10) {
		cloakoffnpc "Peter Heine#ep16_01", getcharid(0);
		cloakonnpc "Peter Heine#ep16_02", getcharid(0);
	}
	else if (ep16_royal > 9) {
		cloakonnpc "Peter Heine#ep16_01", getcharid(0);
		cloakoffnpc "Peter Heine#ep16_02", getcharid(0);
	}
	end;
}

prt_cas_q,9,90,3	script	Peter Heine#ep16_02	4_EP16_PETER,{
	if (ep16_royal > 8) {
		mes "He is lying in bed, deeply wounded.";
		mes "It doesn't seem that he is in the state to talk.";
		close;
	}
}

// Heine
prt_cas_q,21,83,3	script	Friedrich S. Heine#ep16_01	4_EP16_STOLZ,{
	if (ep16_royal < 2) {
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "How disrespectful of you to enter without permission.";
		mes "Get out of here now.";
		close3;
	}
	if (ep16_royal == 2) {
		mes "[Friedrich]";
		mes "Please, calm down.";
		close;
	}
	if (ep16_royal < 8) {
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "Why don't you enjoy the banquet?";
		mes "Nyhill went to the Banquet Hall too.";
		next;
		mes "[Friedrich]";
		mes "He didn't make a good first impression, but he is not a bad kid...";
		mes "He is just...";
		next;
		mes "[Friedrich]";
		mes "Well, I guess I shouldn't talk more.";
		close3;
	}
	if (ep16_royal < 16)
		end;
	if (ep16_royal == 16) {
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "You are here at last.";
		mes "The archduke has been waiting for you.";
		close3;
	}
	if (ep16_royal == 17) {
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "Nillem said he would visit your room after making all preparations. You may wait in your room.";
		mes "We are counting on you.";
		close3;
	}
	if (ep16_royal < 23)
		end;
	if (ep16_royal == 23) {
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "I have heard the story from my father.";
		mes "I have received the approval for you to access the Past Memories of the Royal Family freely.";
		next;
		mes "[Friedrich]";
		mes "Let's talk about the Past Memories of the Royal Family tomorrow";
		mes "Since you must be tired going through all the trouble today.";
		ep16_royal = 24;
		close3;
	}
	switch( checkquest(7706,PLAYTIME) ) {
	case -1:
		break;
	case 0:
	case 1:
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "Are you going back to that place?";
		mes "Nillem has told me.";
		next;
		mes "[Friedrich]";
		mes "That it is difficult for him to connect multiple times since he is just a human after all.";
		next;
		mes "[Friedrich]";
		mes "I appreciate your efforts for the royal family.";
		mes "But don't push yourself too hard.";
		close3;
	case 2:
		erasequest 7706;// Nillem Is Not Almighty
		break;
	}
	switch( checkquest(7705,HUNTING) ) {
	case -1:
		mes "[Friedrich]";
		mes "You are here, just in time.";
		mes "Are you going there again today?";
		cutin "ep16_friedrich_stolz_heine",1;
		next;
		if (select( "Yes.", "No." ) == 2) {
			mes "[Friedrich]";
			mes "I see.";
			mes "...Oh, do you know what Nyhill is doing?";
			next;
			mes "[Friedrich]";
			mes ".....Never mind.";
			mes "He must be staying quietly since he has been sentenced to disciplinary confinement.";
			next;
			mes "[Friedrich]";
			mes "Then, good bye.";
			close3;
		}
		mes "[Friedrich]";
		mes "Sorry about all the trouble.";
		mes "I hope it works this time.";
		next;
		mes "[Friedrich]";
		mes "Please save the piece of Ymir Heart from Valkyrie.";
		setquest 7705;// Hope You Cannot Let Go
		close3;
	case 0:
	case 1:
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "...I know it is almost impossible to change the past.";
		mes "But there is no other way.";
		next;
		mes "[Friedrich]";
		mes "We need to try everything we can do.";
		next;
		mes "[Friedrich]";
		mes "While you are on a mission down there, we are proceeding with the investigation.";
		next;
		mes "[Friedrich]";
		mes "We are searching for the lead to the intruders.";
		mes "Let's play our parts well.";
		next;
		mes "[Friedrich]";
		mes "Nillem must be waiting for you.";
		mes "Please do your best as always.";
		close3;
	case 2:
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "You are back.";
		mes "Is it the same this time?";
		mes "I suppose so.";
		mes "But, I really don't think all the efforts will go wasted.";
		next;
		mes "[Friedrich]";
		mes "Thank you very much.";
		mes "Someday, when you need the power of our family,";
		mes "We will be on your side no matter what.";
		next;
		mes "[Friedrich]";
		mes "That is all we can give you for now as the reward.";
		mes "I am sorry that we cannot offer you more.";
		mes "I'll make sure there is no inconvenience to you while living in the palace.";
		next;
		mes "[Friedrich]";
		mes "See you tomorrow then.";
		setquest 7706;// Nillem Is Not Almighty
		erasequest 7705;// Hope You Cannot Let Go
		getitem 6919,10;// TokenOfHonor
		getexp 400000,400000;
		close3;
	}
}

prt_cas_q,18,83,5	script	Peter Heine#ep16_01	4_M_3RDPRIN1,{
	if (ep16_royal < 2) {
		mes "[Peter]";
		mes "You must be the returned hero invited to the banquet.";
		mes "This banquet is for you. Please enjoy.";
		close;
	}
	if (ep16_royal == 2) {
		mes "[Peter]";
		mes "Haha... The archduke must be very angry.";
		close;
	}
	if (ep16_royal < 8) {
		cutin "ep16_petter_heine01",0;
		mes "[Peter]";
		mes "I have participated in the Royal Assembly, but I wonder if it has been the right decision.";
		next;
		mes "[Peter]";
		mes "I tried to do this for everyone, but it seems to cause trouble.";
		next;
		mes "[Peter]";
		mes "People tells me that I am a strong candidate in this, but I cannot be so sure.";
		next;
		mes "[Peter]";
		mes "I keep thinking about what a great responsibility it is, how harder I should try and all...";
		next;
		mes "[Peter]";
		mes "Not that I can step back now. I guess all I can do is to do my best.";
		close3;
	}
}

prt_cas_q,19,85,4	script	Kronecker G. Heine#ep16_01	4_EP16_GRANZ,{
	if (ep16_royal < 2) {
		mes "[Kronecker]";
		mes "I have never allowed your visit.";
		close;
	}
	if (ep16_royal == 2) {
		switch( isbegin_quest(7685) ) {
		case 0:
			switch( isbegin_quest(7683) ) {
			case 0:
				cutin "ep16_kronecker_granz_heine",2;
				mes "[Kronecker]";
				mes "I am busy.";
				mes "Please come back later";
				close2;
				warp "prt_cas_q",134,32;
				end;
			case 1:
				cutin "ep16_kronecker_granz_heine",2;
				mes "[Kronecker]";
				mes "...It was a shame to cause such a scene";
				mes "In front of a guest.";
				mes "I apologize on the behalf of the Heine family.";
				next;
				cutin "ep16_friedrich_stolz_heine",1;
				mes "[Friedrich]";
				mes "Let me introduce myself.";
				mes "I am the current head of the Heine family, Friedrich Stoltze Heine.";
				next;
				mes "[Friedrich]";
				mes "This is the former head of the family, Archduke Grantz, my father.";
				next;
				cutin "ep16_kronecker_granz_heine",2;
				mes "[Kronecker]";
				mes "My name is Kronecker Grantz Heine.";
				next;
				cutin "ep16_friedrich_stolz_heine",1;
				mes "[Friedrich Stoltze]";
				mes "This is Peter Heine the candidate to the throne.";
				next;
				cutin "ep16_petter_heine01",0;
				mes "[Peter]";
				mes "Nice to meet you.";
				mes "It has turned out this way.";
				next;
				cutin "ep16_friedrich_stolz_heine",1;
				mes "[Friedrich]";
				mes "The one who has left the room, making a fool of himself, is my son, Nyhill.";
				next;
				mes "[Friedrich]";
				mes "He is a lineal family member of the Heine family.";
				mes "But he still acts like a child like that.";
				mes "Please excuse his bad manners.";
				next;
				cutin "ep16_kronecker_granz_heine",2;
				mes "[Kronecker]";
				mes "Let him do whatever he pleases.";
				mes "We cannot take care of him anymore.";
				next;
				cutin "ep16_petter_heine01",0;
				mes "[Peter]";
				mes "...Archduke, please don't be too harsh on Nyhill.";
				mes "In fact, Nyhill was supposed to be the candidate to the throne.";
				next;
				mes "[Peter]";
				mes "I am just a collateral member of the family after all...";
				next;
				cutin "ep16_kronecker_granz_heine",2;
				mes "[Kronecker]";
				mes "Stop it there. There is no need for more words.";
				mes "Nyhill doesn't have what it takes to be the king.";
				next;
				mes "[Kronecker]";
				mes "He doesn't have any elements to meet the legitimacy of the family. He cannot be chosen as the candidate.";
				mes "He doesn't even know where he stands but still seems so hungry for power.";
				next;
				cutin "ep16_petter_heine01",0;
				mes "[Peter]";
				mes "It doesn't seem that way...";
				mes "He must have been disheartened since his right has been neglected.";
				next;
				cutin "ep16_kronecker_granz_heine",2;
				mes "[Kronecker]";
				mes "The right of the Heine family is everything which comes with the name of Heine.";
				mes "Nyhill has everything.";
				next;
				mes "[Kronecker]";
				mes "Why doesn't that child realize it?";
				mes "It is not appropriate to talk about the family matter in front of the guest.";
				next;
				mes "[Kronecker]";
				mes "Sorry about that.";
				mes "Phew... I wonder what we have done to deserve a punk like that in the family.";
				next;
				mes "[Kronecker]";
				mes "I have heard that you are the one who would attend the ritual.";
				mes "Gratefully enough, the next king might be from the Heine family.";
				next;
				unittalk getcharid(3), "" + strcharinfo(0) + " : You mean Peter will...?", bc_self;
				mes "[Kronecker]";
				mes "In the Royal Assembly earlier in which the candidates for the throne were tested...";
				next;
				cutin "ep16_friedrich_stolz_heine",1;
				mes "[Friedrich]";
				mes "Isenarm of the Walther family who happened to be the strongest candidate of all threatened other candidates all of a sudden.";
				mes "Ernst of the Geoborg family had to execute him.";
				next;
				mes "[Friedrich]";
				mes "It seemed that Ernst was going to be named the next king, but he abruptly resigned.";
				mes "...I guess he obeyed the will of the queen.";
				next;
				mes "[Friedrich]";
				mes "Due to the course of events, the Royal Assembly would be held again.";
				mes "This time, Peter will participate as the representative of the Heine family.";
				next;
				npctalk "I never meant to, but I'll do my best.", "Peter Heine#ep16_01", bc_self;
				cutin "ep16_kronecker_granz_heine",2;
				mes "[Kronecker]";
				mes "And that Nyhill is so jealous of him now.";
				mes "How low can he be?";
				next;
				mes "[Friedrich]";
				cutin "ep16_friedrich_stolz_heine",1;
				mes "Hum... He actually is not a bad kid unlike his earlier words.";
				mes "He has never acted to bring disgrace to the name of Heine.";
				next;
				mes "[Friedrich]";
				mes "I am not trying to defend him because he is my son.";
				mes "Nyhill, he is just...";
				next;
				mes "[Kronecker]";
				cutin "ep16_kronecker_granz_heine",2;
				mes "Don't try to speak for him. His incompetence is a sin.";
				mes "Great magical power runs in the Heine for generations.";
				next;
				mes "[Kronecker]";
				mes "There is a reason that he is called Mijeria.";
				unittalk getcharid(3), "" + strcharinfo(0) + " : Mijeria? Misery?", bc_self;
				next;
				mes "[Friedrich]";
				cutin "ep16_friedrich_stolz_heine",1;
				mes "Don't be overly curious of our family matter.";
				mes "Phew... I guess I will see you again later.";
				completequest 7683;
				if (achievementinfo(130000, ACHIEVEINFO_COUNT1) == 0)
					achievementupdate(130000, ACHIEVEINFO_COUNT1, 1);
				next;
				if (isbegin_quest(7682) == 1 && isbegin_quest(5402) == 2 && isbegin_quest(7683) == 2 && isbegin_quest(7684) == 2 && ep16_wal > 1 && ep16_wig > 1 && ep16_lug > 1 && ep16_gaobs > 1) {
					completequest 7682;// Socializing Starts from an Eye Contact
					setquest 7685;// What Is the Next Thing on the Schedule ?
					mes "[Kronecker]";
					cutin "ep16_kronecker_granz_heine.bmp",2;
					mes "The Royal Assembly will be over soon, and the ritual will be carried out when the final decision is made.";
					mes "Enjoy the banquet until then and participate in the ritual.";
					close3;
				}
				cutin "ep16_kronecker_granz_heine",2;
				mes "[Friedrich]";
				mes "It wouldn't long before Royal Assembly is over.";
				mes "We have to prepare for it. Sorry that we cannot spend more time with you.";
				next;
				mes "[Friedrich]";
				mes "Go visit other families if you have not visited them all.";
				close3;
			case 2:
				npctalk "Go visit other families if you have not visited them all.";
				end;
			}
			end;
		case 1:
			npctalk "Everything will be settled soon. Wait in your room until then.", "Kronecker G. Heine#ep16_01", bc_self;
			end;
		default:
			end;
		}
	}
	if (ep16_royal < 8) {
		cutin "ep16_kronecker_granz_heine",2;
		mes "[Kronecker]";
		mes "The Royal Assembly will be over soon.";
		mes "As we expected, Peter seems to be a strong candidate.";
		next;
		mes "[Kronecker]";
		mes "How are you enjoying the banquet?";
		mes "As soon as the Royal Assembly is completed, we will move to proceed with the final ritual...";
		next;
		mes "[Kronecker]";
		mes "I'll send you a Court Mage.";
		mes "Enjoy the banquet and go back to your room in time.";
		close3;
	}
	if (ep16_royal < 16)	// door locked
		end;
	if (ep16_royal == 16) {
		cutin "ep16_kronecker_granz_heine",2;
		mes "[Kronecker]";
		mes "I have been waiting for you.";
		mes "Although I feel reluctant to reveal somewhat embarrassing part of the royal family to you,";
		next;
		mes "[Kronecker]";
		mes "It was the royal family of Rune-Midgarts who let you observe the ritual anyway.";
		mes "And you were the one who fought the intruders during the incident...";
		next;
		mes "[Kronecker]";
		mes "Without preamble,";
		mes "Those intruders must have been after the^4d4dff piece of Imir Heart^000000.";
		next;
		mes "[Kronecker]";
		mes "We didn't know what was in the Room of Consciousness was ^4d4dffa fake piece of Imir Heart^000000.";
		next;
		mes "[Kronecker]";
		mes "We searched through the records of ^4d4dffPast Memories of the Royal Family^000000 for the record of that part.";
		next;
		mes "[Kronecker]";
		mes "We couldn't find any.";
		mes "The only lead we got was a riddle.";
		next;
		select("You mean, the ones who know the truth?");
		mes "[Kronecker]";
		mes "You must have seen it in the Past Memories of the Royal Family.";
		mes "You are more cunning than I have thought of you.";
		next;
		mes "[Kronecker]";
		mes "What should we do to find out the truth?";
		mes "We would have to go back in the time to the past.";
		next;
		mes "[Kronecker]";
		mes "Frietz, how did it go?";
		next;
		cutin "ep16_friedrich_stolz_heine",1;
		mes "[Friedrich]";
		mes "I found a Court Mage who specialized in that field.";
		mes "He said that ^4d4dffhe sensed a huge twist of magical force in the Past Memories of the Royal Family, and we could depend on him^000000.";
		next;
		mes "[Friedrich]";
		mes "He will bring the result soon.";
		mes "He said he would connect the crack of the dimension by force.";
		next;
		mes "[Friedrich]";
		mes "He acts rather imprudently, but he is said to be quite skilled...";
		mes "And you know him.";
		next;
		select("Is he Nillem?");
		mes "[Friedrich]";
		mes "You seem to know him too.";
		mes "You're right.";
		mes "I want you to pair up with Nillem for this mission.";
		next;
		select("Me? Why?");
		mes "[Friedrich]";
		mes "I'd like know that myself.";
		mes "That Nillem pestered me to let him work with you.";
		mes "...I tried my best not to slay him.";
		next;
		mes "[Friedrich]";
		mes "The Past Memories of the Royal Family is a special place which can be accessed by the royal families and few other people.";
		mes "We cannot risk getting more people involved in this to keep the secret.";
		next;
		mes "[Friedrich]";
		mes "Sine you have already experienced the crack of dimension...";
		next;
		mes "[Friedrich]";
		mes "We didn't have any other choices.";
		mes "We will reward you handsomely. Please help us out.";
		next;
		select("If you say so...");
		cutin "ep16_kronecker_granz_heine",2;
		mes "[Kronecker]";
		mes "Them, it's settled.";
		mes "We will send Nillem to your room as soon as he is ready.";
		mes "You may pair up with him for the mission.";
		next;
		mes "[Kronecker]";
		mes "And this is what has been given to the ones contributed to the royal family.";
		mes "You have received it once when you went down there right after you came to the palace. Do you remember?";
		next;
		mes "[Kronecker]";
		mes "It must be useful to people like you.";
		mes "I hope it helps.";
		ep16_royal = 17;
		setquest 7699;// To the Past
		erasequest 7698;// Heine Now
		getitem 6919,20;// TokenOfHonor
		getexp 400000,400000;
		close3;
	}
	if (ep16_royal == 17) {
		cutin "ep16_kronecker_granz_heine",2;
		mes "[Kronecker]";
		mes "The magician called Nillem will find you.";
		mes "You may wait in your room.";
		close3;
	}
	cutin "ep16_kronecker_granz_heine",2;
	mes "[Kronecker]";
	mes "It is too early to lose our hope.";
	mes "I believe you will do just fine.";
	close3;
}

prt_cas_q,22,80,3	script	Nyhill M. Heine#ep16_01	4_EP16_NIHIL,{ end; }

prt_cas_q,22,77,0	script	#ep16_heine_evt02	HIDDEN_WARP_NPC,2,2,{
	end;
OnTouch:
	if (ep16_royal == 2 && isbegin_quest(7683) == 0) {
		npctalk "You are in no place to say such a thing!", "Kronecker G. Heine#ep16_01", bc_self;
		setpcblock PCBLOCK_NPC, true;
		sleep2 3000;
		npctalk "I'll go back to the head house. Please give me your permission.", "Nyhill M. Heine#ep16_01", bc_self;
		sleep2 3000;
		npctalk "Watch your manners. You are not a child anymore.", "Friedrich S. Heine#ep16_01", bc_self;
		sleep2 3000;
		npctalk "I have no reason to be here, you know.", "Nyhill M. Heine#ep16_01", bc_self;
		sleep2 3000;
		npctalk "It is your duty to stay here as a member of the family!", "Kronecker G. Heine#ep16_01", bc_self;
		sleep2 3000;
		npctalk "Member of the family? Since when have I been deemed as a member of the family?", "Nyhill M. Heine#ep16_01", bc_self;
		sleep2 3000;
		npctalk "Did you forget the name I received from the family?", "Nyhill M. Heine#ep16_01", bc_self;
		sleep2 3000;
		npctalk "Nyhill Mijeria, I am a miserable Heine who has nothing! You have given me such a name because I am useless!", "Nyhill M. Heine#ep16_01", bc_self;
		sleep2 3000;
		npctalk "Watch your words, Nyhill.", "Friedrich S. Heine#ep16_01", bc_self;
		sleep2 3000;
		npctalk "You have never considered me as a member of the family.", "Nyhill M. Heine#ep16_0", bc_self;
		sleep2 3000;
		npctalk "However, I have to bear all the responsibilities. I can't take it anymore.", "Nyhill M. Heine#ep16_0", bc_self;
		sleep2 1000;
		cloakonnpc "Nyhill M. Heine#ep16_01", getcharid(0);
		sleep2 500;
		unittalk getcharid(3), "" + strcharinfo(0) + " : Oh, he left.", bc_self;
		sleep2 1000;
		setpcblock PCBLOCK_NPC, false;
		npctalk "...That useless punk. He doesn't do any good!", "Kronecker G. Heine#ep16_01", bc_self;
		setquest 7683;
	}
	end;
OnInit:
	cloakonnpc "Nyhill M. Heine#ep16_01";
	cloakonnpc "Peter Heine#ep16_01";
	end;
}

prt_cas_q,144,38,3	script	Nyhill#ep16_7686	4_EP16_NIHIL,{ end; }
prt_cas_q,141,39,5	script	Skia#ep16_7686	4_EP16_SKIA,{ end; }

prt_cas_q,141,36,0	script	#ep16_evt_7686	HIDDEN_WARP_NPC,3,1,{
	end;
OnTouch:
	if (isbegin_quest(7683) == 2 && isbegin_quest(7686) == 0) {
		cloakoffnpc "Skia#ep16_7686", getcharid(0);
		cloakoffnpc "Nyhill#ep16_7686", getcharid(0);
		setpcblock PCBLOCK_NPC, true;
		sleep2 2000;
		npctalk "Are you the shadow princess whom people talk about?", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "It must be difficult for you too. Is it your first time attending the official event?", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "Oh, you must be the lord of the Heine family.", "Skia#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "Well, it is true that I am the shadow. However, I have never found it difficult.", "Skia#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "I do what I can do.", "Skia#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "You are not born in that way at your own will though, aren't you?", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "I have been raised as the shadow, but it has never made me sad.", "Skia#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "I have questioned it before...", "Skia#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "But I have chosen to be what I am. This is my way.", "Skia#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "Really. I am envious that you can think it that way.", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "I have always wanted to be free of the name, Mijeria.", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "Do you know what happens when one keeps on hearing that he has nothing from his birth?", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "He loses himself, as if he is empty inside.", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk ".......", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "What am I talking about... Please excuse me.", "Nyhill#ep16_7686", bc_self;
		sleep2 2000;
		npctalk "You know, when you have nothing...", "Skia#ep16_7686", bc_self;
		sleep2 2000;
		npctalk ".......", "Nyhill#ep16_7686", bc_self;
		sleep2 2000;
		npctalk "You can fill it up with anything. There is no future destined for a person.", "Skia#ep16_7686", bc_self;
		sleep2 6000;
		npctalk "...Is that so.", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "Well, I have not introduced myself to you yet. My name is Nyhill Mijeria Heine.", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "I am Skia Nerius. You can call me Skia.", "Skia#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "Oh, right. I was on my way to meet the hero!", "Skia#ep16_7686", bc_self;
		sleep2 3000;
		npctalk "Please excuse me now.", "Skia#ep16_7686", bc_self;
		sleep2 1000;
		cloakonnpc "Skia#ep16_7686", getcharid(0);
		sleep2 3000;
		npctalk "...Skia... There is an interesting lady in the Nerius family.", "Nyhill#ep16_7686", bc_self;
		sleep2 3000;
		setpcblock PCBLOCK_NPC, false;
		cloakonnpc "Nyhill#ep16_7686", getcharid(0);
		if (isbegin_quest(7686) == 0) {
			setquest 7686;// Nyhill and Skia
			completequest 7686;// Nyhill and Skia
		}
	}
	end;
OnInit:
	cloakonnpc "Skia#ep16_7686";
	cloakonnpc "Nyhill#ep16_7686";
	end;
}

// Right Side
// Roegenburg
prt_cas_q,90,186,5	script	Maximilian Roegenburg#ep16lug	4_EP16_MAX,{
	if (checkweight(1301,1) == 0) {
		mes "[Maximilian]";
		mes "You seem to have a lot of luggage. Are you OK?";
		mes "It looks a lot and large.";
		next;
		mes "[Maximilian]";
		mes "How about cutting down some?";
		close;
	}
	if (BaseLevel < 100) {
		mes "[Maximilian]";
		mes "The Roegenburg welcomes adventurers with various experiences, but it is somewhat early for us to work with you.";
		mes "I hope I will see you later.";
		close;
	}
	if (ep16_lug == 0) {
		if (isbegin_quest(7682) != 1) {
			mes "[Maximilian]";
			mes "How could you come in here?";
			mes "Nobody can come into this place if you are not a staff. Please go outside.";
			close;
		}
		mes "[Maximilian]";
		mes "Hello, adventurers. I am honored you have visited the ^0000cdRoegenburg^000000. I am ^0000cdMaximilian Roegenburg^000000.";
		next;
		mes "[Maximilian]";
		mes "We are one of seven royal families that found the kingdom and have work hard for Rune-Midgarts.";
		next;
		mes "[Maximilian]";
		mes "^0000cdHelmut Roegenburg^000000, the heir of our family, is supposed to participate in the royal assembly. How about seeing him?";
		next;
		cutin "16hel",0;
		mes "[Helmut]";
		mes "Hello, I am ^0000cdHelmut Roegenburg^000000.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Hello, I'm invited to this banquet. " + strcharinfo(0) + " It is nice to see you.";
		next;
		mes "[Helmut]";
		mes "I am honored to see the hero who defeated Morocc. Please enjoy your time while you are in the Roegenburg.";
		next;
		mes "[Helmut]";
		mes "If you have time, how about seeing the rest people of the Roegenburg?";
		next;
		mes "[Helmut]";
		mes "Brother, it will be helpful to listen to the story of the family from ^0000cdWolf Roegenburg^000000.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, it is a good opportunity, of course.";
		setquest 14495;// To Wolf
		ep16_lug = 1;
		close3;
	}
	if (ep16_lug == 1) {
		mes "[Maximilian]";
		mes "Did you see the children of the Roegenburg? They look like babies, but now when I see them in the palace, I am pleased that they are almost grown up.";
		next;
		mes "[Maximilian]";
		mes "You met Helmut already. It will be helpful to you if you meet the second son, Wolf.";
		next;
		mes "[Maximilian]";
		mes "He is in charge of all matters of the Roegenburg instead of the first son who is busy for participation in the royal assembly and protection of the border. You will hear lots of interesting stories.";
		close;
	}
	if (ep16_lug > 1 && ep16_lug < 7) {
		mes "[Maximilian]";
		mes "The Roegenburg is proud that we are descents of Wilhelm, the national hero, and contributed to the foundation and development of Rune-Midgarts Kingdom.";
		next;
		mes "[Maximilian]";
		mes "Therefore, we hoped that the children could grow into decent adults, but they were raised without their parents' care and now they tend to behave rudely and act as they want.";
		next;
		mes "[Maximilian]";
		mes "If you feel uncomfortable when you talk with them, please understand kindly.";
		next;
		mes "[Maximilian]";
		mes "They are the children who will lead the family, but they are going different from what the Roegenburg aims for.";
		next;
		mes "[Maximilian]";
		mes "The first son stays on the front, risking his life everyday and the second is doing business, which is against the family tradition.";
		next;
		mes "[Maximilian]";
		mes "The third son would leave the house and hang out on the back street, but we cannot continue to employ some to monitor him all the times.";
		next;
		mes "[Maximilian]";
		mes "But the youngest, Agnes, has grown as good girl and I am happy when I think of her.";
		next;
		mes "[Maximilian]";
		mes "Ah, I am sorry to talk too much on our family. I have become talkative as I get old.";
		next;
		mes "[Maximilian]";
		mes "Please forgive me grumbling and forget this old man's complaints.";
		close;
	}
	if (ep16_lug == 7 || ep16_lug == 8) {
		mes "[Maximilian]";
		mes "Myer, Myer...";
		mes "I cannot believe that Myer did that.";
		next;
		mes "[Maximilian]";
		mes "He spread the bad rumor about the family but I think he did it because he is desperate.";
		next;
		mes "[Maximilian]";
		mes "I have let the children do as they want but I wanted to avoid a war.";
		next;
		mes "[Maximilian]";
		mes "But I know it is unlikely that Helmut becomes a king and so leave them to do as they like.";
		next;
		mes "[Maximilian]";
		mes "However, I would like to leverage this opportunity to collect the capabilities of the family members to protect the family.";
		mes "Opportunities are found in times of crisis.";
		close;
	}
	if (ep16_lug == 9) {
		mes "[Maximilian]";
		mes "Please bring Helmut. He must be in the ^0000cdcheckpoint near the border with Schwarzwald^000000. He is responsible for the patrol party.";
		mes "Please.";
		close;
	}
	if (ep16_lug == 10) {
		mes "[Maximilian]";
		mes "Welcome adventurer. Did you have a safe travel?";
		next;
		mes "[Maximilian]";
		mes "I cannot see Helmut. Did he refuse to come?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, he left a message for two of you.";
		next;
		mes "[Told Maximilian and Wolf about Helmut's will and the successorship]";
		next;
		mes "[Maximilian]";
		mes "I knew something when Helmut left, but I didn't expect that he would give up the successorship.";
		mes "But if that is what Helmut wants, I don't object to it.";
		next;
		mes "[Maximilian]";
		mes "This fact will be announced as soon as the royal assembly and banquet are finished. Wolf, now you should lead our family. I hope this will not be a burden to you.";
		next;
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes ".......";
		next;
		cutin "",255;
		mes "[" + strcharinfo(0) + "]";
		mes "You have taken a firm attitude that you never showed before.";
		next;
		mes "[Maximilian]";
		mes "Once I tried to move the children as I want and failed. Since then I left them to do as they like. But now I know.";
		next;
		mes "[Maximilian]";
		mes "I realized that a new age needs children. I will work for the family and country in the way the children wants to do.";
		next;
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "I seem to have forced my way to Helmut and people in the family.";
		next;
		mes "[Wolf]";
		mes "There is something rather than a war to have influence up to every corner in the continent.";
		next;
		mes "[Wolf]";
		mes "As Myer said, I am looking for other approaches and I will.";
		next;
		mes "[Wolf]";
		mes "Dear adventurer, if you don't mind, won't you deliver my will to ^0000cdMyer^000000?";
		next;
		mes "[Wolf]";
		mes "That I have given up wars and am looking for better solution and that if he can, visit the family and see the people.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I am willing to do so.";
		erasequest 14505;// I Won't go Back
		setquest 14506;// Things Turned out This Way
		ep16_lug = 11;
		close3;
	}
	if (ep16_lug == 11) {
		mes "[Maximilian]";
		mes "Please deliver the story of Helmut to Myer.";
		mes "He must be somewhere in Prontera.";
		close;
	}
	if (ep16_lug == 12) {
		mes "[Maximilian]";
		mes "Dear adventurer, welcome.";
		next;
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Dear adventurer, did you deliver the message to Myer? what did he say?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "He said it is good to give up wars. Myer has a lot of trust in you. He said he would help you as much as he can, if you need his help.";
		next;
		mes "[Wolf]";
		mes "I want him to visit us more than to help me.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Ah, he also said he would come after the banquet is finished.";
		next;
		mes "[Wolf]";
		mes "Well I am happy that our relationship will improve.";
		next;
		mes "[Wolf]";
		mes "Once, we were the closest friends, but the relationship became awkward after he left the family.";
		next;
		mes "[Wolf]";
		mes "Anyway, I think we have to make preparation to welcome him seriously.";
		next;
		cutin "",255;
		mes "[Maximilian]";
		mes "I am glad that now everything has found its place. I have been worried a lot.";
		next;
		mes "[Maximilian]";
		mes "All theses things are thanks to you. I feel safe now that everyone has their right places and will work hard for the family and country.";
		next;
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Dear adventurer. Thank you very much for helping my family. I have been thinking how I can reward you for your contribution, but cannot find anything that is comparable to the magnitude of thank.";
		next;
		mes "[Wolf]";
		mes "However at least to express my mind, I have prepare a small present. Please take it.";
		next;
		cutin "",255;
		mes "[Maximilian]";
		mes "If you need a help from the Roegenburg, come to use anytime. The gate of the Roegenburg is always opened to you.";
		completequest 14507;// To Maximilian
		getitem 6919,10;// TokenOfHonor
		getexp 1000000,500000;
		ep16_lug = 13;
		close;
	}
	if (ep16_lug > 12) {
		mes "[Maximilian]";
		mes "Dear adventurer, welcome.";
		mes "I wanted to thank you always. Thanks to your contribution, my family is returning to safety.";
		next;
		mes "[Maximilian]";
		mes "It seems that my family had no problem, but inside the wall, we didn't have trust in one another and were not mixed.";
		next;
		mes "[Maximilian]";
		mes "But now we are getting along. Thank you very much again.";
		close;
	}
}

prt_cas_q,96,184,1	script	Agnes Roegenburg#ep16lu	4_EP16_AGNES,{
	if (checkweight(1301,1) == 0) {
		mes "[Agnes Roegenburg]";
		mes "Well, you seem to have lots of luggage. How about removing some?";
		close;
	}
	if (ep16_lug == 0) {
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Hello, nice to meet you.";
		mes "Did you visit to see my grandfather?";
		next;
		mes "[Agnes]";
		mes "If so, he is over there. You can find him there.";
		mes "Then, have a good time.";
		close3;
	}
	if (ep16_lug == 1) {
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Did you see my brothers?";
		mes "If you don't, make sure to see Wolf and have talk with him.";
		next;
		mes "[Agnes]";
		mes "Nowadays, he shares many works with my grandfather and he has a lot to talk with you.";
		mes "So the time for me to talk with him is quite reduced though.";
		close3;
	}
	if (ep16_lug == 2 || ep16_lug == 3) {
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "The banquet has started but I haven't yet found any body who I go with.";
		mes "Originally Wolf is supposed to go with me, but it is canceled as he became busy.";
		next;
		mes "[Agnes]";
		mes "If he had told me earlier he cannot go, I wouldn't have refused all those proposals.";
		mes "Myer said he would go with me, but I am afraid he may leave as wind anytime.";
		next;
		mes "[Agnes]";
		mes "I don't want anything big...";
		mes "When we were young, we played together. They read me books.";
		next;
		mes "[Agnes]";
		mes "I still like the best the books that my brothers read me.";
		mes "Those princes and princesses in those books were all my friend.";
		next;
		mes "[Agnes]";
		mes "Recently I read a story on a knight who sacrifices himself for a lady.";
		mes "In the story, the lady handed a pretty handkerchief to the knight.";
		next;
		mes "[Agnes]";
		mes "Then, I realized that what I had lacked.";
		mes "It was a pretty handkerchief.";
		next;
		mes "[Agnes]";
		mes "So I carry lots of pretty handkerchiefs so that I can hand them to my knight anytime.";
		mes "But there is no one for me to hand my handkerchiefs to...";
		close3;
	}
	if (ep16_lug == 4 || ep16_lug == 5) {
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Did you see him too?";
		mes "He came with Myer.";
		next;
		mes "[Agnes]";
		mes "He is so handsome. I wonder what family he is from.";
		mes "I am sorry that I left so early that I couldn't talk with him at all. I asked Myer who he is, but he didn't tell me.";
		close3;
	}
	if (ep16_lug == 6) {
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Dear adventurer?";
		mes "Wolf is looking for you. Do you have an appointment with him?";
		next;
		mes "[Agnes]";
		mes "Why don't you visit Wolf?";
		close3;
	}
	if (ep16_lug == 7) {
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "He is my brother, but he and other brothers are so childish.";
		next;
		mes "[Agnes]";
		mes "Go out to the street in Prontera and ask 5-year old children, even they know the answer.";
		next;
		mes "[Agnes]";
		mes "They are overlooking something bigger due to their personal desires. Of course, I also hate them and want to take revenge, but it does not solve the problem.";
		next;
		mes "[Agnes]";
		mes "If they had thought about how the citizens of the kingdom can live more happily, they would not have acted like that.";
		next;
		mes "[Agnes]";
		mes "Anyway, let's wait and see, as they are trying to think like adults.";
		next;
		mes "[Agnes]";
		mes "But I feel safe that my grandfather stays with me.";
		close3;
	}
	if (ep16_lug >= 8 && ep16_lug <= 12) {
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "You seem to have come to see my brothers? but there is no one in the house.";
		next;
		mes "[Agnes]";
		mes "In a long time, we were together, but they left and I am lonely again. It is nice that they don't fight one another any more.";
		close3;
	}
	// daily
	switch( checkquest(14509,PLAYTIME) ) {
	case -1:
		for ( .@quest_id = 14508; .@quest_id <= 14515 && isbegin_quest(.@quest_id) == 0; .@quest_id++ )
			continue;
		switch( .@quest_id ) {
		case 14508:
			cutin "16agn_nor",2;
			mes "[Agnes]";
			mes "Dear adventurer, welcome back.";
			mes "Pearls? soft hairs? Have you brought them?";
			next;
			mes "[" + strcharinfo(0) + "]";
			if (countitem(722) < 3 || countitem(949) < 50) {
				mes "Ah, it is....";
				next;
				mes "[Agnes]";
				mes "Not yet? OK. We have still time.";
				next;
				mes "[Agnes]";
				mes "You forget what I asked didn't you? ^0000cdThey are three " + getitemname(722) + " and 50 strands of " + getitemname(949) + "^000000.";
				next;
				mes "[Agnes]";
				mes "Please don't be late!";
				close3;
			}
			mes "Here you are.";
			mes "Am I too late?";
			next;
			mes "[Agnes]";
			mes "No! you have brought all of them. I'm so happy!";
			next;
			mes "[Agnes]";
			mes "I'll take pearls to the jeweler, the best jeweler. They are so pretty!";
			next;
			mes "[Agnes]";
			mes "I'll send soft hairs too. I wonder what they will turn into.";
			next;
			mes "[Agnes]";
			mes "Ah, I need a handkerchief. There are so many things to do and I'm so busy.";
			next;
			mes "[Agnes]";
			mes "Oh, I would like to thank you for working hard for me. Here you are.";
			next;
			mes "[Agnes]";
			mes "And Can I ask you to get more? I am afraid that cloth is not sufficient.";
			next;
			mes "[" + strcharinfo(0) + "]";
			if( Sex == SEX_FEMALE) {
				mes "I guess so. I will help you to the best of my ability.";
				next;
				mes "[Agnes]";
				mes "You really understand me. I'm so happy.";
			}
			else {
				mes "Yes, I will.";
				next;
				mes "[Agnes]";
				mes "Thank you very much";
			}
			next;
			mes "[Agnes]";
			mes "See you tomorrow. Have a nice day.";
			delitem 722,3;// Pearl
			delitem 949,50;// Feather
			erasequest 14508;// Jewel and Cloth
			setquest 14509;// Still Making It
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			ep16_lug = 15;
			close3;
		case 14510:
			if (countitem(7166) < 15 || countitem(507) < 30 || countitem(509) < 10) {
				cutin "16agn_nor",2;
				mes "[Agnes]";
				mes "Dear adventurer, welcome back. You are a great person. I think you have obtained all, I guess.";
				next;
				mes "[Agnes]";
				mes "If not, I will be really sad. I'm skipping meals to wear the pretty dress. So I'm so sensitive now.";
				next;
				mes "[" + strcharinfo(0) + "]";
				mes "I am sorry but I forgot what I should get.";
				next;
				cutin "16agn_ang",2;
				mes "[Agnes]";
				mes "Oh, it's disappointing! I thought you would have a good memory as an adventurer.";
				next;
				cutin "16agn_nor",2;
				mes "[Agnes]";
				mes "Ah, I'm sorry. I got angry suddenly.";
				next;
				mes "[Agnes]";
				mes "As I told you before. I didn't eat meals these days. Please forgive my misbehavior. Did yo get what I asked?";
				next;
				mes "[Agnes]";
				mes "^0000cd15 pieces of " + getitemname(7166) + ", 30 " + getitemname(507) + ", and 10 " + getitemname(509) + "^000000. I'll make a pink dress that is softer than flower petal.";
				next;
				mes "[Agnes]";
				mes "Then, please get them for me.";
				close3;
			}
			cutin "16agn_nor",2;
			mes "[Agnes]";
			mes "Dear adventurer, welcome back. You are a great person. I think you have obtained all, I guess.";
			next;
			mes "[Agnes]";
			mes "If not, I will be really sad. I'm skipping meals to wear the pretty dress. So I'm so sensitive now.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Are these what you want?";
			next;
			mes "[Agnes]";
			mes "Let me see.... Yes! they are what I wanted. You are the best.";
			next;
			mes "[Agnes]";
			mes "It is very soft. Softer than the pink flower petals. If I make a flower with theses, the dress will feel like a flower.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, Thank you very much. This is a small token of my sincerity.";
			next;
			mes "[Agnes]";
			mes "Can I ask you to bring more? I need lots of dresses.";
			delitem 7166,15;// Soft Silk
			delitem 507,30;// Red Herb
			delitem 509,10;// White Herb
			erasequest 14510;// Pink Petal-like Dress
			setquest 14509;// Still Making It
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			close3;
		case 14511:
			if (countitem(6511) < 5 || countitem(6509) < 5 || countitem(6510) < 5) {
				cutin "16agn_nor",2;
				mes "[Agnes]";
				mes "Dear adventurer, welcome back. You are a great person. I think you have obtained all, I guess.";
				next;
				mes "[Agnes]";
				mes "If not, I will be really sad. I'm skipping meals to wear the pretty dress. So I'm so sensitive now.";
				next;
				mes "[" + strcharinfo(0) + "]";
				mes "I am sorry but I forgot what I should get.";
				next;
				cutin "16agn_ang",2;
				mes "[Agnes]";
				mes "Oh, it's disappointing! I thought you would have a good memory as an adventurer.";
				next;
				cutin "16agn_nor",2;
				mes "[Agnes]";
				mes "Ah, I'm sorry. I got angry suddenly.";
				next;
				mes "[Agnes]";
				mes "As I told you before. I didn't eat meals these days. Please forgive my misbehavior. Did yo get what I asked?";
				next;
				mes "[Agnes]";
				mes "^0000cd5 " + getitemname(6511) + ", 5 " + getitemname(6510) + " and 5 " + getitemname(6509) + "^000000. I will use them to make a plain but beautiful decoration.";
				next;
				mes "[Agnes]";
				mes "Then, please get them for me.";
				close3;
			}
			cutin "16agn_nor",2;
			mes "[Agnes]";
			mes "Dear adventurer, welcome back. You are a great person. I think you have obtained all, I guess.";
			next;
			mes "[Agnes]";
			mes "If not, I will be really sad. I'm skipping meals to wear the pretty dress. So I'm so sensitive now.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Are these what you want?";
			next;
			mes "[Agnes]";
			mes "Let me see.... Yes! they are what I wanted. You are the best.";
			next;
			mes "[Agnes]";
			mes "I think I can use these to make a beautiful corsage. It will be fresh and beautiful.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, Thank you very much. This is a small token of my sincerity.";
			next;
			mes "[Agnes]";
			mes "Can I ask you to bring more? I need lots of dresses.";
			delitem 6511,5;// Beautiful Flower
			delitem 6509,5;// Mysterious Flower
			delitem 6510,5;// Elegant Flower
			erasequest 14511;// Beautiful Flower Decoration
			setquest 14509;// Still Making It
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			close3;
		case 14512:
			cutin "16agn_nor",2;
			mes "[Agnes]";
			mes "Dear adventurer, welcome back. You are a great person. I think you have obtained all, I guess.";
			next;
			mes "[Agnes]";
			mes "If not, I will be really sad. I'm skipping meals to wear the pretty dress. So I'm so sensitive now.";
			next;
			mes "[" + strcharinfo(0) + "]";
			if (countitem(7205) < 20) {
				mes "I am sorry but I forgot what I should get.";
				next;
				cutin "16agn_ang",2;
				mes "[Agnes]";
				mes "Oh, it's disappointing! I thought you would have a good memory as an adventurer.";
				next;
				cutin "16agn_nor",2;
				mes "[Agnes]";
				mes "Ah, I'm sorry. I got angry suddenly.";
				next;
				mes "[Agnes]";
				mes "As I told you before. I didn't eat meals these days. Please forgive my misbehavior. Did yo get what I asked?";
				next;
				mes "[Agnes]";
				mes "^0000cd20 " + getitemname(7205) + "^000000. I want to make a dress that is deeper and darker than the nigh sky.";
				next;
				mes "[Agnes]";
				mes "Then, please get them for me.";
				close3;
			}
			mes "Are these what you want?";
			next;
			mes "[Agnes]";
			mes "Let me see.... Yes! they are what I wanted. You are the best.";
			next;
			mes "[Agnes]";
			mes "I will use these materials to make an elegant dress as dark as nigh sky. Wearing this, I will give an image of a sleek cat.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, Thank you very much. This is a small token of my sincerity.";
			next;
			mes "[Agnes]";
			mes "Can I ask you to bring more? I need lots of dresses.";
			delitem 7205,20;// Piece of Black Cloth
			erasequest 14512;// Dress of the Night Sky
			setquest 14509;// Still Making It
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			close3;
		case 14513:
			cutin "16agn_nor",2;
			mes "[Agnes]";
			mes "Dear adventurer, welcome back. You are a great person. I think you have obtained all, I guess.";
			next;
			mes "[Agnes]";
			mes "If not, I will be really sad. I'm skipping meals to wear the pretty dress. So I'm so sensitive now.";
			next;
			mes "[" + strcharinfo(0) + "]";
			if (countitem(7122) < 20) {
				mes "I am sorry but I forgot what I should get.";
				next;
				cutin "16agn_ang",2;
				mes "[Agnes]";
				mes "Oh, it's disappointing! I thought you would have a good memory as an adventurer.";
				next;
				cutin "16agn_nor",2;
				mes "[Agnes]";
				mes "Ah, I'm sorry. I got angry suddenly.";
				next;
				mes "[Agnes]";
				mes "As I told you before. I didn't eat meals these days. Please forgive my misbehavior. Did yo get what I asked?";
				next;
				mes "[Agnes]";
				mes "^0000cd20 strands of " + getitemname(7122) + "^000000. I want to make a shawl of fire that is flaming more fiercely than the sun.";
				next;
				mes "[Agnes]";
				mes "Then, please get them for me.";
				close3;
			}
			mes "Are these what you want?";
			next;
			mes "[Agnes]";
			mes "Let me see.... Yes! they are what I wanted. You are the best.";
			next;
			mes "[Agnes]";
			mes "In the banquet, people will not be able to take their eyes from my flaming shawl, which is very nice.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, Thank you very much. This is a small token of my sincerity.";
			next;
			mes "[Agnes]";
			mes "Can I ask you to bring more? I need lots of dresses.";
			delitem 7122,20;// Burning Hair
			erasequest 14513;// Shawl of the Blazing Sun
			setquest 14509;// Still Making It
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			close3;
		case 14514:
			cutin "16agn_nor",2;
			mes "[Agnes]";
			mes "Dear adventurer, welcome back. You are a great person. I think you have obtained all, I guess.";
			next;
			mes "[Agnes]";
			mes "If not, I will be really sad. I'm skipping meals to wear the pretty dress. So I'm so sensitive now.";
			next;
			mes "[" + strcharinfo(0) + "]";
			if (countitem(6557) < 5) {
				mes "I am sorry but I forgot what I should get.";
				next;
				cutin "16agn_ang",2;
				mes "[Agnes]";
				mes "Oh, it's disappointing! I thought you would have a good memory as an adventurer.";
				next;
				cutin "16agn_nor",2;
				mes "[Agnes]";
				mes "Ah, I'm sorry. I got angry suddenly.";
				next;
				mes "[Agnes]";
				mes "As I told you before. I didn't eat meals these days. Please forgive my misbehavior. Did yo get what I asked?";
				next;
				mes "[Agnes]";
				mes "^0000cdFive " + getitemname(6557) + "^000000. I can use them to make the dress elegant and beautiful and I will look like a fairy.";
				next;
				mes "[Agnes]";
				mes "Then, please get them for me.";
				close3;
			}
			mes "Are these what you want?";
			next;
			mes "[Agnes]";
			mes "Let me see.... Yes! they are what I wanted. You are the best.";
			next;
			mes "[Agnes]";
			mes "Now I think I can use these things to make a beautiful and elegant dress. It will be fantastic.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, Thank you very much. This is a small token of my sincerity.";
			next;
			mes "[Agnes]";
			mes "Can I ask you to bring more? I need lots of dresses.";
			delitem 6557,5;// Fancy Fairy Wing
			erasequest 14514;// Step of the Fairy
			setquest 14509;// Still Making It
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			close3;
		case 14515:
			cutin "16agn_nor",2;
			mes "[Agnes]";
			mes "Dear adventurer, welcome back. You are a great person. I think you have obtained all, I guess.";
			next;
			mes "[Agnes]";
			mes "If not, I will be really sad. I'm skipping meals to wear the pretty dress. So I'm so sensitive now.";
			next;
			mes "[" + strcharinfo(0) + "]";
			if (countitem(1001) < 5) {
				mes "I am sorry but I forgot what I should get.";
				next;
				cutin "16agn_ang",2;
				mes "[Agnes]";
				mes "Oh, it's disappointing! I thought you would have a good memory as an adventurer.";
				next;
				cutin "16agn_nor",2;
				mes "[Agnes]";
				mes "Ah, I'm sorry. I got angry suddenly.";
				next;
				mes "[Agnes]";
				mes "As I told you before. I didn't eat meals these days. Please forgive my misbehavior. Did yo get what I asked?";
				next;
				mes "[Agnes]";
				mes "^0000cdFive " + getitemname(1001) + "^000000. I going to use the start dust to embroider the dress like starts in the night sky. It will be very pretty.";
				next;
				mes "[Agnes]";
				mes "Then, please get them for me.";
				close3;
			}
			mes "Are these what you want?";
			next;
			mes "[Agnes]";
			mes "Let me see.... Yes! they are what I wanted. You are the best.";
			next;
			mes "[Agnes]";
			mes "Now I can embroider my dress like stars shining in the night sky. It will be very pretty.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, Thank you very much. This is a small token of my sincerity.";
			next;
			mes "[Agnes]";
			mes "Can I ask you to bring more? I need lots of dresses.";
			delitem 1001,5;// Star Dust
			erasequest 14515;// Sparkling Star
			setquest 14509;// Still Making It
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			close3;
		default:	// none quest
		}
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Dear adventurer. You came at the perfect time";
		mes "A serious thing happened!!!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What is it? Any threat to your safety?";
		mes "Or your brother started fight again?";
		next;
		mes "[Agnes]";
		mes "No, it's more serious.";
		mes "I need your help desperately!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "OK, then I will prepare for fight.";
		mes "Wait a second.";
		next;
		mes "[Agnes]";
		mes "What ?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What..?";
		next;
		mes "[Agnes]";
		mes "Why do you prepare to fight?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "You said a serious thing happened. Then, is there anything serious other than a large war?";
		next;
		mes "[Agnes]";
		mes "It is not light that.";
		mes "Fighting is not all about living.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Then what is it?";
		next;
		mes "[Agnes]";
		mes "I heard from Myer that he is sorry that he cannot come with me to the banquet. He said that he would send a handsome guy as my partner instead him.";
		mes "and that I should prepare to go with him.";
		next;
		mes "[Agnes]";
		mes "He said that the substitute is so good-looking that I would like him when I see him. I am sure that a very handsome, as Myer is choosy.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "That sounds nice.";
		mes "By the way, I don't understand the 'serious thing' you said.";
		next;
		mes "[Agnes]";
		mes "I mean I prepared a dress that I choose thinking that I would go with Myer. And now the partner has changed and I have to prepare considering him.";
		next;
		mes "[" + strcharinfo(0) + "]";
		if (Sex == SEX_FEMALE) {
			mes "Yes, you should!!!";
			next;
			mes "[Agnes]";
			mes "I expected you would agree as a woman like me.";
		}
		else {
			mes "Ah....!";
			next;
			mes "[Agnes]";
			mes "Do you understand?";
		}
		next;
		mes "[Agnes]";
		mes "There are so many things I have to consider, such as his hair color, eye color, clothes color and shape. I asked Myer about him, but he didn't tell me.";
		next;
		mes "[Agnes]";
		mes "Once he visits, it will be late. So I have to finish preparation in advance, regardless of how he wears.";
		next;
		mes "[Agnes]";
		mes "To prepare for different situations, such as hair colors and clothes color, I need ^0000cdlots of dresses^000000. Do you understand what I mean?";
		next;
		mes "[Agnes]";
		mes "Therefore, I told my grandfather that I want to have some more dresses to prepare for all situations, but he said that what I have now is enough. Does it make sense?";
		next;
		mes "[" + strcharinfo(0) + "]";
		if (Sex == SEX_FEMALE) {
			mes "That is nonsense!";
			next;
			mes "[Agnes]";
			mes "Yes!!!";
		}
		else {
			mes "You are beautiful enough with the clothes you are wearing now.";
			next;
			mes "[Agnes]";
			mes "Oh, no. I am not.";
		}
		next;
		mes "[Agnes]";
		mes "I talked with Wolf too but He said the same thing as grandfather. I should ask somebody to do me a favor unless he doesn't listen to me.";
		next;
		mes "[Agnes]";
		mes "So I talked with Myer. He told me to talk with you. He also said that if you cannot get a dress, buy the materials and make one. He said that is how they on the street.";
		next;
		mes "[Agnes]";
		mes "So I hired very skillful person who can make a dress and accessories, but the key is materials. I guess that you are very experienced and can get what I need.";
		next;
		mes "[Agnes]";
		mes "If I go out to get a dress, I may be the first princess in Rune-Midgarts who dies for a dress. So would you please save me from this situation?";
		next;
		mes "[" + strcharinfo(0) + "]";
		if (Sex == SEX_FEMALE) {
			mes "Of course, I'll do my best to help you.";
			mes "You need cloth, accessories and dyes don't you?";
			next;
			mes "[Agnes]";
			mes "Yes, you are right!";
			mes "You understand me very well! I like you very much.";
			next;
			mes "[Agnes]";
			mes "Can you be my friend. I have wanted a woman who understands me very much.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Of course. What do you want?";
		}
		else {
			mes "Hmm.. how can I help you?";
			next;
			mes "[Agnes]";
			mes "Of course, you will get cloth, accessories and dyes!";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Then which kind do you want?";
		}
		next;
		mes "[Agnes]";
		mes "There is an accessory I really want to have, but it is so rare that I couldn't get it.";
		next;
		mes "[Agnes]";
		mes "Can you get it for me?...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Why is it so rare?";
		next;
		mes "[Agnes]";
		mes "it is a ^0000cdpearl^000000! elegant and gentle gloss! Valuable jewel coming from pains!";
		next;
		mes "[Agnes]";
		mes "I would like to use pearls to make a necklace and bracelet. You can get pearls from monsters. Can you get them for me?";
		next;
		if (select( "Of course.", "It will be difficult." ) == 2) {
			mes "[" + strcharinfo(0) + "]";
			mes "I think it will be difficult to get pearls. It is really difficult. It is beyond my ability. I'm sorry.";
			next;
			mes "[Agnes]";
			mes "Yes... I know it will be very difficult. If you change your mind, please come back.";
			close3;
		}
		mes "[Agnes]";
		mes "Thank god. I was afraid that you would refuse it.";
		next;
		mes "[Agnes]";
		mes "I carry this to the banquet whatever I wear. And can ask you do me a favor one more?";
		next;
		mes "[Agnes]";
		mes "To produce good cloth, good threads are necessary. To extract good threads, ^0000cdsoft hair^000000 is the best. Would you get soft fur for me too?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It is not difficult.";
		next;
		mes "[Agnes]";
		mes "I think ^0000cd3 " + getitemname(722) + " ^000000are enough and 50 strands of " + getitemname(949) + "^0000cdare required^000000.";
		next;
		mes "[Agnes]";
		mes "The success of my banquet is in your hands. I will do my best to make it one of the best ever.";
		setquest 14508;// Jewel and Cloth
		ep16_lug = 14;
		close3;
	case 0:
	case 1:
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Dear adventurer, what are you doing here?";
		mes "Did you come for my dress?";
		next;
		mes "[Agnes]";
		mes "But I'm still making the dress using what you got for me.";
		mes "I'll decide what to make next after completing this.";
		next;
		mes "[Agnes]";
		mes "Thank you for visiting but I am sorry that I cannot help you.";
		mes "Would you come back later in the afternoon?";
		close3;
	case 2:
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Dear adventurer. Thanks for coming. I thought all day of what dress to make. I cannot decide still.";
		next;
		mes "[Agnes]";
		mes "A golden dress shining brighter than the sun? Or a sliver dress shining more gentile than the moon? Or a dress greener than tree leaves?";
		next;
		mes "[Agnes]";
		mes "Ah, how can I fit the pearl necklace and look nice with my partner?";
		next;
		mes "[Agnes]";
		mes "I have made a decision!!";
		next;
		mes "[Agnes]";
		switch( rand(1,10) ) {
		case 1:
		case 2:
			mes "I prefer the soft pink dress other than young flower petal blooming on a large field. To be like that, I think I need a very soft silk cloth.";
			next;
			mes "[Agnes]";
			mes "In the banquet, if my soft dress widens like young flower petal, the place will be full with fragrance.";
			next;
			mes "[Agnes]";
			mes "The width of the skirt should be as wider as possible. The dress will look like a flower petal shaking every time I move.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, Would get me ^0000cd" + getitemname(7166) + "^000000? ^0000cd15 pieces^000000 will do.";
			next;
			mes "[Agnes]";
			mes "I also need herbs used to dye the cloth. ^0000cd30 " + getitemname(507) + " and 10 " + getitemname(509) + "^000000.";
			next;
			mes "[Agnes]";
			mes "I see a dress in you hands that look like a flower petal.";
			erasequest 14509;// Still Making It
			setquest 14510;// Pink Petal-like Dress
			close3;
		case 3:
		case 4:
			mes "Flower! It a flower! Large and shining jewels are too common here in the palace.";
			next;
			mes "[Agnes]";
			mes "I want to be a flower in the banquet hall. I want to make people to admire me like a flower that fascinates with delicate fragrance.";
			next;
			mes "[Agnes]";
			mes "I'm going to use flowers to make a corsage. Please get me some flowers. No common flowers. I heard that rare flowers can be obtained in a far foreign country.";
			next;
			mes "[Agnes]";
			mes "I saw those flowers once. They were so beautiful.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, please get me ^0000cd5 " + getitemname(6511) + ", 5 " + getitemname(6510) + " and 5 " + getitemname(6509) + "^000000.";
			next;
			mes "[Agnes]";
			mes "My beautiful corsage is up to you!";
			erasequest 14509;// Still Making It
			setquest 14511;// Beautiful Flower Decoration
			close3;
		case 5:
			mes "I was thinking of how I can emphasize my pearl necklace.";
			next;
			mes "[Agnes]";
			mes "Yesterday, when I was thinking watching the night sky, I found that stars were twinkling.";
			next;
			mes "[Agnes]";
			mes "It was so beautiful that I couldn't take my eyes off them.";
			next;
			mes "[Agnes]";
			mes "What I ask you today is....";
			next;
			mes "[Agnes]";
			mes "Start dust.";
			next;
			mes "[Agnes]";
			mes "Imagine that star dusts are gently scattered on a beautiful dress. You won't be able to take your eyes from them.";
			next;
			mes "[Agnes]";
			mes "I will be the brightest star in the banquet.";
			next;
			mes "[Agnes]";
			mes "So please get me ^0000cd5 " + getitemname(1001) + "^000000. I think that amount of star dusts can decorate the entire dress.";
			next;
			mes "[Agnes]";
			mes "Don't forget. My shining dress is up to your hands.";
			erasequest 14509;// Still Making It
			setquest 14515;// Sparkling Star
			close3;
		case 6:
			mes "I would like to make a fairy dress! A dress so shining in golden light that anyone should admire it.";
			next;
			mes "[Agnes]";
			mes "Cloth is sufficient, but the problem is decoration. I heard that there is something called fairy's wing.";
			next;
			mes "[Agnes]";
			mes "It will make a dress as elegant as fairy and on which I can work lightly. The thought alone makes you fascinated?";
			next;
			mes "[Agnes]";
			mes "Every time I step, the luxury lace will flutter, making people to imagine a fairy waling in the wood. The dress will make me better.";
			next;
			mes "[Agnes]";
			mes "Of course, I will not attach them as they are. I know a person who will modify them properly.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, Please get me ^0000cd5 " + getitemname(6557) + "^000000.";
			next;
			mes "[Agnes]";
			mes "My fairly-like dress is up to you hands.";
			erasequest 14509;// Still Making It
			setquest 14514;// Step of the Fairy
			close3;
		case 7:
		case 8:
			mes "Have you ever watch the burning sun directly. I am sure you haven't. The sun stabs the eyes of the people who watch it so that they cannot watch it.";
			next;
			mes "[Agnes]";
			mes "But I wonder how many people lost their eyes after watching the sun directly. Why do people watch that burning fire? What is it?";
			next;
			mes "[Agnes]";
			mes "Dear adventurer. I want to have that burning fire.";
			next;
			mes "[Agnes]";
			mes "I heard that there is the ^0000cdhot hair^000000 that looks burning but not hot at all, though the name sounds contradictory.";
			next;
			mes "[Agnes]";
			mes "I will use it to make a beautiful shawl. As soon as I enter the banquet hall, I will be able to give a strong impression.";
			next;
			mes "[Agnes]";
			mes "Please get me ^0000cd20 strands of " + getitemname(7122) + "^000000.";
			next;
			mes "[Agnes]";
			mes "My beautiful shawl burning like the sun is up to your hands.";
			erasequest 14509;// Still Making It
			setquest 14513;// Shawl of the Blazing Sun
			close3;
		default:
			mes "I like a black dress that reminds of dark night. A dress so elegant and beautiful that makes people to admire in silence.";
			next;
			mes "[Agnes]";
			mes "I should make a dress that is as far and mysterious as a dark night.";
			next;
			mes "[Agnes]";
			mes "I will go around the banquet hall like a sleek cat, concealing everything underneath the black dress.";
			next;
			mes "[Agnes]";
			mes "To do so, I think I need ^0000cd20 " + getitemname(7205) + "^000000.";
			next;
			mes "[Agnes]";
			mes "This will be beautiful dress without a decoration.";
			next;
			mes "[Agnes]";
			mes "Dear adventurer, my black night-like dress is up to your hands.";
			erasequest 14509;// Still Making It
			setquest 14512;// Dress of the Night Sky
			close3;
		}
	}
}

prt_cas_q,90,184,7	script	Helmut Roegenburg#ep16lug	4_EP16_HELMUT,{
	if (ep16_lug == 0) {
		cutin "16hel",0;
		mes "[Helmut]";
		mes "Hello.";
		mes "I am Helmut Roegenburg.";
		next;
		mes "[Helmut]";
		mes "If you want to listen to the story of my family, see my ^0000cdgrandfather^000000 who is over there.";
		mes "He will explain better than me.";
		close3;
	}
	if (ep16_lug < 3) {
		cutin "16hel",0;
		mes "[Helmut]";
		mes "Did you see my brother, ^0000cdWolf Roegenburg^000000?";
		mes "He is in charge of all household matters helping our grandfather while I am away here on the front.";
		next;
		mes "[Helmut]";
		mes "If you want to know about the Roegenburg, it will be a quality time.";
		close3;
	}
	if (ep16_lug > 2 && ep16_lug < 7) {
		cutin "16hel",0;
		mes "[Helmut]";
		mes "I am glad that I come back home and can see the family members.";
		next;
		mes "[Helmut]";
		mes "But when I think of the front threatened by the monster, I feel heavy-hearted. Of course, I believe that my men are doing well to protect the territory.";
		next;
		mes "[Helmut]";
		mes "I want to run back to them as soon as the banquet is finished.";
		mes "This place is somewhat stuffy to me.";
		close3;
	}
}

prt_cas_q,86,180,7	script	Kalbern#ep16lug	4_M_RUSCHILD,{
	if (ep16_lug <= 6) {
		mes "[Kalbern]";
		mes "Dear adventurer, hello.";
		mes "I am ^0000cdKalbern^000000 and a chamberlain of Helmut.";
		next;
		mes "[Kalbern]";
		mes "I served Helmut in a harsh front in the border area. Now I am in Prontera, the capital city of Rune-Midgarts and I cannot adapt to this situation";
		next;
		mes "[Kalbern]";
		mes "I also lose my nerve when I see noble people and royal family in the palace.";
		next;
		mes "[Kalbern]";
		mes "I didn't recognize when I served Helmut on the front but here, he seems a little away as I feel that he is the heir of a royal family.";
		next;
		mes "[Kalbern]";
		mes "He treated solders and working children equally. So everybody liked him and followed him.";
		next;
		mes "[Kalbern]";
		mes "I also thank him for accepting me after my parents were killed by the monster.";
		next;
		mes "[Kalbern]";
		mes "To repay his kindness, I begged him to serve him and I am staying with him...";
		next;
		mes "[Kalbern]";
		mes "Here, I have nothing to do for Helmut except bring him some beer.";
		next;
		mes "[Kalbern]";
		mes "I wish that the banquet is finished and go back early.";
		next;
		mes "[Kalbern]";
		mes "But, I don't mean that I don't want him to become a king.";
		mes "I am just uncomfortable to be here.";
		close;
	}
}

prt_cas_q,96,186,3	script	Wolf Roegenburg#ep16lug	4_EP16_WOLF,{
	if (checkweight(1301,1) == 0) {
		mes "[Wolf Roegenburg]";
		mes "Well, you seem to have lots of luggage. How about removing some?";
		close;
	}
	if (ep16_lug == 0) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Thank you for visiting the Roegenburg.";
		mes "Won't you see my grandfather and patriarch of the Roegenburg, ^0000cdMaximilian Roegenburg^000000?";
		next;
		mes "[Wolf]";
		mes "He enjoys talking with adventurers.";
		close3;
	}
	if (ep16_lug == 1) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Dear adventurer, it is a honor to have you in the Roegenburg.";
		mes "I am the second son of the Roegenburg, ^0000cdWolf Roegenburg^000000.";
		next;
		mes "[Wolf]";
		mes "To carry on the will of Wilhelm Roegenburg, a national hero, we, at the Roegenburg, are making lots of efforts to protect honor, justice and traditions.";
		next;
		mes "[Wolf]";
		mes "Since the foundation of Rune-Midgarts, lots of people from the Roegenburg have made contribution to the country and this is our pride.";
		next;
		mes "[Wolf]";
		mes "Currently ^0000cdHelmut Roegenburg^000000, who is an excellent candidate for the throne, is participating in the royal assembly. Did you see him?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes. I saw him just before. Who is this?";
		next;
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Dear adventurer, it is nice to see you. I am ^0000cdAgnes Roegenburg^000000 and the youngest of the four of the Roegenburg.";
		next;
		mes "[Agnes]";
		mes "Do you have a partner to go with to the banquet? I have no one to go with. No one takes my fancy.";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "Agnes, don't say that. it is not appropriate. We are telling the adventurer of the story of the Roegenburg...";
		next;
		cloakoffnpc "Myer Roegenburg#ep16lug", getcharid(0);
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "Now, will my prince come with me?";
		next;
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Ah, Myer, brother! brother!";
		next;
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Thanks for coming at the right time. Dear adventurer,";
		mes "This is ^0000cdMyer Roegenburg^000000 and he is the third son of the Roegenburg.";
		next;
		mes "[Wolf]";
		mes "I was away for a long time and have just came back. It is right, isn't?";
		next;
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "Well, about half. I heard that ^0000cda war manic and a peddler would join hands and participate in the royal assembly^000000.";
		next;
		mes "[Myer]";
		mes "So I came back for a short stay. I heard that the relationship between brothers was not close but has suddenly deeper. I cannot be out.";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "What your language. ^0000cdEven though you go outside and hang out with low fellows,^000000 you don't have make the place where you live a dirty back street.";
		mes "You didn't think that I am ignorant of the fellows that you hang out with, did you?";
		next;
		mes "[Myer]";
		mes "Of course I know that grandfather and you sent people to monitor me. They were so awkward and all other fellow knew it.";
		next;
		cutin "16mye_ang",1;
		mes "[Myer]";
		mes "My noble brother doesn't like my way of speaking?";
		mes "If we join hands and ^0000cdHelmut becomes a king^000000,^0000cdthe whole country will ^000000turn into a back street except the palace. Isn't it better to hear it now to reduce the shock you will have later?";
		next;
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "Well, you may not hear as you will stay at home and calculate the money you will make from wars.";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "You are unbelievably rude. I told you should call me politely.";
		mes "Until when are you going to act like that?";
		next;
		cutin "16agn_ang",2;
		mes "[Agnes]";
		mes "Stop all of you! We have gathered here for fight. This is a banquet for the adventurer. We shouldn't do this in front of the adventurer.";
		next;
		mes "[Agnes]";
		mes "Especially you lack dignity. What would the adventurer think of us?";
		next;
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "Yes, you are right. I think I am the unwelcome guest. I'd better leave. Agnes, I'll come back later.";
		next;
		cloakonnpc "Myer Roegenburg#ep16lug", getcharid(0);
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Oh my god, I forgot. I have to make preparations!";
		next;
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Sorry for this unpleasant situation. I never meant to do so. Apologies if you feel uncomfortable. Myer made rude remarks as he came back in a long time.";
		next;
		mes "[Wolf]";
		mes "I will tell him to make a polite apology to you later. Actually he is different from what you saw. Please understand kindly.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "No, it is ok with me.";
		next;
		mes "[Wolf]";
		mes "By the way, dear adventurer, can you do me a favor if you have time?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, pleas go ahead.";
		next;
		mes "[Wolf]";
		mes "I hope you will visit the Wigner and bring a thing from ^0000cdIsaac Wigner^000000.";
		next;
		mes "[Wolf]";
		mes "Originally, I should do that, but I think I need to talk with Myer seriously. So I would like to do that for me...";
		next;
		mes "[Wolf]";
		mes "So, please do it for me. Of course, you may refuse it. But I wonder I can find a reliable person like you.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It is a test to find that I am reliable.";
		next;
		mes "[Wolf]";
		mes "Ah, no it is not. If you feel unpleasant, I am sorry. I just don't have reliable person.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Ok. Go to the Wigner and ask Isaac Wigner for the thing that you requested. Is that right?";
		next;
		mes "[Wolf]";
		mes "Yes. right.";
		completequest 14495;// To Wolf
		setquest 14496;// To Isaac
		if (achievementinfo(130000, ACHIEVEINFO_COUNT7) == 0)
			achievementupdate(130000, ACHIEVEINFO_COUNT7, 1);
		ep16_lug = 2;
		if (isbegin_quest(7682) == 1 && isbegin_quest(5402) == 2 && isbegin_quest(7683) == 2 && isbegin_quest(7684) == 2 && ep16_wal > 1 && ep16_wig > 1 && ep16_lug > 1 && ep16_gaobs > 1) {
			completequest 7682;// Socializing Starts from an Eye Contact
			setquest 7685;// What Is the Next Thing on the Schedule ?
		}
		close3;
	}
	if (ep16_lug == 2) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Walk along the ^0000cdcorridor. The Wigner is in the last room^000000.";
		mes "Find Isaac and bring the thing I requested.";
		next;
		mes "[Wolf]";
		mes "I am very sorry to cause inconvenience to you.";
		close3;
	}
	if (ep16_lug == 3) {
		if (countitem(6930) < 1) {
			cutin "16wol_nor",2;
			mes "[Wolf]";
			mes "Dear adventurer, how is it going? I see you have nothing. It seem that you haven't brought it yet.";
			mes "You just go to the ^0000cdWigner and bring a thing from Isaac^000000.";
			close3;
		}
		cloakoffnpc "Myer Roegenburg#ep16lug", getcharid(0);
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Dear adventurer, did you bring the thing? Oh, you have brought it. Thank you very much.";
		next;
		mes "[Wolf]";
		mes "Oh, the box's lock is protected by ^0000cdpassword^000000.";
		next;
		mes "[Wolf]";
		mes "The first cell has a number ^0000cd1^000000 and the next four cells are empty and you should enter numbers into them.";
		next;
		mes "[Wolf]";
		mes "Hmm.. This is simple. This perfectly ^0000cdbeautiful box is a hint^000000... The answer is always included in the question.";
		next;
		mes "[Wolf]";
		mes "Looking at the answer, it really seems that the Wigner people love ^0000cdnumers and gold^000000. Will you try to solve it too?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "How come you ask me to decipher the password. And isn't it a secret thing?";
		next;
		mes "[Wolf]";
		mes "Because you are reliable person. Just do it for fun.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Then, I think the answer is this:";
		next;
		input .@string$;
		mes "[" + strcharinfo(0) + "]";
		if (.@string$ != "1618") {
			mes "Hm... It is not the answer.";
			mes "I think I need some time for contemplation.";
			close3;
		}
		mes "1618. It stands for 1.618 which is the golden ratio.";
		mes "Well it sounds too easy.";
		next;
		mes "[Wolf]";
		mes "But what is inside is not easy.";
		next;
		mes "[Wolf]";
		mes "The thing put in the small bottle in the box will change the dynamics of combats and wars, though it is in a testing stage.";
		next;
		mes "[Wolf]";
		mes "You are a reliable person as I expected.";
		mes "I was sorry when I asked you to do me a favor. We will reward you generously.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It is OK. there is message from Isaac.";
		next;
		mes "[Wolf]";
		mes "What is that?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Recently, there is a ^0000cdrumor^000000 circulating in Prontera about the Roegenburg and Helmut Roegenburg.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It was not a good rumor. He asked me to inspect it and check if it is true.";
		next;
		mes "[Wolf]";
		mes "A rumor about you? I didn't know about it... Rumor.....";
		mes "I need to check it, but there is no person we count on...";
		next;
		mes "[Wolf]";
		mes "Excuse me, dear adventurer?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes?";
		next;
		mes "[Wolf]";
		mes "Can you do me a favor again? I cannot do it myself, as there could be a problem when I do it myself.";
		next;
		mes "[Wolf]";
		mes "All staff I can have trust in are doing other jobs and I have no person except you.";
		next;
		mes "[Wolf]";
		mes "You can get information easily traveling around and what is more important is that I can trust you.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well, it is not easy but....";
		next;
		mes "[Wolf]";
		mes "If you are busy, you may refuse it. I am sorry that I ask you to do me a favor. My brother came back suddenly and it drives me out of my mind and busy.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "No, that is a thing I can do. Then see you soon.";
		next;
		mes "[Wolf]";
		mes "I don't know how to thank you. It is the most accurate to hear the rumor from children. I heard that children gather in a ^0000cdlarge open space^000000 in Prontera..";
		next;
		mes "[Wolf]";
		mes "Then, see you soon.";
		delitem 6930,1;// Biz_Items_Sample
		erasequest 14497;// Delivery for Wolf
		setquest 14498;// Which Rumor
		ep16_lug = 4;
		close3;
	}
	if (ep16_lug == 4 || ep16_lug == 5) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "What is the rumor about Roegenburg that is circulating in Prontera.";
		mes "I didn't know there is a rumor about our family circulating";
		next;
		mes "[Wolf]";
		mes "I had to start gather information earlier. I couldn't because I was busy due to others.";
		mes "I didn't expect at all that a rumor will be circulating.";
		next;
		mes "[Wolf]";
		mes "I cannot wait to know what rumor is circulating about our family.";
		mes "Then see you soon.";
		close3;
	}
	if (ep16_lug == 6) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Hi, you look a little tired.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Ah, do I? I had to do some errands to find the rumor.";
		next;
		mes "[Wolf]";
		mes "Oh, I am sorry about that. I should have done that.";
		next;
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Rumor? what rumor? I like such thing very much.";
		next;
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "I really want know about it too.";
		next;
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "I am sorry to make you tired. Did you find anything?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, I found the rumor and it was pretty specific. Can I tell about it here?";
		next;
		mes "[Wolf]";
		mes "Yes, it is ok. If the rumor is about our family, everyone has to listen, so that we can gather and develop a solution.";
		next;
		mes "[I changed the rumor I got from children to a relatively softer version and told them.]";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "These days everybody talks about the rumor. I think it will spread throughout Rune-Midgarts as well as Prontera.";
		next;
		mes "[Wolf]";
		mes "The rumor is....very.... specific and malicious. It must be circulated on purpose by someone who knows the circumstances of my family.";
		next;
		cutin "16agn_nor",2;
		mes "[Agnes]";
		mes "Do yo mean the bad guy is one of us? OMG! this is very serious!";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "Yes. ^0000cdMyer^000000? How much are you going to disgrace our family?";
		next;
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "Well, as much as needed?";
		next;
		emotion ET_HUK, getnpcid(0, "Maximilian Roegenburg#ep16lug");
		emotion ET_HUK;
		emotion ET_HUK, getnpcid(0, "Agnes Roegenburg#ep16lu");
		cutin "16hel",0;
		mes "[Helmut]";
		mes "Myer, did you really do that?";
		next;
		cutin "16agn_ang",2;
		mes "[Agnes]";
		mes "Myer did that?";
		next;
		cutin "",255;
		mes "[Maximilian]";
		mes "Myer, is this true? Did you spread the rumor?";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "You collected small kids and played a leader. Did you have lots of fun?";
		next;
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "Did you see what those little kids did for this time? You believe that only the upper class can exert influence on the common people, don't you? You must be so stupid.";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "How far are you going to go?";
		next;
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "Well, I asked for help church friends, merchant friends and back street friends. Everyone said they would be willing to help me, when I told them I need help.";
		next;
		mes "[Myer]";
		mes "I wonder how you can deal with invisible enemy.";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "I don't understand why you spread such a rumor and do all these things.";
		next;
		mes "[Wolf]";
		mes "No, in fact, I think I know very well. It is because of your immature sympathy and you want to spoil my plan!";
		next;
		cutin "16mye_ang",1;
		mes "[Myer]";
		mes "Plan? what plan? war plan? the plan to drive innocent people to the battle field? A means that will realize your ambicous plan?";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "You are too young to understand why your brothers want to realize our plans.";
		next;
		mes "[Wolf]";
		mes "^0000cd14 years ago^000000, we could do nothing though we were the top family. We felt a feeling of helplessness. Have you ever felt that?";
		next;
		mes "[Wolf]";
		mes "^0000cdA noble family is not so good as it looks^000000. You are just playing a leader on the back street and spoiling our plan entirely!";
		next;
		cutin "16mye_ang",1;
		mes "[Myer]";
		mes "Your plan is to develop the power of the family and unify the continent. Then what? what will you have. Achievement? Revenge?";
		next;
		mes "[Myer]";
		mes "As you know, such as thing causes another pain. We were raised without a parent. But we didn't fall because we had a family and we were rich.";
		next;
		mes "[Myer]";
		mes "And we had brothers ^0000cdto depend on^000000. Think how we did to comfort one another? There are not many people that are so lucky as we were.";
		next;
		mes "[Myer]";
		mes "There are so many people who has no one to depend on, no place to lie their bodies, or no money to buy a piece of bread. People are dying everywhere.";
		next;
		mes "[Myer]";
		mes "The world you and Helmut are dreaming is only for ^0000cdthe satisfaction of a few persons^000000.";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "Yo are too ideal. Small sacrifice is a must to achieve a bing goal.";
		next;
		cutin "16mye_ang",1;
		mes "[Myer]";
		mes "Sacrifice for the goal? Do you think I don't know the reason you are helping Helmut.";
		next;
		mes "[Myer]";
		mes "When Helmut participated in the Royal Assembly, I didn't care about it. Anyway he is naive and doesn't know how to acquire likeability and credibility from others.";
		next;
		mes "[Myer]";
		mes "The wish that Helmut could end up as just a wish, but since you started to support Helmut ambiguously, everything has changed.";
		next;
		mes "[Myer]";
		mes "Helmut and you look like a good brothers, but Wolf, I know that you want to make money from wars and";
		next;
		cutin "16mye_ang",1;
		mes "[Myer]";
		mes "even though Helmut becomes a king, he is just a figurehead and you will exert power ^0000cdover our family and kingdom^000000. won't you?";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "What is our family proud of? Name? Fame? they are useless outside the country. And now they are not so high as before.";
		next;
		mes "[Wolf]";
		mes "But look at the Wigner. Wherever they go whatever they do, people bow their heads in front of their gold.";
		next;
		mes "[Wolf]";
		mes "To whoever has gold. I want that power. I want ^0000cdreal power^000000 rather powerless fame.";
		next;
		cutin "16mye_ang",1;
		mes "[Myer]";
		mes "You want to build a kingdom that you want rule as you want. What if Helmut fails to be a king? What would you do then?";
		next;
		mes "[Myer]";
		mes "You will run into a limit as the second son of the Roegenburg, can you give up your ambition?";
		next;
		mes "[Myer]";
		mes "Anyway life is short. What moves people is heart, not money or power.";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "Heart? Does it work on ^0000cdthose guys^000000?";
		next;
		cutin "16mye_ang",1;
		mes "[Myer]";
		mes "You didn't know you can approach them in a different way";
		next;
		cutin "16wol_ang",2;
		mes "[Wolf]";
		mes "You are better than I expected. You are grown up and I know you will not cry any more in front of me. So stop talking nonsense and play outside.";
		next;
		mes "[Wolf]";
		mes "Watch your mouth. I cannot be nice to you forever.";
		next;
		cutin "16mye_ang",1;
		mes "[Myer]";
		mes "If you do nothing, I do nothing. I hope I will live on the back street as happy ^0000cdJonathan^000000.";
		next;
		mes "[Myer]";
		mes "But you are developing a murder weapon as new business item with the Wigner.";
		next;
		mes "[Myer]";
		mes "How can people trust you when your family does not trust you? I cannot trust you! And I told you to stop treating me as a child!";
		next;
		cutin "",255;
		mes "[Maximilian]";
		mes "Both of you,";
		next;
		cutin "16agn_ang",2;
		mes "[Agnes]";
		mes "Stop! What the hell are you fighting? Didn't all of us want to live happier than anybody?";
		next;
		mes "[Agnes]";
		mes "So, everybody pursues happiness in their own ways. Helmut had found it on the front. Wolf on the money. And Myer on the street.";
		next;
		mes "[Agnes]";
		mes "Isn't it enough? Do you need something bigger? Cause? Revenge? War?";
		mes "Everyone is fighting in this family and losing important thins. Still you want a war?";
		next;
		mes "[Agnes]";
		mes "What do we really want? Well, if we can be happy by fighting, it is good!. But it is not. We have fought too long.";
		next;
		mes "[Agnes]";
		mes "All of you, Helmut, Wolf and Myer.";
		next;
		cutin "",255;
		mes "[Maximilian]";
		mes "Everybody calm down. It is not nice to raise our voices.";
		next;
		cutin "16hel",0;
		mes "[Helmut]";
		mes "Agnes is right. Both of you, please stop fighting.";
		next;
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "...Excuse me.";
		next;
		cloakonnpc "Myer Roegenburg#ep16lug", getcharid(0);
		cutin "16agn_ang",2;
		mes "[Agnes]";
		mes "Myer! where are you going? Are going to leave the family again?";
		next;
		cutin "",255;
		mes "[Maximilian]";
		mes "What do you think. I totally agree with Agnes. I think we have fought one another too long.";
		next;
		mes "[Maximilian]";
		mes "But we have to keep in mind that revenge brings revenge in return and violence brings violence in return.";
		next;
		mes "[Maximilian]";
		mes "Do you know why I have been quiet though I lost my son and daughter-in-law.";
		next;
		mes "[Maximilian]";
		mes "Because revenges does not make a difference. Revenge is another type of violence that only gives a temporary satisfaction.";
		next;
		mes "[Maximilian]";
		mes "The dead never comes back. Your parents would not want you to take revenge.";
		next;
		mes "[Maximilian]";
		mes "I have let you do as you want to do, but this time I hope that you will follow what Agnes said. I want to avoid wars if possible.";
		next;
		cutin "16hel",0;
		mes "[Helmut]";
		mes "......";
		mes "Excuse me too.";
		next;
		cloakonnpc "Helmut Roegenburg#ep16lug", getcharid(0);
		cutin "",255;
		mes "[Kalbern]";
		mes "Lord Helmut! where are you going?";
		next;
		cloakonnpc "Kalbern#ep16lug", getcharid(0);
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "......";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I don't want to break in, but many people are afraid of wars,";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "including children. It would be better if a war didn't break out, but nothing is good if unrest and feat last long.";
		next;
		mes "[Maximilian]";
		mes "Ah, I am sorry that you saw";
		next;
		mes "[Wolf]";
		mes "Apologies for making you uncomfortable. I am sorry again but can you do me a favor?";
		next;
		mes "[Wolf]";
		mes "I think we need to inform ^0000cdWigner^000000 of the rumor. Please wait a while.";
		next;
		cutin "",255;
		mes "[Wolf prepares documents for a while and seal it in an envelope.]";
		next;
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Please deliver this document. Sorry again. I cannot find time as I have much to do suddenly.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "No. I'll come back soon.";
		erasequest 14501;// Report to Wolf
		setquest 14502;// To Isaac
		getitem 6931,1;// Secret_Documents
		ep16_lug = 7;
		close3;
	}
	if (ep16_lug == 7) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Did you deliver the document to Isaac? I should have done it myself, but I got busy suddenly.";
		next;
		mes "[Wolf]";
		mes "I thought about many thins after I heard from Agnes. To do those things, I cannot waste a minute.";
		next;
		mes "[Wolf]";
		mes "Then see you soon.";
		close3;
	}
	if (ep16_lug == 8) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Dear adventurer, thank you very much. Was Wigner offended?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "He understood everything. He believes that Wigner will find a new item as soon as possible.";
		next;
		mes "[Wolf]";
		mes "It is very good that he understands what I want. I think I have to start a new business at least not to disappoint Wigner.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "You will not give up the desire to do business huh?";
		next;
		mes "[Wolf]";
		mes "It fits me surprisingly. Working is rewarding and enjoyable. Besides, I can show my only ability, not as Roegenburg's ability.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "By the way, your brothers must be busy. Myer and even Helmut....";
		next;
		cutin "",255;
		mes "[Maximilian]";
		mes "Helmut has left for the front without saying anything. Myer also has left home. I think they felt something from what Agnes said.";
		next;
		mes "[Maximilian]";
		mes "If you allow, I would like ^0000cdclear up misunderstanding of my family^000000 in the rumor. Do you have time?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, I do.";
		next;
		mes "[Maximilian]";
		mes "The rumor is true, except the part that a war will break out.";
		next;
		mes "[Maximilian]";
		mes "Let me tell you an old story. The parents of the four children gave a birth to Agnes and left for a neighboring country for resting.";
		next;
		mes "[Maximilian]";
		mes "They were attacked by the monster there.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "In the holiday resort? Now the monster appears even in the holiday resort?";
		next;
		mes "[Maximilian]";
		mes "It was a remote but safe place. But for an unknown reason, the monsters attacked in group.";
		next;
		mes "[Maximilian]";
		mes "The reason remains unknown, but they guess that the monsters came down to the town, chased by subjugation.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I see.";
		next;
		mes "[Maximilian]";
		mes "When we arrived at the site, the area was closed and no access was allowed, though my son and daughter-in-law was inside.";
		next;
		mes "[Maximilian]";
		mes "We met with managers, but they blocked completely heavily armed foreigners like us.";
		next;
		mes "[Maximilian]";
		mes "I understand that. An armed force of a foreign country was crossing the border and I was not sure what the armed force would do. They have no choice but stop them.";
		next;
		mes "[Maximilian]";
		mes "So, we tried to get into the closed zone and contact many people while time passed.";
		next;
		mes "[Maximilian]";
		mes "At the end, we had to provide lots of money as bribe before we can dispatch mercenaries into the resort, but my son and daughter-in-law had been already killed.";
		next;
		mes "[Maximilian]";
		mes "Actually, they were alive just before they were found. But, the access was delayed and they had to die in pains.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I am sorry to hear that.";
		next;
		mes "[Maximilian]";
		mes "I didn't tell the children about the attack, but I had to confess the death of their parents.";
		next;
		mes "[Maximilian]";
		mes "So losing beloved ones, my children and I came to live together.";
		next;
		mes "[Maximilian]";
		mes "I grew the children to live up to the name of Roegenburg.";
		mes "But actually what they need was education, but warm heart.";
		next;
		mes "[Maximilian]";
		mes "I didn't know that and I was only strict on them.";
		next;
		mes "[Maximilian]";
		mes "The children couldn't stand any more and one day they left as a token of resistance.";
		next;
		mes "[Maximilian]";
		mes "The children are unwilling to talk about those days. But I am sure that what they heard and saw in those days affected them.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "How?";
		next;
		mes "[Maximilian]";
		mes "Helmut trained himself. When he was grown up, he left to the border. Wolf suddenly declared that he would make money.";
		next;
		mes "[Maximilian]";
		mes "I tried to stop him saying that there should no merchant in my family, but he was so stubborn.";
		next;
		mes "[Maximilian]";
		mes "After coming home, Myer was doing well for a while. But he left us with a note. Only Agnes has been growing well without a problem.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well. I see each of them has their own stories! The rumor is spread with something concealed.";
		next;
		mes "[Maximilian]";
		mes "Yes, Myer said he would handle the rumor and so the rumor will disappear. Can I ask you to do me a favor?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Please go ahead.";
		next;
		mes "[Maximilian]";
		mes "I am worried that ^0000cdHelmut left without a word^000000, as there are many eyes watching him. He is the heir of our family.";
		next;
		mes "[Maximilian]";
		mes "I hoped that he would stay for the time being, but I am sad that he left all of sudden.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Then, my job is to bring him.";
		next;
		mes "[Maximilian]";
		mes "Yes. He must be in the ^0000cdcheckpoint near the border with Schwarzwald^000000. He is responsible for the patrol party.";
		next;
		mes "[Maximilian]";
		mes "And when you come back, use this. You can return to Prontera instantly.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes. I'll come back soon.";
		erasequest 14503;// Report to Wolf
		setquest 14504;// In Search of Helmut
		getitem 22847,1;// BadgeOfProntera
		ep16_lug = 9;
		close3;
	}
	if (ep16_lug > 8 && ep16_lug < 13) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "I think I was closer to brothers than now, to Helmut and Myer.";
		next;
		mes "[Wolf]";
		mes "Agnes was our favored child in the family. She was the only little sister.";
		next;
		mes "[Wolf]";
		mes "But sometimes I wonder why we have become this estranged.";
		next;
		mes "[Wolf]";
		mes "Well, I think it is because we have came to become different and we also have different ideas on what is right. I understand to some extent.";
		next;
		mes "[Wolf]";
		mes "It was quite a shock when Myer left home. He just left without a word, though he was very close to me.";
		next;
		mes "[Wolf]";
		mes "Since then, I think, I started to find what I can. I cannot stand the thought that I am the only one who are not developing.";
		next;
		mes "[Wolf]";
		mes "When a human feels an empty space, he/she tends to fill it.";
		next;
		mes "[Wolf]";
		mes "I think I am going to continue to go around to find it.";
		close3;
	}
	if (ep16_lug > 12) {
		cutin "16wol_nor",2;
		mes "[Wolf]";
		mes "Dear adventurer, thanks to you, I feel that my brothers and I have become closer.";
		mes "My brothers and I didn't know how to be bent and were about to be broken.";
		next;
		mes "[Wolf]";
		mes "I think these experiences make us more friendly and developing.";
		mes "We were apart a long time and all have forgotten it.";
		next;
		mes "[Wolf]";
		mes "From now, I am going to lead my family, helping my grandfather.";
		mes "If you visit us from time to time, I will be happy.";
		next;
		mes "[Wolf]";
		mes "Please come back to us, if you need a help.";
		close3;
	}
}

prt_cas_q,90,184,7	script	#ep16lug004	HIDDEN_NPC,5,5,{
	end;
OnTouch:
	if (ep16_lug < 3)
		cloakonnpc "Myer Roegenburg#ep16lug", getcharid(0);
	else if (ep16_lug > 2 && ep16_lug < 7)
		cloakoffnpc "Myer Roegenburg#ep16lug", getcharid(0);
	else if (ep16_lug > 6) {
		cloakonnpc "Helmut Roegenburg#ep16lug", getcharid(0);
		cloakonnpc "Myer Roegenburg#ep16lug", getcharid(0);
		cloakonnpc "Kalbern#ep16lug", getcharid(0);
	}
	end;
}

prt_cas_q,92,182,7	script	Myer Roegenburg#ep16lug	4_EP16_MEYER,{
	if (ep16_lug > 2 && ep16_lug < 7) {
		cutin "16mye_nor",1;
		mes "[Myer]";
		mes "It feels good that I come home for a long time.";
		mes "It is a little suffocating though.";
		next;
		mes "[Myer]";
		mes "Anyway, this house goes well without me. I don't worry about the family, but I am only worried about my grandfather, as he is quite old.";
		next;
		mes "[Myer]";
		mes "Now I am home and it seems that Helmut, Wolf, and Agnes have been all good.";
		next;
		mes "[Myer]";
		mes "I think it is great, though a little disappointing.";
		mes "It is stupid to think like this, as I left home.";
		close3;
	}
	end;

OnInit:
	cloakonnpc();
	end;
}

prt_cas_q,74,189,5	script	#ep16lug000	HIDDEN_NPC,5,5,{
	end;
OnTouch:
	if (ep16_lug < 3)
		cloakonnpc "Myer Roegenburg#ep16lug", getcharid(0);
	else if (ep16_lug > 2 && ep16_lug < 7)
		cloakoffnpc "Myer Roegenburg#ep16lug", getcharid(0);
	else if (ep16_lug > 6) {
		cloakonnpc "Helmut Roegenburg#ep16lug", getcharid(0);
		cloakonnpc "Myer Roegenburg#ep16lug", getcharid(0);
		cloakonnpc "Kalbern#ep16lug", getcharid(0);
	}
	end;
}

function	script	F_kids_roegenburg_quest	{
	switch( ep16_lug ) {
	case 4:
		next;
		emotion ET_FRET, getnpcid(0, "Kiddo#ep16lug03");
		mes "[Harriet]";
		mes "Stop! both of you. I feel dizzy when I am listening to what you are talking.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Hi, I have a question. Do you have any fun story?";
		next;
		mes "[Allen]";
		mes "Is this a quest?";
		next;
		mes "[Jin]";
		mes "Fun story?";
		next;
		mes "[Harriet]";
		mes "I have one.";
		next;
		mes "[Allen]";
		mes "I will take the request. What's your question?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I mean War stories, royal family rumors, or something like that.";
		mes "I guess that there are many stories about Royal Assembly or banquet. I am now in the capital city. To read the mood here, I think I should hear those stories.";
		next;
		mes "[Jin]";
		mes "Ah!, I know that story! All of us know it!";
		next;
		mes "[Harriet]";
		mes "Let me tell it!";
		next;
		mes "[Allen]";
		mes "I know the story too. But I'm not sure that it is right or not to tell you the story.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Why? If you want compensation, I can give it to you. Candies?";
		next;
		mes "[Jin]";
		mes "You are giving me candies as compensation? It's so stupid. We are not children.";
		next;
		mes "[Harriet]";
		mes "You'd better not mention about compensation. My mother told me not to receive anything from stranger.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Stranger? We are now talking with each other. Then what do you want? instead of candies.";
		next;
		mes "[Allen]";
		mes "Compensation is not important to me. What is important is whether you have credentials to hear the story.";
		next;
		mes "[Harriet]";
		mes "Credentials? WTH are talking about? He speaks strangely sometimes.";
		next;
		mes "[Jin]";
		mes "I want compensation. If you give me adequate compensation, I can tell you anything. So show me your offer first.";
		next;
		emotion ET_SWEAT, playerattached();
		mes "[" + strcharinfo(0) + "]";
		mes "I didn't mean to cheat you. But you speak frankly of what you want. First I looked down on you as you are children.";
		mes "OK, I'll give you compensation. And what credentials? Do I need credentials to hear a rumor?";
		next;
		mes "[Allen]";
		mes "It depends on what rumor you want to hear. The higher the value is, the higher the risk is.";
		next;
		mes "[Harriet]";
		mes "Is the rumor that risky? I didn't know at all while I was listening. Jin, did you know that?";
		next;
		mes "[Jin]";
		mes "It's Allen. You can count on him only 30%. If he had been always right, the world would have been destroyed a score times.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Then, what should I do? Tell me. What do you want?";
		next;
		emotion ET_SMILE, getnpcid(0, "Kiddo#ep16lug02");
		mes "[Jin]";
		mes "At last, it is business time! Great! I like it!";
		next;
		emotion ET_SMILE, getnpcid(0, "Kiddo#ep16lug03");
		mes "[Harriet]";
		mes "I like anything pretty!";
		next;
		emotion ET_SURPRISE, getnpcid(0, "Kiddo#ep16lug01");
		mes "[Allen]";
		mes "Verification of credentials! That's all!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I don't know what you are talking about. Please tell me slowly and in detail?";
		next;
		mes "[Allen]";
		mes "Simple. Prove your strength. You will know ^0000cdMajoruros^000000, I think.";
		mes "It is a devil with strong muscles. Catch it to prove that you are strong. The number for strength for it is ^0000cd33^000000!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I see. Is that enough? I'll be back soon.";
		next;
		emotion ET_HUK, getnpcid(0, "Kiddo#ep16lug02");
		emotion ET_HUK, getnpcid(0, "Kiddo#ep16lug03");
		mes "[Jin]";
		mes "Wait a minute. Don't you listen to us? You said you would give compensation.";
		next;
		mes "[Harriet]";
		mes "You cannot just listen to Allen and leave. We are one team! Don't you know it whey you see three of use playing together?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Do I have to do what you want too...?";
		next;
		mes "[Allen]";
		mes "I don't leave my friends. Do what they want. If you don't, you will lose credentials.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Oh, I see. Then what do you want?";
		next;
		mes "[Harriet]";
		mes "I want pretty silk cloth! I heard Banquets are held in the palace and princesses were pretty dresses.";
		next;
		mes "[Harriet]";
		mes "I want pretty clothes too! I want ^0000cdpretty silk cloth^000000 too! I'll tell my mother to make them for me!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "OK, OK, how many do you want?";
		next;
		mes "[Harriet]";
		mes "Considering my height, I want about ^0000cdtwelve^000000 ?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "That is easy. Now you little one. What do you need?";
		next;
		mes "[Jin]";
		mes "I want a history book, which includes all history of Rune-Midgarts. It is in the royal library and I have never see it.";
		next;
		mes "[Jin]";
		mes "I know no one around me who can access the palace and book stores do not sell it. Please get it for me.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Do you want me to steal it?";
		next;
		mes "[Jin]";
		mes "Are you crazy? What do you think I am? Borrow it for me.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "OK. ^0000cdHunting 33 Majoruroses, Getting 12 pieces of soft sick cloth an borrowing the history book on Rune-Midgarts from the royal library^000000. I'll be back soon.";
		next;
		mes "[Harriet]";
		mes "I will be waiting for you!";
		erasequest 14498;// Which Rumor
		setquest 14499;// Prove Yourself
		ep16_lug = 5;
		close;
	case 5:
		mes "[" + strcharinfo(0) + "]";
		mes "Hi, I am back. Are these what you want?";
		next;
		emotion ET_BIGTHROB, getnpcid(0, "Kiddo#ep16lug03");
		mes "[Harriet]";
		mes "Let me see it. Yes! they are. They are so pretty. So soft! May I really have these?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Of course, I have brought them because you wanted them. Then is what you said before just empty words?";
		next;
		emotion ET_CHUPCHUP, getnpcid(0, "Kiddo#ep16lug03");
		mes "[Harriet]";
		mes "No! No! I really have wanted them! Thank you!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "And this your book. It is really heavy and large. I borrowed only one volume. The other volumes had already been borrowed.";
		next;
		emotion ET_SMILE, getnpcid(0, "Kiddo#ep16lug02");
		mes "[Jin]";
		mes "Thank you. At last I can read it.";
		next;
		mes "[Allen]";
		mes "You smell strongly of blood. Yes, you fell Majoruroses. You are a strong warrior.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes. I fell all of them. Now let me listen to the story, that expensive story.";
		next;
		mes "[Allen]";
		mes "War, Royal family. Helmut Roegenburg. If he becomes a king, the continent will be drawn into a vortex of war.";
		next;
		mes "[Allen]";
		mes "Darkness will sweep the continent and painful groans will cover all the continent!!!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Is that rumor circulating? But I don't understand what it means. Anybody who can interpret for me?";
		next;
		mes "[Jin]";
		mes "Simple. If Helmut Roegenburg becomes a king, a war will break out.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Hmm.. It's too simple. Please explain more.";
		next;
		mes "[Harriet]";
		mes "Errrrrr! What are you talking about? both of you. Let me explain. The rumor is as follows:";
		next;
		mes "[Harriet]";
		mes "if Helmut Roegenburg becomes a king...., Ah by the way, do you know a rumor about the Roegenburg, especially the rumor on the ^0000cddeath of the four children^000000.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "No, I don't know. Never heard before.";
		next;
		mes "[Harriet]";
		mes "This is also only a rumor. I am sure it is true. Anyway I heard that they were murdered,";
		next;
		mes "[Harriet]";
		mes "when they visit a foreign country. Helmut Roegenburg was shocked and since then he has been wandering around battle fields.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, it is true he has been wandering around battle field.";
		next;
		mes "[Harriet]";
		mes "I think it is because of royal assembly. That is the rumor that is circulating now.";
		next;
		mes "[Harriet]";
		mes "^0000cdThey say that ^000000if Helmut becomes a king, he will invade the country where his parents are killed and start a war to unify the continent.";
		next;
		mes "[Harriet]";
		mes "And the second son of the Roegenburg is doing business to arrange the fund for the war.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "You know pretty in details?";
		next;
		mes "[Harriet]";
		mes "Everybody knows. It's noisy here with the story.";
		next;
		mes "[Jin]";
		mes "My parents are worried. They are afraid that Helmut will becomes a king and start a war.";
		mes "In fact, everybody is anxious. They don't like wars.";
		next;
		emotion ET_SURPRISE, getnpcid(0, "Kiddo#ep16lug01");
		mes "[Allen]";
		mes "The blood on the battle field calls me!";
		next;
		emotion ET_OHNO, getnpcid(0, "Kiddo#ep16lug02");
		mes "[Jin]";
		mes "Except him.";
		next;
		emotion ET_CRY, getnpcid(0, "Kiddo#ep16lug03");
		mes "[Harriet]";
		mes "I hate wars too.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Thank you for your stories. That's what I needed.";
		next;
		mes "[Harriet]";
		mes "If you have a question again, come to me anytime!";
		next;
		mes "[Jin]";
		mes "Thank you for the book!";
		next;
		mes "[Allen]";
		mes "Men do not see anyone out.";
		delitem 6926,1;// Midgards_Histories
		delitem 7166,12;// Soft Silk
		erasequest 14499;// Prove Yourself
		setquest 14501;// Report to Wolf
		ep16_lug = 6;
		close;
	case 11:
		mes "[" + strcharinfo(0) + "]";
		mes "Hello, kids?";
		next;
		mes "[Jin]";
		mes "Huh? You came again. Do you need more? Anyway it is nice you came. I have to return the book.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I have a question about the rumor on the Roegenburg.";
		next;
		mes "[Allen]";
		mes "There is no new story about the family. No story means death.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I didn't come here for any new rumor. I am looking for the person who told you the story.";
		next;
		mes "[Jin]";
		mes "Why?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I want to know who circulated the rumor.";
		next;
		mes "[Harriet]";
		mes "Why? Are you going to catch the person?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "No, the grandfather of him asked me to tell him a message.";
		next;
		mes "[Harriet]";
		mes "Can't they meet each other though they are family?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well, it's not like that.. Hmm.. Yes. similar to that.";
		next;
		mes "[Jin]";
		mes "That is really strange.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, it is. but sometime even between family members it is difficult to see each other and they have to ask someone to send a message to one another.";
		next;
		mes "[Allen]";
		mes "This time, you need stronger credentials...";
		next;
		mes "[Harriet]";
		mes "Ah, there he comes!, Jonathan! We have a guest.";
		next;
		cloakoffnpc "Ordinary Man#ep16lug02", getcharid(0);
		mes "[Myer]";
		mes "Dear adventurer. What has brought you here?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "A way to find the first person who spreads a rumor is to find the source of rumor. but I didn't expect you are here.";
		next;
		mes "[Myer]";
		mes "Did you come here to see me?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes. your family asked me to send a message to you.";
		next;
		emotion ET_QUESTION, getnpcid(0, "Kiddo#ep16lug01");
		mes "[Allen]";
		mes "Myer?";
		next;
		emotion ET_QUESTION, getnpcid(0, "Kiddo#ep16lug02");
		mes "[Jin]";
		mes "Myer?";
		next;
		emotion ET_QUESTION, getnpcid(0, "Kiddo#ep16lug03");
		mes "[Harriet]";
		mes "Who is Myer? ^0000cdIs you name Myer^000000? Jonathan Myer? Myer Jonathan? You told me to call you just Jonathan.";
		next;
		mes "[Myer]";
		mes "You saw these kids before, didn't you?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes. they are cute, but pretty difficult to handle them.";
		next;
		mes "[Harriet]";
		mes "Are you Jonathan Myer? or Myer Jonathan? Let me know!";
		next;
		mes "[Myer]";
		mes "Kids. I am going to have a very important talk with him. Will you close your ears or leave us alone?";
		next;
		mes "[Allen]";
		mes "Ears cannot be closed.";
		next;
		mes "[Jin]";
		mes "I want to hear it if it is important.";
		next;
		mes "[Harriet]";
		mes "Come on! They are going to have an important talk. Everybody, close your ears.";
		next;
		mes "[Myer]";
		mes "Good boys. After the talk I will give you liquorice.";
		next;
		mes "[Allen]";
		mes "My ears are closed.";
		next;
		mes "[Jin]";
		mes "Ah. have a talk then.";
		next;
		mes "[Harriet]";
		mes "La la la la la -";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "They are cute and smart. I am curious how they will grow up.";
		next;
		mes "[Myer]";
		mes "Yes. That's why I am here to check, teach and lead them.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "You are doing a great job.";
		next;
		mes "[Myer]";
		mes "Well. it's just what I can do. By the way, what is the message?";
		next;
		mes "[He told Myer that Helmut had transferred heir-ship and his two brothers had gave up wars.]";
		next;
		mes "[Myer]";
		mes "That is great. They are my brothers I am proud of. What is the most important and fortunate is that ^0000cdWolf has changed his mind^000000. It is very annoying to argue with him.";
		next;
		mes "[Myer]";
		mes "Wolf has to see everything to finish. It is a good in a way, though.";
		next;
		mes "[Myer]";
		mes "You may not believe, he is the one I like the most in the family.";
		next;
		mes "[Myer]";
		mes "Ah, anyway, I am sorry that we showed you an unpleasant family affairs.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It is common for brothers to fight one another. I also....";
		next;
		mes "[Myer]";
		mes "Anyway, I think I have to visit the house. The house has been annoying, but I think that it will be interesting. Please tell my family that I will help them here while I am doing my job.";
		next;
		mes "[Myer]";
		mes "And tell them I will visit them after the banquet.";
		next;
		mes "[Myer]";
		mes "And please tell Agnes that I am sorry that cannot go with her to the banquet.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, I will.";
		next;
		mes "[Myer]";
		mes "If you need my help, just find me. I will help you with all my efforts. Take care!";
		erasequest 14506;// Things Turned out This Way
		setquest 14507;// To Maximilian
		ep16_lug = 12;
		close;
	}
	return;
}

prontera,271,70,3	script	Kiddo#ep16lug01	4_M_MIKID,{
	if (ep16_lug < 4) {
		mes "[Allen]";
		mes "Do you want business with us? But we don't meet with anybody.";
		next;
		mes "[Allen]";
		mes "We are not easy people anybody can speak to.";
		mes "Go back.";
		close;
	}
	if (ep16_lug == 4) {
		mes "[Allen]";
		mes "Today, the wind is cold and smells rotten. I feel that something has happened.";
		next;
		emotion ET_SHY, getnpcid(0, "Kiddo#ep16lug02");
		mes "[Jin]";
		mes "Ah, sorry, I couldn't clean myself for a few days.";
		next;
		mes "[Allen]";
		mes "Is it so? I feel that they are testing me.";
		F_kids_roegenburg_quest();
	}
	if (ep16_lug == 5) {
		if (countitem(6926) < 1 || countitem(7166) < 12 || checkquest(14499,HUNTING) < 2) {
			mes "[Allen]";
			mes "He has come with empty hands.";
			next;
			mes "[Allen]";
			mes "Anyone without credentials cannot hear good stories. Go back.";
			next;
			mes "[Harriet]";
			mes "How can you say that! You must have forgotten what you should bring.";
			next;
			mes "[Harriet]";
			mes "First, ^0000cd12 pieces of soft cloth^000000, ^0000cdhistory book on Rune-Midgarts ^000000";
			next;
			mes "[Harriet]";
			mes "and hmm... ^0000cdkilling of 33 Majoruroses^000000 for Allen.";
			next;
			mes "[Harriet]";
			mes "There is something strange included, but so what... He wants it.";
			close;
		}
		F_kids_roegenburg_quest();
	}
	if (ep16_lug >= 6 && ep16_lug <= 10) {
		mes "[Allen]";
		mes "Do you hear more? If so, you need to prove you have stronger credentials.";
		next;
		mes "[Allen]";
		mes "This is a ritual that calls blood! A ritual of destruction and darkness!!!!";
		next;
		mes "[Jin]";
		mes "He started again.";
		next;
		mes "[Harriet]";
		mes "Please go. We'll handle him.";
		close;
	}
	if (ep16_lug == 11)
		F_kids_roegenburg_quest();
	mes "[Allen]";
	mes "The threat of war has disappeared. Hero in the time of turbulence is not born. Darkness calls me!";
	next;
	mes "[Jin]";
	mes "He started again.";
	next;
	mes "[Harriet]";
	mes "Please go. We'll handle him.";
	close;
}

prontera,271,68,1	script	Kiddo#ep16lug02	4_M_KID1,5,5,{
	if (ep16_lug < 4) {
		mes "[Jin]";
		mes "It is a good weather today.";
		mes "The banquet is in full swing in the palace.";
		next;
		mes "[Jin]";
		mes "My parents are happy as their business prospers when palace purchases lots of goods in large volumes. I will tell them to buy me a book tomorrow.";
		next;
		mes "[Jin]";
		mes "End of today's diary.";
		close;
	}
	if (ep16_lug == 4) {
		mes "[Jin]";
		mes "It is a good weather today.";
		mes "The banquet is in full swing in the palace.";
		next;
		mes "[Allen]";
		mes "They will be all destroyed when a bloody day comes.";
		mes "Why are we recording those vain things?";
		next;
		mes "[Jin]";
		mes "Because records remains forever.";
		mes "If you record today, someone in the future will read them and remember us.";
		next;
		mes "[Allen]";
		mes "Human comes from nothing and goes to nothing.";
		F_kids_roegenburg_quest();
	}
	if (ep16_lug == 5) {
		if (countitem(6926) < 1 || countitem(7166) < 12 || checkquest(14499,HUNTING) < 2) {
			mes "[Jin]";
			mes "Huh? why empty hands? I cannot see what we told you.";
			next;
			mes "[Jin]";
			mes "Are you looking down on us, as we are children? I really hate such people.";
			next;
			mes "[Harriet]";
			mes "Hey! You aren't, are you? You don't seem to be a such person. You forget what you should get, didn't you?";
			next;
			mes "[Harriet]";
			mes "First, ^0000cd12 pieces of soft cloth^000000, ^0000cdhistory book on Rune-Midgarts ^000000";
			next;
			mes "[Harriet]";
			mes "and hmm... ^0000cdkilling of 33 Majoruroses^000000 for Allen.";
			next;
			mes "[Harriet]";
			mes "There is something strange included, but so what... He wants it.";
			close;
		}
		F_kids_roegenburg_quest();
	}
	if (ep16_lug >= 6 && ep16_lug <= 10) {
		mes "[Jin]";
		mes "I am enjoying reading the book you gave, though it is too large and heavy.";
		next;
		mes "[Jin]";
		mes "My dream is to become a historian. I would like travel around Midgards and discover old hidden stories.";
		close;
	}
	if (ep16_lug == 11)
		F_kids_roegenburg_quest();
	mes "[Jin]";
	mes "Jonathan returned the book you borrowed and he borrowed me other two volumes.";
	next;
	mes "[Jin]";
	mes "Jonathan is great! I will become a man like Jonathan in the future.";
	close;

OnTouch:
	if (ep16_lug >= 12)
		cloakoffnpc "Ordinary Man#ep16lug02", getcharid(0);
	end;
}

prontera,269,69,5	script	Kiddo#ep16lug03	4_F_KID2,{
	if (ep16_lug < 4) {
		mes "[Harriet]";
		mes "How beautiful and shining the dresses of princesses would be! I wish I could wear as many pretty dresses as possible.";
		close;
	}
	if (ep16_lug == 4) {
		emotion ET_SMILE;
		mes "[Harriet]";
		mes "Hello, singing birds and pretty flowers.";
		mes "Are you having a beautiful day today too?";
		next;
		emotion ET_OHNO, getnpcid(0, "Kiddo#ep16lug02");
		mes "[Jin]";
		mes "He started again.";
		mes "Why don't I have normal person around me?";
		next;
		mes "[Allen]";
		mes "Are you talking to me?";
		mes "If so, you are successful. I heard it very clearly.";
		next;
		mes "[Allen]";
		mes "I refuse ordinariness.";
		mes "I'm too big to be locked in it.";
		F_kids_roegenburg_quest();
	}
	if (ep16_lug == 5) {
		if (countitem(6926) < 1 || countitem(7166) < 12 || checkquest(14499,HUNTING) < 2) {
			mes "[Jin]";
			mes "Huh? why empty hands? I cannot see what we told you.";
			next;
			mes "[Jin]";
			mes "Are you looking down on us, as we are children? I really hate such people.";
			next;
			mes "[Harriet]";
			mes "Hey! You aren't, are you? You don't seem to be a such person. You forget what you should get, didn't you?";
			next;
			mes "[Harriet]";
			mes "First, ^0000cd12 pieces of soft cloth^000000, ^0000cdhistory book on Rune-Midgarts ^000000";
			next;
			mes "[Harriet]";
			mes "and hmm... ^0000cdkilling of 33 Majoruroses^000000 for Allen.";
			next;
			mes "[Harriet]";
			mes "There is something strange included, but so what... He wants it.";
			close;
		}
		F_kids_roegenburg_quest();
	}
	if (ep16_lug >= 6 && ep16_lug <= 10) {
		mes "[Harriet]";
		mes "Please ask my mother to use this cloth to make clothes";
		mes "My mother makes pretty clothes!";
		next;
		mes "[Harriet]";
		mes "Now I guess that she is in the palace to repair the dresses of princesses.";
		mes "Ah, I wish that she was here!";
		close;
	}
	if (ep16_lug == 11)
		F_kids_roegenburg_quest();
	mes "[Harriet]";
	mes "Jonathan said that the threat of war is gone. What a relief that would be.";
	close;
}

yuno_fild01,239,173,7	script	Border Guards#ep16lug01	4_M_JOB_KNIGHT2,{ end; }
yuno_fild01,241,173,7	duplicate(Border Guards#ep16lug01)	Border Guards#ep16lug02	4_M_KNIGHT_GOLD
yuno_fild01,243,173,1	duplicate(Border Guards#ep16lug01)	Border Guards#ep16lug03	4_M_KNIGHT_GOLD
yuno_fild01,245,173,1	duplicate(Border Guards#ep16lug01)	Border Guards#ep16lug04	4_M_JOB_KNIGHT2
yuno_fild01,239,171,7	duplicate(Border Guards#ep16lug01)	Border Guards#ep16lug05	4_M_PECOKNIGHT
yuno_fild01,241,171,7	duplicate(Border Guards#ep16lug01)	Border Guards#ep16lug06	4_M_JOB_WIZARD
yuno_fild01,243,171,1	duplicate(Border Guards#ep16lug01)	Border Guards#ep16lug07	4_M_JOB_WIZARD
yuno_fild01,245,171,1	duplicate(Border Guards#ep16lug01)	Border Guards#ep16lug08	4_M_PECOKNIGHT

yuno_fild01,242,175,5	script	Helmut Roegenburg#ep16lug02	4_EP16_HELMUT,5,5,{
	if (ep16_lug == 9) {
		mes "[Helmut]";
		mes "Dear adventurer? What are you doing here? It is dangerous. The monster came down here just before. Please leave now.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I'm OK. I'm accustomed to everyday life of being attacked by monsters.";
		next;
		mes "[Helmut]";
		mes "I forgot you are a great warrior. Please forgive my rudeness.";
		mes "By the way what has brought you here?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I came here to bring Lord Helmut. Your grandfather is very worried about you. He said you are away from home in an important time.";
		next;
		mes "[Helmut]";
		mes "I don't go back. ^0000cdI belong here, the front^000000. Please tell my grandfather so.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "But everybody is worried about you.";
		next;
		mes "[Helmut]";
		mes "I cannot go back. As a matter of fact, I resent the people who left my parents die since I became mature.";
		next;
		mes "[Helmut]";
		mes "And I thought that it is the right way to develop the power that makes people to have no choice but to follow.";
		next;
		mes "[Helmut]";
		mes "So, my goal was to unify the continent and make my power reached at every corner of the continent. So I trained and trained myself.";
		next;
		mes "[Helmut]";
		mes "However, when I listened to Myer and Agnes, I realized that the way I pursue could cause sadness and misfortune to someone.";
		next;
		mes "[Helmut]";
		mes "So I decided to ^0000cdgive up the unification war ^000000that pushes people into a vortex of war.";
		next;
		mes "[Helmut]";
		mes "This is where I should stay. Here I can ^0000cdprotect more people safely^000000.";
		next;
		mes "[Helmut]";
		mes "Considering the position of our family, I will cooperate in what is needed for the Royal Assembly.";
		next;
		mes "[Helmut]";
		mes "But I hope that Wolf will lead everything. When the Royal Assembly is closed, please tell Wolf that I will ^0000cdtransfer the position of heir to him^000000.";
		next;
		mes "[Helmut]";
		mes "Wolf will need lots of power. I will stay here to protect our people.";
		next;
		mes "[Helmut]";
		mes "If you do so, Wolf will not insist on wars and Myer will not sacrifice himself like that anymore.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "...I see. I will tell you message to your grandfather.";
		next;
		mes "[Helmut]";
		mes "Yes. thank you. Please take care.";
		erasequest 14504;// In Search of Helmut
		setquest 14505;// I Won't go Back
		ep16_lug = 10;
		close;
	}
	if (ep16_lug == 10) {
		mes "[Helmut]";
		mes "This is where I should stay.";
		mes "Please tell him '^0000cdI give up wars and transfer my position of heir to Wolf^000000'.";
		next;
		mes "[Helmut]";
		mes "If you do so, Wolf will not insist on wars and Myer will not sacrifice himself like that anymore.";
		next;
		mes "[Helmut]";
		mes "Then, good bye.";
		close;
	}
	mes "[Helmut]";
	mes "I can feel the earth is shaking.";
	mes "An attack is expected soon. I have to make preparation.";
	close;

OnTouch:
	if (ep16_lug == 9 || ep16_lug == 10) {
		mes "[Helmut]";
		mes "Give shout of concentration!!!";
		for ( .@i = 1; .@i < 9; ++.@i )
			npctalk "Hab!", "Border Guards#ep16lug0" + .@i, bc_area;
		next;
		mes "[Helmut]";
		mes "Louder!!!!";
		for ( .@i = 1; .@i < 9; ++.@i )
			npctalk "Hab!", "Border Guards#ep16lug0" + .@i, bc_area;
		next;
		mes "[Helmut]";
		mes "We!!!!!!";
		next;
		for ( .@i = 1; .@i < 9; ++.@i )
			npctalk "protect our families and our country!!!", "Border Guards#ep16lug0" + .@i, bc_area;
		close;
	}
	end;
}

yuno_fild01,244,176,3	script	Kalbern#ep16lug02	4_M_RUSCHILD,{
	if (ep16_lug == 9 || ep16_lug == 10) {
		mes "[Kalbern]";
		mes "I am very happy that I came back here.";
		mes "Now I've got something to do.";
		next;
		mes "[Kalbern]";
		mes "And I think it is great that Lord Helmut has given up the unification war.";
		mes "I knew nothing about unification, but I wished that no war would break out.";
		next;
		mes "[Kalbern]";
		mes "Here, I would like to help Lord Helmut to protect people's safe and peaceful days.";
		close;
	}
	mes "[Kalbern]";
	mes "Now it is the time that Lord Helmut begins to feel thirsty.";
	mes "I think I should prepare something to drink.";
	close;
}

//prontera,269,73,5	script	Ordinary Man#ep16lug02	4_M_04,5,5,{	// no OnTouch
prontera,269,73,5	script	Ordinary Man#ep16lug02	4_M_04,{
	if (ep16_lug >= 12) {
		mes "[Myer]";
		mes "Thank you for coming here to deliver the message. Without you, I would not have listened to anything like the one I heard today.";
		next;
		mes "[Myer]";
		mes "Fight, fight, and fight.... I don't want that either.";
		next;
		mes "[Myer]";
		mes "They are my family who are closer to me than anyone.";
		close;
	}
	mes "[Ordinary Man]";
	mes "Shh! You'd better not speak to me.";
	mes "There are may eyes around.";
	close;

OnInit:
	cloakonnpc();
	end;
}

// Richard
prt_cas_q,80,80,4	script	Butler for the Richards#EP161GAM	1_M_LIBRARYMASTER,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	switch( checkquest(5414,PLAYTIME) ) {
	case -1:
		break;
	case 0:
	case 1:
		.@r = rand(1,5);
		mes "[Butler]";
		if (.@r == 1)
			mes "It is a fast way to get stronger to take a good rest after a hard battle.";
		else if (.@r == 2)
			mes "The Richard family runs various ways of training. Taking a rest is one of the most important training.";
		else if (.@r == 3)
			mes "The former heads of the Richard family have also taken enough rest after training. Well, it's too common to mention, I guess.";
		else if (.@r == 4)
			mes "Everyone may know how one feels itching for more action after training. However, that is the time to take a rest.";
		else
			mes "The next training would be just as tough. You'd better take a rest now.";
		close;
	case 2:
		erasequest 5414;// [Stand by]Warrior Discipline
		mes "[Butler]";
		mes "I feel that you must be raring to get some action. I guess it is the time to proceed with the next training.";
		close;
	}
	.@ep161_family00 = isbegin_quest(5402) + isbegin_quest(5403);
	if (.@ep161_family00 == 0) {
		if ((isbegin_quest(7681) == 2 && isbegin_quest(7682) == 1) || ep16_royal == 2) {
			mes "[Butler]";
			mes "How do you do? I have been waiting for you after being informed by the Chamberlain.";
			next;
			mes "[Butler]";
			mes "This it the room of the Richard family which has been controlling the military power of the kingdom.";
			next;
			mes "[Butler]";
			mes "I have heard your name for that " + strcharinfo(0) + ", you are the hero in the subjugation of Morocc";
			next;
			mes "[Butler]";
			mes "Oh! I am sorry to take too much of your time. Inside the room, there is Po, the next head of the family, waiting for you.";
			next;
			mes "[Butler]";
			mes "Let me escort you inside.";
			setquest 5402;// The Royal Richard
			close;
		}
		mes "[Butler]";
		mes "This it the room of the Richard family.";
		next;
		mes "[Butler]";
		mes "Po, the next head of the family, is taking a rest. Please come back later.";
		close;
	}
	if (.@ep161_family00 == 1) {
		mes "[Butler]";
		mes "Inside the room, there is Po, the next head of the family, waiting for you.";
		close;
	}
	if (.@ep161_family00 == 2) {
		mes "[Butler]";
		mes "Have you met the next head of the family?";
		next;
		mes "[Butler]";
		mes "If the next head of the family meets you " + strcharinfo(0) + ", please...";
		next;
		mes "[Butler]";
		mes "Oh! I am sorry about my bad manners. It is nothing. Please never mind...";
		close;
	}
	setarray .@quest_list[0],
		5404,	// [Repeat]Warrior Discipline-Human
		5405,	// [Repeat]Warrior Discipline-Animal
		5406,	// [Repeat]Warrior Discipline-Insect
		5407,	// [Repeat]Warrior Discipline-Fish
		5408,	// [Repeat]Warrior Discipline-Plant
		5409,	// [Repeat]Warrior Discipline-Devil
		5410,	// [Repeat]Warrior Discipline-Angel
		5411,	// [Repeat]Warrior Discipline-Immortal
		5412,	// [Repeat]Warrior Discipline-Intangible
		5413;	// [Repeat]Warrior Discipline-Dragon
	setarray .@training_list$[0], "human","animal","insect","fish","plant","demon","angel","Immortal","nothing","dragon";
	.@size = getarraysize( .@quest_list );
	while( isbegin_quest(.@quest_list[.@i]) == 0 && .@i < .@size ) .@i++;

	if (.@ep161_family00 == 3) {
		if (BaseLevel < 140) {
			mes "[Butler]";
			mes "I heard from Po the next head of the family that you are going to try the Richard battle training program.";
			next;
			mes "[Butler]";
			mes "For now, the training would be too overwhelming for you. You'd better learn the basics before proceeding with the training.";
			close;
		}
		if (.@i == .@size) {
			mes "[Butler]";
			mes "I heard from Po the next head of the family that you are going to try the Richard battle training program.";
			next;
			mes "[Butler]";
			mes "The training of the Richard family is differentiated from other training programs.";
			next;
			mes "[Butler]";
			mes "You must have been getting yourself trained by hunting the monsters individually.";
			next;
			mes "[Butler]";
			mes "From now on, you can be trained with hunting certain types of monsters such as human, animal, insect, fish, plant, demon, angel, nothing and dragon monsters.";
			next;
			mes "[Butler]";
			mes "It is supposed to be more effective to swing a sword than to say 100 words.";
		}
	}
	else if (.@ep161_family00 == 4) {
		mes "[Butler]";
		mes "Good. Are you ready now?";
	}
	else {
		mes "[Butler]";
		mes "Hum, there seems to be an issue which cannot be resolved. Well, try again and if the same issue occurs, take a screenshot and send it to the admin team.";
		close;
	}
	if (.@i == .@size) {
		while( true ) {
			next;
			mes "[Butler]";
			mes "Please select a training program to try.";
			next;
			.@s = select( "Warrior Discipline-Human", "Warrior Discipline-Animal", "Warrior Discipline-Insect", "Warrior Discipline-Fish", "Warrior Discipline-Plant", "Warrior Discipline-Devil", "Warrior Discipline-Angel", "Warrior Discipline-Immortal", "Warrior Discipline-Intangible", "Warrior Discipline-Dragon" ) - 1;
			mes "[Butler]";
			mes "This training involves hunting 50 " + .@training_list$[.@s] + " monsters of Level 140 or higher.";
			next;
			mes "[Butler]";
			mes "Would you try this training?";
			next;
			if (select( "Try.", "Do not try." ) == 2) {
				mes "[Butler]";
				mes "Hum... You don't like the contents of the training? Well, it's OK. Why don't you choose another training?";
				continue;
			}
			mes "[Butler]";
			mes "You shouldn't let your guard down even when you feel that the training is too easy for your level. Good luck...";
			setquest .@quest_list[.@s];
			close;
		}
	}
	next;

	if (checkquest(.@quest_list[.@i],HUNTING) == 2) {
		if (isbegin_quest(5403) == 1)
			completequest 5403;// The Royal Richard
		erasequest .@quest_list[.@i];
		setquest 5414;// [Stand by]Warrior Discipline
		getexp 500000,550000;
		getitem 6919,4;// TokenOfHonor
		mes "[Butler]";
		mes "Congratulations on completing the training.";
		next;
		mes "[Butler]";
		mes "If you keep training, you'll achieve the goal you want.";
		next;
		mes "[Butler]";
		mes "This is what I have prepared for the reward for completing training.";
		next;
		mes "[Butler]";
		mes "We thank you for training with us since it benefits the Richard family. Don't feel pressured.";
		close;
	}
	mes "[Butler]";
	mes "You are participating in the training. Do you need anything?";
	next;
	switch( select( "No.", "About the way of training", "About the goal of training", "Give up the training." ) ) {
	case 1:
		mes "[Butler]";
		mes "You should deal with the training like the actual fight! Do not let your guard down during the training.";
		close;
	case 2:
		mes "[Butler]";
		mes "The Richard family has always been concerned about the ways to produce more excellent warriors.";
		next;
		mes "[Butler]";
		mes "One of the former heads of the family felt that the way to train with a certain monster had a limit.";
		next;
		mes "[Butler]";
		mes "The former and former head of the family... Oh! Just to clear things out, he is retired, but he is not dead.";
		next;
		mes "[Butler]";
		mes "Hum... Let's come back down to the business... He has come up with the method to train with the monster depending on the level of the trainee or the type of the monster.";
		next;
		mes "[Butler]";
		mes "Well... The training began like that...";
		close;
	case 3:
		mes "[Butler]";
		mes "The goal of the training... It is an easy and difficult question.";
		next;
		mes "[Butler]";
		mes "The most obvious goal must be getting stronger. I would have answered if I was younger.";
		next;
		mes "[Butler]";
		mes "However, I would like to answer that it is to protect the people around me.";
		next;
		mes "[Butler]";
		mes "The goal may be different for each warrior.";
		close;
	case 4:
		mes "[Butler]";
		mes "I won't stop you from giving up. However, you should know that the progress of your training so far won't be reflected in the next training.";
		next;
		if (select( "Do not give up.", "Give up." ) == 1) {
			mes "[Butler]";
			mes "Good decision. You should deal with the training like the actual fight! Do not let your guard down during the training.";
			close;
		}
		erasequest .@quest_list[.@i];
		mes "[Butler]";
		mes "Too bad. If you finished the training, you must have been able to reap the benefit of hard work.";
		close;
	}
}

prt_cas_q,93,74,4	script	Po Richard#EP161GAM	4_M_6THPRIN1,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (BaseLevel < 100) {
		mes "[Po Richard]";
		mes "An adventurer? I guess you need to try harder now.";
		close3;
	}
	.@ep161_family00 = isbegin_quest(5402) + isbegin_quest(5403);
	if (.@ep161_family00 == 0) {
		cutin "richard_po02",2;
		emotion ET_PROFUSELY_SWEAT;
		mes "[Po Richard]";
		mes "I'd like to take a rest now.";
		next;
		mes "[Po Richard]";
		mes "You must be an adventurer invited to the palace. I am taking a rest now. Talk to the butler in front of the door to make an appointment.";
		next;
		mes "[Po Richard]";
		mes "That is the way to do it in the palace.";
		close3;
	}
	if (.@ep161_family00 == 1) {
		cutin "richard_po01",2;
		emotion ET_SPARK;
		mes "[Po Richard]";
		mes "You must be the adventurer who has made a great contribution in the subjugation of the dark lord. Your work is known in the palace as well.";
		next;
		mes "[Po Richard]";
		mes "Especially, us, the Richard family, are interested in your work.";
		next;
		mes "[Po Richard]";
		mes "Do you want to know why?";
		next;
		mes "[Po Richard]";
		mes "Well, even if you don't want to know, I am going to say what I want to say anyway.";
		next;
		mes "[Po Richard]";
		mes "In fact, it was not your will to come here. I am pretty sure that you must have come here since the his nibs called you. I understand that.";
		next;
		mes "[Po Richard]";
		mes "Although the adventurers may care less about the palace affairs, the Richard family is in charge of the military force of Rune-Midgarts.";
		next;
		emotion ET_QUESTION;
		mes "[Po Richard]";
		mes "We produce many excellent warriors as well. Hum! I am curious all of a sudden. Have you heard of the warrior from the Richard family?";
		next;
		switch( select( "Yes, I have.", "No, I haven't." ) ) {
		case 1:
			mes "[Po Richard]";
			mes "Hahaha, I guess the name of Richard must be known to the adventurers as well.";
			break;
		case 2:
			cutin "richard_po02",2;
			emotion ET_SCRATCH;
			mes "[Po Richard]";
			mes "Oh, my. I must have been a braggart. The Richard family should try harder.";
			break;
		}
		next;
		mes "[Po Richard]";
		mes "Well, since it is not important, I guess we should let it pass. It's been a long time since I say this much. I am thirsty.";
		next;
		completequest 5402;// The Royal Richard
		if (achievementinfo(130000, ACHIEVEINFO_COUNT5) == 0)
			achievementupdate(130000, ACHIEVEINFO_COUNT5, 1);
		if (isbegin_quest(7682) == 1 && isbegin_quest(5402) == 2 && isbegin_quest(7683) == 2 && isbegin_quest(7684) == 2 && ep16_wal > 1 && ep16_wig > 1 && ep16_lug > 1 && ep16_gaobs > 1) {
			completequest 7682;// Socializing Starts from an Eye Contact
			setquest 7685;// What Is the Next Thing on the Schedule ?
		}
		mes "[Po Richard]";
		mes "Shall we take a rest before proceeding?";
		close3;
	}
	if (.@ep161_family00 == 2) {
		cutin "richard_po01",2;
		mes "[Po Richard]";
		mes "Well, let's talk about the reason that the Richard family has been interested in you then.";
		next;
		mes "[Po Richard]";
		mes "As known, the Richard family is producing outstanding warriors. We run a systematic training system to support that.";
		next;
		mes "[Po Richard]";
		mes "I am not fond of such training, but I believe that it is an effective training program based on the know-how of the family.";
		next;
		mes "[Po Richard]";
		mes "Please listen up since I am about to get to the point.";
		next;
		mes "[Po Richard]";
		mes "I guess the adventurers were not that interested; however, there were many members of the royal family participating in the subjugation of the dark lord. I have been reported of your work from them.";
		next;
		mes "[Po Richard]";
		mes "When I was reported of the contributions you made, a question came to my mind. What if a free roaming adventure take part in the strict training system? What would happen? I got curious.";
		next;
		emotion ET_COMEON;
		mes "[Po Richard]";
		mes "I would like to make a handsome payment if a renowned adventurer like you helps us.";
		next;
		mes "[Po Richard]";
		mes "I feel that it is an attractive offer. Would you challenge the warrior training system of the Richard family?";
		next;
		if (select( "I'll try.", "I decline." ) == 2) {
			emotion ET_OTL;
			mes "[Po Richard]";
			mes "I guess the offer hasn't been attractive to you. I am sorry, but come back later when you change your mind.";
			close;
		}
		emotion ET_OK;
		mes "[Po Richard]";
		mes "Indeed! I like the quick decision. I value the spirit of challenge.";
		next;
		mes "[Po Richard]";
		mes "Let me tell the butler about it. You can proceed with the training through him.";
		setquest 5403;// The Royal Richard
		close3;
	}
	if (.@ep161_family00 == 3) {
		cutin "richard_po01",2;
		mes "[Po Richard]";
		mes "Don't underestimate the butler who would guide you through the training.";
		next;
		mes "[Po Richard]";
		mes "He is a member of the Richard family himself. He is an outstanding warrior.";
		close3;
	}
	if (.@ep161_family00 == 4) {
		setarray .@quest_list[0],
			5404,	// [Repeat]Warrior Discipline-Human
			5405,	// [Repeat]Warrior Discipline-Animal
			5406,	// [Repeat]Warrior Discipline-Insect
			5407,	// [Repeat]Warrior Discipline-Fish
			5408,	// [Repeat]Warrior Discipline-Plant
			5409,	// [Repeat]Warrior Discipline-Devil
			5410,	// [Repeat]Warrior Discipline-Angel
			5411,	// [Repeat]Warrior Discipline-Immortal
			5412,	// [Repeat]Warrior Discipline-Intangible
			5413;	// [Repeat]Warrior Discipline-Dragon
		.@size = getarraysize( .@quest_list );
		while( isbegin_quest(.@quest_list[.@i]) == 0 && .@i < .@size ) .@i++;

		if (.@i == .@size) {
			mes "[Po Richard]";
			mes "I wonder if you are happy with the rewards of the training.";
			next;
			mes "[Po Richard]";
			mes "It would be difficult to offer you a payment higher than that for now. Please do it as if you are having a part-time job.";
			next;
			mes "[Po Richard]";
			mes "You may find it obvious. However, the more you get yourself trained, the more benefits that Richard family gets. We are willing to pay for it.";
			close3;
		}
		mes "[Po Richard]";
		mes "Oh! You must be participating in the training. Well, how do you find the training?";
		next;
		mes "[Po Richard]";
		.@r = rand(1,10);
		if (.@r == 1) {
			emotion 29;
			mes "I have participated in the training myself when I was younger. It brings back the good old memories.";
		}
		else if (.@r == 2) {
			emotion 20;
			mes "There are a variety of training programs. Please choose what you'd like to participate. Well, the adventurers tend to do what they usually do.";
		}
		else if (.@r == 3) {
			emotion 0;
			mes "Accidents happen when you let your guard down. Always make sure to watch out.";
		}
		else if (.@r == 4) {
			emotion 33;
			mes "I believe the most important thing to a warrior is the spirit of challenge. The challenge to move on to the next level... It is the most important thing.";
		}
		else if (.@r == 5) {
			emotion 21;
			mes "A song of a warrior was very popular in the pub in Prontera. I am sad that I cannot hear it these days.";
		}
		else {
			.@r = rand(1,6);
			if (.@r == 1) emotion 58;
			else if (.@r == 2) emotion 59;
			else if (.@r == 3) emotion 60;
			else if (.@r == 4) emotion 61;
			else if (.@r == 5) emotion 62;
			else
				emotion 63;
			mes "Do you like gambling by any chance? Doesn't the tension make you feel like a warrior in battle?";
		}
		close3;
	}
}

// GM NPC
prt_cas_q,120,100,4	script	Helper for the Royal Richard#EP161DY	4_M_6THPRIN2,{
	if (callfunc("F_GM_NPC",1854,0,1,9999) < 1)
		end;
	mes "[Helper for the Royal Richard]";
	mes "Select the service to use.";
	next;
	switch( select( "Quest Start Setting", "Reset cooldown.", "Reset Quest", "Check current status" ) ) {
	case 1:
		mes "[Helper for the Royal Richard]";
		mes "Set to proceed with the Richard family quest.";
		next;
		select("Setting");
		if (isbegin_quest(7681) == 0)
			setquest 7681;
		if (isbegin_quest(7681) == 1)
			completequest 7681;
		if (isbegin_quest(7682) == 0)
			setquest 7682;
		if (isbegin_quest(7682) == 1)
			completequest 7682;
		mes "[Helper for the Royal Richard]";
		mes "Complete";
		close;
	case 2:
		mes "[Helper for the Royal Richard]";
		mes "Reset the cooldown time of the Richard family battle training.";
		next;
		select("Setting");
		if (isbegin_quest(5414) > 0)
			erasequest 5414;
		mes "[Helper for the Royal Richard]";
		mes "Complete";
		close;
	case 3:
		mes "[Helper for the Royal Richard]";
		mes "Reset all Richard-related quests.";
		next;
		select("Setting");
		mes "[Helper for the Royal Richard]";
		for ( .@quest_id = 5402; .@quest_id <= 5414; ++.@quest_id ) {
			if (isbegin_quest(.@quest_id) > 0)
				erasequest .@quest_id;
			mes "" + .@quest_id + " Delete";
		}
		next;
		mes "[Helper for the Royal Richard]";
		mes "Complete";
		close;
	case 4:
		mes "[Helper for the Royal Richard]";
		mes "7681(" + isbegin_quest(7681) + ")/7682(" + isbegin_quest(7682) + ")";
		mes "5402(" + isbegin_quest(5402) + ")/5403(" + isbegin_quest(5403) + ")";
		mes "5404(" + checkquest(5404,HUNTING) + ")/5405(" + checkquest(5405,HUNTING) + ")/5406(" + checkquest(5406,HUNTING) + ")/5407(" + checkquest(5407,HUNTING) + ")";
		mes "5408(" + checkquest(5408,HUNTING) + ")/5409(" + checkquest(5409,HUNTING) + ")/5410(" + checkquest(5410,HUNTING) + ")/5411(" + checkquest(5411,HUNTING) + ")";
		mes "5412(" + checkquest(5412,HUNTING) + ")/5413(" + checkquest(5413,HUNTING) + ")/5414(" + checkquest(5414,PLAYTIME) + ")";
		close;
	}
	end;
}

function	script	F_geoborg_text	{
	mes "[Bodyguard Martin]";
	mes "There! Stop there!";
	mes "Please go through the inspection for a security check.";
	npctalk "There! Stop there!", "Bodyguard#ep16_1_g", bc_self;
	emotion ET_SURPRISE, getnpcid(0, "Bodyguard#ep16_1_m");
	emotion ET_SURPRISE, getnpcid(0, "Bodyguard#ep16_1_g");
	next;
	mes "[Bodyguard Martin]";
	mes "Please place your identification and personal belongings on this table and stand facing the wall...";
	next;
	mes "[Bodyguard Jerad]";
	mes "Martin! What are you doing?";
	mes "Don't be rude to the guest to the room! I told you.";
	emotion ET_HUK, getnpcid(0, "Bodyguard#ep16_1_g");
	next;
	mes "[Bodyguard Martin]";
	mes "It is for the safety of the queen.";
	next;
	mes "[Bodyguard Jerad]";
	mes "You are near the queen for security, not to chase away the guests discourteously.";
	emotion ET_ANGER, getnpcid(0, "Bodyguard#ep16_1_g");
	next;
	mes "[Bodyguard Martin]";
	mes "The palace is so hectic like this. How can we guard the queen with such an easygoing way of thinking!";
	next;
	mes "[Bodyguard Jerad]";
	mes "We cannot help it during the Imperial Ordinance!";
	next;
	mes "[Bodyguard Martin]";
	mes "Now the Imperial Ordinance would just be...";
	emotion ET_THINK, getnpcid(0, "Bodyguard#ep16_1_m");
	next;
	mes "[Queen]";
	mes "It is noisy out here.";
	cutin "ep16gao_1",2;
	next;
	cutin "",255;
	mes "[Bodyguard Jerad]";
	mes "Huh! Your majesty!";
	mes "I am sorry.";
	mes "We have a guest here.";
	setquest 11400;// The Geoborgs
	ep16_gaobs = 1;
	emotion ET_SURPRISE, getnpcid(0, "Bodyguard#ep16_1_g");
	close;
}

prt_cas_q,81,131,0	script	#ep16_1Geoborg	HIDDEN_WARP_NPC,5,5,{
	end;
OnTouch:
	if (ep16_royal == 2 && ep16_gaobs == 0)
		callfunc("F_geoborg_text");
	end;
}

// Geoborg
prt_cas_q,87,132,6	script	Bodyguard#ep16_1_m	4_M_JOB_KNIGHT1,{
	if (ep16_royal == 2 && ep16_gaobs == 0)
		callfunc("F_geoborg_text");
	if (ep16_gaobs == 1) {
		mes "[Bodyguard Jerad]";
		mes "Extend the queen every courtesy.";
		close;
	}
	if (ep16_gaobs == 2) {
		mes "[Bodyguard Martin]";
		mes "I have something to you. Please talk to Jerad here.";
		close;
	}
	if (ep16_gaobs == 4 || ep16_gaobs == 5) {
		mes "[Bodyguard Martin]";
		mes "I don't know why but Scarlet and Lidion have been on bad terms for a long time.";
		next;
		mes "[Bodyguard Martin]";
		mes "They are similar in age so that it would have been nice if they are friends...";
		mes "However, they both have such strong personalities.";
		next;
		mes "[Bodyguard Martin]";
		mes "Of course, Scarlet looks several times younger.";
		mes "It is supposed to be the characteristic of the Jahas.";
		close;
	}
	if (ep16_gaobs > 6 && ep16_gaobs <= 13) {
		mes "[Bodyguard Martin]";
		mes "Ernst told me that he would go to the Banquet Hall.";
		mes "I wonder if he is still there.";
		close;
	}
	if (ep16_gaobs == 14) {
		mes "[Bodyguard Martin]";
		mes "Ha...";
		close;
	}
	mes "[Bodyguard Martin]";
	mes "Do you have any business left here?";
	close;
}

prt_cas_q,85,127,3	script	Bodyguard#ep16_1_g	1_M_YOUNGKNIGHT,{
	if (ep16_royal == 2 && ep16_gaobs == 0)
		callfunc("F_geoborg_text");
	if (ep16_gaobs == 1) {
		mes "[Bodyguard Martin]";
		mes "Extend the queen every courtesy.";
		close;
	}
	if (ep16_gaobs == 2) {
		mes "[Bodyguard Jerad]";
		mes "Please excuse me for all the trouble.";
		next;
		mes "[Bodyguard Martin]";
		mes "I am sorry.";
		mes "There was nothing suspicious found of your belongings.";
		mes "Let me return your bag.";
		next;
		mes "[Bodyguard Jerad]";
		mes "Have you been going through it?";
		next;
		mes "[Bodyguard Martin]";
		mes "It doesn't hurt to be careful when there are a lot of passengers around here.";
		mes "I don't want to experience such thing again.";
		next;
		mes "[Bodyguard Jerad]";
		mes "Ha...";
		mes "I am sorry.";
		next;
		mes "[Bodyguard Jerad]";
		mes "If you don't mind, how about talking to the members of the Geoborg family in the Banquet Hall?";
		next;
		mes "[Bodyguard Jerad]";
		mes "She has been taking care of the state affairs alone. Not to mention the Royal Assembly...";
		mes "She hasn't been able to sleep for days.";
		next;
		mes "[Bodyguard Jerad]";
		mes "Oh!";
		mes "The queen's sister 'Scarlet Jaha' headed to the Banquet Hall a little while ago. You may be able to meet her there.";
		next;
		mes "[Bodyguard Jerad]";
		mes "She is not one of the members of the family, but she knows everything about the queen.";
		erasequest 11401;// The Geoborgs
		setquest 11402;// The Geoborgs
		ep16_gaobs = 3;
		mes "[Bodyguard Jerad]";
		mes "Oh!";
		mes "The queen's sister 'Scarlet Jaha' headed to the Banquet Hall a little while ago. You may be able to meet her there.";
		next;
		mes "[Bodyguard Jerad]";
		mes "She is not one of the members of the family, but she knows everything about the queen.";
		close;
	}
	if (ep16_gaobs == 3) {
		mes "[Bodyguard Jerad]";
		mes "Oh!";
		mes "The queen's sister 'Scarlet Jaha' headed to the Banquet Hall a little while ago. You may be able to meet her there.";
		next;
		mes "[Bodyguard Jerad]";
		mes "She is not one of the members of the family, but she knows everything about the queen.";
		close;
	}
	if (ep16_gaobs > 3 && ep16_gaobs < 7) {
		mes "[Bodyguard Jerad]";
		mes "Scarlet is much older than the queen, but she doesn't look that old at all.";
		next;
		mes "[Bodyguard Jerad]";
		mes "Of course, the queen is well along in years now as well...";
		close;
	}
	if (ep16_gaobs > 6 && ep16_gaobs <= 13) {
		mes "[Bodyguard Jerad]";
		mes "I hope the queen and Ernst can take some rest now.";
		close;
	}
	if (ep16_gaobs == 14) {
		mes "[Bodyguard Jerad]";
		mes "After the Royal Assembly is over, the queen may turn over the throne to the new king, and go to the castle of Scarlet.";
		next;
		mes "[Bodyguard Jerad]";
		mes "I am a little worried for that I have been serving under the queen my entire life.";
		close;
	}
	mes "[Bodyguard Martin]";
	mes "Do you have any business left here?";
	close;
}

prt_cas_q,93,129,3	script	Queen#ep16_1	4_EP16_EGEO,{
	if (ep16_royal == 2 && ep16_gaobs == 0)
		callfunc("F_geoborg_text");
	if (ep16_gaobs == 1) {
		mes "[Queen Catherine D. Geoborg]";
		mes "Welcome.";
		mes "I am Queen Catherine D. Geoborg.";
		cutin "ep16gao_2",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "I am sorry if my knights have caused you trouble.";
		mes "They are a little sensitive these days. Please understand.";
		emotion ET_SORRY;
		cutin "ep16gao_1",2;
		next;
		cutin "",255;
		if (select( "Ask about the Geoborg family.", "Leave the room." ) == 2) {
			mes "[Queen Catherine D. Geoborg]";
			mes "I see.";
			mes "Come back anytime if you have any other questions.";
			cutin "ep16gao_1",2;
			next;
			mes "[Queen Catherine D. Geoborg]";
			mes "Since the banquet for you heroes is being held in the Banquet Hall, please enjoy your time here.";
			cutin "ep16gao_2",2;
			close3;
		}
		mes "[Queen Catherine D. Geoborg]";
		mes "We, the Geoborg family, are the descendants of Tristan I who founded this world. Our family has produced numerous kings and knights for generations.";
		cutin "ep16gao_1",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "In the first Royal Assembly which was held, the forth prince Ernst was elected as a candidate. However, he has given up his position in the Royal Assembly this time due to several incidents.";
		next;
		select("What do you mean by several incidents?");
		mes "[Queen Catherine D. Geoborg]";
		mes "Oh... It slipped my tongue.";
		mes "It is a little difficult to tell you about those incidents.";
		mes "I'd rather you pretend I didn't say it.";
		cutin "ep16gao_3",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "You have come here, but there isn't much that I can tell you.";
		cutin "ep16gao_1",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "If you have more questions, you may ask Jerad and Martin here.";
		mes "Please excuse me for not sharing more time with you due to some urgent duties.";
		completequest 11400;// The Geoborgs
		setquest 11401;// The Geoborgs
		if (achievementinfo(130000, ACHIEVEINFO_COUNT6) == 0)
			achievementupdate(130000, ACHIEVEINFO_COUNT6, 1);
		ep16_gaobs = 2;
		if (isbegin_quest(7682) == 1 && isbegin_quest(5402) == 2 && isbegin_quest(7683) == 2 && isbegin_quest(7684) == 2 && ep16_wal > 1 && ep16_wig > 1 && ep16_lug > 1 && ep16_gaobs > 1) {
			completequest 7682;// Socializing Starts from an Eye Contact
			setquest 7685;// What Is the Next Thing on the Schedule ?
		}
		close3;
	}
	if (ep16_gaobs == 2) {
		mes "[Queen Catherine D. Geoborg]";
		mes "You have come here, but there isn't much that I can tell you.";
		cutin "ep16gao_1",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "If you have more questions, you may ask Jerad and Martin here.";
		mes "Please excuse me for not sharing more time with you due to some urgent duties.";
		close3;
	}
	if (ep16_gaobs > 5 && ep16_gaobs < 14) {
		mes "[Queen Catherine D. Geoborg]";
		mes "You mean Prince Ernst?";
		mes "Well?";
		cutin "ep16gao_1",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "He comes here to say good morning and either helps me the work or does other things.";
		cutin "ep16gao_2",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "Ever since the banquet started, he has been carrying his work to somewhere else.";
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "He could be somewhere in the Banquet Hall.";
		close3;
	}
	if (ep16_gaobs == 14) {
		mes "[Queen Catherine D. Geoborg]";
		mes "Haven't you met Prince Ernst yet?";
		mes "He just stopped by and went out again...";
		cutin "ep16gao_1",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "I am worried about the representative of our family wandering around like this.";
		next;
		select("Tell her about what you have heard.");
		mes "[Queen Catherine D. Geoborg]";
		mes "Oh...";
		mes "Dear hero, please don't mind such stories much.";
		cutin "ep16gao_3",2;
		next;
		mes "[Queen Catherine D. Geoborg]";
		mes "It is a problem that we, the Geoborg family, should get over ourselves.";
		close3;
	}
	switch( rand(1,3) ) {
	case 1:
		mes "[Queen Catherine D. Geoborg]";
		mes "The ink pad of the highest quality to be used in the royal debate room?";
		mes "It is the clerk who writes down everything. Why are they buying luxury item that no one will ever use...";
		emotion ET_FRET;
		cutin "ep16gao_3",2;
		close3;
	case 2:
		mes "[Queen Catherine D. Geoborg]";
		mes "I have enough dresses to last my lifetime. Why do they keep making them...";
		mes "A cutback!";
		emotion ET_FRET;
		cutin "ep16gao_1.bmp",2;
		close3;
	case 3:
		mes "[Queen Catherine D. Geoborg]";
		mes "Hum.. Trade request from Marol Kingdom...";
		mes "I should dispatch an envoy to take care of it soon...";
		cutin "ep16gao_2.bmp",2;
		close3;
	}
}

// Hall
prt_cas,73,244,5	script	Scarlet Jaha#ep16_1	1_F_LIBRARYGIRL,{
	if (ep16_gaobs < 3) {
		mes "[Scarlet Jaha]";
		mes "Oh, what can I help you, dear adventurer?";
		emotion ET_SMILE;
		close;
	}
	if (ep16_gaobs == 3) {
		mes "[Scarlet Jaha]";
		mes "Oh, what can I help you, dear adventurer?";
		emotion ET_SMILE;
		next;
		select("Ask about the Geoborg family.");
		mes "[Scarlet Jaha]";
		mes "Heh!";
		mes "Is there no one around here who is curious about me?";
		mes "Everyone who ever talks to me talk about that!";
		emotion ET_FRET;
		next;
		select("...");
		mes "[Scarlet Jaha]";
		mes "Oh!";
		mes "Don't be startled.";
		mes "It is a joke.";
		mes "Hahaha.";
		emotion ET_SMILE;
		next;
		mes "[Scarlet Jaha]";
		mes "As you know, the Geoborg family is the descendant of...";
		next;
		mes "[Lidion Geoborg]";
		mes "Tristan I who have founded the kingdom!";
		mes "Is there anyone who doesn't know the story in this kingdom?";
		mes "Dear Lady Jaha.";
		next;
		mes "[Scarlet Jaha]";
		mes "Oh, my!";
		mes "Lidion Geoborg!";
		mes "Why are you out here in the Banquet Hall? You must not be feeling so well.";
		mes "You should have been taking a rest in your manor!";
		emotion ET_FRET;
		next;
		mes "[Lidion Geoborg]";
		mes "I couldn't risk letting a lady of the Jaha family pretend to know about the Geoborg family. I couldn't just take a rest.";
		erasequest 11402;// The Geoborgs
		setquest 11403;// The Geoborgs
		ep16_gaobs = 4;
		close;
	}
	if (ep16_gaobs == 4) {
		mes "[Scarlet Jaha]";
		mes "Oh, my!";
		mes "Lidion Geoborg!";
		mes "Why are you out here in the Banquet Hall? You must not be feeling so well.";
		mes "You should have been taking a rest in your manor!";
		emotion ET_FRET;
		next;
		mes "[Lidion Geoborg]";
		mes "I couldn't risk letting a lady of the Jaha family pretend to know about the Geoborg family. I couldn't just take a rest.";
		close;
	}
	if (ep16_gaobs == 5) {
		mes "[Scarlet Jaha]";
		mes "Phew, that old jerk!";
		mes "He is younger than me and always tries to preach!";
		emotion ET_FRET;
		next;
		mes "[Scarlet Jaha]";
		mes "Oh!";
		mes "Well... For that reason, the Geoborg family will retire to a quiet life for a while as soon as the Royal Assembly is over.";
		next;
		mes "[Scarlet Jaha]";
		mes "I really hope that Catherine doesn't suffer from sorrow anymore.";
		mes "That's why I fully support such decision!";
		next;
		mes "[Scarlet Jaha]";
		mes "However, Prince Ernst is nowhere to be found.";
		mes "His aunt has come a long way to comfort her poor nephew, you know!";
		next;
		mes "[Scarlet Jaha]";
		mes "My sister chased me away to the Banquet Hall, saying she was busy. And I cannot find my nephew either.";
		mes "Eww...";
		emotion ET_CRY;
		next;
		mes "[Scarlet Jaha]";
		mes "If you run into Ernst in the Banquet Hall, please tell him to come this way.";
		erasequest 11404;// The Geoborgs
		setquest 11405;// The Geoborgs
		ep16_gaobs = 6;
		close;
	}
	if (ep16_gaobs >= 6 && ep16_gaobs < 13) {
		mes "[Scarlet Jaha]";
		mes "However, Prince Ernst is nowhere to be found.";
		mes "His aunt has come a long way to comfort her poor nephew, you know!";
		next;
		mes "[Scarlet Jaha]";
		mes "My sister chased me away to the Banquet Hall, saying she was busy. And I cannot find my nephew either.";
		mes "Eww...";
		next;
		mes "[Scarlet Jaha]";
		mes "If you run into Ernst in the Banquet Hall, please tell him to come this way.";
		close;
	}
	if (ep16_gaobs == 13) {
		if (checkweight(1119,3) == 0) {
			mes "- You have too many items in possession.";
			mes "Please organize your inventory and try again. -";
			close;
		}
		mes "[Scarlet Jaha]";
		mes "Oh!";
		mes "Haven't you found him yet?";
		mes "Should I ask Catherine?";
		next;
		mes "[Scarlet Jaha]";
		mes "That expression on your face... You must have heard what people say.";
		mes "There must have been no good stories in particular...";
		mes "Please don't mind such stories much.";
		next;
		mes "[Scarlet Jaha]";
		mes "Ernst must have been hiding from such whispers as well.";
		next;
		mes "[Scarlet Jaha]";
		mes "Well, I guess he needs some rest.";
		mes "You hero, cheer up and enjoy the banquet!";
		next;
		mes "[Scarlet Jaha]";
		mes "What a waste to let the banquet end like this!";
		getexp 700000,700000;
		getitem 6919,10;// TokenOfHonor
		completequest 11412;// The Geoborgs
		ep16_gaobs = 14;
		close;
	}
	if (ep16_gaobs > 13) {
		mes "[Scarlet Jaha]";
		mes "Oh, hero!";
		mes "Are you having a good time?";
		next;
		mes "[Scarlet Jaha]";
		mes "If you have some time to spare, please tell me some fun stories from your adventure.";
		mes "I am sick of listening to Lidion's nitpicking.";
		close;
	}
}

prt_cas,82,240,3	script	Lidion Geoborg#ep16_1	4_M_DOCTOR,{
	if (ep16_gaobs == 4) {
		mes "[Lidion Geoborg]";
		mes "We, the Geoborg family, is one of the seven royal families, but we are the creme de la creme for producing the highest number of kings in the history.";
		next;
		mes "[Lidion Geoborg]";
		mes "In fact, we are settled in Prontera, the center of the Rune-Midgarts.";
		next;
		mes "[Lidion Geoborg]";
		mes "Despite the series of unfortunate events regarding the princes after the death of King Tristan III,";
		next;
		mes "[Lidion Geoborg]";
		mes "Prince Ernst Geoborg was elected as the most regnant candidate in the last Royal Assembly. It shows just influential the Geoborg family is.";
		next;
		mes "[Scarlet Jaha]";
		mes "He has given up from the position.";
		next;
		mes "[Lidion Geoborg]";
		mes "What?";
		npctalk "What?";
		next;
		mes "[Scarlet Jaha]";
		mes "I said!";
		mes "Prince Ernst gave up his position as the candidate to the throne.";
		next;
		mes "[Lidion Geoborg]";
		mes "What a nonsense!";
		next;
		mes "[Scarlet Jaha]";
		mes "Oh!";
		mes "You didn't know!";
		mes "You must have been separated from the outside world for too long!";
		next;
		mes "[Lidion Geoborg]";
		mes "Arghhhh!";
		mes "I won't let this punk... Ernst....!";
		npctalk "Arghhhh!";
		next;
		mes "[Scarlet Jaha]";
		mes "Punk?";
		mes "Even if you are an elder of the family, he is still a prince. You should extend him every courtesy.";
		next;
		mes "[Lidion Geoborg]";
		mes "Arghhhh!";
		npctalk "Arghhhh!";
		erasequest 11403;// The Geoborgs
		setquest 11404;// The Geoborgs
		ep16_gaobs = 5;
		close;
	}
	if (ep16_gaobs >= 5 && ep16_gaobs <= 13) {
		mes "[Lidion Geoborg]";
		mes "Arghhhh!";
		mes "I won't let this punk... Ernst....!";
		npctalk "Arghhhh!";
		next;
		mes "[Scarlet Jaha]";
		mes "Punk?";
		mes "Even if you are an elder of the family, he is still a prince. You should extend him every courtesy.";
		next;
		mes "[Lidion Geoborg]";
		mes "Arghhhh!";
		npctalk "Arghhhh!";
		close;
	}
	mes "[Lidion Geoborg]";
	mes "Tut...";
	mes "Letting anybody in like this... The dignity of the palace has fallen down to the ground.";
	close;
}

prt_cas,76,258,0	script	#ep16_1Whisper1	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (ep16_gaobs == 6) {
		mes "[Mumbling Sound]";
		mes "Did you hear the story?";
		mes "The skeleton of King Tristan III has been found.";
		next;
		mes "[Mumbling Sound]";
		mes "Oh my!";
		mes "Gosh!";
		next;
		mes "[Mumbling Sound]";
		mes "It is a secret. Don't tell anyone.";
		erasequest 11405;// The Geoborgs
		setquest 11406;// The Geoborgs
		ep16_gaobs = 7;
		close;
	}
}

prt_cas,84,232,0	script	#ep16_1Whisper2	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (ep16_gaobs == 7) {
		mes "[Mumbling Sound]";
		mes "...So the princes must have been poisoned...";
		next;
		mes "[Mumbling Sound]";
		mes "What on earth!";
		mes "Well, in the last Royal Assembly...";
		erasequest 11406;// The Geoborgs
		setquest 11407;// The Geoborgs
		ep16_gaobs = 8;
		close;
	}
}

prt_cas,110,242,0	script	#ep16_1Whisper3	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (ep16_gaobs == 8) {
		mes "[Mumbling Sound]";
		mes "Ha!";
		mes "He has given up the royal authority like that!";
		next;
		mes "[Mumbling Sound]";
		mes "Doesn't he even care for the people of his family?";
		next;
		mes "[Mumbling Sound]";
		mes "Your voice is too loud!";
		next;
		mes "[Mumbling Sound]";
		mes "No...";
		mes "I didn't say anything wrong.";
		mes "Did I?";
		next;
		mes "[Mumbling Sound]";
		mes "How can he decide such a major issue as he wants?";
		erasequest 11407;// The Geoborgs
		setquest 11408;// The Geoborgs
		ep16_gaobs = 9;
		close;
	}
}

prt_cas,111,218,0	script	#ep16_1Whisper4	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (ep16_gaobs == 9) {
		mes "[Mumbling Sound]";
		mes "I knew it. He has been hanging out with that punk from the third-rate family too long...";
		erasequest 11408;// The Geoborgs
		setquest 11409;// The Geoborgs
		ep16_gaobs = 10;
		close;
	}
}

prt_cas,92,224,0	script	#ep16_1Whisper5	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (ep16_gaobs == 10) {
		mes "[Mumbling Sound]";
		mes "So is the queen who is handling all the matters of the palace now?";
		next;
		mes "[Mumbling Sound]";
		mes "She hasn't showed her presence to the public so far...";
		erasequest 11409;// The Geoborgs
		setquest 11410;// The Geoborgs
		ep16_gaobs = 11;
		close;
	}
}

prt_cas,77,223,0	script	#ep16_1Whisper6	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (ep16_gaobs == 11) {
		mes "[Mumbling Sound]";
		mes "How foolish it is to give up the regal power like that!";
		next;
		mes "[Mumbling Sound]";
		mes "I won't ever let go of such power!";
		next;
		mes "[Mumbling Sound]";
		mes "Hey, you!";
		mes "Not anyone can have such power.";
		next;
		mes "[Mumbling Sound]";
		mes "Why not?";
		mes "I am free to dream!";
		erasequest 11410;// The Geoborgs
		setquest 11411;// The Geoborgs
		ep16_gaobs = 12;
		close;
	}
}

prt_cas,93,226,0	script	#ep16_1Whisper7	HIDDEN_WARP_NPC,3,3,{
	end;
OnTouch:
	if (ep16_gaobs == 12) {
		mes "[Mumbling Sound]";
		mes "Is the Geoborg family cursed?";
		next;
		mes "[Mumbling Sound]";
		mes "Shh!";
		mes "You shouldn't say such a thing so easily!";
		erasequest 11411;// The Geoborgs
		setquest 11412;// The Geoborgs
		ep16_gaobs = 13;
		close;
	}
}

// At room entrance
prt_cas_q,146,121,4	script	Bachelor#ep16wig	1_M_ORIENT01,{
	emotion ET_CRY;
	mes "[Bachelor]";
	mes "The women in the line here are so scary.";
	mes "They curse, push and fight...";
	next;
	mes "[" + strcharinfo(0) + "]";
	mes "Why don't you just go back then?";
	next;
	emotion ET_ANGER;
	mes "[Bachelor]";
	mes "Are you telling me to go back when Jurgen is right inside of the door?";
	mes "I won't!";
	next;
	emotion ET_BIGTHROB;
	mes "[Bachelor]";
	mes "I won't go before seeing the elegant and luminous presence of him!";
	mes "I have come here from Payon to meet Jurgen!";
	close2;
	if (achievementinfo(110001, ACHIEVEINFO_COUNT5) == 0)
		achievementupdate(110001, ACHIEVEINFO_COUNT5, 1);
	end;
}

prt_cas_q,148,117,7	script	Miss#ep16wig	4_F_02,{
	mes "[Miss]";
	if (rand(2) == 0) {
		mes "Jurgen treats us all the same. We should have a sense of fair play.";
		mes "Who ever it was, turn yourself in!";
		npctalk "Would she come out? She wouldn't have entered if she would turn herself in.", "Womenfolk#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Why are there only one Jurgen...", "Gyusoo#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Why isn't Jurgen coming out of the room...", "Bachelorette#ep16wig", bc_area;
	}
	else {
		emotion ET_ANGER;
		mes "Who was it? Who pretended to be close to Katrin and went along with her? Come out here! We have made a pact not to stand out!";
		npctalk "It was not me. Don't look at me like that.", "Womenfolk#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Oh gosh! Who has done such a thing?", "Gyusoo#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Katrin is just too nice.", "Bachelorette#ep16wig", bc_area;
	}
	close2;
	if (achievementinfo(110001, ACHIEVEINFO_COUNT3) == 0)
		achievementupdate(110001, ACHIEVEINFO_COUNT3, 1);
	end;
}

prt_cas_q,148,122,4	script	Womenfolk#ep16wig	1_F_03,{
	mes "[Womenfolk]";
	if (rand(2) == 0) {
		emotion ET_FRET;
		mes "Jurgen belongs to all of us! No one should have him to oneself! I won't let anyone to do that!";
		npctalk "Yes! He belongs to us all!", "Miss#ep16wig", bc_area;
		sleep2 1000;
		npctalk "I won't let it happen either!", "Gyusoo#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Oh, I don't agree with you guys. I am generous.", "Bachelorette#ep16wig", bc_area;
	}
	else {
		mes "I won't let anyone monopolize Jurgen! The heaven may forgive, but I won't!";
		npctalk "I won't either!", "Miss#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Well, if I am the one who gets to do that. I allow it.", "Gyusoo#ep16wig", bc_area;
		sleep2 1000;
		npctalk "It is a relief that the heaven would forgive at least.", "Bachelorette#ep16wig", bc_area;
	}
	close2;
	if (achievementinfo(110001, ACHIEVEINFO_COUNT2) == 0)
		achievementupdate(110001, ACHIEVEINFO_COUNT2, 1);
	end;
}

prt_cas_q,150,122,4	script	Gyusoo#ep16wig	1_F_LIBRARYGIRL,{
	mes "[Gyusoo]";
	if (rand(2) == 0) {
		mes "It is no use getting a ticket number... It is just too difficult to wait for my turn.";
		npctalk "Let's have a tea here.", "Miss#ep16wig", bc_area;
		sleep2 1000;
		npctalk "I shall take a nap before he comes out.", "Womenfolk#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Wait, do you hear anything from the inside?", "Bachelorette#ep16wig", bc_area;
	}
	else {
		emotion ET_BIGTHROB;
		mes "When will Jurgen come out?";
		mes "When will be my turn to see him?";
		npctalk "There are 22 people before me.", "Miss#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Will he come out today?", "Womenfolk#ep16wig", bc_area;
		sleep2 1000;
		npctalk "If you are in the 23rd place, you may not be able to see him today.", "Bachelorette#ep16wig", bc_area;
	}
	close2;
	if (achievementinfo(110001, ACHIEVEINFO_COUNT1) == 0)
		achievementupdate(110001, ACHIEVEINFO_COUNT1, 1);
	end;
}

prt_cas_q,150,117,7	script	Bachelorette#ep16wig	4_F_01,{
	mes "[Bachelorette]";
	if (rand(2) == 0) {
		mes "There! If you are a newbie, don't be so naive and try to fit in here!";
		npctalk "Yes! If you are slow-witted, just try to be quiet!", "Miss#ep16wig", bc_area;
		sleep2 1000;
		npctalk "You should grasp of the situation at least for three month.", "Gyusoo#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Everyone is just too kind, letting go of such a thing.", "Womenfolk#ep16wig", bc_area;
	}
	else {
		emotion ET_ANGER;
		mes "[Bachelorette]";
		mes "Hey, don't you push me there! Stand in the line. Isn't it your first time here to see Jurgen?";
		npctalk "If you are a newbie, you should go through the initiation!", "Miss#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Isn't standing in the line a common sense?", "Gyusoo#ep16wig", bc_area;
		sleep2 1000;
		npctalk "Where did the person who was supervising the lineup go?";
	}
	close2;
	if (achievementinfo(110001, ACHIEVEINFO_COUNT4) == 0)
		achievementupdate(110001, ACHIEVEINFO_COUNT4, 1);
	end;
}

prt_cas_q,153,123,3	script	Strong Guards#ep16wig01	8W_SOLDIER,{
	switch( rand(1,3) ) {
	case 1:
		emotion 25;
		mes "[Strong Guards]";
		mes "Hey, you lady! Don't push!";
		mes "Stay in the line!";
		next;
		mes "[Strong Guards]";
		mes "There was this lady who was carried out with a broken ankle from pushing!";
		mes "It is all for your own good!";
		close;
	case 2:
		emotion ET_OHNO;
		mes "[Strong Guards]";
		mes "Ha, I am already feeling tired as always.";
		mes "I didn't know that women were so strong before.";
		next;
		mes "[Strong Guards]";
		mes "I started yesterday and realized why the people who had worked here before quit.";
		mes "Despite being with so many ladies here, I am not happy at all.";
		close;
	case 3:
		mes "[Strong Guards]";
		mes "As you see, there are no guards guarding the doord to other family's residences.";
		mes "However, there are too many infiltrators to the Wigner residence who get in there to see Jurgen. Now the door is guarded at all times.";
		close;
	}
}

prt_cas_q,153,116,1	script	Strong Guards#ep16wig02	8W_SOLDIER,{
	switch( rand(1,3) ) {
	case 1:
		emotion 36;
		mes "[Strong Guards]";
		mes "Oh, be quiet there!";
		mes "It is too noisy that Jurgen cannot take his beauty rest!";
		next;
		mes "[Strong Guards]";
		mes "It is not for my sake, but for Jurgen.";
		mes "It would make you sad if Jurgen is unable to sleep, right? So be quiet!";
		close;
	case 2:
		emotion ET_ANGER;
		mes "[Strong Guards]";
		mes "Oh, wait there! Stop there!";
		mes "Aren't you the one who has infiltrated the room before? You don't have to run hiding your face! Come back here!";
		next;
		mes "[Strong Guards]";
		mes "She went off again. She sure is fast.";
		mes "I am glad that my own sister doesn't come to a place like this.";
		close;
	case 3:
		emotion 28;
		mes "[Strong Guards]";
		mes "When I applied to become a guard, I wanted to keep the palace safe with my own hands...";
		mes "Never did I know that I would end up here...";
		next;
		emotion 6;
		mes "[Strong Guards]";
		mes "Hey, you! There! Stand in the line! Stop there! You shouldn't block the way!";
		mes "If you keep doing that, I'll stop you from coming here!";
		close;
	}
}

// Wigner
prt_cas_q,82,21,1	script	Levuiere Wigner#ep16wig	4_EP16_LOUVIERE,{
	if (BaseLevel < 100) {
		mes "[Levuiere]";
		mes "Dear adventurer, although I respect your hard work going through all the obstacles and hardships, it is still a little too early for you to be here.";
		mes "I hope I will see you later.";
		close;
	}
	if (ep16_wig == 0) {
		if (isbegin_quest(7682) != 1) {
			mes "[Levuiere]";
			mes "Who are you?";
			mes "Only the people with permission can enter this place. Please leave.";
			close;
		}
		mes "[Levuiere]";
		mes "Dear adventurer, welcome to the Wigner family. My name is ^0000cdLevuiere Wigner^000000.";
		next;
		mes "[Levuiere]";
		mes "I am honored by your visit while you are attending the banquet held for you, dear adventurer.";
		next;
		mes "[Levuiere]";
		mes "This banquet carries more meaning than celebration since the Royal Assembly is conducted at the same time. Did you hear that?";
		next;
		mes "[Levuiere]";
		mes "There is a candidate from our family who participates in the Royal Assembly as well. Would you like to meet him?";
		next;
		mes "[Levuiere]";
		mes "She is the lady of the Wigner house, ^0000cdCatherine Wigner^000000.";
		next;
		mes "[Catherine]";
		mes "How do you do? Please make yourself at home while you are staying with us, the Wigner family. Please let me know if you experience any inconvenience here.";
		next;
		mes "[Catherine]";
		mes "We, Wigners, will support as much as possible for your convenience, dear adventurer.";
		next;
		mes "[Catherine]";
		mes "Please visit our manor too if you have the time, dear adventurer. You are always welcome.";
		mes "Where is ^0000cdJurgen^000000 now?";
		next;
		cloakoffnpc "Jurgen Wigner#ep16wig00", getcharid(0);
		cloakonnpc "Jurgen Wigner#ep16wig", getcharid(0);
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Are you looking for me?";
		next;
		cutin "",255;
		mes "[Levuiere]";
		mes "There you are! Dear adventurer, this is the ^0000cdheir of the Wigner family^000000, and the ^0000cdcandidate for the throne^000000 participating in the Royal Assembly this time.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Hello. My name is ^0000cdJurgen Wigner^000000. It is very nice to meet you.";
		next;
		mes "[Jurgen]";
		mes "Dear adventurer, please make yourself home here. If you need anything or find anything inconvenient, please let us know anytime.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Thank you for your hospitality.";
		next;
		mes "[Jurgen]";
		mes "Then, please excuse me.";
		next;
		cloakonnpc "Jurgen Wigner#ep16wig00", getcharid(0);
		cloakoffnpc "Jurgen Wigner#ep16wig", getcharid(0);
		cutin "",255;
		mes "[Levuiere]";
		mes "Tut, I am worried that he lacks sociability. He would have to meet a lot of people as the heir of the house, you know. Dear adventurer, please excuse my son's discourtesy.";
		next;
		mes "[Levuiere]";
		mes "If time allows, would you like to meet our children? They have been excited to meet the hero who defeated Morocc in the banquet.";
		setquest 14475;// To Jurgen
		ep16_wig = 1;
		next;
		mes "[Levuiere]";
		mes "Then please make yourself at home and take a look around, dear adventurer.";
		close;
	}
	if (ep16_wig == 1) {
		mes "[Levuiere]";
		mes "Dear adventurer, please make yourself home and take your time looking around here.";
		next;
		mes "[Levuiere]";
		mes "If time allows, would you please tell our children the stories of your adventures? It would be an invaluable experience for them.";
		next;
		mes "[Levuiere]";
		mes "Then, have a restful time.";
		close;
	}
	if (ep16_wig == 2) {
		mes "[Levuiere]";
		mes "Dear adventurer, did you meet the children? I would love to have some tea with you and listen to your stories if you are available.";
		next;
		mes "[Levuiere]";
		mes "We like to hear the stories of adventurers very much.";
		mes "Those adventures are valuable experiences that money cannot buy.";
		next;
		mes "[Catherine]";
		mes "I wonder if our children have observed their manners though. We must have spoiled them for that they sometimes act so imprudently.";
		next;
		mes "[Catherine]";
		mes "I am trying to warn them a little these days, Please excuse their behaviors if they have done anything rude to you.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Not at all. Jurgen seemed to have grown since my last visit.";
		mes "Katrin and Isaac impressed me as well.";
		next;
		mes "[Catherine]";
		mes "We have been too easy on them.";
		mes "We are ashamed that we were not prepared properly for the Royal Assembly last time.";
		next;
		mes "[Levuiere]";
		mes "It is not important whether he becomes the king or not.";
		mes "If he is a king material, he will be. If not, he doesn't have to be the king. I don't want to stress him out for that.";
		next;
		mes "[Catherine]";
		mes "Don't you have any ambitions? What a glory would it be if we turn out a king from our family of our generation!";
		mes "Since our ancestors founded this kingdom, we deserve to produce a king.";
		next;
		mes "[Levuiere]";
		mes "The king is a hollow position. It only comes with responsibilities?";
		mes "Haven't I told you before? Did you forget?";
		next;
		mes "[Levuiere]";
		mes "If our family turns out a king, much of our fortune will be spent. Once, our family has really suffered from it.";
		mes "Near the king, there are always a swarm of pesky flies.";
		next;
		mes "[Catherine]";
		mes "You know, it could be the exact opposite.";
		mes "It may reinforce our family.";
		next;
		mes "[Catherine]";
		mes "Now there are Katrin and Isaac who can back up Jurgen.";
		next;
		mes "[Levuiere]";
		mes "Hum... Isaac.";
		mes "Thinking of him makes me confident.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "You must trust Isaac quite a lot.";
		next;
		mes "[Levuiere]";
		mes "Oh, we must have left you out of the conversation, dear adventurer.";
		mes "I am sorry.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Not at all. I have been enjoying the conversation.";
		next;
		mes "[Levuiere]";
		mes "Now that you mention it, how do you find our third child, Isaac?";
		mes "He is the most Wigner-like one among the children.";
		next;
		mes "[Levuiere]";
		mes "While Jurgen is interested in the looks, he doesn't really care for money or the throne...";
		mes "If Katrin was a son, I would have gladly leave everything to her.";
		next;
		mes "[Levuiere]";
		mes "Fortunately, the third child who used to be a mischievous boy has grown up to be suitable for the name of Wigner.";
		mes "Not that the other two are inadequate.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I know what you mean.";
		next;
		mes "[Catherine]";
		mes "Nevertheless, don't talk like that in front of the children. It is not good to favor a child.";
		next;
		mes "[Levuiere]";
		mes "As a member of the Wigner family, one must be able to cope with criticism.";
		mes "They should be able to determine what's right upon listening to the words of other people. Also, they need to be able to deal with the hard truths.";
		next;
		mes "[Catherine]";
		mes "Please don't talk like that in front of the children.";
		next;
		mes "[Levuiere]";
		mes "I never talk to them like this you know.";
		next;
		mes "[Catherine]";
		mes "Anyways, Isaac seems busy doing something these days. Do you know what he is doing?";
		next;
		mes "[Levuiere]";
		mes "I heard that he is doing something with the third son of the Roegenburg family. You don't need to worry about Isaac. He knows how to take care of himself.";
		next;
		mes "[Katrin]";
		mes "Arghhhhhhhhh!";
		next;
		emotion ET_HUK;
		mes "[Levuiere]";
		mes "^0000cdKatrin?^000000";
		next;
		emotion ET_HUK, getnpcid(0, "Catherine Wigner#ep16wig");
		mes "[Catherine]";
		mes "^0000cdKatrin?^000000 Has something happened to my baby? I should get going...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "You two stay here. It might be dangerous. Let me go take a look first.";
		cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
		erasequest 14476;// To Levuiere and His Wife
		setquest 14477;// What Is Going on?
		ep16_wig = 3;
		close;
	}
	if (ep16_wig == 3) {
		mes "[Levuiere]";
		mes "Has something happened to our child, I mean, Katrin?";
		mes "Shouldn't I go down there myself?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It could be dangerous. Please wait here for a minute.";
		mes "I'll go.";
		close;
	}
	if (ep16_wig < 12) {
		mes "[Levuiere]";
		mes "Dear adventurer, welcome.";
		mes "I asked what had happened to the children, but they didn't tell me.";
		next;
		mes "[Catherine]";
		mes "Are they hiding something bad from me...?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "No, they are not. You don't have to worry about it.";
		next;
		mes "[Catherine]";
		mes "Then please tell me what it is about.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "If they have decided not to tell you, it is not my story to tell.";
		mes "Since I have to run some errands, I should get going now.";
		close;
	}
	if (ep16_wig < 16) {
		mes "[Levuiere]";
		mes "Dear adventurer, you seem busy.";
		mes "Is it about what our children have asked you?";
		next;
		mes "[Catherine]";
		mes "We have decided not to question it any more.";
		mes "They have grown up, but we still tend to baby them too much...";
		next;
		mes "[Levuiere]";
		mes "Anyways, if you need help, please let me know anytime.";
		mes "And thank you for helping our children.";
		close;
	}
	if (ep16_wig > 15) {
		mes "[Levuiere]";
		mes "Dear adventurer, I have heard the story from the children.";
		mes "They didn't go into all the details, but I heard that they owed you a huge favor.";
		next;
		mes "[Catherine]";
		mes "The children are getting along so much better these days.";
		mes "Not that they were on bad terms, but now they seen to care for one another more. I am so glad.";
		next;
		mes "[Levuiere]";
		mes "You seem to be the messenger of luck to our family.";
		mes "It is our family tradition to keep a person like you close and treat well.";
		next;
		mes "[Catherine]";
		mes "Please visit our manor after the banquet is over.";
		mes "We would be honored to have you as a guest to our home.";
		close;
	}
}

prt_cas_q,82,23,0	script	Catherine Wigner#ep16wig	1_F_LIBRARYGIRL,{
	if (ep16_wig == 0) {
		mes "[Catherine]";
		mes "Hello, dear adventurer. Welcome!";
		mes "We are honored by your visit to the Wigner family.";
		next;
		mes "[Catherine]";
		mes "Please let me know if you experience any inconvenience here.";
		mes "As the lady of the house I would make your stay as pleasant as possible.";
		next;
		mes "[Catherine]";
		mes "You may talk to the head of the family standing next to me. His name is Levuiere Wigner.";
		close;
	}
	if (ep16_wig <= 2) {
		mes "[Catherine]";
		mes "Have you met our children? Having a conversation with you would be an invaluable experience for our children, dear adventurer.";
		mes "They haven't been through any trouble growing up so we feel that they lack in various life experiences.";
		next;
		mes "[Catherine]";
		mes "Since I am married to a man from the family which has founded this country, I want to raise my children worthy of the name. However, my husband is not interested in fame and power.";
		next;
		mes "[Catherine]";
		mes "I feel very sorry about it.";
		next;
		mes "[Catherine]";
		mes "However, I tend to let our children to whatever they want to do, which makes me wonder if I have spoiled them...";
		next;
		mes "[Catherine]";
		mes "I'd like to hear your stories for that.";
		mes "It is always a great joy to listen to the stories of the people who have gone through a lot of experiences.";
		close;
	}
	if (ep16_wig == 3) {
		mes "[Catherine]";
		mes "What if anything has happened to my baby, Katrin?";
		mes "I'd better I go down there myself.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It could be dangerous, please wait here for a minute.";
		mes "Let me go down there and see what has happened.";
		next;
		mes "[Catherine]";
		mes "I hope everything is OK.";
		close;
	}
	if (ep16_wig < 12) {
		mes "[Levuiere]";
		mes "Dear adventurer, welcome.";
		mes "I asked what had happened to the children, but they didn't tell me.";
		next;
		mes "[Catherine]";
		mes "Are they hiding something bad from me...?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "No, they are not. You don't have to worry about it.";
		next;
		mes "[Catherine]";
		mes "Then please tell me what it is about.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "If they have decided not to tell you, it is not my story to tell.";
		mes "Since I have to run some errands, I should get going now.";
		close;
	}
	if (ep16_wig < 16) {
		mes "[Catherine]";
		mes "I wonder if our children haven't bothered you much. Although we are very curious, we have decided not to question it any more.";
		mes "They have grown up, but we still tend to baby them too much...";
		next;
		mes "[Levuiere]";
		mes "Anyways, if you need help, please let me know anytime.";
		mes "And thank you for helping our children.";
		close;
	}
	if (ep16_wig > 15) {
		mes "[Catherine]";
		mes "For some reason, our children have become very close to one another.";
		mes "I think it is all thanks to you.";
		next;
		mes "[Catherine]";
		mes "Please visit our manor after the banquet is over.";
		mes "Please give us the opportunity to treat you, dear adventurer.";
		close;
	}
}

prt_cas_q,95,9,5	script	Jurgen Wigner#ep16wig	4_M_4THPRIN1,{
	if (checkweight(1304,3) == 0) {
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "You seem to have a lot of luggage. Are you OK?";
		mes "It looks a lot and large.";
		next;
		mes "[Jurgen]";
		mes "How about cutting down some?";
		close3;
	}
	if (ep16_wig == 0) {
		mes "[Jurgen]";
		mes "Are you a fan of mine? Did you make an appointment? If you are a guest of mine, why don't you go see my father over there?";
		close;
	}
	if (ep16_wig == 1) {
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Dear adventurer, I am glad that you are still here. Sorry about my bad manners earlier. I wanted to have more conversation with you. However, if I make any mistakes while I talk in front of my mother, I get scolded.";
		next;
		mes "[Jurgen]";
		mes "Not that she would be harsh on my, but it still kind of bothers me so I had to leave. I am sorry.";
		next;
		mes "[Jurgen]";
		mes "Dear adventurer, since you are already here, may I introduce my family to you? This elegant lady here is my sister, ^0000cdKatrin Wigner^000000.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "You shouldn't call me your sister, but the first daughter of the Wigner family in this occasion.";
		next;
		mes "[Katrin]";
		mes "Dear adventurer, I am honored to meet you. I hope you have a restful stay with the Wigners.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "This is my brother, ^0000cdIsaac Wigner^000000.";
		next;
		mes "[Jurgen]";
		mes "He is the youngest child of the Wigner family. Unlike my sister and I who are not interested in the family business, he is a prodigy who will shine the name of the Wigner family.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Hello? I am Isaac Wigner. What a trouble you are going through to visit a boring family like this. I hope you have fun here if you can...";
		next;
		cutin "16kat_ang",2;
		mes "[Katrin]";
		mes "Isaac, I have warned you about such manner of speaking before.";
		mes "You are also being disrespectful to Jurgen who has just introduced you. Are you going to put us all to shame?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "It is a joke, just a joke! Sister, you are so inflexible.";
		mes "In a dreary atmosphere like this, this adventurer deserves to laugh a little, right?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "You are not being funny but disrespectful to the guest. Dear adventurer, please excuse the bad manners. I am sorry.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "By the way, I want to go home as soon as possible. This place is too narrow and gloomy.";
		mes "I would like to be in the Banquet Hall at least.";
		next;
		mes "[Jurgen]";
		mes "There must be a lot of people who want to see me. I am obliged to show my face.";
		next;
		mes "[Jurgen]";
		mes "My presence will light up the dark palace, you know. I should entertain the bored people there.";
		next;
		cutin "16kat_ang",2;
		mes "[Katrin]";
		mes "You are insulting the Royal Assembly. You need to do your best. Royal Assembly is more sacred that you think.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "You shouldn't forget that you are one of the candidates for the throne who will lead the kingdom with the seven royal families.";
		next;
		mes "[Katrin]";
		mes "It means that you shouldn't act like a child. I have told you not to take the weight of your responsibility and duty so lightly.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Of course, I know that well. That's why I have tidied up my looks and fixed my hair perfectly.";
		mes "I tried not to loosen up, you know.";
		next;
		mes "[Jurgen]";
		mes "You need to be able to groom yourself up well to take care of greater matters.";
		mes "Of course, I am well-prepared.";
		next;
		mes "[Jurgen]";
		mes "Would you like to see my new cape?";
		mes "It goes with the color of my eyes. It would definitely brighten up the palace.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		if (ep16_lug == 2 || ep16_lug == 3 || ep16_lug == 7 || ep16_lug == 8) {
			mes "Oh, not again. Dear adventurer, you should be used to this to have a conversation with my brother at our home.";
			next;
		}
		else {
			mes "Oh, there he goes again. I should get going now. Dear adventurer, I would like to see you later.";
			next;
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
		}
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Dear adventurer, I guess that is it for today. If you are not busy, ^0000cdwhy don't you go have a cup of tea with our parents^000000?";
		next;
		mes "[Katrin]";
		mes "My parents love to hear the stories of adventurers.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It is a good idea. Please excuse me then.";
		completequest 14475;// To Jurgen
		setquest 14476;// To Levuiere and His Wife
		ep16_wig = 2;
		if (isbegin_quest(7682) == 1 && isbegin_quest(5402) == 2 && isbegin_quest(7683) == 2 && isbegin_quest(7684) == 2 && ep16_wal > 1 && ep16_wig > 1 && ep16_lug > 1 && ep16_gaobs > 1) {
			completequest 7682;// Socializing Starts from an Eye Contact
			setquest 7685;// What Is the Next Thing on the Schedule ?
		}
		if (achievementinfo(130000, ACHIEVEINFO_COUNT4) == 0)
			achievementupdate(130000, ACHIEVEINFO_COUNT4, 1);
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Our ^0000cdparents^000000 are over there. They'd like to talk to you.";
		mes "By the way, are there many people waiting outside the door?";
		next;
		mes "[Jurgen]";
		mes "They are waiting for me. However, it is a little tiring to meet them all one by one.";
		mes "It is very demanding to guard the world's peace with my beauty.";
		close3;
	}
	if (ep16_wig == 2) {
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Our ^0000cdparents^000000 are over there. They'd like to talk to you.";
		mes "By the way, are there many people waiting outside the door?";
		next;
		mes "[Jurgen]";
		mes "They are waiting for me. However, it is a little tiring to meet them all one by one.";
		mes "It is very demanding to guard the world's peace with my beauty.";
		close3;
	}
	if (ep16_wig == 3) {
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "It seems that my sister has lost something. I couldn't understand her words since she was in such a hurry.";
		mes "Would you please ask her what it is about?";
		close3;
	}
	if (ep16_wig >= 4 && ep16_wig < 14) {
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Whatever she has lost, it must be very valuable to her. I feel that she'd better get someone to help her to find it.";
		mes "Well, then she would be scolded by our father though...";
		next;
		mes "[Jurgen]";
		mes "I wonder if you can look into it as fast and quietly as possible.";
		mes "My sister's fate depends on your hands.";
		next;
		mes "[Jurgen]";
		mes "It seems that she may drop dead if she doesn't find whatever she has lost.";
		close3;
	}
	if (ep16_wig == 14) {
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Dear adventurer, you are here. How did it go?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "No. Everyone has seen it there, but no one has seen it taken.";
		next;
		mes "[Jurgen]";
		mes "How about the one who has taken it? Oh, right, the one who has taken it wouldn't say so.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "By the way, people seem to have a strange prejudice about Katrin. I know the words they say are not true, but you'd better to something about it.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "What do you meant?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well, please don't take it wrong. Some people have said that Katrin may have done it to draw attention or they cannot trust Katrin.";
		next;
		mes "[Jurgen]";
		mes "What a nonsense! Phew... This is exactly why I have told her to open her heart to others and talk more...";
		next;
		cloakoffnpc "Katrin Wigner#ep16wig", getcharid(0);
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Why should I do that? I don't care about the people who don't know me well anyway.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Sister, when did you come back?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "I came here just a minute ago. However, I heard what you said. So, do you think it's my fault to hear such things?";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "You are to blame to a certain level. Look at me. I always to treat others with all my hearts. They all love me for that.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Do you think people like you for your attitude?";
		mes "Don't you remember the trouble that all the family members have been through because of your attitude issue during the Royal Assembly?";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "If it is not my attitude, then for what?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "What do you think?";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Do you mean that it is for my looks?";
		next;
		cutin "16kat_ang",2;
		mes "[Katrin]";
		mes "Can you deny it? Since you were young, when you are doing nothing, no, even when you are rude, people have been nice to you.";
		next;
		mes "[Katrin]";
		mes "They all smiled at you to please the pretty-looking heir of the Wigner family, the candidate to the throne.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "You say that is for my looks?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Looks have played an important role. You cannot deny it. Looks are part of your talent, right?";
		mes "Especially, in our family. You should know it by now.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Even if it's all for my looks, have I ever wanted it to be that way?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Even when I am not doing anything wrong, I am always compared to my handsome brother, and bad rumors follow me. Do you think I have ever wanted it to be that way?";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "That's why you need to open up to others and act nice...";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "The best way not to cause misunderstanding is to be silent. When I don't talk, I don't make a mistake.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "That doesn't always work. About what happened today, you know. Even when you were silent...";
		next;
		cutin "16kat_ang",2;
		mes "[Katrin]";
		mes "I am already doing my best! You know what? The darkest shadow is always right next to the brightest light! It is just like me next to you! I have been trying!";
		next;
		mes "[Katrin]";
		mes "However, people don't see who I really am! What else should I do now?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Both of you should calm down.";
		next;
		cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Yes. Whatever it is, you'd better calm down. I could hear you yelling at each other from the other end of the hallway.";
		next;
		mes "[Isaac]";
		mes "Our family is supposed to have a reputation to keep, isn't it?";
		next;
		mes "[Isaac]";
		mes "What you have ruined last time is about to be recovered now, brother.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "......";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "By the way, ^0000cdisn't it your box^000000, sister? It was on the table while there are a bunch of people hanging out. I kept it not to get it lost.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "This... ^0000cdWas it you who had taken it^000000?";
		next;
		cutin "16kat_ang",2;
		mes "[Katrin]";
		mes "You should have let me know when you were taking it. Do you know how much trouble I have been through for this?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Wait, this is unfair! No? I have taken it with me for your sake, sister.";
		next;
		mes "[Isaac]";
		mes "You know how our father gets furious if anything goes missing in our house!";
		next;
		mes "[Isaac]";
		mes "He would go on and on about how we don't need a person who cannot manage even a small thing in the Wigner family and how management skill is the greatest virtue of our family... Just think about it scares me.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "What is in there? Why did you fuss about it so much?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "There is nothing which is considered valuable by others in it. However, it is the most precious thing to me. Look.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "A note?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "A diary?";
		next;
		cutin "16kat_ang",2;
		mes "[Katrin]";
		mes "It is better to avoid a futile conversation. If you don't talk, you don't make mistakes. However, there are moments that you want to be honest with yourself.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "This diary has been capturing the moments that I want be true to myself.";
		next;
		mes "[Katrin]";
		mes "Nevertheless, I still am mistaken by others even I stay quiet. I guess silence has not been the best policy after all. Since I have my diary back, I should get going.";
		mes "Dear adventurer, please excuse me for all the trouble.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Sister, I...";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "That's all right now. I'll forget it all. You don't have to care about it either.";
		next;
		cloakonnpc "Katrin Wigner#ep16wig", getcharid(0);
		cutin "16isa",1;
		mes "[Isaac]";
		mes "She walks so fast. What was it all about?";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "It's all because you have taken the box without a word... Phew... Well, long story short, our sister is upset.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Argh! Why is she upset?";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "It is complicated. I guess there are some bad rumors about her out there.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Oh, I have heard about it before. However, I thought you would take care of it since it is mainly your fault.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "You knew about that? Why didn't you tell me about it?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Even if I did, you wouldn't have taken it seriously. It is true that you were born with that blessed looks.";
		next;
		mes "[Isaac]";
		mes "That's why the people around you have looked up to you. Not that our parents have been hard on us. No wonder you have grown up to be so carefree.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Are you picking up a fight with me?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "No, listen to me. I am telling the truth here. No hard feelings.";
		next;
		mes "[Isaac]";
		mes "Due to your superlative looks, we have been quite disadvantaged, growing up.";
		next;
		mes "[Isaac]";
		mes "Do you remember what our sister has said? How the darkest shadow is always right next to the brightest light? It is true.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "I don't get it. Beauty is a good thing. Everyone likes it.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "The people who see it may appreciate it. However, the people right next to it are being compared to it.";
		mes "Among the three of us, it must have been the hardest for our sister.";
		next;
		mes "[Isaac]";
		mes "Imagine a plain person standing next to an angelic beauty. Despite looking completely normal, she or he would look unattractive and somber. We have been compared to you like that, all our lives.";
		next;
		mes "[Isaac]";
		mes "Our sister must have suffered from the stress even more. She has managed to endure it with her extraordinary patience and generosity. In fact, I think she could be an angel.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "I didn't know that... At all..";
		next;
		mes "[Jurgen]";
		mes "What should I do now?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "I don't think it is entirely your fault. It was our parents who have created you like that.";
		mes "Oh, well, you are to blame for your carefreeness though.";
		next;
		mes "[Isaac]";
		mes "Anyway, who we need to worry about is our sister. Has she ever been mad at us? What should we do when she is upset?";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Well, she has been mad at me once when I was young.";
		mes "I guess it was somewhat similar to what has just happened. She said something about comparison then...";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "I was too young to remember it. However, I do remember how our sister became very quiet after arguing with you.";
		mes "You have been the main culprit of it after all.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "It is not the time to waste time to distinguish between right and wrong. What should we do, dear adventurer.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I don't know. Have you ever tried to countervail someone's anger?";
		next;
		mes "[Jurgen]";
		mes "No. No one's ever been mad at me, except our sister.";
		next;
		mes "[Jurgen]";
		mes "Dear adventurer, please help us out here.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Leave me out of it. I wasn't the one who got her mad.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "You were the cause of the problem.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "I was trying to keep it safe... Please, dear adventurer, help us!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What can you do? You'd better wait until your sister lets off steam... Or, you could try giving her something she likes...";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "What doesn't she like? Do you know?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "I know as much as you do.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Which means you know nothing, great!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "She seems to value experiences and memories. Don't you have any good memories with her? Trace back your memory back a little.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Hum... Hum... There's no such... Wait! Yes, I remember one!";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "What? Is there any?";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Do you remember how we walked around the Comodo beach together during the summer vacation? We picked up some pretty stones on the shore and in the cave.";
		next;
		mes "[Jurgen]";
		mes "Our sister really liked...This clear stone containing some sea water and a piece of coral inside.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "The Sea Stone?";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Yes, that's it! She lined up those stones near the window and enjoyed looking at them glittering in the sun.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Oh, I remember now. I remember seeing them glittering in her room.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "The ^0000cdSea Stone^000000? What is it?";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "It is a pretty stone which can only be found in Comodo. It is called the Sea Stone because it looks as if there is the sea captured inside of it, with the sea water and corals.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Some romantics call it, the gift from a mermaid.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "You may find them upon digging the ground on the Comodo beach once in a while. Our sister, Isaac and I used to dig them out whenever we are on summer vacation.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "I have heard that it is not found on the beach these days. Instead, you can get it by killing the ^0000cdMedusa inside the cave in the west of Comodo^000000.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "What? Did the Medusa take them all?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Who knows? It is supposed to be the gift from a mermaid. Some say, the Mermen have given them to the Medusa. Well, this also sounds like a fairytale.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "How do you know it so well?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "I have once tried to distribute them all over the continent. You used to be able to get them by just digging the ground. Tourists used to pick them up as souvenirs or gamblers used to use them as talismans for their prayers to the sea-god.";
		next;
		mes "[Isaac]";
		mes "Since it became hard to get them, I have given up the plan. The game is not worth the candle, having to kill the Medusa on the way.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "I didn't know that. Anyway, I remember there was something else next to the stone.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "There were some flowers, a bunch of them. What flower was that? I lasted so long that it never seemed to wither at all.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Dear adventurer, do you have any idea what flower that would have been?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "If it didn't whither for so long, it could have been a Witherless Rose.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Is there such a thing? Why do you need a Witherless Rose when you can just buy another flower before the older one withers?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "You want what you like to last long. If you replace it with another flower, it is not the same flower you liked anymore.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Hum... Well, I guess I can imagine myself being replaced with another person. I understand it now.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "So, when are you going to get them for us?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What?";
		next;
		mes "[Isaac]";
		mes "You didn't think that we would go there to get them ourselves, did you?";
		next;
		mes "[Isaac]";
		mes "I am busy with my business, and Jurgen attracts too many people around him.";
		next;
		mes "[Isaac]";
		mes "We need someone else we can trust, who happens to be right in front of us.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "I was worried about it as well. Please, dear adventurer, help us. The loving relationship among us depends on you.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "If you say so... How many of them do you need? Where can I get the Sea Stone?";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Hum... I guess we need ^0000cd1 Witherless Rose^000000 and ^0000cd10 Sea Stones^000000 since we want to decorate the window with them.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "We are depending on you.";
		erasequest 14486;// I Heard the Story
		setquest 14487;// Please Find the Token of Memory
		ep16_wig = 15;
		close3;
	}
	if (ep16_wig == 15) {
		if (countitem(748) < 1 || countitem(6927) < 10) {
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "Dear adventurer, you came! Did you bring what we asked you for? Please tell us that you did.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "I wasn't able to bring them all.";
			next;
			mes "[Jurgen]";
			mes "Why? Did you forget what to bring by any chance? Let me tell you once more.";
			next;
			mes "[Jurgen]";
			mes "^0000cd10 Sea Stones^000000. You can get them while hunting Medusa in Comodo. They are valuable because it is difficult to kill Medusa.";
			next;
			mes "[Jurgen]";
			mes "And ^0000cd1 Witherless Rose^000000.";
			next;
			mes "[Jurgen]";
			mes "I know that's a lot of things to bring, but I believe we need them all to make our sister feel better.";
			close3;
		}
		mes "[Jurgen]";
		mes "Dear adventurer, did you bring what we asked you for? Please tell us that you did.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Yes, please tell us that you did. We tried our best to balance out her anger. However, she's been giving the cold shoulder to us.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I brought them. You'd better not to press an angry person so impatiently like that, you know.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Whoa, they are all here! You saved our lives. We should call our sister now. What if she is still mad at us...";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "I have already called her.";
		next;
		cloakoffnpc "Katrin Wigner#ep16wig", getcharid(0);
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Why do you keep calling me? Please leave me alone for that I am not mad at you any more.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Sister, forgive us. Please stop being mad at us.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "...Do you know what you have done wrong?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "I don't think I am to blame, but I am sorry that I have taken your stuff without telling you.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Well, I am sorry about it all. I haven't been considerate of your feelings. However, it wouldn't have hurt you to open up to me a little, since we are family.";
		next;
		mes "[Jurgen]";
		mes "If we don't be honest to each other, we will just grow away. We will get our wires crossed again.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "You are right. I have given it a thought as well. I think some part of it is my fault. I should have been honest with you, at least.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "When we were young, we used to talk a lot, and have some good times. Look at these. We used to run around looking for things like these. Do you remember this stone? You liked to watch them glitter in the sun.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "They are.. When did you get them...?";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "The adventurer helped us. I guess those were the times when we were the closest to one another. Look at this.";
		mes "This stone is so clear that you can see the seawater and coral reef inside right through it.";
		next;
		mes "[Jurgen]";
		mes "I think people are just the same. We don't need to show everything, but we do need to show some to let others know how pretty we are inside.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Yes, you are right. I think you have got the point. I'll try. I'll do it to avoid any more misunderstanding.";
		next;
		mes "[Katrin]";
		mes "By the way, when did you learn to talk like that? I think I am finally able to talk with you guys now.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "You mean, you haven't been able to talk with us?";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Well, thanks to my effort, we brothers and sister have become close to one another again.";
		mes "Thank you for your work, dear adventurer. This is not much, but I hope you take it. Sorry about all the trouble you have been through for us.";
		next;
		mes "[Isaac]";
		mes "Material reward has never seems to small before.";
		mes "I guess what you have done for us is just that priceless.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "I am sorry to cause such an embarrassing scene in front of you. If you have time, please come by again. We will make sure to receive you properly next time.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Dear adventurer, I have learned new lessons and earned many things, thanks to you. If you need our help, we will try to help you as much as we can. I wish you luck!";
		completequest 14487;// Please Find the Token of Memory
		delitem 6927, countitem(6927);// Filled_With_SeaStones
		delitem 748,1;// Witherless Rose
		getitem 6919,10;// TokenOfHonor
		getexp 1000000,500000;
		ep16_wig = 16;
		close3;
	}
	switch( checkquest(14492,PLAYTIME) ) {
	case -1:
		if (ep16_wig == 16) {	// first time (not repeatable)
			mes "[" + strcharinfo(0) + "]";
			mes "Jurgen, Hello?";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Oh, dear adventurer, welcome.";
			mes "Are you enjoying the banquet? Do you need any help by any chance?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "No. I just wanted to talk to you for a second.";
			mes "I wonder how your sister is doing these days as well.";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Thanks to your help, we have never been better than this.";
			mes "I've been talking to my sister much more, and..";
			next;
			cloakoffnpc "Maid#ep16wig01", getcharid(0);
			cutin "",255;
			mes "[Maid]";
			mes "Excuse me.";
			next;
			emotion ET_HUK, getnpcid(0, "Maid#ep16wig01");
			mes "[Maid]";
			mes "I am sorry. I thought no one was here. I just wanted to clean the room, I am really sorry. I'll come back later.";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Not at all. Please come in. It is a nonsense that you cannot clean the room because of the people inside.";
			next;
			cutin "",255;
			mes "[" + strcharinfo(0) + "]";
			mes "Hello, long time no see. Sorry about the trouble you went through last time. Fortunately, the box thing has been resolved well.";
			next;
			mes "[Maid]";
			mes "Oh... Yes... I see...";
			mes "Hello...";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Is this the person from the last time? Whom you asked about the box...?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Yes, she is.";
			next;
			mes "[Jurgen]";
			mes "I am sorry about that. We were desperate and in a hurry. I apologize if you were upset by it.";
			next;
			cutin "",255;
			mes "[Maid]";
			mes "Thank you for telling me that. Since I am a maid, there are people who suspect me or treat me like a thief.";
			next;
			mes "[Maid]";
			mes "However, you seem different, dear prince. I am a little surprised. I thought people who belong to the high society didn't know how to apologize.";
			next;
			mes "[Maid]";
			mes "Oh, it was very presumptuous of me.";
			mes "I am sorry.";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "No, that's OK.";
			next;
			cutin "",255;
			mes "[Maid]";
			mes "Then, I should get going.";
			mes "I am supposed to clean the room when there is no one inside anyway. Please excuse me.";
			next;
			cloakonnpc "Maid#ep16wig01", getcharid(0);
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "You shouldn't have to... Well, she's gone...";
			next;
			mes "[Jurgen]";
			mes "Well, dear adventurer?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "What?";
			next;
			cutin "16jur_sim",0;
			emotion ET_THROB;
			mes "[Jurgen]";
			mes "Well, I think ^0000cdI have fallen in love^000000 .";
			next;
			cutin "",255;
			mes "[" + strcharinfo(0) + "]";
			mes "Oh, you have.";
			next;
			emotion ET_HUK, playerattached();
			mes "[" + strcharinfo(0) + "]";
			mes "What?";
			next;
			cutin "16jur_nor",0;
			emotion ET_THROB;
			mes "[Jurgen]";
			mes "I have never met anyone who looks directly into my eyes like that.";
			next;
			mes "[Jurgen]";
			mes "I fell in love with her. I love her dignified and calm voice. Unaffected behaviors That tone of voice reflecting strong will...";
			next;
			mes "[Jurgen]";
			mes "All the women I have seen so far are like flowers in the greenhouse. However, she resembles a wild flower in the field.";
			next;
			mes "[Jurgen]";
			mes "She is totally different from the ladies I have met before.";
			next;
			mes "[Jurgen]";
			mes "Dear adventurer! How can I tell someone I have fallen in love at first sight how I feel? Should I go take her hands and say I love her?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "What? You don't know anything about it?";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "She is my ^0000cdfirst love^000000. My life will never be the same since I have met her.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Hum... Try to remember what all the people outside the door have done to you.";
			next;
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "Well... Nothing that I can recall... Hum... There have been some impressive people though. There was this person who penetrated defense and hid behind the curtain in my room...";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Hum... That's impressive. However, it is a crime. You should forget it.";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "There was this person who sent me a life-size golden statue. I sent it back since I didn't need it and it didn't look as good as real me.";
			next;
			mes "[Jurgen]";
			mes "How about sending her a gold statue looking exactly like me?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "She will be repelled if you try too hard like that from the very beginning. How about sending her a ^0000cdletter^000000 with a small gift?";
			next;
			mes "[Jurgen]";
			mes "It is a good idea! Please wait a moment!";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "What? Wait for what?";
			next;
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "Did you forget? If I take a step out of that door, I'll draw attention.";
			next;
			mes "[Jurgen]";
			mes "It would cause her trouble, wouldn't it. By the way, I didn't even get the chance to ask her what her name was.";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Please send this letter to her with this box containing jewelry.";
			next;
			if (select( "OK.", "It will be difficult." ) == 2) {
				mes "[" + strcharinfo(0) + "]";
				mes "It will be difficult. I have other things to do.";
				next;
				cutin "16jur_sim",0;
				mes "[Jurgen]";
				mes "Sorry about the difficult request. I guess I should go there myself. You may be able to see the news that the heir of the Wigner family has been crushed to death by his followers on Daily Rune-Midgarts tomorrow morning.";
				next;
				mes "[Jurgen]";
				mes "Or, the poor maid could be hospitalized by tomorrow. Anyway, I understand.";
				close3;
			}
			cutin "",255;
			mes "[" + strcharinfo(0) + "]";
			mes "OK. I should get going then.";
			setquest 14488;// Please Deliver My Love
			ep16_wig = 17;
			close;
		}
		if (ep16_wig == 17) {
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Dear adventurer! I've been waiting for you. How did it go? Has she said she loves me too?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "No, I haven't been able to meet her yet. Let me go see her again.";
			close3;
		}
		if (ep16_wig == 18) {
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Dear adventurer! I've been waiting for you.";
			mes "How did it go? Has she said she loves me too?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "No, actually... She ^0000cdturned it down^000000. She returned what you had sent her as well.";
			next;
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "She turned me down?";
			mes "Why? Did she say that she didn't like my looks? Or wasn't what I had sent her enough for her?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "No, not that... She has said she is currently not in the situation to go out with someone. She seems to have a reason.";
			next;
			mes "[Jurgen]";
			mes "Does she already have a boyfriend? I am not surprised. She is so attractive after all. No wonder I have fallen for her.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "No, not that either... She just has said she is currently not in the situation to date someone.";
			next;
			mes "[Jurgen]";
			mes "Whoa... ^0000cdIt is my first time to want something so badly in this life^000000. Never did I know that it would be so difficult to get.";
			mes "Is living such a difficult thing?";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "However, my father has told me that I should always try at least three times.";
			next;
			mes "[Jurgen]";
			mes "First try to begin, second try to confirm and the third try to give up since it is not meant to be.";
			next;
			mes "[Jurgen]";
			mes "So, dear adventurer. Please do this one more time for me.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Well, I think you should write the letter again...";
			next;
			mes "[Jurgen]";
			mes "I need something special. Something pretty and shiny which reflects my feelings...";
			next;
			mes "[Jurgen]";
			mes "The Sea Stone! And flower!";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "What?";
			next;
			mes "[Jurgen]";
			mes "I want to send her ^0000cdthe heart that is as wide and beautiful as the sea^000000 and ^0000cdthe amaranthine heart for her^000000.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Should I go get them all myself as well?";
			next;
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "Please, dear adventurer, be the messenger of love for me. Please send her my heart wider than the sea which never withers.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "If you say so, I'll do it.";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Please send her my letter with ^0000cd15 Sea Stones and 1 Witherless Rose^000000.";
			next;
			mes "[Jurgen]";
			mes "As I told you before, you can get the Sea Stone from killing Medusa.";
			next;
			mes "[Jurgen]";
			mes "Dear adventurer, I will never forget this and make it up to you. We, Wigners, never forget any debt.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Not that I am doing it expecting something in return, but I will deliver them to her since you look so desperate.";
			next;
			mes "[Jurgen]";
			mes "Thank you! Oh, do you happen to get her name by any chance?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Mary, her name is Mary.";
			next;
			mes "[Jurgen]";
			mes "^0000cdMary^000000. It is a common but pretty name. What is common means that it is well loved by many people. I'll get all my things embroidered with this name from now on.";
			next;
			mes "[Jurgen]";
			mes "Dear adventurer, you may set off now. Please deliver my feelings to her safely.";
			erasequest 14489;// I Have to Turn It Down
			setquest 14490;// My Love Once More
			ep16_wig = 19;
			close3;
		}
		if (ep16_wig == 19) {
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Did you deliver my heart to Mary safely? You have come back so early.";
			next;
			mes "[Jurgen]";
			mes "Have you forgotten what you have to bring with you?";
			next;
			mes "[Jurgen]";
			mes "You need to bring ^0000cd15 Sea Stones which you can get from killing Medusa and 1 Witherless Rose^000000.";
			next;
			mes "[Jurgen]";
			mes "Mary wouldn't feel uncomfortable if I express my feelings with ordinary things like these, right? Please send her my heart wider than the sea which never withers.";
			close3;
		}
		if (ep16_wig == 20) {
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Dear adventurer! You are back!";
			mes "I couldn't stop thinking about her even while you were gone.";
			next;
			emotion ET_THROB;
			mes "[Jurgen]";
			mes "Even when I eat, drink a tea, look into the mirror and talking to other people! I though about her all day. It was painful but I was in a flutter.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "That's what falling in love is like.";
			next;
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "Oh, then I must have been doing bad things to numerous people. There is nothing I can do for them.";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "By the way, since your hands are empty, I guess she has accepted my heart at last!";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Well, hum... She didn't react negatively, but you'd better be careful since you don't know each other yet.";
			mes "Why don't you spare her some time?";
			next;
			mes "[Jurgen]";
			mes "She must have not accepted my heart completely then. I am all right though! She hasn't turned me down yet!";
			next;
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "I didn't know how painful it was to love someone. I did know how I would be fidgety about a word or gesture of her.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "It is true. Winning someone's heart is the hardest thing.";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "I guess I should be nicer to the people who like me.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "I don't think that is a good idea...";
			next;
			mes "[Jurgen]";
			mes "Dear adventurer, thank you again. Would you come by again tomorrow?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "What?";
			next;
			mes "[Jurgen]";
			mes "It seems like a good sign. Paddle as the wave approaches. That's one of the many mottos of our family.";
			next;
			emotion ET_THROB;
			mes "[Jurgen]";
			mes "I want to let her know of my blazing heart every day.";
			next;
			mes "[Jurgen]";
			mes "I have a feeling that everything will turn out great if you send it for me.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "How about allowing her some time?";
			next;
			cutin "16jur_sim",0;
			mes "[Jurgen]";
			mes "What if she forgets about me? Then, please send her my message once a day. You wouldn't say no, right?";
			next;
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Oh, I almost forgot. It is not much, but please accept this as my token of gratitude for the messenger of my love.";
			next;
			mes "[Jurgen]";
			mes "I'll see you tomorrow then!";
			erasequest 14491;// I Have to Turn It Down Again
			setquest 14492;// There Is a Silver Lining
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			ep16_wig = 21;
			close3;
		}
		if (isbegin_quest(14493) == 1) {// daily
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Did you deliver my heart to Mary safely? You have come back so early.";
			next;
			mes "[Jurgen]";
			mes "Have you forgotten what you have to bring with you?";
			next;
			mes "[Jurgen]";
			mes "You need to bring ^0000cd15 Sea Stones which you can get from killing Medusa and 1 Witherless Rose^000000.";
			next;
			mes "[Jurgen]";
			mes "Mary wouldn't feel uncomfortable if I express my feelings with ordinary things like these, right?";
			next;
			mes "[Jurgen]";
			mes "Please send her my heart wider than the sea which never withers.";
			close3;
		}
		if (isbegin_quest(14494) == 1) {
			cutin "16jur_nor",0;
			mes "[Jurgen]";
			mes "Dear adventurer, I'd like to call you who has delivered my message of love to her, the ^0000cdMessenger of Love^000000.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Please don't...";
			next;
			mes "[Jurgen]";
			mes "^0000cdCupid of Love^000000...";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Please stop it.";
			next;
			mes "[Jurgen]";
			mes "On the day Mary accepts my feelings, I would like to give you a huge pure gold statue.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "You really don't have to do that.";
			next;
			mes "[Jurgen]";
			mes "However, this is the only thing I can offer you for now. Please visit our manor later. There are some real valuable things.";
			next;
			mes "[Jurgen]";
			mes "Then dear adventurer, I'll see you again tomorrow.";
			erasequest 14494;// I Have to Turn It Down Again
			setquest 14492;// There Is a Silver Lining
			getitem 6919,4;// TokenOfHonor
			getexp 200000,200000;
			close3;
		}
		end;
	case 0:
	case 1:
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Dear adventurer, what brought you here around this time? May I help you?";
		next;
		mes "[Jurgen]";
		mes "Are you here to deliver my message of love to Mary?";
		next;
		mes "[Jurgen]";
		mes "Oh, well, it was you who had said that she would be repelled by my impatience.";
		next;
		mes "[Jurgen]";
		mes "I am trying hard not to send her my love letter every minute and second. Please comeback when the time comes.";
		close3;
	case 2:
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Dear adventurer, you came! It seems that something good may happen today.";
		next;
		mes "[Jurgen]";
		mes "Please deliver her the message of my love with deliver my message of love with ^0000cd15 Sea Stones and 1 Witherless Rose^000000.";
		next;
		mes "[Jurgen]";
		mes "Do you remember? You can get the Sea Stone by killing Medusa.";
		next;
		emotion ET_CRY;
		mes "[Jurgen]";
		mes "Please send them to her and tell me how Mary is doing today. I am sad that she doesn't come here to clean the room anymore.";
		next;
		mes "[Jurgen]";
		mes "I want to go see her myself. However, I guess she will feel uncomfortable.";
		next;
		mes "[Jurgen]";
		mes "Dear adventurer, I am depending on you!";
		erasequest 14492;// There Is a Silver Lining
		setquest 14493;// Today I Feel
		close3;
	}
}

prt_cas_q,96,7,1	script	Katrin Wigner#ep16wig	4_EP16_POE,{
	if (ep16_wig < 3) {
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Dear adventurer, we are honored to have you with us. Have you met our father who is the head of the Wigner family?";
		next;
		mes "[Katrin]";
		mes "How about meeting Jurgen, the hair of the Wigner family who is participating in the Royal Assembly?";
		next;
		mes "[Katrin]";
		mes "Then, have a comfortable time in the Wigner family.";
		close3;
	}
	if (ep16_wig == 3) {
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "I am over!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What is going on?";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "Sister, please calm down. Where did you put it? Are you sure you have left it here?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Here, I have left it right here! After talking to the adventurer, I put it here and... It was gone... Where did it go?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What did you lose?";
		next;
		mes "[Katrin]";
		mes "My jewelry box... Well, it is technically not a jewelry box since it doesn't hold any jewelry in it, but anyways, ^0000cda small box containing something very important is missing.^000000";
		next;
		mes "[Katrin]";
		mes "I took it out of my bag and out it here. Then it was gone. What should I do? I don't know what I should do without it... I cannot afford to let anyone see it...";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "It could be the ^0000cdmaid^000000 who came here earlier to clean the room. She may have taken it.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "You haven't seen her taking it. You shouldn't doubt other people without proof.";
		next;
		cutin "",255;
		mes "[" + strcharinfo(0) + "]";
		mes "Not that I am suspicious of her, but it may help to ask her. If she saw it or when was the last time she saw it...";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Please don't. She would be upset if she feels that she is being suspected.";
		next;
		cutin "16jur_sim",0;
		mes "[Jurgen]";
		mes "But you are being so nervous. Isn't it an important thing to you?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "It is, but...";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "You really need to get it back, right?";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "You are right, but...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I'll make sure to ask her about it as politely as possible. Please relax and wait here.";
		next;
		mes "[Katrin]";
		mes "I don't know if is the best idea. I don't want her to feel that we are suspecting her.";
		next;
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Just wait until the adventurer comes back. The adventurer is really experienced in this kind of stuff.";
		next;
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Should I...";
		mes "Then, please help me, dear adventurer. I'll go search other pleases then.";
		next;
		cloakonnpc "Katrin Wigner#ep16wig", getcharid(0);
		cutin "16jur_nor",0;
		mes "[Jurgen]";
		mes "Please, help her. I have heard that ^0000cdthe maids are in the kitchen^000000.";
		erasequest 14477;// What Is Going on?
		setquest 14478;// Searching for the Clue
		ep16_wig = 4;
		close3;
	}
	if (ep16_wig < 12) {
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Oh, what should I do?";
		mes "I should have taken better care of it...";
		next;
		mes "[Katrin]";
		mes "Please make sure not to hurt other people's feelings.";
		mes "I would like to go find it myself, but I am not in the situation to do that...";
		next;
		mes "[Katrin]";
		mes "I don't even want to imagine anyone else sees it though...";
		mes "I would be embarrassed to death.";
		close3;
	}
	if (ep16_wig == 15) {
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Please leave me alone now!";
		mes "Ah, it was you, dear adventurer. Please excuse me.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Your feeling must have been hurt by your brothers.";
		next;
		mes "[Katrin]";
		mes "It is not that.";
		mes "I am... I am just angry at myself.";
		next;
		mes "[Katrin]";
		mes "Something like this never would have happened if was more careful...";
		mes "Moreover, I shouldn't have said such things to my brothers either.";
		next;
		mes "[Katrin]";
		mes "However, I couldn't take it anymore when I heard the rumors and Jurgen's attitude...";
		mes "I thought I was used to those things... I guess I am not.";
		next;
		mes "[Katrin]";
		mes "I should have given it up by now...";
		mes "Oh, I am sorry. I believe you haven't come here to listen to a story like this.";
		next;
		mes "[Katrin]";
		mes "I am sorry, but I want to be alone for now.";
		mes "Please.";
		close3;
	}
	if (ep16_wig > 15) {
		cutin "16kat_nor",2;
		mes "[Katrin]";
		mes "Thanks to you, we have become closer to one another now.";
		mes "Now I can open up to my brothers more.";
		next;
		mes "[Katrin]";
		mes "I have tried to hide my feelings and save my words. However, I have realized that It is not the best policy.";
		mes "From now own, I am going to tell them how I feel to avoid any misunderstanding.";
		next;
		mes "[Katrin]";
		mes "Dear adventurer, thank you.";
		close3;
	}
	cutin "16kat_nor",2;
	mes "[Katrin]";
	mes "I believe I haven't met you before. Are you here to see my father?";
	next;
	mes "[Katrin]";
	mes "My father is over there.";
	close3;
}

prt_cas_q,94,7,7	script	Isaac Wigner#ep16wig	4_EP16_ISAAC,{
	if (checkweight(1304,3) == 0) {
		mes "[Isaac Wigner]";
		mes "Dear adventurer, do you know the old saying that the emptier it is, the more you can fill it?";
		mes "It is one of the many aphorisms passing down in our family.";
		close;
	}
	.@name$ = strcharinfo(0);
	if (ep16_lug == 2) {
		mes "[" + .@name$ + "]";
		mes "Hello, Isaac Wigner.";
		next;
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Oh, welcome, dear adventurer, my brother is over there...";
		next;
		mes "[" + .@name$ + "]";
		mes "No. I am here to see you, Isaac.";
		next;
		mes "[Isaac]";
		mes "Is it about Wolf?";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes. How did you know it...?";
		next;
		mes "[Isaac]";
		mes "Wolf is not here even after the time he has promised. He is the man of his word. Something must have happened to him.";
		next;
		mes "[Isaac]";
		mes "I never expected you would come here instead though. So is he cancelling the appointment today then?";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes, he is. And he asked me to get ^0000cda certain thing^000000 from you, Isaac.";
		next;
		mes "[Isaac]";
		mes "That thing...? Wolf must trust you, dear adventurer. Or it could be...";
		next;
		mes "[" + .@name$ + "]";
		mes "Some kind of a test.";
		next;
		mes "[Isaac]";
		mes "Don't take it the wrong way. I am just be careful. In order to do what I do, I need to know who I can trust first.";
		next;
		mes "[" + .@name$ + "]";
		mes "I understand.";
		next;
		mes "[Isaac]";
		mes "You can bring it to Wolf. Please be careful with it.";
		next;
		mes "[" + .@name$ + "]";
		mes "OK.";
		next;
		mes "[Isaac]";
		mes "May I ask you for one more thing? I have heard that there is ^0000cda strange rumor^000000 circulating in Prontera.";
		next;
		mes "[Isaac]";
		mes "It is supposed to be about ^0000cdHelmut Roegenburg^000000. Would you investigate about the rumor and let me know the truth?";
		next;
		mes "[Isaac]";
		mes "Since I have a reputation to keep. I cannot afford to have a scandal. Please help me.";
		if (ep16_wig > 1 && ep16_wig < 15) {
			next;
			mes "[Isaac]";
			mes "Please excuse me then.";
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
		}
		erasequest 14496;// To Isaac
		setquest 14497;// Delivery for Wolf
		ep16_lug = 3;
		getitem 6930,1;// Biz_Items_Sample
		close3;
	}
	if (ep16_lug == 3) {
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Have you deliver the thing to Wolf safely? You should be careful with it since it can be dangerous.";
		next;
		mes "[Isaac]";
		mes "And, don't forget to ask about the rumor as well.";
		if (ep16_wig > 1 && ep16_wig < 15) {
			next;
			mes "[Isaac]";
			mes "Please excuse me then.";
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
		}
		close3;
	}
	if (ep16_lug == 7) {
		if (countitem(6931) < 1) {
			cutin "16isa",1;
			mes "[Isaac]";
			mes "Dear adventurer, you are back. Did you deliver the thing safely? What did he say about the rumor?";
			next;
			mes "[" + .@name$ + "]";
			mes "Here is the document about that. Here... It was. Wait, I must have forget to bring it with me. I am sorry. I'll be back with it soon.";
			next;
			mes "[Isaac]";
			mes "Such things happen. Take your time. I'll be waiting for you.";
			close3;
		}
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Dear adventurer, you are back. Did you deliver the thing safely? What did he say about the rumor?";
		next;
		mes "[" + .@name$ + "]";
		mes "Here is the ^0000cddocument^000000 about it. It is written by Wolf Roegenburg himself.";
		next;
		mes "[Isaac]";
		mes "Let's see... Hum... So the new business will be delayed indefinitely. The direction of the business will be changed.";
		next;
		mes "[Isaac]";
		mes "I'll see you again after taking care of the matters. - W. R.";
		next;
		mes "[Isaac]";
		mes "It means that he would stop the deal about the war, right? The rumor must have been quite threatening.";
		next;
		mes "[Isaac]";
		mes "I feel sorry. It would have been a great chance for me to impress my family.";
		next;
		mes "[Isaac]";
		mes "Well, I believe Wolf would find a better direction to the business. Please tell Wolf that I support his decision. And that I am excited about his new business.";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes, I will.";
		if (ep16_wig > 1 && ep16_wig < 15) {
			next;
			mes "[Isaac]";
			mes "Please excuse me then.";
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
		}
		delitem 6931,1;// Secret_Documents
		erasequest 14502;// To Isaac
		setquest 14503;// Report to Wolf
		ep16_lug = 8;
		close3;
	}
	if (ep16_lug == 8) {
		cutin "16isa",1;
		mes "[Isaac]";
		mes "It is a shame.";
		mes "It was a great opportunity for me and Wolf.";
		next;
		mes "[Isaac]";
		mes "However, since my partner wants to quit, I shouldn't force him to carry on with it.";
		mes "I believe that Wolf must already have the plan about the next business item in his mind.";
		next;
		mes "[Isaac]";
		mes "That's why I accepted his suggestion to be partners in business.";
		if (ep16_wig > 1 && ep16_wig < 15) {
			next;
			mes "[Isaac]";
			mes "Please excuse me then.";
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
		}
		close3;
	}

	if (ep16_wig == 1 || ep16_wig == 2) {
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Dear adventurer, since you are here to the Wigner family, why don't you go meet some other members of the family?";
		mes "Like my parents, my brother who is the candidate to the throne or my sister who is the eldest child.";
		next;
		mes "[Isaac]";
		mes "I believe that you would have more productive time with them.";
		close3;
	}
	if (ep16_wig == 15) {
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Dear adventurer, did you bring what I had asked you?";
		next;
		mes "[Isaac]";
		mes "I'd like to go get them myself or ask other people to do it. But, I feel a little uncomfortable since it is a family matter.";
		next;
		mes "[Isaac]";
		mes "I know how it is troubling you, but please help us. You have not forgotten what to bring, have you?";
		next;
		mes "[Isaac]";
		mes "You need to bring ^0000cd10 Sea Stones and 1 Witherless Rose^000000.";
		next;
		mes "[Isaac]";
		mes "Our fate depends on you! We may be able to get along again or we may become distant.";
		next;
		mes "[Isaac]";
		mes "Please bring them to us as soon as possible!";
		close3;
	}
	if (ep16_wig > 15) {
		cutin "16isa",1;
		mes "[Isaac]";
		mes "Thanks to you, my brother and sister have become close to each other again.";
		mes "What would they do without me?";
		next;
		mes "[Isaac]";
		mes "Dear adventurer, I'll see you around then.";
		close3;
	}
	cutin "16isa",1;
	mes "[Isaac]";
	mes "Is it your first time to visit the Wigner family?";
	mes "Then, ^0000cdyou should meet our parents^000000 over there first.";
	close3;
}

prt_cas_q,80,23,5	script	Jurgen Wigner#ep16wig00	4_M_4THPRIN1,{
	end;
OnInit:
	cloakonnpc();
	end;
}
prt_cas_q,93,10,4	duplicate(Jurgen Wigner#ep16wig00)	Maid#ep16wig01	1_F_04

prt_cas_q,95,11,4	script	Womenfolk#ep16wig01	1_F_03,{
	mes "[Womenfolk]";
	mes "Jurgen, you are mine!";
	close2;
	if (achievementinfo(110001, ACHIEVEINFO_COUNT6) == 0)
		achievementupdate(110001, ACHIEVEINFO_COUNT6, 1);
	end;

OnTimer600000:
	enablenpc "Womenfolk#ep16wig01";
	npctalk "Oh my! Jurgen! My prince! I love you! Please look this way!", "Womenfolk#ep16wig01";
	emotion ET_CHUP, getnpcid(0, "Womenfolk#ep16wig01");
	sleep 2000;
	npctalk "Are you... I have seen you before... Well... Are you here to see me?", "Jurgen Wigner#ep16wig";
	sleep 2000;
	npctalk "Dear Jurgen! Please be with me together! Forever!", "Womenfolk#ep16wig01";
	specialeffect EF_HEARTCASTING,AREA,"Womenfolk#ep16wig01";
	sleep 2000;
	npctalk "That's a bit difficult...", "Jurgen Wigner#ep16wig";
	sleep 2000;
	enablenpc "Strong Guards#ep16wig03";
	enablenpc "Strong Guards#ep16wig04";
	npctalk "Oh my! How did you get in here again?", "Strong Guards#ep16wig03";
	sleep 2000;
	npctalk "They keep getting in here through the guard. It is no use to tighten security!", "Strong Guards#ep16wig04";
	sleep 2000;
	npctalk "Get her out of here!", "Strong Guards#ep16wig03";
	sleep 2000;
	npctalk "Oh my! Jurgen! I love you!", "Womenfolk#ep16wig01";
	disablenpc "Womenfolk#ep16wig01";
	disablenpc "Strong Guards#ep16wig03";
	disablenpc "Strong Guards#ep16wig04";
	initnpctimer;
	end;
OnInit:
	initnpctimer;
	disablenpc "Womenfolk#ep16wig01";
	disablenpc "Strong Guards#ep16wig03";
	disablenpc "Strong Guards#ep16wig04";
	end;
}

prt_cas_q,94,12,4	script	Strong Guards#ep16wig03	8W_SOLDIER,{ end; }
prt_cas_q,95,12,4	script	Strong Guards#ep16wig04	8W_SOLDIER,{ end; }

prt_cas_q,98,23,1	script	Bachelor#ep16wig01	1_M_ORIENT01,{
	mes "[Bachelor]";
	mes "I couldn't shake hands with Jurgen! Oh, it's too hot!";
	close2;
	if (achievementinfo(110001, ACHIEVEINFO_COUNT7) == 0)
		achievementupdate(110001, ACHIEVEINFO_COUNT7, 1);
	end;

OnTimer480000:
	enablenpc "Bachelor#ep16wig01";
	npctalk "Jurgen, argh! It is hot!", "Bachelor#ep16wig01";
	sleep 2000;
	npctalk "Why did I fall in this place?", "Bachelor#ep16wig01";
	sleep 2000;
	npctalk "That woman must have given me the wrong set of coordinates!", "Bachelor#ep16wig01";
	sleep 2000;
	npctalk "Oh, it is hot!", "Bachelor#ep16wig01";
	npctalk "Well, you didn't need to show me the blazing love for me with your entire body.", "Jurgen Wigner#ep16wig";
	sleep 2000;
	npctalk "Oh, it's hot! Jurgen, please save me... Argh!", "Bachelor#ep16wig01";
	sleep 3000;
	enablenpc "Strong Guards#ep16wig05";
	enablenpc "Strong Guards#ep16wig06";
	npctalk "Strong Guards at your service!", "Strong Guards#ep16wig05";
	sleep 2000;
	npctalk "Why is this person doing here?", "Strong Guards#ep16wig06";
	sleep 2000;
	npctalk "There are all kinds of people in the world.", "Strong Guards#ep16wig05";
	sleep 2000;
	npctalk "Get her out of here!", "Strong Guards#ep16wig06";
	sleep 2000;
	npctalk "Argh! Jurgen, my prince!", "Bachelor#ep16wig01";
	disablenpc "Bachelor#ep16wig01";
	disablenpc "Strong Guards#ep16wig05";
	disablenpc "Strong Guards#ep16wig06";
	initnpctimer;
	end;
OnInit:
	initnpctimer;
	disablenpc "Bachelor#ep16wig01";
	disablenpc "Strong Guards#ep16wig05";
	disablenpc "Strong Guards#ep16wig06";
	end;
}

prt_cas_q,98,20,7	script	Strong Guards#ep16wig05	8W_SOLDIER,{ end; }
prt_cas_q,96,22,7	script	Strong Guards#ep16wig06	8W_SOLDIER,{ end; }


prt_cas_q,74,21,5	script	#ep16wig003	HIDDEN_NPC,5,5,{
	end;
OnTouch:
	if (ep16_wig == 2 || ep16_wig == 3) {
		cloakoffnpc "Katrin Wigner#ep16wig", getcharid(0);
		if (ep16_lug == 2 || ep16_lug == 7)
			cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
		else
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
	}
	else if (ep16_wig > 3 && ep16_wig < 15) {
		cloakonnpc "Katrin Wigner#ep16wig", getcharid(0);
		if (ep16_lug == 2 || ep16_lug == 7)
			cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
		else
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
	}
	else if (ep16_wig == 15) {
		cloakonnpc "Katrin Wigner#ep16wig", getcharid(0);
		cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
	}
	else {
		cloakoffnpc "Katrin Wigner#ep16wig", getcharid(0);
		cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
	}
	end;
}

prt_cas_q,95,7,5	script	#ep16wig004	HIDDEN_NPC,5,5,{
	end;
OnTouch:
	if (ep16_wig == 2 || ep16_wig == 3) {
		cloakoffnpc "Katrin Wigner#ep16wig", getcharid(0);
		if (ep16_lug == 2 || ep16_lug == 7)
			cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
		else
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
	}
	else if (ep16_wig > 3 && ep16_wig < 15) {
		cloakonnpc "Katrin Wigner#ep16wig", getcharid(0);
		if (ep16_lug == 2 || ep16_lug == 7)
			cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
		else
			cloakonnpc "Isaac Wigner#ep16wig", getcharid(0);
	}
	else if (ep16_wig == 15) {
		cloakonnpc "Katrin Wigner#ep16wig", getcharid(0);
		cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
	}
	else {
		cloakoffnpc "Katrin Wigner#ep16wig", getcharid(0);
		cloakoffnpc "Isaac Wigner#ep16wig", getcharid(0);
	}
	end;
}

prt_cas,322,216,5	script	Maid#ep16wig02	1_F_04,{
	if (checkweight(1304,3) == 0) {
		mes "[Maid]";
		mes "Oh, you shouldn't bring too much stuff in here.";
		mes "As you see there are a lot of fragile things.";
		next;
		mes "[Maid]";
		mes "You need to leave some out. It would be a big problem if the bundle touches the dishes and breaks them.";
		close;
	}
	.@name$ = strcharinfo(0);
	if (ep16_wig == 4) {
		mes "[Maid]";
		mes "I am cleaning the kitchen now, which is the hardest place to clean. It is really difficult to get rid of all the dirt in here.";
		mes "My arms are way too weak to handle it.";
		next;
		mes "[Maid]";
		mes "I happen to see someone with a strong set of arms... Those arms... What brought you here?";
		next;
		mes "[" + .@name$ + "]";
		mes "Hello, I am the adventurer invited to the royal banquet. Are you the maid who have cleaned the Wigner residence this afternoon?";
		next;
		mes "[Maid]";
		mes "Yes, I am. What can I do for you?";
		next;
		mes "[" + .@name$ + "]";
		mes "Did you happen to see ^0000cda small box^000000 in the Wigner residence? It was supposed to be on the table next to the bed. The box belongs to Princess Katrin. Have you seen it?";
		next;
		mes "[Maid]";
		mes "Yes, I have. It was the box which looked simple but classy. I held it up for a second to clean the table and put it down. I remember it.";
		next;
		mes "[" + .@name$ + "]";
		mes "Did you see it there when you leave the room? Wasn't there anyone else in the room?";
		next;
		mes "[Maid]";
		mes "Wait a moment. I know where you are getting with this. We, maids, often get into a situation like this.";
		next;
		emotion ET_FRET;
		mes "[Maid]";
		mes "Isn't the box missing and are you ^0000cdsuspecting the maid who has cleaned the room^000000? Am I right?";
		next;
		mes "[" + .@name$ + "]";
		mes "I am not suspecting you. I am just ^0000cdasking you about the situation^000000 to track the box.";
		next;
		emotion ET_FRET;
		mes "[Maid]";
		mes "With an element of suspicion in your mind, right?";
		next;
		mes "[" + .@name$ + "]";
		mes "No, I am not suspecting you. Please don't get me wrong. I am just asking you when you have seen it and if there haven't been anyone else there.";
		next;
		emotion ET_ANGER;
		mes "[Maid]";
		mes "Ha, you are not being honest with me. If I say that there was no one around, I would be suspected, right?";
		next;
		mes "[Maid]";
		mes "I can tell you this one though. I didn't take it. If you ask me if there was anyone in the room, well...";
		next;
		mes "[" + .@name$ + "]";
		mes "There was someone in the room, right?";
		next;
		mes "[Maid]";
		mes "Was there? This kitchen is too messy that I cannot think straight. ^0000cdI may be able to recall if it is cleaned up^000000.";
		next;
		emotion ET_SLEEPY;
		mes "[Maid]";
		mes "Oh, the kitchen is messy and so are the thoughts inside my head. Oh, how dirty and messy!";
		next;
		mes "[" + .@name$ + "]";
		mes "May I help you clean up?";
		next;
		emotion ET_SMILE;
		mes "[Maid]";
		mes "Oh, would you do that for me? I would be so grateful. Here is a ^0000cdPoring Scrub Sponge^000000, please scrub every inch of this place clean.";
		next;
		mes "[Maid]";
		mes "Since it is a specially-maid Scrub Sponge, it serves multiple purposes. It coaches you on how to clean so make good use of it.";
		next;
		mes "[Maid]";
		mes "You may be surprised by it, but it is a safe Scrub Sponge which doesn't hurt others. Don't worry.";
		mes "It is a Scrub Sponge developed by a legendary figure.";
		next;
		mes "[Maid]";
		mes "Oh, wait! You know, there is a certain protocol when it comes to cleaning. You first need to wipe off the mold on the wall. Then you have to clean up the grease. The last thing for you to do is cleaning the floor.";
		next;
		mes "[" + .@name$ + "]";
		mes "I... I see.";
		erasequest 14478;// Searching for the Clue
		setquest 14479;// Clean-up out of Apology
		getitem 6928,3;// Poring_Loofah
		ep16_wig = 5;
		close;
	}
	if (ep16_wig > 4 && ep16_wig < 11) {
		mes "[Maid]";
		mes "Have you finished it already?";
		mes "It doesn't seem so. The thoughts in my head haven't cleared up yet.";
		next;
		mes "[Maid]";
		mes "I think I would be able to recall when you come back after cleaning the kitchen with the Scrub Sponge I have given you.";
		close;
	}
	if (ep16_wig == 11) {
		emotion ET_BEST;
		mes "[Maid]";
		mes "Wow... The kitchen has become so clean! You really need to clean the grease with a strong set of arms!";
		next;
		mes "[" + .@name$ + "]";
		mes "Argh... My arms... Was there anyone else in the room?";
		next;
		mes "[Maid]";
		mes "You must know what kind of family that is. It is the wealthiest family in Rune-Midgarts. Despite being a temporary residence, the room was decorated with so much care.";
		next;
		mes "[Maid]";
		mes "All the gorgeous pieces of furniture and carpets... I have never seen tiger skin as white and huge as that one in there.";
		next;
		mes "[" + .@name$ + "]";
		mes "Why are you talking about the furniture all of a sudden?";
		next;
		mes "[Maid]";
		mes "Oh, my, how are you going to deal with the members of the royal families with such slow wit?";
		mes "Think. Why would I ^0000cdtalk about the furniture^000000 ?";
		next;
		mes "[" + .@name$ + "]";
		mes "...You ^0000cdcan ask the person who was delivering the furniture^000000 .";
		next;
		mes "[Maid]";
		mes "I cannot point it out, but I think I have given you enough clues.";
		mes "By the way, is the box really missing in the first place?";
		next;
		mes "[" + .@name$ + "]";
		mes "What do you mean?";
		next;
		mes "[Maid]";
		mes "It is not my opinion, but there are these words people say. You know, the rumors.";
		mes "Since the prince of the Wigner family looks so handsome...";
		next;
		mes "[Maid]";
		mes "He has been the center of the attention since he was young. People say that the lady is stressed about it and does things to draw attention.";
		next;
		mes "[Maid]";
		mes "This could be one of her tricks, they say.";
		next;
		mes "[Maid]";
		mes "The words haven not been spread yet, but I am sure that everyone will be talking about it even before the teatime is over.";
		next;
		mes "[" + .@name$ + "]";
		mes "I don't think that is true. She is not that kind of person.";
		next;
		emotion ET_FRET;
		mes "[Maid]";
		mes "That's what people say. You don't have to reason with me. Anyways, I should get back to my cleaning duty. If you are not going to help me, please leave me alone now.";
		next;
		mes "[" + .@name$ + "]";
		mes "Do you know where the man who have delivered the furniture is?";
		next;
		mes "[Maid]";
		mes "He must be somewhere in Prontera. Why don't you try visiting the area ^0000cdnear the district office^000000. Most stores are located there.";
		next;
		mes "[Maid]";
		mes "Oh, by the way, you didn't hear it from me. Not that I said anything to you.";
		next;
		mes "[" + .@name$ + "]";
		mes "Of course. Thank you for your cooperation.";
		if (isbegin_quest(14479))
			erasequest 14479;
		erasequest 14483;// Report the Completion of the Clean-up
		setquest 14484;// There Was a Furniture Delivery Man
		ep16_wig = 12;
		close;
	}
	if (ep16_wig == 12) {
		mes "[Maid]";
		mes "Dear adventurer, didn't you say that you were going to visit the delivery man?";
		mes "He must be somewhere ^0000cdnear the district office^000000.";
		next;
		mes "[Maid]";
		mes "Since I need to clean up. please leave now.";
		mes "You are getting in the way.";
		close;
	}
	if (ep16_wig < 12) {
		mes "[Maid]";
		mes "Oh, I am sick of cleaning! I have enough things to clean at home. I don't need to do more out here.";
		mes "I should just give it all up and run away.";
		close;
	}
	if (ep16_wig == 17) {
		emotion ET_FRET;
		mes "[Maid]";
		mes "Oh, why can't I get it off easily? I guess I won't be able to go home early.";
		mes "Why should I do this?";
		next;
		mes "[" + .@name$ + "]";
		mes "Hello. Do you have a moment?";
		next;
		mes "[Maid]";
		mes "Yes... Well... Hum.. You are...";
		mes "Aren't you the adventurer who was at the Wigner residence?";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes. And I have come here before, and I have helped you with cleaning.";
		mes "^0000cdDon't you remember...?^000000";
		next;
		emotion ET_KEK;
		mes "[Maid]";
		mes "Oh, I am really sorry. ^0000cdI am not good at remembering faces.^000000";
		mes "What brought you here?";
		next;
		mes "[" + .@name$ + "]";
		mes "Jurgen of the Wigner family has asked me to give it to you.";
		next;
		mes "[Maid]";
		mes "What is it? Why did he give it to me? Is it an invoice? Have I done anything wrong?";
		next;
		mes "[" + .@name$ + "]";
		mes "No, it is not. Please just read it first.";
		next;
		emotion ET_BIGTHROB;
		mes "[Maid]";
		mes "Hum... I have fallen in love with you at first sight.";
		mes "Well... Hum... Please accept my love for... Eh... Umm...";
		next;
		mes "[" + .@name$ + "]";
		mes "He has used some really direct languages here. How very Wigner of him for that he values efficiency... Hahaha...";
		next;
		mes "[Maid]";
		mes "Hum... It is... It is... Well, is it what I think it is?";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes, it is a love letter.";
		next;
		mes "[Maid]";
		mes "Phew... I am sorry, but you should take it back.";
		mes "Well... I appreciate his feelings for me... I really do... But please just take it back.";
		next;
		mes "[" + .@name$ + "]";
		mes "Really? He has just tried to express his feelings... You may as well just keep it...";
		next;
		mes "[" + .@name$ + "]";
		mes "Oh, are you in a relationship or engaged? Or are you married?";
		next;
		mes "[Maid]";
		mes "No, no, I am not. Just take it back with you.";
		mes "I feel rather overwhelmed... And there is the social class issue as well...";
		next;
		mes "[Maid]";
		mes "Most of all, I am not in the situation to date anyone. ^0000cdIt is for a personal reason.^000000";
		next;
		mes "[" + .@name$ + "]";
		mes "If you say so, I cannot force it. I'll deliver your words to him.";
		next;
		mes "[Maid]";
		mes "Yes. I am really sorry.";
		next;
		mes "[" + .@name$ + "]";
		mes "May I get your name at least?";
		next;
		mes "[Maid]";
		mes "Mad... No, ^0000cdMary^000000. My name is Mary.";
		next;
		mes "[" + .@name$ + "]";
		mes "I see. Then let me deliver your words to Jurgen.";
		erasequest 14488;// Please Deliver My Love
		setquest 14489;// I Have to Turn It Down
		ep16_wig = 18;
		close;
	}
	if (ep16_wig == 18) {
		mes "[Maid]";
		mes "Well, have you told the prince about it? Please make sure not to hurt his feelings much.";
		next;
		mes "[Maid]";
		mes "Please.";
		close;
	}
	if (ep16_wig == 19) {
		if (countitem(748) < 1 || countitem(6927) < 15) {
			emotion ET_OHNO;
			mes "[Mary]";
			mes "Oh, when will it end.";
			mes "I won't let go of this, really!";
			next;
			mes "[" + .@name$ + "]";
			mes "Oh, I don't think it is the right time. May I come back later?";
			next;
			mes "[Mary]";
			mes "No, not at all.";
			mes "Dear adventurer, you have a hole in your pocket. Have you lost anything?";
			next;
			mes "[" + .@name$ + "]";
			mes "Oh! When did I get a hole in there? Where are the ^0000cd15 Sea Stones and 1 Witherless Rose...?^000000";
			mes "They are gone! Let me come back later! I have forgotten to bring something!";
			close;
		}
		emotion ET_ANGER;
		mes "[Mary]";
		mes "Oh, when will it end.";
		mes "I won't let go of this, really!";
		next;
		mes "[" + .@name$ + "]";
		mes "Oh, hello.";
		mes "Is it a bad time? Should I just go?";
		next;
		mes "[Mary]";
		mes "Oh, no.";
		mes "By the way, you are back. Is it about the prince of the Wigner family again?";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes. Jurgen seems to be really serious about it.";
		mes "He wants you to have these.";
		next;
		mes "[Mary]";
		mes "I turned it down.";
		mes "Oh, this really is... So pretty. There is water inside this glass-like thing...";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes. Jurgen wants me to let you know about his heart as wide and beautiful as the sea.";
		next;
		mes "[Mary]";
		mes "Oh, I really cannot go out with him. Well, there really is a reason that I cannot accept this feelings. I wonder if I should tell you this.";
		next;
		mes "[" + .@name$ + "]";
		mes "Please tell me. If you have a good enough reason which Jurgen can understand, he would not bother you again, Mary.";
		next;
		mes "[Mary]";
		mes "I don't think it would be a good idea. You shouldn't tell this to anyone. Please keep the secret.";
		next;
		mes "[Mary]";
		mes "In fact, I am ^0000cdthe younger sibling of the maid who used to work here^000000. The maid you have met before.";
		next;
		mes "[" + .@name$ + "]";
		mes "Oh, no wonder you couldn't remember my face. I found it a little strange. By the way, you two sisters must have worked here together.";
		next;
		mes "[" + .@name$ + "]";
		mes "However, what would it matter since it is you whom he has fallen for?";
		next;
		mes "[Mary]";
		mes "It matters. ^0000cdBecause, I am her brother^000000.";
		next;
		mes "[" + .@name$ + "]";
		mes "Oh, you are...";
		next;
		emotion ET_HUK, playerattached();
		mes "[" + .@name$ + "]";
		mes "Wha... What? A brother?";
		next;
		mes "[Mary]";
		mes "I am ashamed to work in this outfit since I am a man. However, there is a reason for me to stay here like this.";
		next;
		mes "[Mary]";
		mes "My sister was very disheartened by what had happened to her and ran off with her lover saying that she couldn't work here anymore.";
		next;
		emotion ET_OHNO;
		mes "[Mary]";
		mes "When I told the person who is in charge of managing the maids at the palace, he said, he didn't care about my sister running off against the contract ^0000cdas long as I would bring someone to fill her position^000000.";
		next;
		mes "[Mary]";
		mes "He added how ^0000cdan enormous indemnity would be imposed on us^000000 if we fail to do so.";
		next;
		mes "[Mary]";
		mes "When I told him that I would fill her spot, he said there were enough male chamberlains and ^0000cdhe needed a maid^000000 who would work in the kitchen and run cleaning duties.";
		next;
		mes "[Mary]";
		mes "I tried to find a replacement for her, but I couldn't. Everyone was already busy working at the palace or supplying the things for the banquet.";
		next;
		mes "[Mary]";
		mes "After consulting my mother, I decided to work here pretending as if I was my sister. Since everyone was so busy, no one paid attention to me who was working quietly in this corner.";
		next;
		mes "[" + .@name$ + "]";
		mes "You have managed not to be busted so far.";
		next;
		mes "[Mary]";
		mes "Since ^0000cdI look just like my sister^000000, no one seems to notice.";
		next;
		mes "[" + .@name$ + "]";
		mes "What should we do then? Jurgen really wants you to accept his love.";
		next;
		mes "[" + .@name$ + "]";
		mes "He is in sorrow saying how difficult it is to get the first thing he has ever wanted in this entire life.";
		next;
		emotion ET_SCRATCH;
		mes "[Mary]";
		mes "I feel sorry for that ^0000cdthe first thing he has ever wanted to get happens to be fake^000000.";
		next;
		mes "[Mary]";
		mes "I assumed that the people who have all the money in the world and have seen all the good things in the world must have a keen eye. I stand corrected.";
		next;
		mes "[" + .@name$ + "]";
		mes "You get blinded when you are in love.";
		next;
		mes "[" + .@name$ + "]";
		mes "And, you really are doing so remarkably at what you are doing now.";
		next;
		mes "[" + .@name$ + "]";
		mes "I guess I should go back and tell him the truth.";
		next;
		emotion ET_HUK;
		mes "[Mary]";
		mes "Oh! No, you shouldn't. I told you. You are the only one who knows about it.";
		mes "^0000cdIf I get busted, I would be in trouble^000000. We don't have the money to pay the compensation.";
		next;
		mes "[Mary]";
		mes "I am keep sending the message to my sister to comeback, but it seems difficult to reach her. Would you please keep it secret until the banquet is over?";
		next;
		mes "[" + .@name$ + "]";
		mes "Jurgen would keep sending me to earn your love, and this means that we are deceiving him.";
		next;
		mes "[Mary]";
		mes "I am sorry for him, but my life depends on this.";
		next;
		mes "[" + .@name$ + "]";
		mes "Hum, I don't feel comfortable doing this...";
		next;
		mes "[Mary]";
		mes "It is not my fault to be here in this clothing... Please feel for me.";
		next;
		mes "[" + .@name$ + "]";
		mes "Oh, OK. Calm down. I'll tell Jurgen that you have held off the answer.";
		next;
		mes "[" + .@name$ + "]";
		mes "Please take good care of the stuff. If you return them, he will send me down here again.";
		next;
		mes "[Mary]";
		mes "Really? Then let me return them at once on the last day of the banquet. Please explain him well so that it doesn't hurt his feelings.";
		next;
		mes "[Mary]";
		mes "Oh, I guess I should change my cleaning area so that I don't bump into him.";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes, I guess it would work.";
		mes "Then, let me go tell him that.";
		next;
		mes "[Mary]";
		mes "Thank you.";
		delitem 6927, countitem(6927);// Filled_With_SeaStones
		delitem 748,1;// Witherless Rose
		erasequest 14490;// My Love Once More
		setquest 14491;// I Have to Turn It Down Again
		ep16_wig = 20;
		close;
	}
	if (ep16_wig == 20) {
		mes "[Mary]";
		mes "Did you tell the prince about it?";
		mes "I am worried about the consequences if anything goes wrong.";
		next;
		mes "[Mary]";
		mes "I may have to run off like my sister.";
		close;
	}
	if (ep16_wig > 20) {
		if (isbegin_quest(14494) == 1 || isbegin_quest(14492) == 1) {	// daily quest
			mes "[Mary]";
			mes "Did you tell the prince about it? I hope he gives up from tomorrow without sending you down here again.";
			close;
		}
		if (isbegin_quest(14493) == 1) {
			if (countitem(748) < 1 || countitem(6927) < 15) {
				emotion ET_OHNO;
				mes "[Mary]";
				mes "Oh, when will it end.";
				mes "I won't let go of this, really!";
				next;
				mes "[" + .@name$ + "]";
				mes "Oh, I don't think it is the right time. May I come back later?";
				next;
				mes "[Mary]";
				mes "No, not at all.";
				mes "Dear adventurer, you have a hole in your pocket. Have you lost anything?";
				next;
				mes "[" + .@name$ + "]";
				mes "Oh! When did I get a hole in there? Where are the ^0000cd15 Sea Stones and 1 Witherless Rose...?^000000";
				mes "They are gone! Let me come back later! I have forgotten to bring something!";
				close;
			}
			mes "[Maid]";
			mes "Adventurer? What brought you here?";
			next;
			mes "[" + .@name$ + "]";
			mes "Jurgen sent me here to deliver his love to you again.";
			next;
			emotion ET_CRY;
			mes "[Maid]";
			mes "Again... I really hoped he would have given up by today... I guess it must have been a vain hope.";
			next;
			mes "[Maid]";
			mes "Please tell him I appreciate it.";
			next;
			mes "[Maid]";
			mes "I really want the banquet to be over soon. Or my sister could just come back.";
			next;
			mes "[Maid]";
			mes "Anyway, I am sorry to put you in the difficult situation again today.";
			next;
			mes "[" + .@name$ + "]";
			mes "Well then, since I have delivered you what I have to deliver you, I should get going.";
			next;
			mes "[Maid]";
			mes "Yes, please go back safely. I hope he gives up by tomorrow.";
			delitem 6927, countitem(6927);// Filled_With_SeaStones
			delitem 748,1;// Witherless Rose
			erasequest 14493;// Today I Feel
			setquest 14494;// I Have to Turn It Down Again
			close;
		}
		// fall through
	}
	mes "[Maid]";
	mes "Oh, I am sick of cleaning! I have enough things to clean at home. I don't need to do more out here.";
	mes "I should just give it all up and run away.";
	close;
}

prt_cas,339,212,5	script	Dark and Damp Wall#ep16wig	HIDDEN_NPC,5,5,{
	callsub S_Talk;

S_Talk:
	if (ep16_wig == 5) {
		mes "[Scrub Sponge]";
		mes "Dear human, are you the one who have waken me up?";
		mes "After a long sleep, I am waken up before such a mess.";
		next;
		mes "[Scrub Sponge]";
		mes "I am the god of cleaning sealed in the Scrub Sponge.";
		mes "You shall pay for your sin of interrupting my rest with cleaning.";
		next;
		mes "[Scrub Sponge]";
		mes "Let's see. This must be ^0000cda cluster of mold^000000!";
		mes "You cannot get this mold without borrowing strength from its own race and the god.";
		next;
		mes "[Scrub Sponge]";
		mes "Bring ^0000cd1 Mold Powder and 1 Holy Water^000000!";
		setquest 14481;// Conquer the Mold
		ep16_wig = 6;
		close;
	}
	if (ep16_wig == 6) {
		if (countitem(6928) < 1 || countitem(7001) < 1 || countitem(523) < 1) {
			mes "[Scrub Sponge]";
			mes "Human, what are you doing now?";
			mes "I told you! You need ^0000cd1 Mold Powder and 1 Holy Water^000000 to clean up the mold!";
			next;
			mes "[Scrub Sponge]";
			mes "How can you clean up without them?";
			mes "Go get them first.";
			close;
		}
		mes "[Scrub Sponge]";
		mes "Since you have the Mold Powder and alcohol with you, try getting rid of the mold now.";
		next;
		mes "[Scrub Sponge]";
		mes "This is not the proper way of wiping off the mold, but this is the only way to get rid of such severe mold.";
		next;
		mes "[Scrub Sponge]";
		mes "Wipe the Mold Power over the mold which resembles demon's skin and sprinkle it with Holy Water.";
		next;
		mes "[Scrub Sponge]";
		mes "And wipe it as I tell you. I am not going to tell you again so pay attention.";
		while(1) {
			next;
			mes "[Scrub Sponge]";
			mes "Tap it once gently and tap it three times more. You really need to soak the wall with the Holy Water and Mold Powder to wipe it off. This is very important.";
			next;
			mes "[Scrub Sponge]";
			mes "Then, you need to scrub hard about ten times and wipe it off in circles about five times. Why don't you try now?";
			next;
			progressbar "ffff00",3;
			switch( rand(1,3) ) {
			case 1:
				mes "[Scrub Sponge]";
				mes "That's not it! You really need to be determined to get rid of the flower of devil.";
				mes "Compose yourself and listen again carefully.";
				continue;
			case 2:
				specialeffect EF_RECOVERY;
				mes "Well done. You have cleaned it so well.";
				mes "As a Scrub Sponge, I am very contented.";
				next;
				mes "[Scrub Sponge]";
				mes "Since I have fulfilled my duty, I shall go now!";
				mes "Thank you, human... Thank you for being with me for this life...";
				specialeffect2 EF_CURE;
				break;
			case 3:
				mes "[Scrub Sponge]";
				mes "That's not it! Relax your arms a little!";
				mes "Cleaning is not just about physical strength. You are still too far behind to reach the enlightenment. Ease your mind and body to try again.";
				continue;
			}
			break;
		}
		delitem 6928,1;// Poring Loofah
		delitem 7001,1;// Mould Powder
		delitem 523,1;// Holy Water
		completequest 14481;// Conquer the Mold
		ep16_wig = 7;
		close;
	}
	if (ep16_wig > 6) {
		mes "[Wall Which Used to Be Moldy]";
		mes "The clean wall reminds me of the Scrub Sponge which has been through the cleaning duty with me.";
		close;
	}
	end;

OnTouch:
	if (ep16_wig == 5)
		callsub S_Talk;
	end;
}

prt_cas,339,198,5	script	Sticky Wall#ep16wig	HIDDEN_NPC,5,5,{
	callsub S_Talk;

S_Talk:
	if (ep16_wig == 7) {
		mes "[Scrub Sponge]";
		mes "Is it you...? Are you the one who has guided me to ^0000cdthe ingrained grease^000000?";
		mes "Nice to meet you. I have been a sleep in this waiting for someone who would clean up something with me.";
		next;
		mes "[Scrub Sponge]";
		mes "I am the fairy of cleaning sealed in the Scrub Sponge.";
		mes "I wake up when I am near somewhere dirty.";
		next;
		mes "[Scrub Sponge]";
		mes "Thank you for choosing me to clean the grease.";
		mes "I always wanted to clean grease in style.";
		next;
		mes "[Scrub Sponge]";
		mes "Hum... For the ingrained grease, ^0000cdthe mixture of orange and alcohol^000000 works the best.";
		mes "Would you bring ^0000cd1 orange and 1 alcohol^000000? Let's clean up with them!";
		setquest 14480;// Conquer the Grease
		ep16_wig = 8;
		close;
	}
	if (ep16_wig == 8) {
		if (countitem(6928) < 1 || countitem(582) < 1 || countitem(970) < 1) {
			mes "[Scrub Sponge]";
			mes "Oh, wait a moment!";
			mes "You need ^0000cd1 orange and 1 alcohol^000000 to clean up the ingrained grease.";
			next;
			mes "[Scrub Sponge]";
			mes "I would like to prepare it myself but I am just a Scrub Sponge.";
			mes "Please bring them with you.";
			close;
		}
		mes "[Scrub Sponge]";
		mes "Since we have the orange and alcohol, let's clean up together now!";
		next;
		mes "[Scrub Sponge]";
		mes "Peel the orange and put the orange peels in the alcohol. Then wait a moment. You may eat the flesh of orange if you want. Yum!";
		next;
		mes "[Scrub Sponge]";
		mes "Well, the essence of the orange peels must have been infused in the alcohol by now. Spray it over the grease and wipe with me.";
		next;
		mes "[Scrub Sponge]";
		mes "It takes some skills to wipe it off.";
		while(1) {
			next;
			mes "[Scrub Sponge]";
			mes "First you need to scrub gently, gently once more and hard! Then scrub with medium strength and scrub harder.";
			mes "You should then spray the mixture once more and keep wiping with medium strength.";
			next;
			progressbar "ffff00",3;

			switch( rand(1,3) ) {
			case 1:
				mes "[Scrub Sponge]";
				mes "I think you are scrubbing too gently. You should allow sometime for the grease to dissolve in the mixture.";
				next;
				mes "[Scrub Sponge]";
				mes "First, you need to penetrate the grease with the mixture. Then you need to wipe off the grease. Well, let's try again.";
				continue;
			case 2:
				specialeffect EF_RECOVERY;
				mes "[Scrub Sponge]";
				mes "Whoa, good job! The grease is gone now!";
				mes "Even better, the fresh scent remains after cleaning, making the passengers happy.";
				next;
				mes "[Scrub Sponge]";
				mes "However, I will disappear soon.";
				mes "It is the fate of dirty Scrub Sponge.";
				next;
				mes "[Scrub Sponge]";
				mes "However, I was happy to spend the short life of a Scrub Sponge with you.";
				mes "I want to be born as a human in my next life to be a close... Friend of yours...";
				specialeffect2 EF_CURE;
				break;
			case 3:
				mes "[Scrub Sponge]";
				mes "You shouldn't just wipe it too hard. You need to let the mixture melt into the grease to get it off.";
				mes "Scrub gently and wipe it off at once. Well, listen up again.";
				continue;
			}
			break;
		}
		delitem 6928,1;// Poring Loofah
		delitem 582,1;// Orange
		delitem 970,1;// Alcohol
		completequest 14480;// Conquer the Grease
		ep16_wig = 9;
		close;
	}
	if (ep16_wig > 8) {
		mes "[Scrapped-off Wall]";
		mes "The clean wall reminds me of the Scrub Sponge has been really kind to me.";
		close;
	}
	end;

OnTouch:
	if (ep16_wig == 7)
		callsub S_Talk;
	end;
}

prt_cas,309,215,5	script	Pitch-black Floor#ep16wig	HIDDEN_NPC,5,5,{
	callsub S_Talk;

S_Talk:
	if (ep16_wig == 9) {
		mes "[Scrub Sponge]";
		mes "Is it you? Are you the one in charge of the cleaning mission today?";
		mes "Nice to meet you! I am the cleaning instructor sealed in the Scrub Sponge!";
		next;
		mes "[Scrub Sponge]";
		mes "If you follow my lead, you can get through the most difficult cleaning mission in this world!";
		mes "Do you understand?";
		next;
		mes "[Scrub Sponge]";
		mes "Let's check today's target! It is ^0000cdthe black dirt of devil^000000 stuck in the gaps in the floor!";
		mes "We have a Thor 3 situation here!";
		next;
		mes "[Scrub Sponge]";
		mes "In other words, we can resolve it as long as we have all the materials ready!";
		mes "You need ^0000cd1 Powdery Fine Sand and 1 Lemon^000000 to get rid of the target!";
		next;
		mes "[Scrub Sponge]";
		mes "Go get them now!";
		mes "Go!";
		setquest 14482;// Conquer the Dirt of Devil
		ep16_wig = 10;
		close;
	}
	if (ep16_wig == 10) {
		if (countitem(6928) < 1 || countitem(7043) < 1 || countitem(568) < 1) {
			mes "[Scrub Sponge]";
			mes "What are you doing now?";
			mes "You cannot get rid of the black dirt stuck in the gaps of tiles without the lemon and powdery find sand!";
			next;
			mes "[Scrub Sponge]";
			mes "Prepare 1 Powdery Fine Sand and 1 Lemon now!";
			mes "Go!";
			close;
		}
		mes "[Scrub Sponge]";
		mes "Good! It has all been prepared!";
		mes "Let's start cleaning now!";
		next;
		mes "[Scrub Sponge]";
		mes "Squeeze the lemon and sprinkle the juice over the floor. Then sprinkle the powdery fine sand over it!";
		mes "This will whiten and polish the floor! Not to mention the fresh scent of lemon adding something extra!";
		next;
		mes "[Scrub Sponge]";
		mes "Then you scrub briskly with me!";
		mes "The method of scrubbing is as follows! It is not difficult if you follow me! Listen up!";
		while(1) {
			next;
			mes "[Scrub Sponge]";
			mes "Three times to the left! Once to the right! Once to the left again! Twice to the front!";
			mes "Then twice to the left to wrap up! Start now!";
			next;
			progressbar "ffff00",3;
			switch( rand(1,3) ) {
			case 1:
				mes "[Scrub Sponge]";
				mes "Wrong!";
				mes "Try to keep it together! Repeat once again!";
				continue;
			case 2:
				specialeffect EF_RECOVERY;
				mes "[Scrub Sponge]";
				mes "Well done!";
				mes "You have completed the cleaning mission beautifully!";
				next;
				mes "[Scrub Sponge]";
				mes "I believe that you can handle cleaning perfectly even without me!";
				mes "Old soldiers never die! They just fade away! So save the tears!";
				next;
				mes "[Scrub Sponge]";
				mes "You may think of me whenever you see and clean the black dirt stuck in the gaps of tiles!";
				mes "Now disperse! Go!";
				specialeffect2 EF_CURE;
				break;
			case 3:
				mes "[Scrub Sponge]";
				mes "When did I teach you like that? Don't you dare say that you have learned it from me!";
				next;
				mes "[Scrub Sponge]";
				mes "Try to keep it together! Listen up once more!";
				continue;
			}
			break;
		}
		delitem 6928,1;// Poring Loofah
		delitem 7043,1;// Fine Sand
		delitem 568,1;// Lemon
		completequest 14482;// Conquer the Dirt of Devil
		erasequest 14479;// Clean-up out of Apology
		setquest 14483;// Report the Completion of the Clean-up
		ep16_wig = 11;
		close;
	}
	if (ep16_wig == 11) {
		mes "[Shining Floor]";
		mes "The clean floor reminds me of the Scrub Sponge who has been tough but soft inside.";
		mes "Let's go back to the maid and report that the cleaning is completed.";
		close;
	}
	if (ep16_wig > 11) {
		mes "[Shining Floor]";
		mes "The clean floor reminds me of the Scrub Sponge who has been tough but soft inside.";
		close;
	}
	end;

OnTouch:
	if (ep16_wig == 9)
		callsub S_Talk;
	end;
}

prontera,68,68,5	script	Furniture Deliveryman#ep16wig	1_M_HOF,{
	if (ep16_wig == 12) {
		.@name$ = strcharinfo(0);
		mes "[Furniture Deliveryman]";
		mes "Oh, my arms, legs, back and my entire body hurts. Well, I am just glad that today's work is done. I can take some rest now. I should go have some hot soup. Is it supposed to be the meat soup for today?";
		next;
		mes "[" + .@name$ + "]";
		mes "May I ask you something?";
		next;
		emotion ET_CRY;
		mes "[Furniture Deliveryman]";
		mes "What is it? Is it about furniture delivery? I am off my duty today. Unless it is really urgent, would you please come back tomorrow?";
		next;
		mes "[Furniture Deliveryman]";
		mes "I am exhausted from today's work. I almost cannot stand with my back straight now.";
		next;
		mes "[" + .@name$ + "]";
		mes "No, it is not about that. You are the one who has delivered the furniture to the Wigner family, right?";
		next;
		mes "[Furniture Deliveryman]";
		mes "Yes, I have... Is there any problem with the furniture? What should I do? I would never be able to afford the furniture!";
		next;
		mes "[Furniture Deliveryman]";
		mes "What if there is a dent? Should I call James to fix it? Damage? Wrong delivery? What should I do? What is it about?";
		next;
		mes "[" + .@name$ + "]";
		mes "No, nothing like that. Please relax.";
		next;
		mes "[Furniture Deliveryman]";
		mes "What is it? Additional delivery? I really want to take some rest now... However, I guess I have no choice since it is the Wigners that I am dealing with. Oh, I really hate it... It is just too difficult to make ends meet.";
		next;
		emotion ET_OHNO;
		mes "[" + .@name$ + "]";
		mes "No, I just have a question for you. Have you seen a small box on the table in the room?";
		next;
		mes "[Furniture Deliveryman]";
		mes "What box? I was busy delivering the furniture... Wait, I remember it.";
		next;
		mes "[Furniture Deliveryman]";
		mes "You mean the ^0000cdsmall box^000000 on the table next to the bed, right? The locked box with no particular decoration.";
		next;
		mes "[" + .@name$ + "]";
		mes "I believe so.";
		next;
		mes "[Furniture Deliveryman]";
		mes "Yes, I remember it. It was a simple box without any decoration, but it looked very classy.";
		mes "The wood was of the finest quality and the locking device was exquisite. I could tell that it must have been made by a master artisan at a glance.";
		next;
		mes "[Furniture Deliveryman]";
		mes "Since I work with furniture, a piece like that really catches my eyes. It really was a work of art.";
		next;
		mes "[" + .@name$ + "]";
		mes "Was the box still there after you delivered the furniture?";
		next;
		emotion ET_FRET;
		mes "[Furniture Deliveryman]";
		mes "Yes, it was. The box cannot move itself, can it?";
		next;
		emotion ET_HUK;
		mes "[Furniture Deliveryman]";
		mes "Oh, wait? Are you telling me that it is missing? Are you implying that it has been carried out in my carriage?";
		next;
		mes "[" + .@name$ + "]";
		mes "No. Please calm down. I am not suspecting you. I just want to listen to your story. I am just tracking the whereabouts of the box based on the words of the people who have seen the box.";
		next;
		emotion ET_ANGER;
		mes "[Furniture Deliveryman]";
		mes "If anything goes missing, it is always us, the ordinary people, who are suspected. Do you know that it is just a prejudice?";
		mes "The people who have less must be hungry for money. And they are unvirtuous...";
		next;
		mes "[" + .@name$ + "]";
		mes "It is just a misunderstanding. Trust me, I am not suspecting you.... You know, you look for any witnesses when a person goes missing.";
		next;
		emotion ET_ANGER;
		mes "[Furniture Deliveryman]";
		mes "I don't want to hear it! Why are you scaring an innocent furniture delivery man for some missing box?";
		next;
		mes "[" + .@name$ + "]";
		mes "I am sorry to make you uncomfortable. I am just asking everyone who has been in that room. I am not suspecting you.";
		next;
		emotion ET_HNG;
		mes "[Furniture Deliveryman]";
		mes "Heh, not that it makes me feel any better. I think I may be feeling even worse since I am hungry. Oh, my stomach is growling... I don't feel well...";
		next;
		mes "[" + .@name$ + "]";
		mes "Do you need something to eat?";
		next;
		mes "[Furniture Deliveryman]";
		mes "It doesn't change anything even if you say that...Well, I may be able to let it go if I have some Ox Head Slices... I cannot forget the taste from 10 years ago...";
		next;
		mes "[" + .@name$ + "]";
		mes "Would it make you feel better?";
		next;
		mes "[Furniture Deliveryman]";
		mes "Well, not that it will... OK, good! I'll let it go for ^0000cd3 Ox Head Slices^000000! Fair is fair after all.";
		emotion ET_KIK;
		next;
		mes "[" + .@name$ + "]";
		mes "Would it be enough? OK, please wait for me then.";
		close2;
		erasequest 14484;// There Was a Furniture Delivery Man
		setquest 14485;// I Am Upset
		ep16_wig = 13;
		end;
	}
	if (ep16_wig == 13) {
		if (countitem(6254) < 3) {
			mes "[Furniture Deliveryman]";
			mes "You are here. If you came here any late, I would have been really upset as I get parched with thirst.";
			next;
			mes "[Furniture Deliveryman]";
			mes "Your hands seem empty.";
			mes "Did you forget? I said I would let it go with ^0000cd3 " + getitemname(6254) + "^000000.";
			next;
			emotion ET_HNG;
			mes "[Furniture Deliveryman]";
			mes "I wouldn't let it go without them! I won't! I'll tell people that there is an adventurer who frames an innocent person! He!";
			close;
		}
		.@name$ = strcharinfo(0);
		mes "[Furniture Deliveryman]";
		mes "You are here. If you came here any late, I would have been really upset due to my raging stomach.";
		next;
		mes "[" + .@name$ + "]";
		mes "Well, it was very difficult to get them. Here you are.";
		next;
		emotion ET_SMILE;
		mes "[Furniture Deliveryman]";
		mes "Let's see! Oh, this is it! Have you had good wine with some Ox Head Slices? You will never get over this heavenly combination!";
		next;
		mes "[Furniture Deliveryman]";
		mes "This tastes the same as it did 10 years ago! Now I feel fully recovered from the fatigue! I don't feel tired any more! All the stress is gone!";
		next;
		mes "[" + .@name$ + "]";
		mes "Oh, it sure looks delicious. I should try some later. Anyways, do you know anything else about the box?";
		next;
		emotion ET_FRET;
		mes "[Furniture Deliveryman]";
		mes "Are we still talking about it? Let's not talk about such thing while I am enjoying some wine and meat. My carriage is heavy when I get in, but it is as light as a feather when I get out.";
		next;
		mes "[Furniture Deliveryman]";
		mes "If you feel suspicious, ask the Gate Guard. He inspected my carriage.";
		next;
		mes "[" + .@name$ + "]";
		mes "Hum...";
		next;
		mes "[Furniture Deliveryman]";
		mes "Oh, well. By the way...";
		next;
		mes "[" + .@name$ + "]";
		mes "By the way?";
		next;
		mes "[Furniture Deliveryman]";
		mes "Have you seen the princess of the family? You must have. Doesn't she appear suspicious to you? I can tell people's character by their faces. She seems to be hiding something. She may stab you in the back.";
		next;
		mes "[" + .@name$ + "]";
		mes "Isn't it called a prejudice to judge some based on the appearance?";
		next;
		emotion ET_SCRATCH;
		mes "[Furniture Deliveryman]";
		mes "You are right. I feel sorry, However, there are people talking about it. There's no smoke without fire.";
		mes "No? Well. Perhaps, there could be smoke without fire.";
		next;
		mes "[" + .@name$ + "]";
		mes "Katrin was not that kind of person as far as I observed.";
		next;
		mes "[Furniture Deliveryman]";
		mes "Well, if not, that's fine. Anyways, the box was there in its place when I left the room. You may go if you don't have any business left here.";
		next;
		mes "[" + .@name$ + "]";
		mes "Excuse me.";
		delitem 6254,3;// Beef Head
		erasequest 14485;// I Am Upset
		setquest 14486;// I Heard the Story
		ep16_wig = 14;
		close;
	}
	if (ep16_wig == 14) {
		mes "[Furniture Deliveryman]";
		mes "Dear adventurer, why are you here again? Didn't you say you were heading back to the palace?";
		next;
		mes "[Furniture Deliveryman]";
		mes "Do you have more things to as me? Or are you going to drink with me?";
		next;
		mes "[Furniture Deliveryman]";
		mes "I wouldn't mind.";
		close;
	}
	mes "[Furniture Deliveryman]";
	mes "I should earn enough money to open a store of my own. The owner only lets me deliver the furniture and never teaches me how to make one.";
	next;
	mes "[Furniture Deliveryman]";
	mes "All the cutting and delivery work will break my back.";
	mes "Oh, my back hurts.";
	close;
}

// Others npcs
// Banquet upper right
prt_cas,165,245,0	script	Investigator Ryosun#ep16	4_M_ALCHE_A,{
	emotion ET_CRY;
	mes "[Ryosun]";
	mes "I finally have the strawberry cake no one has ever touched.";
	mes "The things I have been through to keep the cake in the expedition camp... I am about to burst into tears... Aww...";
	next;
	mes "[Ryosun]";
	mes "Strawberry! Strawberry! This strawberry cake belongs to Ryosun! I won't give it to anyone.";
	close;
}

// Hall
prt_cas,93,212,0	script	#vip_alimi	HIDDEN_WARP_NPC,1,1,{
	end;
OnTouch:
	switch( BaseClass ) {
	case JOB_SWORDMAN:
		npctalk "Tough Sword of Protection " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		end;
	case JOB_MAGE:
		npctalk "Seeker of Truth " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		end;
	case JOB_ARCHER:
		if (BaseJob == Job_Hunter)
			npctalk "Arrow through the Wind " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		else
			npctalk "Evangelist of Pleasure " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		end;
	case JOB_ACOLYTE:
		npctalk "Perfect Delegate of God " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		end;
	case JOB_MERCHANT:
		npctalk "Invisible Hand of Gold " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		end;
	case JOB_THIEF:
		npctalk "Quiet Ruler of Darkness " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		end;
	case JOB_NOVICE:
		npctalk "The One Who Remembers the First Step " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		break;
	default:
		npctalk "Covenanter of Undying Faith " + strcharinfo(0) + ".", "Chamberlain#vip_alimi", bc_area;
		end;
	}
}

prt_cas,97,216,2	script	Chamberlain#vip_alimi	4_M_RUSMAN2,{
	mes "[Chamberlain]";
	mes "Are you having a good time?";
	mes "We have put a lot of efforts since it's a big event in the palace in a long while.";
	mes "I hope you like it.";
	close;
}

prt_cas,104,231,3	script	Banquet Hall Guest#ep16wig01	4_F_CHNDRESS3,{
	mes "[Banquet Hall Guest]";
	mes "It is always my pleasure to attend a banquet. Traveling and learning about different cultures are always interesting. It just makes it better to have good music and delicious food.";
	close;
}

prt_cas,103,232,3	script	Banquet Hall Guest#ep16wig02	4_M_CHNOLD,{
	mes "[Banquet Hall Guest]";
	mes "It is always tiring to attend a banquet. I am still tired from the trip, it is just too painful to mingle with people... Phew...";
	close;
}

prt_cas,81,235,3	script	Banquet Hall Guest#ep16wig03	4_F_BRZ_WOMAN,{
	mes "[Banquet Hall Guest]";
	mes "The Palace of Rune Midgarts is so big and glamourous. It somewhat feels exotic too. It's been a long way, but I am glad to be here.";
	close;
}

prt_cas,79,219,7	script	Banquet Hall Guest#ep16wig04	4_F_MALAYA,{
	mes "[Banquet Hall Guest]";
	mes "Oh, aren't you the adventurer who has saved the world? Please visit Portmalaya someday. Everyone will welcome you there! Your story is known even to a far away place from here!";
	close;
}

prt_cas,88,246,7	script	Banquet Hall Guest#ep16wig05	4_F_THAIGIRL,{
	mes "[Banquet Hall Guest]";
	mes "The music played by the music makes me so emotional. It is worthwhile to come here for this music alone.";
	close;
}

prt_cas,114,226,5	script	Banquet Hall Guest#ep16wig06	4_M_DEWWOMAN,{
	mes "[Banquet Hall Guest]";
	mes "Wait, I have been looking at the flowers here. Are they blinking? How wonderful!";
	close;
}

prt_cas,87,231,5	script	Banquet Hall Guest#ep16wig07	4_M_TWTEAMAN,{
	mes "[Banquet Hall Guest]";
	mes "I visited the Palace of Rune Midgarts long time ago. It has changed a lot ever since. It has become much more glamourous and magnificent that I really enjoy being guided around this place.";
	close;
}

prt_cas,86,251,5	script	Banquet Hall Guest#ep16wig08	4_M_RUSMAN1,{
	mes "[Banquet Hall Guest]";
	mes "There are a long of people here. I almost feel dizzy. However, still, I like the lively atmosphere.";
	close;
}

prt_cas,72,227,5	script	Banquet Hall Guest#1	4_M_JPNOJI,{
	mes "[Banquet Hall Guest]";
	mes "I have come to Prontera to attend the banquet from Amatsu. It sure feels totally different from Amatsu. Hahaha.";
	close;
}

prt_cas,71,227,5	script	Banquet Hall Guest#2	4_M_JPN,{
	mes "[Banquet Hall Guest]";
	mes "Grandfather, don't overtax your strength.";
	close;
}

prt_cas,100,100,3	script	Banquet Hall Guest#3	4_M_BOSSCAT,{
	mes "[Banquet Hall Guest]";
	mes "All the nobility who are in charge of the market in Rune Midgarts are here. We, the Cat Hand Services, shouldn't miss this chance.";
	next;
	mes "[Banquet Hall Guest]";
	mes "I'll score contracts as tall as my height.";
	close;
}

prt_cas,89,250,5	script	Banquet Hall Guest#5	4_F_KHELLY,{
	mes "[Banquet Hall Guest]";
	mes "I am an old fan of Orint of the band.";
	mes "I have spent a lot of money and time not to miss any of his performance.";
	next;
	mes "[Banquet Hall Guest]";
	mes "It was very difficult to get my hands on the invitation to this banquet.";
	mes "It was so exclusive that I almost joined the expedition!";
	close;
}

prt_cas,89,244,7	script	Banquet Hall Guest#6	4_M_NOV_HUNT,{
	mes "[Banquet Hall Guest]";
	mes "The twin sisters of the band are of completely different characters. However, they are good at imitate each other.";
	mes "When they pretend to be one person, they really looks like Doppelgangers.";
	close;
}

prt_cas,91,237,3	script	Ekinasia#ep16_etc01	1_F_SIGNZISK,{
	if (mao_morocc2 > 99) {
		mes "[Ekinasia]";
		mes "You have been invited to the banquet as well.";
		mes "Well, no wonder... If you think about it.";
		next;
		mes "[Lin]";
		mes "Oh, you are still alive!";
		mes "I am glad to see you here. Life must be treating you well!";
		next;
		mes "[Ekinasia]";
		mes "Come to think of it, Kid is here too.";
		mes "He met the people from the guild and went to see them...";
		next;
		mes "[Lin]";
		mes "Hum... Then he was taken by a strange guy among the bunch to the dining hall.";
		mes "You may go say hi.";
		next;
		mes "[Ekinasia]";
		mes "It is a banquet in a long time. We may as well enjoy it.";
		close2;
		npctalk "Sure, sure!", "Lin#ep16_etc02", bc_self;
		end;
	}
	npctalk "It's been a while since the last time a royal banquet like this was held.", "Ekinasia#ep16_etc01", bc_self;
	setpcblock PCBLOCK_NPC, true;
	sleep2 3000;
	setpcblock PCBLOCK_NPC, false;
	npctalk "We need to blow off some steam like this from time to time.", "Ekinasia#ep16_etc01", bc_self;
	end;
}

prt_cas,89,238,5	script	Lin#ep16_etc02	4_F_ACROSS,{
	mes "[Lin]";
	mes "Well, this is how the aristocrats spend their time!";
	mes "Haha, let's see which lady is wearing the most beautiful dress.";
	close;
}

prt_cas,78,255,3	script	Mayssel#ep16_etc05	4_F_MAYSEL,{
	if ((eaclass()&EAJ_THIRDMASK) == EAJ_GUILLOTINE_CROSS) {
		setpcblock PCBLOCK_NPC, true;
		cutin "gc_mayssel01.bmp",1;
		sleep2 100;
		cutin "gc_mayssel02.bmp",1;
		sleep2 100;
		cutin "gc_mayssel03.bmp",1;
		sleep2 200;
		cutin "gc_mayssel04.bmp",1;
		sleep2 200;
		cutin "gc_mayssel05.bmp",1;
		sleep2 200;
		cutin "gc_mayssel04.bmp",1;
		sleep2 100;
		cutin "gc_mayssel03.bmp",1;
		sleep2 100;
		cutin "gc_mayssel02.bmp",1;
		sleep2 100;
		setpcblock PCBLOCK_NPC, false;
		cutin "gc_mayssel01.bmp",1;
		mes "[Mayssel]";
		mes "Who are you...?";
		next;
		mes "[Mayssel]";
		mes "...Oh... You have visited us to change your class, I remember.";
		mes "We have recommended you as a representative of the guild.";
		next;
		mes "[Mayssel]";
		mes "I am glad to see you all grown up.";
		mes "Never forget the weight of the blood to be covered on your hands at all times.";
		close3;
	}
	cutin "gc_mayssel01",1;
	mes "[Mayssel]";
	mes "You must have been invited to the banquet.";
	mes "So are we.";
	next;
	mes "[Mayssel]";
	mes "It is rare to see the palace open to public like this. Enjoy as much as you can.";
	close3;
}

prt_cas,78,252,2	script	Verkhasel#ep_etc06	4_M_GUILLOTINE,{
	if ((eaclass()&EAJ_THIRDMASK) == EAJ_GUILLOTINE_CROSS) {
		cutin "gc_verkhasel01.bmp",2;
		mes "[Verkhasel]";
		mes "...I don't like a crowded place like this, but I cannot help it when I am on a mission.";
		sleep2 200;
		cutin "gc_verkhasel02.bmp",2;
		sleep2 200;
		cutin "gc_verkhasel01.bmp",2;
		next;
		mes "[Verkhasel]";
		mes "You are here too.";
		mes "Well, I guess you are supposed to be here.";
		next;
		mes "[Verkhasel]";
		mes "...What a trouble.";
		close2;
		cutin "",255;
	}
	npctalk "I want to go back now.", "Verkhasel#ep_etc06", bc_self;
	setpcblock PCBLOCK_NPC, true;
	sleep2 3000;
	npctalk "...You can't.", "Mayssel#ep16_etc05", bc_self;
	sleep2 3000;
	setpcblock PCBLOCK_NPC, false;
	npctalk "You made that very clear, hahahaha!", "Vicente#ep16_etc07", bc_self;
	end;
}

prt_cas,76,254,5	script	Vicente#ep16_etc07	4_M_HUMAN_02,{
	if ((eaclass()&EAJ_THIRDMASK) == EAJ_SHADOW_CHASER) {
		cutin "sc_vicente01.bmp",2;
		mes "[Vicente]";
		mes "Oh, is it the first time since our last encounter for your class change?";
		mes "Thanks to your contribution, the position of the guild has been strengthened.";
		next;
		cutin "sc_vicente03.bmp",2;
		mes "[Vicente]";
		mes "I guess you will be the hero of the palace.";
		mes "I am glad to see you well.";
		close3;
	}
	cutin "sc_vicente01",2;
	mes "[Vicente]";
	mes "Hum... Did we meet at Criatura?";
	next;
	cutin "sc_vicente02",2;
	mes "[Vicente]";
	mes "I have dealt with too many people...";
	mes "Your face seemed familiar...";
	next;
	cutin "sc_vicente03",2;
	mes "[Vicente]";
	mes "Well whatever.";
	mes "Are you enjoying the banquet?";
	close3;
}

prt_cas,113,243,3	script	Banquet Hall Aristocrat#1	4_F_01,{
	mes "[Banquet Hall Aristocrat]";
	mes "I really like banquets.";
	mes "The drowsy music, the whispering people and the chamberlains carrying the refreshments. I think I am nobly born to see it.";
	close;
}

prt_cas,70,239,5	script	Banquet Hall Aristocrat#2	4_M_04,{
	mes "[Banquet Hall Aristocrat]";
	mes "I know this banquet is held for someone else. However, it still is a great opportunity for me to meet someone I can spend my life with.";
	close;
}

prt_cas,73,232,5	script	Banquet Hall Aristocrat#3	4_M_RUSMAN1,{
	mes "[Banquet Hall Aristocrat]";
	mes "Everyone else seems to love the banquet, but I don't. I am forced by my parents to come here. I really want to go home and take a rest now.";
	close;
}

prt_cas,99,247,3	script	Banquet Hall Aristocrat#4	4_M_MAYOR,{
	mes "[Banquet Hall Aristocrat]";
	mes "This band is pretty good.";
	mes "I'd like to invite them to the royal villa for my party.";
	close;
}

prt_cas,93,248,5	script	Court Musician#3	4_F_WANDERER,{
	emotion ET_SMILE;
	mes "[Court Musician Ellie]";
	mes "Dwit! Look at the nobility over there. Aren't they beautiful?";
	next;
	emotion ET_OK, getnpcid(0, "Court Musician#4");
	emotion ET_SHY;
	mes "[Court Musician Dwit]";
	mes "Hum, yes they are. I think you would fit in there perfectly though.";
	mes "One day, I'll play the guitar next to you dancing and singing in a blue dress.";
	next;
	emotion ET_DELIGHT, getnpcid(0, "Court Musician#occi");
	mes "[Court Musician Occi]";
	mes "Haha, that woman in the blue dress, it could be me!";
	next;
	mes "[Court Musician Dwit]";
	mes "You are mistaken if you think I cannot distinguish you twin sisters, Occi. I can tell your differences from the steps you take and the sound of your breath.";
	emotion ET_HNG, getnpcid(0, "Court Musician#4");
	close;
}

prt_cas,91,248,5	script	Court Musician#4	4_M_MINSTREL,{
	mes "[Court Musician Dwit]";
	mes "When I first met Orint, I thought he was stoic and unconcerned. However, he turned out to be a man of extraordinary concentration and possessiveness.";
	next;
	mes "[Court Musician Dwit]";
	mes "He always tries to be the best. That's why he can play the tune like that.";
	next;
	mes "[Court Musician Dwit]";
	mes "However, he doesn't know when to concentrate. His behavior is often misread.";
	next;
	mes "[Court Musician Dwit]";
	mes "Anyways, we are invited to an honorable place like this thanks to Orint.";
	mes "If you want to hear any song, ask him to play it for you.";
	close;
}

prt_cas,95,248,5	script	Court Musician#occi	4_F_WANDERER,{
	emotion ET_DELIGHT;
	mes "[Court Musician Occi]";
	mes "It has been our dream to ensemble in a place like this. Am I right, Orint?";
	next;
	emotion ET_THINK, getnpcid(0, "Court Musician#orint");
	mes "[Court Musician Orint]";
	mes "Chatting is forbidden while working.";
	next;
	emotion ET_HNG;
	mes "[Court Musician Occi]";
	mes "Yes, I see. You are so boring. But it is part of your charm, haha.";
	close;
}

prt_cas,98,248,5	script	Cat#ep16bgm	4_CAT,{
	mes "- That lazy-looking cat is sitting near the feet of the musician. It shows no interest in you. -";
	close;
}

prt_cas,98,231,5	script	Hiba Ajif#ep16	4_M_REDSWORD,{
	mes "[Hiba Ajif]";
	mes "Since Ashbacuum has been taken care of, I want to go home and take a nap. However, they are holding me here.";
	next;
	mes "[Avidal the Advisor]";
	mes "It is the event to praise our contributions. Try to smile a little.";
	next;
	mes "[Instructor Igrid]";
	mes "Brother, these shoes hurt my feet. May I go back to the guest room and sleep?";
	next;
	mes "[Hiba Ajif]";
	mes "]If you can't avoid it, enjoy it...";
	mes "I shall get drunk fast.";
	close;
}

prt_cas,100,231,3	script	Avidal the Advisor#ep16	4_M_SAGE_C,{
	mes "[Avidal the Advisor]";
	mes "I have spent too much time in the tension between the two races. It just feels like I am dreaming to be in a happy and relaxing place like this. This must be what they call peace, right?";
	close;
}

prt_cas,97,229,7	script	Instructor Igrid#ep16	4_M_CRU,{
	mes "[Instructor Igrid]";
	mes "If they really want to do something for us, they really let us take a rest.";
	mes "Only the ones who don't work in the field like an event like this. It is true.";
	close;
}

prt_cas,106,258,5	script	Bruno#ep16_1	4_F_SURA,{
	mes "[Bruno]";
	mes "Argh... I have never been to a place like this...";
	mes "I am so nervous... I shouldn't have come...";
	cutin "3rd_sura_bruno03",0;
	next;
	mes "[Bruno]";
	mes "Everyone dresses so fancy...";
	next;
	mes "[Bruno]";
	mes "By the way, where has the master gone leaving me alone?";
	close3;
}

prt_cas,89,257,3	script	Karian#ep16_1	4_M_MINSTREL1,{
	mes "[Karian]";
	mes "Banquets are fun!";
	mes "Good food! Beautiful music! People talking to one another!";
	cutin "3rd_mins_song04",2;
	close3;
}

prt_cas,85,223,1	script	Maximilian Roegenburg#ep16wig01	4_EP16_MAX,{
	mes "[Maximilian]";
	mes "I have heard that my grandson is under indebtedness to your son these days.";
	next;
	mes "[Levuiere]";
	mes "Not at all. My son is supposed to be learning from your smart grandson. Haha.";
	next;
	mes "[Catherine]";
	mes "Please take care of our son, Isaac.";
	close;
}

prt_cas,85,225,4	script	Catherine Wigner#ep16wig01	1_F_LIBRARYGIRL,{
	mes "[Catherine]";
	mes "Many things have changed since the last time we were here in the palace. I want to come here more often, but we cannot find the excuse to come...";
	next;
	mes "[Levuiere]";
	mes "You can come here with an invitation. It is not difficult visiting here.";
	next;
	mes "[Catherine]";
	mes "You know that is not what I mean...";
	close;
}

prt_cas,84,225,4	script	Levuiere Wigner#ep16wig01	4_EP16_LOUVIERE,{
	mes "[Levuiere]";
	mes "Dear Roegenburg, how are your children doing? I often hear about your third grandson from Isaac/";
	next;
	mes "[Maximilian]";
	mes "Oh, they are doing fine. Please visit our home when you get the time.";
	close;
}

prt_cas,76,236,3	script	Bagette Teeblack#ep16_1	4_M_ALCHE_D,{
	mes "[Bagette Teeblack]";
	mes "I have a lot of study to do... I feel terrible to be dragged to a banquet like this.";
	next;
	mes "[Bagette Teeblack]";
	mes "I wonder if Theodor is handling the work well by himself.";
	close;
}

prt_cas,105,221,1	script	Isabella#ep16wig	4_F_01,{
	mes "[Isabella]";
	mes "I really like banquets. Especially the ones hosted by the palace! Everything is so glamourous and sparkly!";
	close;
}

prt_cas,105,224,4	script	Beatrice#ep16wig	4_F_02,{
	mes "[Beatrice]";
	mes "In a banquet like this, we, women, study other women. About who is wearing which dress and what kind of jewelry she is wearing...";
	next;
	mes "[Beatrice]";
	mes "Those judging eyes are as sharp as those of ferocious beasts. If we find a lady who looks fabulous, we admire her looks with pure admiration.";
	close;
}

prt_cas,107,225,5	script	Isaac Wigner#ep16wig01	4_EP16_ISAAC,{
	mes "[Isaac]";
	mes "Hahahahaha!";
	mes "I should have seen the face! Please invite me to one of those events next time.";
	next;
	mes "[Isabella]";
	mes "Oh, you are always so busy, Isaac. A banquet like this one is the only occasion I can see your face.";
	next;
	mes "[Beitrice]";
	mes "Yes! You must be ranked in top 3 of the busiest people in Prontera these days, Isaac.";
	next;
	mes "[Sophia]";
	mes "He also comes home late after discussing business with Isaac everyday. I really don't like it.";
	next;
	mes "[Bryan]";
	mes "Don't you say such a thing!";
	next;
	mes "[Isaac]";
	mes "Oh! I am sorry to keep Bryan with me. Please excuse me.";
	next;
	mes "[Isaac]";
	mes "However, please understand. It is the most important time for our business. I'll tell him to devote his time to you after this time is over, dear Sophia.";
	next;
	mes "[Sophia]";
	mes "Oh, you should keep those words!";
	next;
	mes "[Isaac]";
	mes "I'll make sure of it. I swear in the name of Isaac Wigner.";
	next;
	mes "[Isabella]";
	mes "Haha, since you have promised me in the name of your family, I guess I can trust you, Isaac.";
	close;
}

prt_cas,108,223,3	script	Bryan#ep16wig	4_M_CASMAN1,{
	mes "[Bryan]";
	mes "Don't leave me alone today. I feel nervous if you are not next to me.";
	next;
	mes "[Sophia]";
	mes "Oh dear, I want to catch up with the people whom I haven't been able to see for a long time. You may go talk to other people.";
	next;
	mes "[Bryan]";
	mes "They only talk about business. I don't enjoy it at all. I don't want to feel like being at work when I am here.";
	next;
	mes "[Sophia]";
	mes "Then, you should follow me.";
	next;
	mes "[Bryan]";
	mes "Well.. I don't feel comfortable... With too many ladies around...";
	close;
}

prt_cas,107,222,1	script	Sophia#ep16wig	1_F_LIBRARYGIRL,{
	mes "[Sophia]";
	mes "Oh, darling, I love to be here in the palace after a long time. There are so many friendly faces around here.";
	mes "However...";
	next;
	mes "[Sophia]";
	mes "Everyone else looks so nice, and I feel rather underdressed.";
	next;
	mes "[Bryan]";
	mes "It is not true! You are the most beautiful person in this place. You are the only one I see here.";
	next;
	mes "[Sophia]";
	mes "Oh, I am so embarrassed...";
	close;
}

// Library
prt_cas,343,67,4	script	Uptight Librarian#ep16lug0	1_F_LIBRARYGIRL,{
	if (checkweight(1304,3) == 0) {
		mes "[Uptight Librarian]";
		mes "If you are going to borrow a book, you'd better reduce your luggage. It seems that there is no space for a book.";
		close;
	}
	.@name$ = strcharinfo(0);
	if (ep16_lug == 5) {
		if (countitem(6926) > 0) {
			mes "[Uptight Librarian]";
			mes "Have you read the book? Did you come to return the book. Well, seeing your hands empty, it seems that you didn't finished the book yet.";
			next;
			mes "[Uptight Librarian]";
			mes "Take the time to look around. Take out and read any book that comes into your favor.";
			mes "The book always enriches mind.";
			close;
		}
		mes "[" + .@name$ + "]";
		mes "Hey, I'm looking for a book. Would you please advice me where it is?";
		next;
		mes "[Uptight Librarian]";
		mes "What kind of book are you looking for?";
		next;
		mes "[" + .@name$ + "]";
		mes "A book about history of Rune-Midgarts.";
		next;
		mes "[Uptight Librarian]";
		mes "Hm... history of Rune-Midgarts.";
		mes "Are you going to borrow the book?";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes.";
		next;
		mes "[Uptight Librarian]";
		mes "May I see your library card, please?";
		next;
		emotion ET_HUK, playerattached();
		mes "[" + .@name$ + "]";
		mes "Library card? I don't have such a thing.";
		next;
		mes "[Uptight Librarian]";
		mes "Then, I cannot borrow a book to you.";
		next;
		emotion ET_SWEAT, playerattached();
		mes "[" + .@name$ + "]";
		mes "How can I have a library card?";
		next;
		mes "[Uptight Librarian]";
		mes "If you present your identification card, we will make you one instantly.";
		next;
		emotion ET_SWEAT, playerattached();
		mes "[" + .@name$ + "]";
		mes "Huh... I don't have it. I left all my things to attend the banquet.";
		next;
		mes "[Uptight Librarian]";
		mes "Banquet? You mean the banquet held in the palace? Are you the adventurer invited to it?";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes, I am...";
		next;
		mes "[Uptight Librarian]";
		mes "Then you are a person guaranteed by the kingdom and I can borrow a book to you through a simple process.";
		next;
		mes "[Uptight Librarian]";
		mes "The kingdom circulated your details and ordered to provide maximum convenience to you.";
		next;
		mes "[" + .@name$ + "]";
		mes "It's nice, but I feel that privacy is not protected.";
		next;
		mes "[Uptight Librarian]";
		mes "What is you name, sir?";
		next;
		mes "[" + .@name$ + "]";
		mes "" + .@name$ + ".";
		next;
		mes "[Uptight Librarian]";
		mes "Let me see...";
		mes "Yes, here it is. Sir " + .@name$ + "...";
		emotion ET_SURPRISE;
		next;
		mes "[Uptight Librarian]";
		mes "But this book consists of 12 volumes. Only the first volume is here and the others are already borrowed.";
		mes "Is it OK with you?";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes, it is.";
		next;
		mes "[Uptight Librarian]";
		mes "Hmm. Anyway, can I ask you some questions? I know nothing as I stay in the library all day long.";
		next;
		mes "[" + .@name$ + "]";
		mes "Yes, I tell you as long as I know.";
		next;
		mes "[Uptight Librarian]";
		mes "^0000cdWhat kind of banquet ^000000 is being held in the palace? Why are you and royal family members invited?";
		next;
		while( select( "Birth of prince.", "Birthday of king.", "In memory of defeating Morocc." ) != 3 ) {
			mes "[" + .@name$ + "]";
			mes "I am sorry, I said wrong as I thought of something else.";
			mes "I made a mistake. What did you say?";
			next;
			mes "[Uptight Librarian]";
			mes "^0000cdWhat kind of banquet ^000000 is being held in the palace? Why are you and royal family members invited?";
			next;
		}
		mes "[Uptight Librarian]";
		mes "Ah, I see.";
		next;
		mes "[Uptight Librarian]";
		mes "Did ^0000cdall royal families^000000 attend the banquet?";
		next;
		while( select( "8 royal families attended it.", "7 royal families attended it.", "6 royal families attended it." ) != 2 ) {
			mes "[" + .@name$ + "]";
			mes "I am sorry, I said wrong as I thought of something else.";
			mes "I made a mistake. What did you say?";
			next;
			mes "[Uptight Librarian]";
			mes "Did ^0000cdall royal families^000000 attend the banquet?";
			next;
		}
		mes "[Uptight Librarian]";
		mes "The palace must be crowded. It is very rare that all royal families gather like this, but...";
		next;
		mes "[Uptight Librarian]";
		mes "I heard that there are royal families ^0000cdwho do not attend the Royal Assembly^000000. Who's that?";
		next;
		while( select( "Wigner and Heine.", "Roegenburg and Richard.", "Geoborg and Walther." ) != 3 ) {
			mes "[" + .@name$ + "]";
			mes "I am sorry, I said wrong as I thought of something else.";
			mes "I made a mistake. What did you say?";
			next;
			mes "[Uptight Librarian]";
			mes "I heard that there are royal families ^0000cdwho do not attend the Royal Assembly^000000. Who's that?";
			next;
		}
		mes "[Uptight Librarian]";
		mes "Well, it is understandable that the Geoborg and the Walther do not attend the assembly.";
		next;
		mes "[Uptight Librarian]";
		mes "The family of the previous king ^0000cdbecame so due to the old curse^000000...";
		next;
		while( select( "You mean the Nerius?", "You mean the Geoborg?", "You mean the Richard?" ) != 2 ) {
			mes "[" + .@name$ + "]";
			mes "I am sorry, I said wrong as I thought of something else.";
			mes "I made a mistake. What did you say?";
			next;
			mes "[Uptight Librarian]";
			mes "The family of the previous king ^0000cdbecame so due to the old curse^000000...";
			next;
		}
		mes "[Uptight Librarian]";
		mes "Yes, you are right. it is ^0000cdthe Geoborg^000000. The queen must be lonely.";
		mes "Thank you very much for advising me though you are busy.";
		next;
		mes "[Uptight Librarian]";
		mes "I have been alone these days as no one has visited the library due to the banquet.";
		mes "History of Rune-Midgarts.";
		next;
		mes "[Uptight Librarian]";
		mes "You can borrow it for one week. There is a fee for overdue books, but I was instructed to make you exempt from it";
		next;
		mes "[Uptight Librarian]";
		mes "Well, if you make much of honor, you will not be overdue.";
		next;
		mes "[Uptight Librarian]";
		mes "Then, enjoy the book!";
		if (isbegin_quest(14500) == 0) {
			setquest 14500;// Complete checking out the book
			completequest 14500;// Complete checking out the book
		}
		getitem 6926,1;// Midgards_Histories
		close;
	}
	mes "[Uptight Librarian]";
	mes "Take the time to look around. Take out and read any book that comes into your favor.";
	mes "The book always enriches mind.";
	close;
}

prt_cas,321,25,1	script	Erich Nerius#ep16_erihi	4_M_SITDOWN,{
	if (ep16_royal < 2) {
		mes "[Erich]";
		mes "There are so many guests attending the banquet.";
		mes "However, since we are in the library, would you keep it down?";
		close;
	}
	if (ep16_royal == 2) {// buggy officially (never displayed)
		if (isbegin_quest(7684) == 0) {
			mes "[Erich]";
			mes "Are you attending the banquet and exchanging greeting with each family?";
			mes "Then you should go see Spica Nerius, not me.";
			next;
			mes "[Erich]";
			mes "Although Shedhar, the current head of the family, is not here, Spica has all the actual power.";
			next;
			mes "[Erich]";
			mes "I am just participating in the Royal Assembly to fill in the place as a Nerius.";
			next;
			mes "[Erich]";
			mes "I am not interested in the throne at all.";
			mes "So you should go see Spica.";
			next;
			mes "[Erich]";
			mes "Enjoy the banquet too.";
			close;
		}
		mes "[Erich]";
		mes "Did you meet Spica?";
		mes "She is such a cheerful girl, isn't she?";
		next;
		mes "[Erich]";
		mes "She will be the head of the Nerius family.";
		close;
	}
	mes "[Erich]";
	mes "I am treated like a prince since I was adopted against my will. However, Shedhar, the head of the family, has been nice to me.";
	next;
	mes "[Erich]";
	mes "She told me to do whatever I wanted.";
	mes "...She even let me decide whether I should attend the ritual or not,";
	next;
	mes "[Erich]";
	mes "I think I will be forgiven whatever I do.";
	mes "I seem to have gained freedom and negligence at the same time.";
	next;
	mes "[Erich]";
	mes "I like the way it is now though.";
	mes "I can do whatever I want to do.";
	close;
}
prt_cas,373,57,8	script	Oliver#ep16_1	4_M_OLIVER,{
	mes "[Oliver]";
	mes "Oh! This! That! This!";
	mes "And there it is!";
	npctalk "Oh, the palace!", "Oliver#ep16_1", bc_self;
	cutin "bu_oliver4",0;
	next;
	mes "[Oliver]";
	mes "Oh, I don't have this book in my collection!";
	next;
	mes "[Oliver]";
	mes "How great to be in the palace! There is everything!";
	close3;
}
prt_cas,341,79,2	script	Alf Ocat#ep16_1	4_M_BLACKMAN,{
	mes "[Alf]";
	mes "Oh! This book must be the one from the legend...";
	cutin "bu_alp4",2;
	npctalk "Oh! This is marvelous!", "Alf Ocat#ep16_1", bc_self;
	next;
	mes "[Alf]";
	mes "I wasn't interested in attending the royal banquet...";
	mes "However, I am glad to be here!";
	close3;
}

// prt_cas,364,69,3	script	Nervous Man#ep16lug01	4_M_ALCHE_A,5,5,{
prt_cas,364,69,3	script	Nervous Man#ep16lug01	4_M_ALCHE_A,{
	if (ep16_lug > 12) {
		mes "[Nervous Man]";
		mes "It is not here either....";
		next;
		mes "[Taunting Man]";
		mes "Why do you need that book? Just go without it.";
		next;
		mes "[Nervous Man]";
		mes "The first impression is the most important. The first greeting has a big impact! By the way, what should I speak as a greeting?";
		next;
		mes "[Nervous Man]";
		mes "'Good morning, sir. I, an unworthy person, live in Prontera....' No. No. I cannot speak like to a person who is younger than me.";
		npctalk "That's good!!", "Taunting Man#ep16lug01";
		next;
		mes "[Nervous Man]";
		mes "Hi? Your brother told me to attend the banquet. No. No. this is not either. My patner is a princess!";
		npctalk "Gross~", "Taunting Man#ep16lug01";
		next;
		mes "[Nervous Man]";
		mes "Why is there no book such as ยกยฎRoyal Etiquette - Meet Princess First Time' It's a royal library.";
		npctalk "Because it is a palace.", "Taunting Man#ep16lug01";
		next;
		mes "[Nervous Man]";
		mes "He sent me on the excuse of being busy. Jonathan, I'll get you.";
		npctalk "If you hurt Jonathan, you will be arrestd.", "Taunting Man#ep16lug01";
		close;
	}
	mes "[Nervous Man]";
	mes "It is not here, either. How can I find it. There are so many books here.";
	close;
}
prt_cas,365,68,3	script	Taunting Man#ep16lug01	4_M_HUMAN_01,{ end; }



prt_cas,218,182,3	script	Royal Guardian Knight#01	4_M_CRU,{
	mes "[Royal Guardian Knight]";
	npctalk "Would you attend the Banquet?", "", bc_self;
	mes "Would you enter the Banquet Hall?";
	next;
	if (select( "Enter.", "Do not enter." ) == 2) {
		mes "[Royal Guardian Knight]";
		mes "The Banquet Hall will be open at all times. Please honor the banquet with your presence.";
		close;
	}
	mes "[Royal Guardian Knight]";
	mes "Let me escort you inside.";
	close2;
	warp "prt_cas",93,212;
	end;
}

prt_cas,97,248,5	script	Court Musician#orint	2_M_BARD_ORIENT,{
	mes "[Court Musician Orint]";
	mes "Chatting is forbidden while working.";
	next;
	if (select( "Please play a song", "Wrap up the conversation" ) == 1) {
		specialeffect EF_CHEMICAL_ALLRANGE,AREA, "Court Musician#3";
		mes "[Court Musician Orint]";
		.@r = rand(1,100);
		if (.@r < 12) {
			mes "I'll play <I miss you>.";
			playbgm "04";
		}
		else if (.@r < 22) {
			mes "I'll play <Alpen Rose>.";
			playbgm "109";
		}
		else if (.@r < 30) {
			mes "I'll play <Tales of East>.";
			playbgm "115";
		}
		else if (.@r < 37) {
			mes "I'll play <Dream of Whale>.";
			playbgm "117";
		}
		else if (.@r < 44) {
			mes "I'll play <Dazzling Snow>.";
			playbgm "137";
		}
		else if (.@r < 51) {
			mes "I'll play <Marschmallow Waltz>.";
			playbgm "145";
		}
		else if (.@r < 58) {
			mes "I'll play <Eclage>.";
			playbgm "155";
		}
		else if (.@r < 65) {
			mes "I'll play <One Step Closer>.";
			playbgm "30";
		}
		else if (.@r < 72) {
			mes "I'll play <Not so Far away>.";
			playbgm "30";
		}
		else if (.@r < 79) {
			mes "I'll play <Theme of Alberta>.";
			playbgm "15";
		}
		else if (.@r < 86) {
			mes "I'll play <Splendide Dreams>.";
			playbgm "128";
		}
		else if (.@r < 93) {
			mes "I'll play <Jittering Nightmare>.";
			playbgm "160";
		}
		else if (.@r < 100) {
			mes "I'll play <Yuna Song>.";
			playbgm "33";
		}
		else {
			mes "This is not a song in the program...";
			mes "How about listening to a song I recommend?";
			next;
			mes "[Court Musician Orint]";
			mes "I'll play <Good Morning> which has a sad story behind it.";
			playbgm "111";
			if (!achievementexists(170000))
				achievementcomplete(170000);
			mes "This is not a song in the program...";
			mes "How about listening to a song I recommend?";
			next;
			mes "I'll play <Good Morning> which has a sad story behind it.";
			npctalk "Oh, this music is!", "Banquet Hall Aristocrat", bc_self;
			npctalk "Oh, this is the song of misfortune which has been forgotten despite its musical value.", "Banquet Hall Guest#6", bc_self;
			npctalk "Isn't the song about the island where the former king has been found... Would it be OK?", "Banquet Hall Guest#6", bc_self;
		}
		close;
	}
	close;
}

// Dinner Room
prt_cas,375,124,7	script	Woman with Glasses#nir	4_F_MADAME,{
	mes "- Unlike her gaze glaring at the table while being cautious about the surroundings, the speed of her eating the food on the table is so remarkable that it is almost artistic. -";
	close;
}

prt_cas,379,124,3	script	Glamorous Girl#pop	4_F_ARUNA_POP,{
	if (rachel_ma1 < 4) {
		cutin "ra_bishop.bmp",2;
		mes "- There is a girl with a expressionless face looking at the table. Her outfit seems rather unusual in Prontera. She could be a guest attending the banquet. -";
		next;
		mes "[Glamorous Girl]";
		mes "......";
		mes "...I am hungry.";
		close3;
	}
	cutin "ra_bishop",2;
	mes "[Glamorous Girl]";
	mes "......";
	mes "Ah....!";
	next;
	mes "[Glamorous Girl]";
	mes "You... At Cheshrumnir...";
	next;
	cutin "ra_gwoman",2;
	mes "[Woman with Glasses]";
	mes "Hum hum!";
	next;
	cutin "ra_bishop",2;
	mes "[Glamorous Girl]";
	mes "...I am sorry Niren...";
	next;
	cutin "ra_gwoman",2;
	mes "[Woman with Glasses]";
	mes "Shh! Shh! Do not call me by the name, please. We are not officially invited to be here! Don't forget!";
	next;
	cutin "ra_bishop",2;
	mes "[Glamorous Girl]";
	mes "......";
	mes "Eh...";
	next;
	select("How did you come here?");
	mes "[" + strcharinfo(0) + "]";
	mes "How did you come here?";
	mes "Is it something dangerous? Is it about the international affairs or the international situation...";
	next;
	cutin "ra_bishop",2;
	emotion ET_HUK, playerattached();
	mes "[Glamorous Girl]";
	mes ".....";
	mes "In secret.";
	next;
	mes "[Glamorous Girl]";
	mes "...The banquet... Something tasty.";
	next;
	cutin "ra_gwoman",2;
	mes "[Woman with Glasses]";
	mes "<Miss Lang>";
	next;
	mes "[" + strcharinfo(0) + "]";
	mes "What?";
	next;
	cutin "ra_gwoman",2;
	mes "[Woman with Glasses]";
	mes "In the <Miss Lang Guide> which is written by Miss Lang who is the most prominent gourmet in Midgards, there is Prontera Palace.";
	next;
	cutin "ra_gwoman2",2;
	mes "[Woman with Glasses]";
	mes "Good food and drink are the most enjoyable things in life. It is worth pursuing them. Isn't it?";
	next;
	cutin "ra_bishop",2;
	mes "[Glamorous Girl]";
	mes "....";
	mes "...It tastes good.";
	next;
	cutin "ra_gwoman",2;
	mes "[Woman with Glasses]";
	mes "Anyways, we have managed to find this dining room where aren't many people. But we need to go back soon.";
	next;
	mes "[Woman with Glasses]";
	mes "I have been telling people that we are in costumes. I guess our outfits are not very appropriate for this kind of occasion in Prontera.";
	next;
	mes "[Woman with Glasses]";
	mes "Well, I guess you have looked around enough. Let's go back before anyone comes.";
	next;
	cutin "ra_bishop",2;
	mes "[Glamorous Girl]";
	mes "Yes...";
	next;
	cutin "",255;
	mes "- However the cookie plate is held tightly by the right hand of the Pope. -";
	close;
}

prt_cas,368,125,3	script	Dumk#ep16_etc03	4_M_SHADOWCHASER,{
	if ((eaclass()&EAJ_THIRDMASK) == EAJ_SHADOW_CHASER) {
		mes "[Dumk]";
		mes "Oh, who is this.";
		mes "You are" + strcharinfo(0) + "the one who would lead to the highest peaks of dark art, right?";
		cutin "3rd_sc_doomk01.bmp",0;
		next;
		mes "[Dumk]";
		mes "You've been invited to this banquet too?";
		mes "Hum, are you the hero of the century recommended by the guild?";
		cutin "3rd_sc_doomk04.bmp",0;
		next;
		mes "[Dumk]";
		mes "Ha, what a nonsense to disregard me, Dumk!";
		mes "I can never agree to that.";
		next;
		mes "[Dumk]";
		mes "By the way, where is Vicente?";
		cutin "3rd_sc_doomk06.bmp",0;
		next;
		mes "[Dumk]";
		mes "Hey, you assassin, do you know Vicente?";
		cutin "3rd_sc_doomk02.bmp",0;
		next;
		mes "[Kid]";
		mes "...Cut it out there, Dumk...";
		cutin "moc2_kid03.bmp",2;
		close2;
		cutin "",255;
		npctalk "What did I do?", "", bc_self;
		end;
	}
	npctalk "Where is he?", "Dumk#ep16_etc03", bc_self;
	setpcblock PCBLOCK_NPC, true;
	sleep2 3000;
	npctalk "I don't know.", "Kid#ep16_etc04", bc_self;
	sleep2 3000;
	npctalk "Find him! It's your specialty!", "Dumk#ep16_etc03", bc_self;
	sleep2 3000;
	npctalk "Why should I do that? You have been insufferable.", "Kid#ep16_etc04", bc_self;
	sleep2 3000;
	npctalk "Hey, I am of a higher rank than you. Where is Vicente!", "Dumk#ep16_etc03", bc_self;
	sleep2 3000;
	npctalk "...Look for your nanny at your own home!", "Kid#ep16_etc04", bc_self;
	sleep2 3000;
	npctalk "Watch whom you are talking to!!! Do you want to pick a trouble with me!", "Dumk#ep16_etc03", bc_self;
	sleep2 1000;
	setpcblock PCBLOCK_NPC, false;
	unittalk getcharid(3), "" + strcharinfo(0) + " : (Shaking the head from side to side)", bc_self;
	emotion ET_STARE_ABOUT, playerattached();
	end;
}

prt_cas,367,123,7	script	Kid#ep16_etc04	4_M_ACROSS,{
	if (mao_morocc2 > 99) {
		mes "[Kid]";
		mes "It's been a long time. Did you catch up with Lin and Ekinasia?";
		cutin "mocseal_kid01.bmp",2;
		next;
		mes "[Kid]";
		mes "They seemed very excited in the fancy place...";
		next;
		mes "...It is a pain to stand in a place where you don't belong...";
		close2;
		cutin "",255;
		sleep2 500;
	}
	npctalk "Where is he?", "Dumk#ep16_etc03", bc_self;
	setpcblock PCBLOCK_NPC, true;
	sleep2 3000;
	npctalk "I don't know.", "Kid#ep16_etc04", bc_self;
	sleep2 3000;
	npctalk "Find him! It's your specialty!", "Dumk#ep16_etc03", bc_self;
	sleep2 3000;
	npctalk "Why should I do that? You have been insufferable.", "Kid#ep16_etc04", bc_self;
	sleep2 3000;
	npctalk "Hey, I am of a higher rank than you. Where is Vicente!", "Dumk#ep16_etc03", bc_self;
	sleep2 3000;
	npctalk "...Look for your nanny at your own home!", "Kid#ep16_etc04", bc_self;
	sleep2 3000;
	npctalk "Watch whom you are talking to!!! Do you want to pick a trouble with me!", "Dumk#ep16_etc03", bc_self;
	sleep2 1000;
	setpcblock PCBLOCK_NPC, false;
	unittalk getcharid(3), "" + strcharinfo(0) + " : (Shaking the head from side to side)", bc_self;
	emotion ET_STARE_ABOUT, playerattached();
	end;
}

// Corridor left
prt_cas,161,168,5	script	Royal Guardian Knight#02	4_M_CRU,{
	mes "[Guardian Knight]";
	mes "You are a visitor to the Prontera Palace.";
	mes "Do you need a guide?";
	next;
	switch( select( "Valkyrie Realm", "Royal Villa", "Banquet Hall" ) ) {
	case 1:
		mes "[Guardian Knight]";
		mes "You may move to the northern corridor from here.";
		mes "There is the entrance to Valkyrie Realm in the middle of the northern corridor.";
		close;
	case 2:
		mes "[Guardian Knight]";
		mes "The door on the left is the entrance to the royal villa.";
		mes "There are the residences for the Heine, Nerius and Walther families and a room reserved for a special guest.";
		close;
	case 3:
		mes "[Guardian Knight]";
		mes "You can enter the Banquet Hall through the big gate which appears when you go to the center by following the corridor on the right from here.";
		close;
	}
}

// Corridor right
prt_cas,270,168,3	duplicate(Royal Guardian Knight#02)	Royal Guardian Knight#03	4_M_CRU

// Exchanges and enchants npc
prt_cas,165,255,7	script	Commissary#ep16	4_M_JOB_KNIGHT2,{
	mes "[Commissary Arner]";
	mes "You can exchange the Honor Marks given by the noble people of Rune-Midgarts as the token of trust with some valuable items of Prontera.";
	next;
	switch( select( "Consumables", "Armors", "View item description" ) ) {
	case 1:
		.@type$ = "Consumable";
		setarray .@data[0],
			22899,2,	// City Map
			11600,6,	// Shining Holy Water
			22848,6,	// Prison Key
			22847,6;	// Prontera Badge
		break;
	case 2:
		.@type$ = "Armor";
		setarray .@data[0],
			28354,300,	// City Map[1]
			28355,800,	// Shining Holy Water [1]
			28900,800,	// Royal Guard Shield
			28356,300,	// Prontera Badge
			15146,1200,	// Flattery Robe
			15147,1200,	// Invective Robe
			20246,2200,	// Costume Time Decor
			20247,2200;	// Black Hand of Destiny
		break;
	case 3:
		mes "[Commissary Arner]";
		mes "Would you view the item description?";
		close2;
		readbook 11061,1;
		end;
	}
	.@size = getarraysize(.@data);
	for ( .@i = 0; .@i < .@size; .@i += 2 )
		.@menu$ = .@menu$ + getitemname(.@data[.@i]) + ":";
	mes "[Commissary Arner]";
	mes "The ^3131FF" + .@type$ + "s^000000 you can exchange with the Honor Marks are as follows.";
	next;
	.@s = (select(.@menu$) - 1) * 2;
	mes "[Commissary Arner]";
	mes "^3131FF" + getitemname(.@data[.@s]) + "^000000... You've been looking at this.";
	mes "It is a useful-looking " + .@type$ + ".";
	mes "It can be exchanged for ^FF0000" + .@data[.@s+1] + " Honor Marks^000000.";
	next;
	if (select( "Exchange", "Cancel" ) == 2) {
		mes "[Commissary Arner]";
		mes "For the glory of Prontera!";
		close;
	}
	if (countitem(6919) < .@data[.@s+1]) {
		mes "[Commissary Arner]";
		mes "You don't have enough Honor Marks.";
		close;
	}
	mes "[Commissary Arner]";
	mes "It is the symbol of honor in Prontera. Please take good care of it.";
	delitem 6919,.@data[.@s+1];
	getitem .@data[.@s],1;
	close;
}

prt_cas,180,275,5	script	Logistics Manager#sin	4_M_JOB_KNIGHT1,{
	mes "[Sin the Logistics Manager]";
	mes "Are you the adventurer invited to the banquet every one is talking about?";
	mes "Do you have any <Honor Marks>? Would you give them to me?";
	next;
	if (select( "Why do you need them?", "Give 30 Honor Marks." ) == 1) {
		mes "[Sin the Logistics Manager]";
		mes "Even if I work so hard here my entire life, I would always live in the shade.";
		mes "If you are a man, you should dream big. I always say that to Arner, but he is just too priggery.";
		next;
		mes "[Sin the Logistics Manager]";
		mes "I don't dream of becoming rich overnight, but I do want to have some honor since I am a man.";
		next;
		mes "[Sin the Logistics Manager]";
		mes "The aristocrats would never let me handle some great opportunity though. However, you may have acquired some <Honor Marks>, right?";
		next;
		mes "[Sin the Logistics Manager]";
		mes "If you give me ^FF0000 30 <Honor Marks>^000000, I'll give you something really useful.";
		mes "For people like us, the <Honor Marks> mean rapid promotion.";
		next;
		mes "[Sin the Logistics Manager]";
		mes "What I have is a wrapped box which is one of the items that Arner has.";
		next;
		mes "[Sin the Logistics Manager]";
		mes "It is authentic for that it has been made to be distributed to the nobility. However, I don't know what's in there. It depends on your luck.";
		next;
		mes "[Sin the Logistics Manager]";
		mes "After collecting all the Honor Marks, I'll take that build a castle on the shore and spend the rest of my life there with that stubborn Arner.";
		mes "That stupid Arner. If it was not for me, he would stay in the palace exchanging things until he dies.";
		close;
	}
	if (countitem(6919) < 30) {
		mes "[Sin the Logistics Manager]";
		mes "I have told you I need 30 of them.";
		close;
	}
	mes "[Sin the Logistics Manager]";
	mes "Thank you. This is the thing I have promised.";
	delitem 6919,30;// TokenOfHonor
	getitem 22901,1;// BlueboxOfQuestions
	close;
}

prt_cas,180,264,3	script	Guardian Knight#ep16_prigate01	4_M_CRU,{
	npctalk "The Crusader's Office is at the end of the corridor.", "Guardian Knight#ep16_prigate01", bc_self;
	end;
}

prt_cas,180,251,3	script	Guardian Knight#ep16_prigate02	4_M_CRU,{
	npctalk "...On duty. No problem...", "Guardian Knight#ep16_prigate02", bc_self;
	setpcblock PCBLOCK_NPC, true;
	sleep2 2000;
	setpcblock PCBLOCK_NPC, false;
	npctalk "I want to go home now.", "Guardian Knight#ep16_prigate02", bc_self;
	end;
}

// Prontera of the past
prt_q,157,334,3	script	Nillem#ep16_pprt01	4_M_JOB_WIZARD,{
	if (ep16_royal == 21) {
		mes "[Nillem]";
		mes "How terrifying.";
		mes "This must be Prontera in the past?";
		mes "I guess we have picked the right time to be here-";
		next;
		mes "[Nillem]";
		mes "Shall we look around more?";
		mes "Or go back?";
		next;
		select("It that possible?");
		mes "[Nillem]";
		mes "Whoa, don't you underestimate me.";
		mes "I am a Court Mage.";
		mes "I studied in Eclage.";
		next;
		mes "[Nillem]";
		mes "I have also learned a lot of things at the Cat Paw Services!";
		mes "I believe that I have the most thorough knowledge when it comes to the crack of dimension!";
		next;
		mes "[Nillem]";
		mes "As long as it is from a place on the crack of dimension,";
		mes "It is a piece of care to go back!";
		next;
		mes "[Nillem]";
		mes "Since we don't belong to this time, it is much easier to get out than to enter.";
		next;
		mes "[Nillem]";
		mes "So, what are you going to do?";
		setquest 7703;// Who Knows the Truth
		erasequest 7702;// Prontera at the Time
		ep16_royal = 22;
		next;
		if (select( "Let's get in.", "Let's go back to our time." ) == 1) {
			mes "[Nillem]";
			mes "Do you remember the gate we got out?";
			mes "It is supposed to be connected to the inside of the palace.";
			next;
			mes "[Nillem]";
			mes "However, we arrived here. I guess the spaces are twisted a little so that they are connected.";
			next;
			mes "[Nillem]";
			mes "I have already experimented this. If you enter the entrance to the palace,";
			mes "It is connected to the ^4d4dffPast Memories of the Royal Family^000000 which we have just been to.";
			next;
			mes "[Nillem]";
			mes "Then, shall we march in?";
			close;
		}
		mes "[Nillem]";
		mes "Whoa, shall we organize the thoughts now?";
		next;
		mes "[Nillem]";
		mes "^4d4dffWhat was in the Room of Consciousness^000000 must have been...";
		mes "Well, this must have something to do with ^4d4dffthe undead army attacking Prontera^000000 now.";
		mes "Well, it must have been ^4d4dfftaken away by them^000000, am I right?";
		next;
		select("Right.");
		mes "[Nillem]";
		mes "Can we stop this?";
		mes "Or, can we take it with us?";
		next;
		mes "[Nillem]";
		mes "I believe our superiors will order us to do so.";
		mes "Try whatever it takes to make it work.";
		next;
		select("I guess so.");
		mes "[Nillem]";
		mes "Perhaps, well it is just my imagination though.";
		mes "Whatever was in the Room of Consciousness was taken, right?";
		mes "However, the royal families have been performing the ritual without knowing that somehow.";
		next;
		mes "[Nillem]";
		mes "They must have done something or it must have returned...";
		mes "This could meet the condition to see the sealed part of the ^4d4dffPast Memories of the Royal Family^000000...";
		next;
		select("You mean, the ones who know the truth?");
		mes "[Nillem]";
		mes "Yes, I mean that. If this is the truth which is the key to open the seal,";
		mes "We are bringing an important piece of information back with us.";
		next;
		mes "[Nillem]";
		mes "We didn't protect or take the thing...";
		mes "But we know the truth now. It will break the seal of the document...";
		next;
		mes "[Nillem]";
		mes "As the secret of the royal family is revealed, we will get the missing pieces of the puzzle.";
		mes "Hahahaha, and you are the one who would be the center of all that, my darling!";
		next;
		select("Don't call me that!");
		mes "[Nillem]";
		mes "What about it?";
		mes "We will see each other everyday from now on, won't we?";
		unittalk getcharid(3), "" + strcharinfo(0) + " : ......Phew..", bc_self;
		next;
		mes "[Nillem]";
		mes "Well, shall we go back then?";
		mes "Our mission here is done for now!";
		next;
		mes "[Nillem]";
		mes "Let's go back!";
		mes "Nothing good can be done staying in a place which is not of our time too long";
		next;
		mes "[Nillem]";
		mes "Well, then get ready!";
		mes "Three!";
		sleep2 2000;
		mes "Two!";
		sleep2 1000;
		mes "One!";
		close2;
		warp "prt_lib",88,80;
		end;
	}
	mes "[Nillem]";
	mes "Haha! This place is exciting...";
	mes "...As always.";
	next;
	if (select( "Let's get out of here!", "I'll look around." ) == 2) {
		mes "[Nillem]";
		mes "Have a safe trip!";
		close;
	}
	mes "[Nillem]";
	mes "Let's go it!";
	mes "Forget everything and let's get out-";
	close2;
	warp "prt_lib",89,43;
	end;
}

prt_q,159,328,6	script	Medic#EP162PS18	4_F_ACOLYTE,{
	specialeffect EF_HEAL3,AREA,"Wounded Soldier#EP161PS";
	mes "[Soldier]";
	mes "Hey, you need to be cured first.";
	close;
}

prt_q,160,327,5	script	Wounded Soldier#EP161PS17	8W_SOLDIER,{
	emotion ET_STARE;
	mes "[Soldier]";
	mes "Argh... Those undead bastards... I'll kill them all...";
	close;
}

prt_q,165,326,6	script	Soldier#EP162PS01	8W_SOLDIER,1,1,{
	mes "[Soldier]";
	sscanf( strnpcinfo(2), "EP162PS%d", .@num );
	switch(.@num) {
	case 1:
		emotion ET_FRET;
		mes "Argh.... Those undead...";
		close;
	case 2:
		emotion ET_CRY;
		mes "My colleague who had been laughing with me just... Aww...";
		close;
	case 3:
		mes "Please. Don't get yourself killed by the enemy.";
		close;
	case 4:
		emotion ET_CONFUSE;
		mes "What was it that had dropped from the sky? How could it bring the undead to the capital?";
		close;
	case 5:
		emotion ET_STARE;
		mes "I'll... I'll make sure to defend this place.";
		close;
	case 6:
		emotion ET_OTL;
		mes "The endless battle against the enemies...";
		close;
	case 7:
		mes "An eccentric scientist, Doyeon, went out there with soldiers, and there has been no message from them. I am getting worried.";
		close;
	case 8:
		emotion ET_PROFUSELY_SWEAT;
		mes "Damn it... Those undead...";
		close;
	case 9:
		mes "Scientist Doyeon... Would she be OK? How can she go out there to study in a situation like this?";
		close;
	case 10:
		mes "The troops of immortality... They are really strong. Please be careful.";
		close;
	case 11:
		emotion ET_ROCK;
		mes "We will defend the palace of Prontera.";
		close;
	case 12:
		emotion ET_OHNO;
		mes "My family live in Prontera. I wonder if they have fled safely.";
		close;
	case 13:
		emotion ET_HUM;
		mes "Thank god... The undead are not coming this way much. What a relief.";
		close;
	case 14:
		mes "My friend has followed Scientist Doyeon. I am worried. I have heard that she really is an oddball.";
		close;
	case 15:
		emotion ET_OHNO;
		mes "Hahaha, I was supposed to have a romantic dinner with my girlfriend, damn it!";
		close;
	case 16:
		emotion ET_PROFUSELY_SWEAT;
		mes "Humph! Bring it on!";
		close;
	}
	end;
OnTouch:
	end;
OnTouchNPC:
	sscanf( strnpcinfo(2), "EP162PS%d", .@num );
	setarray .@text$[1],
		"Soldier: Huh!",
		"Soldier: Hiya!",
		"Soldier: Heh...",
		"Soldier: Humph!",
		"Soldier: Whoa!",
		"Soldier: Argh!",
		"Soldier: Humph!",
		"Soldier: Huh!",
		"Soldier: Hiya!",
		"Soldier: Humph!",
		"Soldier: Huh!",
		"Soldier: Whoa!",
		"Soldier: Argh!",
		"Soldier: Hiya!",
		"Soldier: Whoa!",
		"Soldier: Argh...";
	npctalk .@text$[.@num];
	specialeffect EF_ATTACKENERGY2;
	unitwarp 0,"prt_q",100,100;
	end;
}
prt_q,167,324,6	duplicate(Soldier#EP162PS01)	Soldier#EP162PS02	8W_SOLDIER,1,1
prt_q,165,322,6	duplicate(Soldier#EP162PS01)	Soldier#EP162PS03	8W_SOLDIER,1,1
prt_q,167,320,6	duplicate(Soldier#EP162PS01)	Soldier#EP162PS04	8W_SOLDIER,1,1
prt_q,165,318,6	duplicate(Soldier#EP162PS01)	Soldier#EP162PS05	8W_SOLDIER,1,1
prt_q,146,326,2	duplicate(Soldier#EP162PS01)	Soldier#EP162PS06	8W_SOLDIER,1,1
prt_q,144,324,2	duplicate(Soldier#EP162PS01)	Soldier#EP162PS07	8W_SOLDIER,1,1
prt_q,146,322,2	duplicate(Soldier#EP162PS01)	Soldier#EP162PS08	8W_SOLDIER,1,1
prt_q,144,320,2	duplicate(Soldier#EP162PS01)	Soldier#EP162PS09	8W_SOLDIER,1,1
prt_q,146,318,2	duplicate(Soldier#EP162PS01)	Soldier#EP162PS10	8W_SOLDIER,1,1
prt_q,149,316,4	duplicate(Soldier#EP162PS01)	Soldier#EP162PS11	8W_SOLDIER,1,1
prt_q,151,314,4	duplicate(Soldier#EP162PS01)	Soldier#EP162PS12	8W_SOLDIER,1,1
prt_q,153,316,4	duplicate(Soldier#EP162PS01)	Soldier#EP162PS13	8W_SOLDIER,1,1
prt_q,158,316,4	duplicate(Soldier#EP162PS01)	Soldier#EP162PS14	8W_SOLDIER,1,1
prt_q,160,314,4	duplicate(Soldier#EP162PS01)	Soldier#EP162PS15	8W_SOLDIER,1,1
prt_q,162,316,4	duplicate(Soldier#EP162PS01)	Soldier#EP162PS16	8W_SOLDIER,1,1

prt_q,156,324,6	script	Chief Guard#EP161PG	4_EP16_SPIEGEL,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (BaseLevel < 140) {
		mes "[Chief Guard Spiegel]";
		mes "Are you an adventurer? I am sorry, but I am in the middle of something. Please leave me alone.";
		close;
	}

	switch( checkquest(5452,PLAYTIME) ) {
	case -1:
		break;
	case 0:
	case 1:
		mes "[Chief Guard Spiegel]";
		mes "I thank you on behalf of the Prontera Guards.";
		next;
		mes "[Chief Guard Spiegel]";
		mes "We will make sure to end the battle with the undead as soon as possible.";
		close;
	case 2:
		erasequest 5452;// [Stand by]Request from Chief Guard
		break;
	}

	setarray .@completed_list[0],5456,5459,5462,5468;
	setarray .@sub_quest_5456[0],5448,5453,5454,5455;
	setarray .@sub_quest_5459[0],5449,5457,5458;
	setarray .@sub_quest_5462[0],5450,5460,5461;
	setarray .@sub_quest_5468[0],5451,5463,5464,5465,5466,5467;

	for ( .@i = 0; .@i < 4; .@i++ ) {
		if (isbegin_quest(.@completed_list[.@i]) == 1) {// quest completed
			.@main_quest_id = .@completed_list[.@i];
			break;
		}
		.@size = getarraysize( getd( ".@sub_quest_" + .@completed_list[.@i] ) );
		for ( .@j = 0; .@j < .@size; .@j++ ) {
			if (isbegin_quest( getd( ".@sub_quest_" + .@completed_list[.@i] + "[" + .@j + "]") ) == 1) {// sub quest started
				.@sub_quest_id = getd( ".@sub_quest_" + .@completed_list[.@i] + "[0]");
				break;
			}
		}
		if (.@j < .@size)
			break;
	}

	switch(.@main_quest_id) {
	case 5456:
		mes "[Chief Guard Spiegel]";
		mes "I heard from the soldier dispatched to the area near the village office that you helped the villagers.";
		next;
		mes "[Chief Guard Spiegel]";
		mes "He is a young man who has been hanging around in the village for a while. He seems to work diligently...";
		next;
		mes "[Chief Guard Spiegel]";
		mes "However, Mr. Quadro who runs Prontera Smelter seems to have lost an important document in the chaos.";
		next;
		mes "[Chief Guard Spiegel]";
		mes "He is the one in charge of the weapons used by the guards. I am worried if it would cause any trouble in his work.";
		next;
		emotion ET_THANKS;
		mes "[Chief Guard Spiegel]";
		mes "Oh! Anyways, thank you for helping the villagers.";
		next;
		erasequest 5456;// Ungrateful(4)
		setquest 5452;// [Stand by]Request from Chief Guard
		getexp 800000,250000;
		getitem 6919,4;// TokenOfHonor
		mes "[Chief Guard Spiegel]";
		mes "Since we are in a difficult situation, we cannot offer you anything too spectacular, but this is the rewards for you prepared by the Guards.";
		close;
	case 5459:
		mes "[Chief Guard Spiegel]";
		mes "I heard from the soldiers dispatched to the Knights' building that you saved Lowen.";
		next;
		mes "[Chief Guard Spiegel]";
		mes "Lowen is a spirited girl who claims that she likes the Crusaders to the Royal Lord Knights.";
		next;
		mes "[Chief Guard Spiegel]";
		mes "Rosa who is the younger sister to the girl is also popular among our soldiers.";
		next;
		emotion ET_THANKS;
		mes "[Chief Guard Spiegel]";
		mes "I thank you on behalf of the Prontera Guards.";
		next;
		erasequest 5459;// Find My Sister(3)
		setquest 5452;// [Stand by]Request from Chief Guard
		getexp 800000,250000;
		getitem 6919,4;// TokenOfHonor
		mes "[Chief Guard Spiegel]";
		mes "Since we are in a difficult situation, we cannot offer you anything too spectacular, but this is the rewards for you prepared by the Guards.";
		close;
	case 5462:
		mes "[Chief Guard Spiegel]";
		mes "I heard from the soldier dispatched to the village office that a soldier on his vacation has been fled here.";
		next;
		mes "[Chief Guard Spiegel]";
		mes "I guess there has been a soldier on vacation during such a difficult time. I had been ignorant of it before I got the report.";
		next;
		emotion ET_THANKS;
		mes "[Chief Guard Spiegel]";
		mes "I am faced with my inadequacies as the one in charge of the security of the capital.";
		next;
		erasequest 5462;// Blatant Bluff(3)
		setquest 5452;// [Stand by]Request from Chief Guard
		getexp 800000,250000;
		getitem 6919,4;// TokenOfHonor
		mes "[Chief Guard Spiegel]";
		mes "Since we are in a difficult situation, we cannot offer you anything too spectacular, but this is the rewards for you prepared by the Guards.";
		close;
	case 5468:
		mes "[Chief Guard Spiegel]";
		mes "I heard from the soldier in the cathedral that you saved the couple, Eryus and Ellie.";
		next;
		mes "[Chief Guard Spiegel]";
		mes "I think I have heard of their names. I have heard that they irritate the minds of lonely soldiers with their endless public display of affection.";
		next;
		emotion ET_THANKS;
		mes "[Chief Guard Spiegel]";
		mes "Everyone in Prontera must know about it. Anyways, thank you for doing this for the Guards.";
		next;
		erasequest 5468;// Mad Love for Wife(6)
		setquest 5452;// [Stand by]Request from Chief Guard
		getexp 800000,250000;
		getitem 6919,4;// TokenOfHonor
		mes "[Chief Guard Spiegel]";
		mes "Since we are in a difficult situation, we cannot offer you anything too spectacular, but this is the rewards for you prepared by the Guards.";
		close;
	}

	if (.@sub_quest_id > 0) {
		mes "[Chief Guard Spiegel]";
		mes "I'll mark the places to which the soldiers haven't been dispatched to due to circumstances on the map.";
		next;
		switch(.@sub_quest_id) {
		case 5448:
			viewpoint 1,221,193,1,0xFF0000;
			break;
		case 5449:
			viewpoint 1,276,242,1,0xFF0000;
			break;
		case 5450:
			viewpoint 1,140,304,1,0xFF0000;
			break;
		case 5451:
			viewpoint 1,38,261,1,0xFF0000;
			break;
		}
		mes "[Chief Guard Spiegel]";
		mes "Please help any villagers in trouble if you find them.";
		close;
	}
	emotion ET_STARE;
	mes "[Chief Guard Spiegel]";
	mes "Don't stand there in the middle of our line! Watch out!";
	next;
	emotion ET_COMEON;
	mes "[Chief Guard Spiegel]";
	mes "If you are hurt step back to get yourself cured. If you are recovered, get back in the line.";
	next;
	mes "[Chief Guard Spiegel]";
	mes "Huh? I haven't seen you before. You seem like a civilian. Why are you coming from there?";
	next;
	emotion ET_HUK;
	mes "[Chief Guard Spiegel]";
	mes "What? Have the undead entered the palace already?";
	next;
	select("No... I don't think so... I am just...");
	mes "[Chief Guard Spiegel]";
	mes "So you are supposed to be an adventurer invited to the banquet, right?";
	next;
	emotion ET_QUESTION;
	mes "[Chief Guard Spiegel]";
	mes "Has there been a banquet in the palace lately? I don't remember.";
	next;
	mes "[Chief Guard Spiegel]";
	mes "Well... Since we are busy dealing with";
	mes "the undead invading the village, as long as the palace is safe from the undead, I won't make a big deal out of it.";
	next;
	mes "[Chief Guard Spiegel]";
	mes "I won't stop you from moving around the town. I'll mark the places to which the soldiers haven't been dispatched to due to circumstances on the map.";
	emotion ET_PROFUSELY_SWEAT;
	.@quest_id = rand(5448,5451);
	switch(.@quest_id) {
	case 5448:
		viewpoint 1,221,193,1,0xFF0000;
		break;
	case 5449:
		viewpoint 1,276,242,1,0xFF0000;
		break;
	case 5450:
		viewpoint 1,140,304,1,0xFF0000;
		break;
	case 5451:
		viewpoint 1,38,261,1,0xFF0000;
		break;
	}
	setquest .@quest_id;// Request from Chief Guard
	next;
	mes "[Chief Guard Spiegel]";
	mes "Please help any villagers in trouble if you find them.";
	close;
}


// Request 1
prt_q,221,193,0	script	Lad Quest_START#EP161QU01	HIDDEN_WARP_NPC,6,6,{
	end;
OnTouch:
	if (isbegin_quest(5448) == 1) {
		cloakoffnpc "Village Lad#EP161HO01", getcharid(0);
		npctalk "Village Lad: Arghhhhhh!", "Village Lad#EP161HO01", bc_self;
	}
	end;
}

prt_q,221,193,4	script	Village Lad#EP161HO01	4_M_03,{
	if (checkweight(1301,3) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5448) == 1) {
		emotion ET_CRY;
		mes "[Village Lad]";
		mes "Whoa... You are not an undead, aren't you?";
		next;
		mes "[Village Lad]";
		mes "Haha... I am alive now.";
		next;
		mes "[Village Lad]";
		mes "Do you know how scare I have been? This place was packed with the undead, and I heard screams from everywhere.";
		next;
		erasequest 5448;// Request from Chief Guard
		setquest 5453;// Ungrateful(1)
		viewpoint 2,221,193,1,0xFF0000;
		mes "[Village Lad]";
		mes "Thank god... The shelter is supposed to be near the village office over there. Why don't we continue this conversation there?";
		close2;
	}
	else {
		mes "[Village Lad]";
		mes "Do you see me? How strange. I am not supposed to be seen.";
		close2;
	}
	cloakonnpc "Village Lad#EP161HO01", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}

// Office
prt_q,79,96,7	script	Soldier#EP161HO02	8W_SOLDIER,5,5,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5454) == 1) {
		emotion 55;
		mes "[Village Lad]";
		mes "Huh...? What a nerve! That guy... Save a stranger from the sea, and heรนรฉll ask for more...";
		next;
		emotion 17;
		mes "[Village Lad]";
		mes "Oh! I wasn't going to eavesdrop. Please don't get me wrong.";
		close;
	}
	if (isbegin_quest(5462) == 1) {
		emotion 20;
		mes "[Village Lad]";
		mes "Dear adventurer. I believe that uniform is worn by the Guards of Geffen.";
		next;
		emotion 9;
		mes "[Village Lad]";
		mes "Who is that soldier? He seems to enter the shelter so smoothly in a situation like this. He confuses me.";
		close;
	}
	mes "[Village Lad]";
	mes "This the village office which is the third shelter in Prontera.";
	close;

OnTouch:
	if (isbegin_quest(5453) == 1 || isbegin_quest(5455) == 1)
		cloakoffnpc "Village Lad#EP161HO03", getcharid(0);
	if (isbegin_quest(5461) == 1)
		cloakoffnpc "Soldier#EP161HU03", getcharid(0);
	end;
}

prt_q,77,98,8	script	Village Lad#EP161HO03	4_M_03,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5453) == 1) {
		emotion ET_DELIGHT;
		mes "[Village Lad]";
		mes "Whoa... I am saved. How fortunate. I guess I am a lucky man.";
		next;
		emotion ET_SURPRISE;
		emotion ET_QUESTION;
		emotion ET_HUK;
		mes "[Village Lad]";
		mes "Wait? Where did it go? I think I lost the Tool Bag while I was running.";
		next;
		mes "[Village Lad]";
		mes "I can guess where it has been dropped...";
		next;
		emotion ET_SEXY;
		mes "[Village Lad]";
		mes "You must be pretty tough to roam the village in a situation like this. Please do me a favor.";
		next;
		mes "[Village Lad]";
		mes "Do you know where the Prontera Smelter is?";
		next;
		mes "[Village Lad]";
		mes "It is quite a famous store in Prontera. Someday, I will...";
		next;
		erasequest 5453;// Ungrateful(1)
		setquest 5454;// Ungrateful(2)
		mes "[Village Lad]";
		mes "Oh! Never mind. I am counting on you.";
		close2;
		cloakonnpc "Village Lad#EP161HO03", getcharid(0);
		end;
	}
	if (isbegin_quest(5455) == 1) {
		emotion ET_CONGRATULATION;
		mes "[Village Lad]";
		mes "Whoa... I thought I have lost it. You really found it!";
		next;
		emotion ET_STARE_ABOUT;
		mes "[Village Lad]";
		mes "This is awesome. Thank you so much. You must be busy, right? I have to go take care of something now...";
		next;
		emotion ET_STARE_ABOUT;
		mes "[Village Lad]";
		mes "Oh! I know you are strong enough, but please be careful.";
		next;
		erasequest 5455;// Ungrateful(3)
		setquest 5456;// Ungrateful(4)
		mes "[Village Lad]";
		mes "Thank you. Farewell.";
		close2;
		cloakonnpc "Village Lad#EP161HO03", getcharid(0);
		end;
	}
	mes "[Village Lad]";
	mes "Do you see me? How strange. I am not supposed to be seen.";
	close2;
	cloakonnpc "Village Lad#EP161HO03", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}

prt_q,178,185,0	script	Tool Bag#EP161HO04	HIDDEN_WARP_NPC,2,2,{
	end;
OnTouch:
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5454) == 1) {
		mes "In front of the Prontera Smelter";
		mes "There a bag which would be full if you put some items.";
		next;
		if (select( "Pick up.", "Leave it." ) == 1) {
			erasequest 5454;// Ungrateful(2)
			setquest 5455;// Ungrateful(3)
			mes "You have acquired a bag.";
		}
		close;
	}
	end;
}

prt_q,85,90,7	script	Giant Beast Manager#EP161ETC06	8W_SOLDIER,{
	.@thirdmask = eaclass() & EAJ_THIRDMASK;
	if ((.@thirdmask != EAJ_RUNE_KNIGHT && .@thirdmask != EAJ_ROYAL_GUARD) || countitem(6939) < 1) {
		emotion 19;
		mes "[Giant Beast Manager]";
		mes "This the village office which is the third shelter in Prontera.";
		close;
	}
	if (.@thirdmask == EAJ_RUNE_KNIGHT) {
		.@job$ = "Rune Knight";
		.@mount$ = "Dragon";
	}
	else {
		.@job$ = "Royal Guard";
		.@mount$ = "Griffon";
	}
	mes "[Giant Beast Manager]";
	mes "Oh! Dear " + .@job$ + "... That belt? It looks like a belt which belongs to my colleague who has been killed by the undead.";
	next;
	mes "[Giant Beast Manager]";
	mes "Would you hand it over to me so that I can comfort his poor soul? Although the service is stopped due to the emergency, let me help you ride a " + .@mount$ + ".";
	next;
	if (select( "Use the service.", "Cancel." ) == 2) {
		mes "[Giant Beast Manager]";
		mes "I see. Then, good bye.";
		close;
	}
	if (getskilllv("KN_RIDING") < 1) {
		mes "[Giant Beast Manager]";
		mes "You need to learn how to ride a " + .@mount$ + " first.";
		close;
	}
	if (checkriding() || checkdragon()) {
		mes "[Giant Beast Manager]";
		mes "You are already using a " + .@mount$ + ".";
		close;
	}
	if (ismounting()) {
		mes "[Giant Beast Manager]";
		mes "You need to let go of the bridle to ride a " + .@mount$ + ".";
		close;
	}
	delitem 6939,1;	// Shabby_Old_Belt
	if (.@thirdmask == EAJ_RUNE_KNIGHT)
		setdragon();
	else
		setriding();
	mes "[Giant Beast Manager]";
	mes "Thank you. If you find other articles left by the dead soldiers, please bring them to me.";
	close;
}

prt_q,74,101,7	script	Magical Gear Mechanic#EP161ETC05	8W_SOLDIER,{
	.@thirdmask = eaclass() & EAJ_THIRDMASK;
	if (.@thirdmask != EAJ_MECHANIC || countitem(6939) < 1) {
		emotion 19;
		mes "[Magical Gear Mechanic]";
		mes "This the village office which is the third shelter in Prontera.";
		close;
	}
	mes "[Magical Gear Mechanic]";
	mes "Oh, dear Mechanic! That belt? It looks like a belt which belongs to my colleague who has been killed by the undead.";
	next;
	mes "[Magical Gear Mechanic]";
	mes "Would you hand it over to me so that I can comfort his poor soul? Although the service is stopped due to the emergency, let me help you borrow a Cart or ride a Magical Gear.";
	next;
	switch( select( "Borrow a Cart.", "Ride a Magical Gear", "Do not use it." ) ) {
	case 1:
		if (checkcart() == true) {
			mes "[Magical Gear Mechanic]";
			mes "You are already using a Cart.";
			close;
		}
		if (getskilllv("MC_PUSHCART") == 0)	// the check is missing officially
			close;
		delitem 6939,1;	// Shabby_Old_Belt
		setcart();
		mes "[Magical Gear Mechanic]";
		mes "Thank you. If you find other articles left by the dead soldiers, please bring them to me.";
		close;
	case 2:
		if (checkmadogear()) {
			mes "[Magical Gear Mechanic]";
			mes "You cannot ride another magical gear since you are already riding one.";
			close;
		}
		if (getskilllv("NC_MADOLICENCE") < 1) {
			mes "[Magical Gear Mechanic]";
			mes "Go get a license to ride a magical gear first.";
			close;
		}
		delitem 6939,1;	// Shabby_Old_Belt
		setmadogear();
		mes "[Magical Gear Mechanic]";
		mes "Thank you. If you find other articles left by the dead soldiers, please bring them to me.";
		close;
	case 3:
		mes "[Magical Gear Mechanic]";
		mes "Oh... Really. I see.";
		close;
	}
}

// Request 2
prt_q,276,242,0	script	Girl Quest_START#EP161QU02	HIDDEN_WARP_NPC,6,6,{
	end;
OnTouch:
	if (isbegin_quest(5449) == 1 && isbegin_quest(5457) == 0) {
		cloakoffnpc "Girl#EP161GU01", getcharid(0);
		npctalk "Girl: Awwww...", "Girl#EP161GU01", bc_self;
	}
	end;
}

prt_q,276,242,4	script	Girl#EP161GU01	4_F_RUSCHILD,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5449) == 1 && isbegin_quest(5457) == 0) {
		select("Hey dear, are you OK?");
		emotion ET_QUESTION, playerattached();
		emotion ET_CRY;
		mes "[Lowen]";
		mes "I was running to the church with my sister, Rosa... And I lost her... Awww...";
		next;
		emotion ET_HNG;
		mes "[Lowen]";
		mes "Rosa should have held on to my hand tightly. How clumsy of her to be lost!";
		next;
		mes "[Lowen]";
		mes "Would you take me to the cathedral?";
		next;
		erasequest 5449;// Request from Chief Guard
		setquest 5457;// Find My Sister(1)
		viewpoint 2,276,242,1,0xFF0000;
		mes "[Lowen]";
		mes "We promised to meet at the cathedral when we are lost. I believe she would be there in the church.";
		close2;
		cloakonnpc "Girl#EP161GU01", getcharid(0);
		end;
	}
	mes "[Lowen]";
	mes "Oh? Do you see me? How strange. I am not supposed to be seen.";
	close2;
	cloakonnpc "Girl#EP161GU01", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}

// Cathedral
prt_q,235,315,4	script	Cathedral Knight#EP161GU04	4_F_CRU,5,5,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5458) == 1) {
		mes "[Cathedral Knight]";
		mes "Please take care of Lowen. She is like a mascot to us in Prontera.";
		close;
	}
	if (isbegin_quest(5464) == 1) {
		mes "[Cathedral Knight]";
		mes "Ellie is really fragile. I hope she is all right.";
		close;
	}
	if (isbegin_quest(5466) == 1) {
		mes "[Cathedral Knight]";
		mes "Oh, my... Ellie is in a critical condition. I hope a priest comes out to help her if there is one in there.";
		close;
	}
	if (isbegin_quest(5468) == 1) {
		mes "[Cathedral Knight]";
		mes "Thank you for your effort. We will devote our lives to protect the cathedral from the undead coming this way.";
		close;
	}
	mes "[Cathedral Knight]";
	mes "This the cathedral which is the first shelter in Prontera.";
	if (countitem(6939) < 1)
		close;
	next;
	mes "[Cathedral Knight]";
	mes "That belt... It looks like a belt which belongs to my colleague who has been killed by the undead. Would you mind giving it to me?";
	next;
	mes "[Cathedral Knight]";
	mes "I know it is an emergency, but I'd like to comfort the soul of my colleague.";
	next;
	if (select( "Give it to him.", "Do not give it him." ) == 2) {
		mes "[Cathedral Knight]";
		mes "Oh, I see. Please bring them to me if you change your mind.";
		close;
	}
	if (countitem(6939) < 1) {
		mes "[Cathedral Knight]";
		mes "Oh, where did you lose the belt you had?";
		close;
	}
	mes "[Cathedral Knight]";
	mes "Thank you. I guess the dead may rest in peace now. This is the only thing that I can offer you... However...";
	next;
	delitem 6939,1;	// Shabby_Old_Belt
	npcskill "AL_HEAL",10,99,99;
	percentheal 100,0;
	mes "[Cathedral Knight]";
	mes "If you find more articles left by the soldiers, would you please bring them to me?";
	close;

OnTouch:
	if (isbegin_quest(5457) == 1)
		cloakoffnpc "Girl#EP161GU03", getcharid(0);
	if (isbegin_quest(5463) == 1 || isbegin_quest(5467) == 1)
		cloakoffnpc "Eryus#EP161BU02", getcharid(0);
	else if (isbegin_quest(5465) == 1) {
		cloakoffnpc "Eryus#EP161BU02", getcharid(0);
		cloakoffnpc "Female#EP161BU04", getcharid(0);
	}
	end;
}

prt_q,232,318,3	script	PecoPeco Mechanic#EP161GU02	8W_SOLDIER,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (strnpcinfo(0) == "PecoPeco Mechanic#EP161GU02")
		.@check = (Class == JOB_CRUSADER || Class == JOB_PALADIN);
	else
		.@check = (Class == JOB_KNIGHT || Class == JOB_LORD_KNIGHT);
	if (.@check && countitem(6939) > 0) {	// Shabby_Old_Belt
		mes "[PecoPeco Mechanic]";
		if (Class == JOB_CRUSADER)
			mes "Oh! Dear crusader!";
		else if (Class == JOB_PALADIN)
			mes "Oh! Dear paladin!";
		mes "That belt? It looks like a belt which belongs to my colleague who has been killed by the undead.";
		next;
		mes "[PecoPeco Mechanic]";
		mes "Would you hand it over to me so that I can comfort his poor soul? Although the service is stopped due to the emergency, let me call Pecopeco for you.";
		next;
		if (select( "Use the service.", "Cancel." ) == 2) {
			mes "[PecoPeco Mechanic]";
			mes "Oh... Really. I see.";
			close;
		}
		if (countitem(6939) < 1) {
			mes "[PecoPeco Mechanic]";
			if (Class == JOB_CRUSADER)
				mes "Dear crusader";
			else if (Class == JOB_PALADIN)
				mes "Dear paladin";
			mes "Oh! Where did you lose the belt you had?";
			close;
		}
		if (getskilllv("KN_RIDING") != 1) {
			mes "[PecoPeco Mechanic]";
			mes "Oh... I guess you should learn how to ride a Pecopeco first.";
			close;
		}
		if (checkriding()) {
			mes "[PecoPeco Mechanic]";
			mes "You are already using the Pecopeco.";
			close;
		}
		if (ismounting()) {
			mes "[PecoPeco Mechanic]";
			mes "You need to let go of the bridle to ride it.";
			close;
		}
		delitem 6939,1;	// Shabby_Old_Belt
		setriding();
		mes "[PecoPeco Mechanic]";
		mes "Thank you. If you find other articles left by the dead soldiers, please bring them to me.";
		close;
	}
	if (isbegin_quest(5458) == 2) {
		emotion 57;
		mes "[PecoPeco Mechanic]";
		mes "Oh, I am an uncle now...";
		close;
	}
	emotion ET_SORRY;
	mes "[PecoPeco Mechanic]";
	mes "If you are here to borrow a PecoPeco, I have to say I am sorry.";
	next;
	mes "[PecoPeco Mechanic]";
	mes "Due to the emergency situation, all troops of Prontera are deployed to protect the residents of Prontera.";
	close;
}

prt_q,229,317,6	script	Girl#EP161GU03	4_F_RUSCHILD,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5457) == 1) {
		mes "[Lowen]";
		mes "Whoa, thank you so much!";
		next;
		npctalk "Girl: Rosa! Rosa!", "Girl#EP161GU03", bc_self;
		emotion ET_BLABLA;
		mes "[Lowen]";
		mes "Rosa! Rosa!";
		next;
		emotion ET_SURPRISE;
		emotion ET_QUESTION;
		mes "[Lowen]";
		mes "Oh, Uncle Peco, did you see my sister here?";
		next;
		emotion ET_HUK, getnpcid(0, "PecoPeco Mechanic#EP161GU02");
		mes "[PecoPeco Mechanic]";
		mes "Cough... Uncle...";
		next;
		mes "[PecoPeco Mechanic]";
		mes "You mean Rosa? Do you mean Rosa? I haven't seen Rosa here. Wasn't she coming with you?";
		next;
		emotion ET_BLABLA;
		mes "[Lowen]";
		mes "Aww... Rosa, where are you now?";
		next;
		emotion ET_SURPRISE;
		emotion ET_QUESTION;
		mes "[PecoPeco Mechanic]";
		mes "She could have gone to the Knights' building. Weren't you sisters supposed to go to the shelter there?";
		next;
		emotion ET_HUK, getnpcid(0, "PecoPeco Mechanic#EP161GU02");
		mes "[Lowen]";
		mes "Eh? It must have not been the cathedral then... Huh? What should I do?";
		next;
		mes "[PecoPeco Mechanic]";
		mes "Dear adventurer, if you are not in a hurry, would you help Lowen flee to the Knights' building?";
		next;
		mes "[PecoPeco Mechanic]";
		mes "Lowen's sister is a careful girl, unlike Lowen. She must have fled to the Knights' building.";
		next;
		npctalk "Girl: Phew... Uncle!", "Girl#EP161GU03", bc_self;
		select("Since I am here already, let me keep helping her.");
		erasequest 5457;// Find My Sister(1)
		setquest 5458;// Find My Sister(2)
		emotion ET_THANKS, getnpcid(0, "PecoPeco Mechanic#EP161GU02");
		mes "[PecoPeco Mechanic]";
		mes "Thank you. Please take care of her.";
		close2;
		cloakonnpc "Girl#EP161GU03", getcharid(0);
		end;
	}
	mes "[Lowen]";
	mes "Oh? Do you see me? How strange. I am not supposed to be seen.";
	close2;
	cloakonnpc "Girl#EP161GU03", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}

prt_q,55,350,5	duplicate(PecoPeco Mechanic#EP161GU02)	PecoPeco Mechanic#EP161ETC04	8W_SOLDIER

prt_q,47,339,5	script	Soldier#EP161ETC01	8W_SOLDIER,{
	emotion ET_PROFUSELY_SWEAT;
	mes "[Soldier]";
	mes "This the knight's building which is the second shelter in Prontera.";
	close;
}
prt_q,52,344,5	duplicate(Soldier#EP161ETC01)	Soldier#EP161ETC02	8W_SOLDIER

prt_q,52,340,6	script	Knight Gray#EP161GU05	2_M_SWORDMASTER,7,7,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5459) == 1) {	// there is an issue in the raw file, this message is not displayed on official
		mes "[Knight Gray]";
		mes "Are you the one who has helped Sister Erinin? What a relief that we have someone like you?";
		close;
	}
	mes "[Knight Gray]";
	mes "With the honor of the knight, I'll protect the villagers inside.";
	close;

OnTouch:
	if (isbegin_quest(5458) == 1) {
		cloakoffnpc "Girl#EP161GU06", getcharid(0);
		cloakoffnpc "Rosa Erinin#EP161GU07", getcharid(0);
	}
	if (isbegin_quest(5460) == 1) {
		cloakoffnpc "Soldier#EP161HU02", getcharid(0);
		npctalk "Soldier: Hey you! Here! This way...", "Soldier#EP161HU02", bc_self;
	}
	end;
}

prt_q,41,337,5	script	Mercenary Guild Admin#EP161ETC03	8W_SOLDIER,{
	mes "[Mercenary Guild Admin]";
	mes "Are you here to hire a mercenary?";
	next;
	mes "[Mercenary Guild Admin]";
	mes "I am sorry, but all mercenaries dispatched in this area have been hired by the palace.";
	next;
	emotion ET_SORRY;
	mes "[Mercenary Guild Admin]";
	mes "I am sorry.";
	close;
}

prt_q,55,347,6	script	Rosa Erinin#EP161GU07	4W_F_01,{
	if (isbegin_quest(5458) == 1) {
		emotion ET_STARE, getnpcid(0, "Rosa Erinin#EP161GU07");
		mes "[Rosa Erinin]";
		mes "Lowen, where did you go this time?";
		next;
		emotion ET_THANKS, getnpcid(0, "Girl#EP161GU06");
		mes "[Lowen]";
		mes "Hehe... Thank you, dear adventurer.";
		next;
		emotion ET_THANKS, getnpcid(0, "Rosa Erinin#EP161GU07");
		mes "[Rosa Erinin]";
		mes "Oh! Dear adventurer, thank you. She is so handful, you know.";
		next;
		mes "[Rosa Erinin]";
		mes "She is so delicate, but she is reckless. I am worried about her.";
		next;
		mes "[Rosa Erinin]";
		mes "Well, we shall go hide in there so that the knights here don't need to worry about us anymore.";
		next;
		erasequest 5458;// Find My Sister(2)
		setquest 5459;// Find My Sister(3)
		emotion ET_WRAP, getnpcid(0, "Girl#EP161GU06");
		mes "[Lowen]";
		mes "Thank you. Goodbye!";
		close2;
		cloakonnpc "Rosa Erinin#EP161GU07", getcharid(0);
		cloakonnpc "Girl#EP161GU06", getcharid(0);
		end;
	}
	if (strnpcinfo(1) == "Girl") {
		mes "[Lowen]";
		mes "Oh? Do you see me? How strange. I am not supposed to be seen.";
		close2;
		cloakonnpc "Girl#EP161GU06", getcharid(0);
		end;
	}
	mes "[Rosa Erinin]";
	mes "Dear adventurer, do you see me? Strange. I am not supposed to be seen.";
	close2;
	cloakonnpc "Rosa Erinin#EP161GU07", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}
prt_q,57,346,4	duplicate(Rosa Erinin#EP161GU07)	Girl#EP161GU06	4_F_RUSCHILD

// Request 3
prt_q,140,304,0	script	Soldier Quest_START#EP161QU03	HIDDEN_WARP_NPC,7,7,{
	end;
OnTouch:
	if (isbegin_quest(5450) == 1) {
		cloakoffnpc "Soldier#EP161HU01", getcharid(0);
		npctalk "Soldier: Argh! Don't come this way!", "Soldier#EP161HU01", bc_self;
	}
}

prt_q,140,304,6	script	Soldier#EP161HU01	4_M_GEF_SOLDIER,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5450) == 1) {
		emotion ET_KEK;
		mes "[Soldier]";
		mes "Argh! The undead! Bring it on!";
		next;
		emotion ET_SCRATCH, playerattached();
		mes "[" + strcharinfo(0) + "]";
		mes "Hey, what would be the use of telling them to bring it on when you are hiding in there...";
		next;
		emotion ET_SWEAT;
		mes "[Soldier]";
		mes "You adventurer don't understand it. I am pushed to this corner after a long battle against the undead.";
		next;
		mes "[Soldier]";
		mes "You must be quite courageous for walking around the town in a situation like this.";
		next;
		emotion ET_OK;
		mes "[Soldier]";
		mes "You must be as brave as I am... The hero who has subjugated the Kobolds in Geffen...";
		next;
		mes "[Soldier]";
		mes "Hahahahaha";
		mes "Just in time. I was getting exhausted by the attacks of the undead.";
		next;
		mes "[Soldier]";
		mes "I am on the way to go hide in the shelter nearby. Would you come with me?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well, sure.";
		next;
		erasequest 5450;// Request from Chief Guard
		setquest 5460;// Blatant Bluff(1)
		emotion ET_PROFUSELY_SWEAT;
		viewpoint 2,140,304,1,0xFF0000;
		mes "[Soldier]";
		mes "Good. Since I am tired from the previous battle, please escort me to the Knight's building.";
		close2;
		cloakonnpc "Soldier#EP161HU01", getcharid(0);
		end;
	}
	mes "[Soldier]";
	mes "Haha, do you see me? Strange. I am not supposed to be seen.";
	close2;
	cloakonnpc "Soldier#EP161HU01", getcharid(0);
	end;
}

prt_q,68,336,4	script	Soldier#EP161HU02	4_M_GEF_SOLDIER,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5460) == 1) {
		emotion ET_BEST;
		mes "[Soldier]";
		mes "Thank god, you heard my voice.";
		next;
		mes "[Soldier]";
		mes "I was going to help the knights defending the knight's building since I heard that many residents had been fled there. However, there seem to be enough troops here.";
		next;
		emotion ET_OK;
		mes "[Soldier]";
		mes "If I show my face, it may just disturb their concentration. I'd rather go without seeing them.";
		next;
		mes "[Soldier]";
		mes "I shall go join the defense on another place. I guess I can join the troops at the village office down there.";
		next;
		erasequest 5460;// Blatant Bluff(1)
		setquest 5461;// Blatant Bluff(2)
		emotion ET_PROFUSELY_SWEAT;
		mes "[Soldier]";
		mes "Since I want to save my energy for the battle, please escort me to the village office.";
		close2;
		cloakonnpc "Soldier#EP161HU02", getcharid(0);
		end;
	}
	mes "[Soldier]";
	mes "Haha, do you see me? Strange. I am not supposed to be seen.";
	close2;
	cloakonnpc "Soldier#EP161HU02", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}

prt_q,79,102,8	script	Soldier#EP161HU03	4_M_GEF_SOLDIER,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5461) == 1) {
		emotion ET_OK;
		mes "[Soldier]";
		mes "There are not many people guarding this place.";
		next;
		mes "[Soldier]";
		mes "I should go help them now.";
		next;
		emotion ET_QUESTION, playerattached();
		mes "[" + strcharinfo(0) + "]";
		mes "It is such a secluded place, and there are 3 soldiers here.";
		next;
		emotion ET_PROFUSELY_SWEAT;
		mes "[Soldier]";
		mes "Dear adventurer, you know nothing.";
		next;
		mes "[Soldier]";
		mes "Oh, I wasn't going to tell you this story, because I didn't want to boast...";
		next;
		mes "[Soldier]";
		mes "Millions of Kobolds have invaded Geffen before.";
		next;
		emotion ET_PROFUSELY_SWEAT;
		mes "[Soldier]";
		mes "The endless march of the Kobolds...";
		next;
		mes "[Soldier]";
		mes "Huh... Thinking about it makes me sweat...";
		next;
		emotion ET_QUESTION;
		mes "[Soldier]";
		mes "Well,, from my experience, a place like this is the toughest to guard when the enemies march in out of blue.";
		next;
		mes "[Soldier]";
		mes "It is a secret that it is the greatest timing for the rise of a hero.";
		next;
		mes "[Soldier]";
		mes "I'll take a rest inside, and come out to save these people when this place is in danger. You shall go save another place.";
		next;
		erasequest 5461;// Blatant Bluff(2)
		setquest 5462;// Blatant Bluff(3)
		emotion ET_WRAP;
		mes "[Soldier]";
		mes "Good luck.";
		close2;
		cloakonnpc "Soldier#EP161HU03", getcharid(0);
		end;
	}
	mes "[Soldier]";
	mes "Haha, do you see me? Strange. I am not supposed to be seen.";
	close2;
	cloakonnpc "Soldier#EP161HU03", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}

// Request 4
prt_q,38,261,0	script	Married couple Quest_START#EP161QU04	HIDDEN_WARP_NPC,6,6,{
	end;
OnTouch:
	if (isbegin_quest(5451) == 1) {
		cloakoffnpc "Eryus#EP161BU01", getcharid(0);
		npctalk "Eryus: Ellie! Where are you? Honey! My love!", "Eryus#EP161BU01", bc_self;
	}
	end;
}

prt_q,38,261,6	script	Eryus#EP161BU01	4_F_03,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5451) == 1) {
		emotion ET_THANKS;
		mes "[Eryus]";
		mes "Are you an adventurer?";
		mes "Oh, Odin... Thank you! Dear adventurer, please find my wife.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What happened here?";
		next;
		mes "[Eryus]";
		mes "It happened in the evening, at dusk.";
		mes "With a roaring sound, we heard that something dropped near the old swordsmen's guild.";
		next;
		mes "[Eryus]";
		mes "Many residents gathered around the area to find out what had caused such a commotion.";
		next;
		mes "[Eryus]";
		mes "I went down there with my wife Ellie.";
		next;
		emotion ET_OTL;
		mes "[Eryus]";
		mes "When the people gathered, and night fell, the undead which had been buried under the ground of Prontera started waking up.";
		next;
		mes "[Eryus]";
		mes "People freaked. While running around, I lost hold of my wife's hand.";
		next;
		emotion ET_CRY;
		mes "[Eryus]";
		mes "Oh, Ellie... My wife is a very fragile woman. I hope she is all right.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Let me go find her. You should go hide in the cathedral. I'll take you there.";
		next;
		erasequest 5451;// Request from Chief Guard
		setquest 5463;// Mad Love for Wife(1)
		emotion ET_CRY;
		viewpoint 2,38,261,1,0xFF0000;
		mes "[Eryus]";
		mes "Awww... Please help me. Please find my wife.";
		close2;
		cloakonnpc "Eryus#EP161BU01", getcharid(0);
		end;
	}
	mes "[Eryus]";
	mes "Awww... I need to find my wife... And I am not supposed to be seen.";
	close2;
	cloakonnpc "Eryus#EP161BU01", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}

prt_q,231,310,4	script	Eryus#EP161BU02	4_F_03,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5463) == 1) {
		emotion ET_CRY;
		mes "[Eryus]";
		mes "Awww... Please help me. Please find my wife... I am really worried about her.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Wait in the cathedral. I'll look for your wife. Where did you lose her?";
		next;
		mes "[Eryus]";
		mes "Aww... I must have forgotten to tell you.";
		next;
		mes "[Eryus]";
		mes "I lost hold of her hand near the Prontera employment agency.";
		next;
		emotion ET_THINK;
		mes "[Eryus]";
		mes "I am not sure if she is still there...";
		next;
		erasequest 5463;// Mad Love for Wife(1)
		setquest 5464;// Mad Love for Wife(2)
		mes "[Eryus]";
		mes "Aww... Please help me, dear adventurer.";
		close;
	}
	if (isbegin_quest(5464) == 1) {
		mes "[Eryus]";
		mes "I lost hold of her hand near the Prontera employment agency.";
		next;
		mes "[Eryus]";
		mes "Aww... Please help me, dear adventurer.";
		close;
	}
	if (isbegin_quest(5465) == 1) {
		emotion ET_THANKS;
		mes "[Eryus]";
		mes "Oh! Thank god! Dear adventurer...";
		next;
		emotion ET_PROFUSELY_SWEAT, getnpcid(0, "Female#EP161BU04");
		mes "[Ellie]";
		mes "Oh, Eryus... Cough... Cough...";
		next;
		emotion ET_HUK;
		mes "[Eryus]";
		mes "Ellie, what is going on? Are you ill again? Where is your medicine?";
		next;
		emotion ET_PROFUSELY_SWEAT, getnpcid(0, "Female#EP161BU04");
		mes "[Ellie]";
		mes "Cough... Cough... I must have dropped it while running...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Where did you drop the medicine?";
		next;
		emotion ET_PROFUSELY_SWEAT, getnpcid(0, "Female#EP161BU04");
		mes "[Ellie]";
		mes "Cough... Cough... I don't know. Cough, it could be there... Cough... Cough...";
		next;
		mes "[Eryus]";
		mes "Where you were before? Wait a moment. Let me go get it for you.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It is dangerous out there. I'll go. You should stay here and take care of your wife.";
		next;
		erasequest 5465;// Mad Love for Wife(3)
		setquest 5466;// Mad Love for WifeQuest(4)
		mes "[Eryus]";
		mes "Would you do that for us? Please. We are running out of time. Ellie. hold on...";
		close2;
		cloakonnpc "Female#EP161BU04", getcharid(0);
		end;
	}
	if (isbegin_quest(5466) == 1) {
		mes "[Eryus]";
		mes "Please. We are running out of time.";
		close;
	}
	if (isbegin_quest(5467) == 1) {
		mes "[Eryus]";
		mes "Oh, you are here.";
		mes "The priest of the cathedral is taking care of my wife in there.";
		next;
		mes "[Eryus]";
		mes "Thank you for helping us. I guess I shall bring the medicine to her as fast as possible.";
		next;
		erasequest 5467;// Mad Love for WifeQuest(5)
		setquest 5468;// Mad Love for Wife(6)
		mes "[Eryus]";
		mes "Thank you so much. God bless your journey...";
		close2;
		cloakonnpc "Eryus#EP161BU02", getcharid(0);
		end;
	}
	mes "[Eryus]";
	mes "Awww... I need to find my wife... And I am not supposed to be seen.";
	close2;
	cloakonnpc "Eryus#EP161BU02", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}



prt_q,108,164,4	script	Female#EP161BU03	4W_F_01,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5464) == 1) {
		emotion ET_QUESTION;
		mes "[Ellie]";
		mes "Who are you?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I have been asked by your husband.";
		next;
		emotion ET_CRY;
		mes "[Ellie]";
		mes "Oh... He is such a kind person... He must have been in danger as well, but he still cares about me...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "This place is dangerous. Let's move.";
		next;
		erasequest 5464;// Mad Love for Wife(2)
		setquest 5465;// Mad Love for Wife(3)
		mes "[Ellie]";
		mes "Thank you, dear adventurer.";
		close2;
		cloakonnpc "Female#EP161BU03", getcharid(0);
		end;
	}
	cloakonnpc "Female#EP161BU03", getcharid(0);
	mes "[Ellie]";
	mes "Dear adventurer, do you see me? This is not good.";
	close;

OnInit:
	cloakonnpc();
	end;
}

prt_q,229,310,6	script	Female#EP161BU04	4W_F_01,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5465) == 1) {
		emotion ET_THANKS, getnpcid(0, "Eryus#EP161BU02");
		mes "[Eryus]";
		mes "Oh! Thank god! Dear adventurer...";
		next;
		emotion ET_PROFUSELY_SWEAT;
		mes "[Ellie]";
		mes "Oh, Eryus... Cough... Cough...";
		next;
		emotion ET_HUK, getnpcid(0, "Eryus#EP161BU02");
		mes "[Eryus]";
		mes "Ellie, what is going on? Are you ill again? Where is your medicine?";
		next;
		emotion ET_PROFUSELY_SWEAT;
		mes "[Ellie]";
		mes "Cough... Cough... I must have dropped it while running...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Where did you drop the medicine?";
		next;
		emotion ET_PROFUSELY_SWEAT;
		mes "[Ellie]";
		mes "Cough... Cough... I don't know. Cough, it could be there... Cough... Cough...";
		next;
		mes "[Eryus]";
		mes "Where you were before? Wait a moment. Let me go get it for you.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "It is dangerous out there. I'll go. You should stay here and take care of your wife.";
		next;
		erasequest 5465;// Mad Love for Wife(3)
		setquest 5466;// Mad Love for WifeQuest(4)
		mes "[Eryus]";
		mes "Would you do that for us? Please. We are running out of time. Ellie. hold on...";
		close2;
		cloakonnpc "Female#EP161BU04", getcharid(0);
		end;
	}
	if (isbegin_quest(5466) == 1) {
		mes "[Ellie]";
		mes "Cough... Cough... Cough...";
		close2;
		cloakonnpc "Female#EP161BU04", getcharid(0);
		end;
	}
	mes "[Ellie]";
	mes "Dear adventurer, do you see me? This is not good.";
	close2;
	cloakonnpc "Female#EP161BU04", getcharid(0);
	end;

OnInit:
	cloakonnpc();
	end;
}

prt_q,111,166,0	script	Emergency Medicine#EP161BU05	HIDDEN_WARP_NPC,6,6,{
	end;
OnTouch:
	if (isbegin_quest(5464) == 1)
		cloakoffnpc "Female#EP161BU03", getcharid(0);
	else if (isbegin_quest(5466) == 1) {
		mes "It seems to be the bundle of medicine dropped by Ellie while running.";
		next;
		if (select( "Pick up.", "Leave it." ) == 1) {
			erasequest 5466;// Mad Love for WifeQuest(4)
			setquest 5467;// Mad Love for WifeQuest(5)
			mes "You picked up the bundle of medicine. Bring it to Ellie in pain.";
			close;
		}
	}
	end;
}

prt_q,213,90,2	script	Dead Villager#EP161DIE01	4_M_DSTMANDEAD,2,2,{
	mes "He seems to be dead.";
	close;
OnTouch_:
	npctalk "Argh...";
	unittalk getcharid(3), "" + strcharinfo(0) + " : ?";
	setpcblock PCBLOCK_NPC, true;
	sleep2 1000;
	setpcblock PCBLOCK_NPC, false;
	specialeffect EF_POISONSMOKE;
	getmapxy .@map$, .@x, .@y, BL_NPC;
	monster "prt_q",.@x,.@y,"Resurrected Corpse",1015,1, strnpcinfo(0) + "::OnMyMobDead";// ZOMBIE
	monster "prt_q",.@x,.@y,"Maggot",1194,1, strnpcinfo(0) + "::OnMyMobDead";// ARCLOUSE
	monster "prt_q",.@x,.@y,"Fly",1035,1, strnpcinfo(0) + "::OnMyMobDead";// HUNTER_FLY
	disablenpc();
	initnpctimer;
	end;
OnMyMobDead:
	end;
OnTimer180000:
	killmonster "prt_q", strnpcinfo(0) + "::OnMyMobDead";
	stopnpctimer;
	enablenpc();
	end;
}
prt_q,214,85,6	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE02	4_M_LIEMAN,2,2
prt_q,222,87,8	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE03	4_M_DIEMAN,2,2
prt_q,149,188,2	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE04	4_M_LIEMAN,2,2
prt_q,188,207,6	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE05	4_M_DIEMAN,2,2

prt_q,109,94,8	script	Dead Villager#EP161DIE06	4_M_DSTMANDEAD,2,2,{
	mes "He seems to be dead.";
	close;

OnTouch_:
	sscanf( strnpcinfo(2), "EP161DIE%d", .@num );
	setarray .@text$[6],
		"I want to go home...",
		"For Himmelmez...",
		"I am hungey...",
		"WUG is the best!",
		"I had a date...",
		"When I am done with this mission, I will go back to my hometown... Argh...",
		"Don't worry, it is not a ferocious dog... Let me go take a look...",
		"This is my daughter. She will be 6 in 2 weeks.",
		"Oh, I love dogs!",
		"I want to have some beef stew.",
		"My sister has given me this as a lucky charm...",
		"Haha, don't worry. It won't burst.",
		"According to the monster's gourmet guide, humans are supposed to be very delicious, right?",
		"Help... Help me...",
		"Bon appetite";
	npctalk .@text$[.@num];
	unittalk getcharid(3), "" + strcharinfo(0) + " : ?";
	setpcblock PCBLOCK_NPC, true;
	sleep2 1000;
	setpcblock PCBLOCK_NPC, false;
	specialeffect EF_POISONSMOKE;
	getmapxy .@map$, .@x, .@y, BL_NPC;
	monster "prt_q",.@x,.@y,"Resurrected Corpse",1015,1, strnpcinfo(0) + "::OnMyMobDead";// ZOMBIE
	monster "prt_q",.@x,.@y,"Maggot",1194,1, strnpcinfo(0) + "::OnMyMobDead";// ARCLOUSE
	monster "prt_q",.@x,.@y,"Fly",1035,1, strnpcinfo(0) + "::OnMyMobDead";// HUNTER_FLY
	cloakonnpc();
	end;
OnMyMobDead:
	if (mobcount( "prt_q", strnpcinfo(0) + "::OnMyMobDead" ) < 1)
		initnpctimer;
	end;
OnTimer300000:
	stopnpctimer;
	cloakoffnpc();
	end;
}
prt_q,88,279,2	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE07	4_M_LIEMAN,2,2
prt_q,89,207,6	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE08	4_M_DIEMAN,2,2
prt_q,265,300,8	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE09	4_M_DSTMANDEAD,2,2
prt_q,88,350,2	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE10	4_M_LIEMAN,2,2
prt_q,156,275,6	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE11	4_M_DSTMANDEAD,2,2
prt_q,104,114,8	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE12	4_M_DIEMAN,2,2
prt_q,108,318,2	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE13	4_M_LIEMAN,2,2
prt_q,238,129,6	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE14	4_M_DIEMAN,2,2
prt_q,200,139,8	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE15	4_M_DIEMAN,2,2
prt_q,74,227,2	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE16	4_M_DSTMANDEAD,2,2
prt_q,220,350,6	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE17	4_M_DIEMAN,2,2
prt_q,45,146,8	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE18	4_M_DIEMAN,2,2
prt_q,227,219,2	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE19	4_M_DSTMANDEAD,2,2
prt_q,146,252,6	duplicate(Dead Villager#EP161DIE01)	Dead Villager#EP161DIE20	4_M_LIEMAN,2,2

prt_q,148,49,0	script	Sign#EP161ETC12	2_BULLETIN_BOARD,{
	mes "[Prontera, the Capital of Rune-Midgarts Kingdom]";
	mes "Welcome to Prontera";
	mes "in the heart of Rune-Midgarts!";
	mes "Prontera is located";
	mes "in the center of the continent,";
	mes "and it is famous as the busy city";
	mes "of commerce and trade.";
	next;
	mes "[Prontera, the Capital of Rune-Midgarts Kingdom]";
	mes "There are major buildings including";
	mes "the Prontera Palace where job change to Crusader is available;";
	mes "Prontera Cathedral where job changes to Acolyte, Priest are available";
	mes "and wedding ceremonies are held;";
	mes "the Knight's Building, etc.";
	next;
	mes "[Prontera, the Capital of Rune-Midgarts Kingdom]";
	mes "There are many people and stores";
	mes "as well so make sure to look around.";
	next;
	mes "[Prontera, the Capital of Rune-Midgarts Kingdom]";
	mes "Also, in the south east of the central fountain,";
	mes "there is the historic Quadro Blacksmith's Workshop.";
	mes "Drop by the place if you want to get";
	mes "your equipment";
	mes "repaired.";
	next;
	mes "[Prontera, the Capital of Rune-Midgarts Kingdom]";
	mes "There is Izlude in the south east, Payon in the south, Geffen in the west and Al De Baran in the north.";
	close;
}

prt_q,155,190,4	script	Kriemhild	GUILD_FLAG,{ end; }
prt_q,146,194,3	duplicate(Kriemhild)	Swanhild	GUILD_FLAG
prt_q,143,203,2	duplicate(Kriemhild)	Fadhgridh	GUILD_FLAG
prt_q,167,203,6	duplicate(Kriemhild)	Skoegul	GUILD_FLAG
prt_q,165,194,5	duplicate(Kriemhild)	Gondul	GUILD_FLAG

// GM NPC
prt_q,5,5,6	script	Pron Dungeon Helper#EP161PG	4_EP16_SPIEGEL,{
	if (callfunc("F_GM_NPC",1854,0,1,9999) < 1)
		end;
	mes "[Pron Dungeon Helper]";
	mes "Select the service to use.";
	next;
	switch( select( "Quest Start Setting", "Reset cooldown time", "Reset Quest", "Check current status" ) ) {
	case 1:
		mes "[Pron Dungeon Helper]";
		mes "Proceed after resetting the quest. Select the quest to start.";
		next;
		switch( select( "Lad Quest", "Girl Quest", "Soldier Quest", "Married couple Quest" ) ) {
		case 1:
			setquest 5448;
			mes "[Pron Dungeon Helper]";
			mes "Would you move to this starting point?";
			next;
			select("Move");
			warp "prt_q",221,193;
			end;
		case 2:
			setquest 5449;
			mes "[Pron Dungeon Helper]";
			mes "Would you move to this starting point?";
			next;
			select("Move");
			warp "prt_q",276,242;
			end;
		case 3:
			setquest 5450;
			mes "[Pron Dungeon Helper]";
			mes "Would you move to this starting point?";
			next;
			select("Move");
			warp "prt_q",140,304;
			end;
		case 4:
			setquest 5451;
			mes "[Pron Dungeon Helper]";
			mes "Would you move to this starting point?";
			next;
			select("Move");
			warp "prt_q",38,261;
			end;
		}
		end;
	case 2:
		mes "[Pron Dungeon Helper]";
		mes "Reset the cooldown time.";
		next;
		select("Setting");
		erasequest 5452;
		break;
	case 3:
		mes "[Underground Dungeon Helper]";
		mes "All quests related with the underground dungeon will be reset.";
		next;
		select("Setting");
		mes "[Underground Dungeon Helper]";
		for ( .@i = 5448; .@i < 5468; ++.@i ) {
			if (isbegin_quest(.@i) > 0)
				erasequest .@i;
			mes "" + .@i + " Delete";
		}
		next;
		break;
	case 4:
		mes "[Pron Dungeon Helper]";
		mes "5448(" + isbegin_quest(5448) + ")/5449(" + isbegin_quest(5449) + ")/5450(" + isbegin_quest(5450) + ")/5451(" + isbegin_quest(5451) + ")";
		mes "5453(" + isbegin_quest(5453) + ")/5454(" + isbegin_quest(5454) + ")/5455(" + isbegin_quest(5455) + ")/5456(" + isbegin_quest(5456) + ")";
		mes "5457(" + isbegin_quest(5457) + ")/5458(" + isbegin_quest(5458) + ")/5459(" + isbegin_quest(5459) + ")";
		mes "5460(" + isbegin_quest(5460) + ")/5461(" + isbegin_quest(5461) + ")/5462(" + isbegin_quest(5462) + ")";
		mes "5463(" + isbegin_quest(5463) + ")/5464(" + isbegin_quest(5464) + ")/5465(" + isbegin_quest(5465) + ")/5466(" + isbegin_quest(5466) + ")/5467(" + isbegin_quest(5467) + ")/5468(" + isbegin_quest(5468) + ")";
		next;
		break;
	}
	mes "[Pron Dungeon Helper]";
	mes "Complete";
	close;
}

// Prison quests
prt_pri00,46,130,7	script	Corrupt Warder#pa0829	4_M_KY_SOLD,{
	if (checkweight(1201,1) == 0) {
		mes "There are too many kinds of items in possession. Reduce the type of the items and try again.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "It seems difficult to proceed any further since the items in your possession are too heavy. Reduce the weight and try again.";
		close;
	}
	mes "[Corrupt Warder]";
	mes "What is it? Did Dylan send you here? If you are going to deal with me, don't waste any more time. There are a lot of people watching us.";
	next;
	if (select( "What's the deal?", "Let's deal." ) == 1) {
		mes "[Corrupt Warder]";
		mes "Isn't Dylan making some strange powder whenever he breaks a thing?";
		next;
		mes "[Corrupt Warder]";
		mes "It is ^0000ffRune Magic Powder^000000 which the magicians use for their experiments. I don't think Dylan knows this.";
		next;
		mes "[Corrupt Warder]";
		mes "I'll ^0000ffexchange 30 Rune Magic Powders for 1 Mysterious Blue Box^000000. How do you like that? It is such a sweet deal, isn't it?";
		close;
	}
	if (countitem(6920) < 30) {
		mes "[Corrupt Warder]";
		mes "30 Rune Magic Powders for 1 Mysterious Blue Box. I remind you.";
		close;
	}
	mes "[Corrupt Warder]";
	mes "Good, it is a great deal.";
	delitem 6920,30;// RuneMagicPowder
	getitem 22901,1;// BlueboxOfQuestions
	close;
}

prt_pri00,61,136,3	script	Dylan#pa0829	4_CAT_SAILOR5,{
	disable_items;
	if (checkweight(1201,1) == 0) {
		mes "There are too many kinds of items in possession. Reduce the type of the items and try again.";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "It seems difficult to proceed any further since the items in your possession are too heavy. Reduce the weight and try again.";
		close;
	}
	if (isbegin_quest(12369) == 0) {
		mes "[Dylan]";
		mes "Are you a customer? I am not going to get more customers today because I am tired.";
		next;
		select("Are you running a business in the prison?");
		mes "[Dylan]";
		mes "Although I may look like this now, I used to be called the man with the hand of minus out there. It is quite dangerous stuff. You'd better stay away.";
		next;
		mes "^0000ffUnlike his words, he really seems eager to give an explanation.^000000";
		next;
		if (select( "I don't want to waste time here.", "What kind of business you are running here." ) == 1) {
			mes "[Dylan]";
			mes "Don't be a chicken...";
			close;
		}
		mes "[Dylan]";
		mes "Honor Mark, which is issued by the kingdom and not to be traded between individuals. I receive it and enhance people's equipment.";
		next;
		mes "[Dylan]";
		mes "As you can tell, it is against the law. That's why I used to only work for through personal contacts. However, one guy whose equipment was broken while resetting the enhancement informed on me.";
		next;
		select("It really is a crime.");
		mes "[Dylan]";
		mes "I don't need to hear of some personal impression by you. Although I am caught, I am roaming the prison freely thanks to the warder over there.";
		next;
		mes "[Dylan]";
		mes "Of course, I cannot get out to avoid causing the real problem. That's why I stay in the prison like this. Are you interested in the deal?";
		next;
		if (select( "The kingdom has poor public security.", "What is the deal?" ) == 1) {
			mes "[Dylan]";
			mes "What a nerd. I told you to back off if you didn't want to get involved.";
			close;
		}
		mes "[Dylan]";
		mes "You are a great fellow to deal with. I want to save enough money to bail myself out. Any customers are welcome here.";
		next;
		mes "[Dylan]";
		mes "I enhance the three items, Flattery Robe, Invective Robe and Prontera Badge for Honor Mark.";
		next;
		mes "[Dylan]";
		mes "I guess I don't need to explain about it anymore. Just bring the equipment you want to enhance to me.";
		setquest 12369;// Secret Business Relation
		completequest 12369;// Secret Business Relation
		close;
	}
	mes "[Dylan]";
	mes "Are you here to deal with me? Tell me what you need now.";
	next;
	.@s = select( "Tell me about the deal.", "Enhance Robe", "Enhance Badge", "Reset Enhanced Robe Stats", "Reset Enhanced Badge Stats" );
	switch(.@s) {
	case 1:
		mes "[Dylan]";
		mes "Listen carefully. I won't say twice.";
		next;
		mes "[Dylan]";
		mes "I'll enhance one of the Flattery Robe or Invective Robe slot for 20 Honor Marks. I can enhance up to 2 slots. And I take 10 Honor Marks for the reset. Do you follow me so far?";
		next;
		mes "[Dylan]";
		mes "Next, for the Prontera Badge. I'll take 5 Honor Marks to enhance 1 slot. I can enhance up to 2 slots. And I take 10 Honor Marks for the reset.";
		next;
		mes "[Dylan]";
		mes "I don't perform the reset anytime. I'll do it when the 2 slots are enhanced for that you cannot enhance the item anymore. And... Then...";
		next;
		mes "[Dylan]";
		mes "Oh, there is one problem though. There is a change that the badge can be destroyed while resetting it. The chance is about 20%. Since it is such a tiny thing, there is some side effect of removing the enhancement.";
		next;
		mes "[Dylan]";
		mes "I hope the deal goes well, buddy.";
		close;
	case 2:
		mes "[Dylan]";
		mes "You need 20 Honor Marks for each slot of Flattery Robe or Invective Robe. Do you want to enhance it?";
		break;
	case 3:
		mes "[Dylan]";
		mes "You need 5 Honor Marks to enhance one slot of the Prontera Badge you are wearing in the left slot of your body. Would you enhance it?";
		break;
	case 4:
		mes "[Dylan]";
		mes "You need 10 Honor Marks to reset Invective Robe or Flattery Robe. The equipment won't be destroyed. The bound cards and the refinement level would remain the same as well.";
		break;
	case 5:
		mes "[Dylan]";
		mes "You need 10 Honor Marks to reset the Prontera Badge you are wearing in the left slot of your body.";
		next;
		mes "[Dylan]";
		mes "As I told you, it is difficult to reset the badge, ^ff0000The chance of success is 80%.^000000 If it fails, everything will be gone. Would you reset it?";
		break;
	}
	next;
	if (select( "I quit.", "Let's do it now." ) == 1) {
		mes "[Dylan]";
		mes "I am busy so please don't waste my time by talking to me for no reason.";
		close;
	}
	switch(.@s) {
	case 2:
		.@item_id = getequipid(EQI_ARMOR);
		.@refine = getequiprefinerycnt(EQI_ARMOR);
		.@card[0] = getequipcardid(EQI_ARMOR,0);
		.@card[1] = getequipcardid(EQI_ARMOR,1);
		.@card[2] = getequipcardid(EQI_ARMOR,2);
		.@card[3] = getequipcardid(EQI_ARMOR,3);

		if (.@item_id == -1) {
			mes "[Dylan]";
			mes "You are taking it off.";
			close;
		}
		if (.@item_id != 15146 && .@item_id != 15147) {
			mes "[Dylan]";
			mes "Stop fooling around. If you want to enhance it, come to me wearing the equipment.";
			close;
		}
		if (.@card[2] > 0 && .@card[3] > 0) {
			mes "[Dylan]";
			mes "It cannot be enhanced anymore. Do you have anything else to enhance?";
			close;
		}
		if (countitem(6919) < 20) {
			mes "[Dylan]";
			mes "Hey, buddy. You cannot deal with me if you don't have any Honor Marks.";
			close;
		}
		.@r = rand(1,961);
		if (.@r < 84) .@en_name = 4994;	// Neev_STR_1
		else if (.@r < 141) .@en_name = 4995;	// Neev_STR_2
		else if (.@r < 161) .@en_name = 4996;	// Neev_STR_3
		else if (.@r < 244) .@en_name = 4997;	// Neev_AGI_1
		else if (.@r < 301) .@en_name = 4998;	// Neev_AGI_2
		else if (.@r < 321) .@en_name = 4999;	// Neev_AGI_3
		else if (.@r < 404) .@en_name = 29000;	// Neev_INT_1
		else if (.@r < 461) .@en_name = 29001;	// Neev_INT_2
		else if (.@r < 481) .@en_name = 29002;	// Neev_INT_3
		else if (.@r < 564) .@en_name = 29003;	// Neev_DEX_1
		else if (.@r < 621) .@en_name = 29004;	// Neev_DEX_2
		else if (.@r < 641) .@en_name = 29005;	// Neev_DEX_3
		else if (.@r < 724) .@en_name = 29009;	// Neev_VIT_1
		else if (.@r < 781) .@en_name = 29010;	// Neev_VIT_2
		else if (.@r < 801) .@en_name = 29011;	// Neev_VIT_3
		else if (.@r < 884) .@en_name = 29006;	// Neev_LUK_1
		else if (.@r < 941) .@en_name = 29007;	// Neev_LUK_2
		else if (.@r < 961) .@en_name = 29008;	// Neev_LUK_3
		else .@en_name = 0;
		if (.@card[3] == 0)
			.@card_index = 3;
		else
			.@card_index = 2;

		.@card[ .@card_index ] = .@en_name;
		delitem 6919,20;
		delequip EQI_ARMOR;
		getitem2 .@item_id,1,1,.@refine,0,.@card[0],.@card[1],.@card[2],.@card[3];
		break;
	case 3:
		if (getequipid(EQI_ACC_L) == -1) {
			mes "[Dylan]";
			mes "Oh, I have forgotten to mention it. I only enhance the item equipped in the left slot. Enhance it while equipping it in the left slot.";
			close;
		}
		if (getequipid(EQI_ACC_L) != 28356) {
			mes "[Dylan]";
			mes "Stop fooling around. If you want to enhance it, come to me wearing the Prontera Badge.";
			close;
		}
		.@card[2] = getequipcardid(EQI_ACC_L,2);
		.@card[3] = getequipcardid(EQI_ACC_L,3);
		if (.@card[2] > 0 && .@card[3] > 0) {// note: unslotted
			mes "[Dylan]";
			mes "It cannot be enhanced anymore. Do you have anything else to enhance?";
			close;
		}
		if (countitem(6919) < 5) {
			mes "[Dylan]";
			mes "Hey, buddy. You cannot deal with me if you don't have any Honor Marks.";
			close;
		}
		.@r = rand(1,22231);
		if (.@r < 3001) .@en_name = 4710;		// Inteligence1
		else if (.@r < 3601) .@en_name = 4711;	// Inteligence2
		else if (.@r < 3701) .@en_name = 4712;	// Inteligence3
		else if (.@r < 3705) .@en_name = 4713;	// Inteligence4
		else if (.@r < 3706) .@en_name = 4714;	// Inteligence5
		else if (.@r < 6706) .@en_name = 4730;	// Agility1
		else if (.@r < 7306) .@en_name = 4731;	// Agility2
		else if (.@r < 7406) .@en_name = 4732;	// Agility3
		else if (.@r < 7410) .@en_name = 4733;	// Agility4
		else if (.@r < 7411) .@en_name = 4734;	// Agility5
		else if (.@r < 10411) .@en_name = 4740;	// Vitality1
		else if (.@r < 11011) .@en_name = 4741;	// Vitality2
		else if (.@r < 11111) .@en_name = 4742;	// Vitality3
		else if (.@r < 11115) .@en_name = 4743;	// Vitality4
		else if (.@r < 11116) .@en_name = 4744;	// Vitality5
		else if (.@r < 14116) .@en_name = 4750;	// Luck1
		else if (.@r < 14716) .@en_name = 4751;	// Luck2
		else if (.@r < 14816) .@en_name = 4752;	// Luck3
		else if (.@r < 14820) .@en_name = 4753;	// Luck4
		else if (.@r < 14821) .@en_name = 4754;	// Luck5
		else if (.@r < 17821) .@en_name = 4700;	// Strength1
		else if (.@r < 18421) .@en_name = 4701;	// Strength2
		else if (.@r < 18521) .@en_name = 4702;	// Strength3
		else if (.@r < 18525) .@en_name = 4703;	// Strength4
		else if (.@r < 18526) .@en_name = 4704;	// Strength5
		else if (.@r < 21526) .@en_name = 4720;	// Dexterity1
		else if (.@r < 22126) .@en_name = 4721;	// Dexterity2
		else if (.@r < 22226) .@en_name = 4722;	// Dexterity3
		else if (.@r < 22230) .@en_name = 4723;	// Dexterity4
		else if (.@r < 22231) .@en_name = 4724;	// Dexterity5
		else .@en_name = 0;

		if (.@card[3] == 0)
			.@card_index = 3;
		else
			.@card_index = 2;
		.@card[ .@card_index ] = .@en_name;

		delitem 6919,5;
		delequip EQI_ACC_L;
		getitem2 28356,1,1,0,0,0,0,.@card[2],.@card[3];
		break;
	case 4:
		.@item_id = getequipid(EQI_ARMOR);
		.@refine = getequiprefinerycnt(EQI_ARMOR);
		.@card[0] = getequipcardid(EQI_ARMOR,0);
		.@card[2] = getequipcardid(EQI_ARMOR,2);
		.@card[3] = getequipcardid(EQI_ARMOR,3);
		if (.@item_id == -1) {
			mes "[Dylan]";
			mes "You are taking it off.";
			close;
		}
		if (.@item_id != 15146 && .@item_id != 15147) {
			mes "[Dylan]";
			mes "Stop fooling around. If you want to enhance it, come to me wearing the equipment.";
			close;
		}
		if (.@card[2] == 0 || .@card[3] == 0) {
			mes "[Dylan]";
			mes "Oh, this item is not enhanced completely. I cannot reset it yet.";
			close;
		}
		if (countitem(6919) < 10) {
			mes "[Dylan]";
			mes "Hey, buddy. You cannot deal with me if you don't have any Honor Marks.";
			close;
		}
		delitem 6919,10;
		delequip EQI_ARMOR;
		getitem2 .@item_id,1,1,.@refine,0,.@card[0],0,0,0;
		break;
	case 5:
		if (getequipid(EQI_ACC_L) == -1) {
			mes "[Dylan]";
			mes "Oh, I have forgotten to mention it. I only enhance the item equipped in the left slot. Enhance it while equipping it in the left slot.";
			close;
		}
		.@card[2] = getequipcardid(EQI_ACC_L,2);
		.@card[3] = getequipcardid(EQI_ACC_L,3);
		if (.@card[2] == 0 || .@card[3] == 0) {// note: Prontera Badge unslotted
			mes "[Dylan]";
			mes "Oh, this item is not enhanced completely. I cannot reset it yet.";
			close;
		}
		if (getequipid(EQI_ACC_L) != 28356) {
			mes "[Dylan]";
			mes "Stop fooling around. If you want to enhance it, come to me wearing the Prontera Badge.";
			close;
		}
		if (countitem(6919) < 10) {
			mes "[Dylan]";
			mes "Hey, buddy. You cannot deal with me if you don't have any Honor Marks.";
			close;
		}
		delequip EQI_ACC_L;
		delitem 6919,10;
		mes "[Dylan]";
		if (rand(1,100) < 80) {
			mes "Hum, it has been processed well. Check out the item.";
			getitem 28356,1;// Prontera Badge
			specialeffect2 EF_REPAIRWEAPON;
		}
		else {
			mes "I guess you are out of luck. The equipment is broken. Tut tut.";
			.@r = rand(1,100);
			if (.@r < 61) getitem 6920,9;	// RuneMagicPowder
			else if (.@r < 81) getitem 6920,10;
			else if (.@r < 87) getitem 6920,11;
			else if (.@r < 93) getitem 6920,12;
			else if (.@r < 98) getitem 6920,13;
			else if (.@r < 100) getitem 6920,14;
			else getitem 6920,15;
			specialeffect2 EF_LORD;
		}
		close;
	}
	mes "[Dylan]";
	mes "Hum, it has been processed well. Check out the item.";
	specialeffect2 EF_REPAIRWEAPON;
	close;
}

prt_pri00,51,116,8	script	Ellond Lawrence#EP161ER	4_M_CRU,1,1,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (BaseLevel < 140) {
		npctalk "Ellond Lawrence: If you were a bit stronger...What a shame.", "", bc_self;
		mes "[Ellond Lawrence]";
		mes "~Laughs~ You're an adventurer.";
		mes "Unauthorized access to this area is restricted. Thank you for your cooperation.";
		close;
	}
	switch( isbegin_quest(5415) ) {
	case 0:
		mes "[Ellond Lawrence]";
		mes "Hello.";
		next;
		mes "[Ellond Lawrence]";
		mes "I am sorry to say this but unauthorized access to the area you see in the front is restricted. Sorry for the inconvenience and your cooperation will be appreciated.";
		next;
		emotion ET_SURPRISE;
		mes "[Ellond Lawrence]";
		mes "Come to think of it...Not everyone is allowed to enter this place. Whoa!";
		next;
		mes "[Ellond Lawrence]";
		mes "I heard the adventurer who made the significant contribution to defeating Devil King Morocc has been invited to the royal banquet.";
		next;
		mes "[Ellond Lawrence]";
		mes "Since you're here....You must be...!";
		next;
		emotion ET_HUK;
		mes "[Ellond Lawrence]";
		mes "Have you been invited, adventurer?";
		next;
		emotion ET_COOL;
		mes "[Ellond Lawrence]";
		mes "Whoa, this is unbelievable!";
		mes "I heard so much about you. I'm a huge fan!";
		next;
		mes "[Ellond Lawrence]";
		mes "Holy moly! I felt so bad having to guard here in the night of the banquet and I never expected to see you here, Adventurer. Amazing!";
		next;
		mes "[Ellond Lawrence]";
		mes "Let me introduce myself then.";
		mes "I am Ellond Lawrence from the Royal Crusaders. I have so much respect for you.";
		next;
		mes "[Ellond Lawrence]";
		mes "Oh, I almost forgot! Can I get your autograph?";
		next;
		if (select( "Give him your autograph.", "(Decline it.)" ) == 1) {
			input .@string$;
			emotion ET_BIGTHROB;
			mes "[Ellond Lawrence]";
			mes "Thank you so much! Now I have something to brag about to my fellows. What an honor to my family.";
		}
		else {
			mes "[Ellond Lawrence]";
			mes "I'm sorry to hear that, but I understand you have reasons.";
		}
		next;
		mes "[Ellond Lawrence]";
		mes "Oh, right! I see, right!";
		next;
		mes "[Ellond Lawrence]";
		mes "Some discussed the idea during the meeting to ask the famous adventurer to handle the problem at the restricted area. No approval was given to it, but I'll see what I can do with my authority.";
		next;
		select("Problem at the Restricted Area?");
		mes "[Ellond Lawrence]";
		mes "Oh, I knew this would pique your interest, Adventurer.";
		next;
		mes "[Ellond Lawrence]";
		mes "No one will question your reputation and abilities. So I would love to cut to the chase and spill the beans, but...";
		next;
		emotion ET_SHY;
		mes "[Ellond Lawrence]";
		mes "I think I'll have to take a deep breath and drink a cup of water to calm myself down before I do.";
		setquest 5415;// Restricted Sector
		close;
	case 1:
		emotion ET_BEST;
		mes "[Ellond Lawrence]";
		mes "Now that my thirst has been quenched, let me tell you the story.";
		next;
		mes "[Ellond Lawrence]";
		mes "This problem has long been a pain in the neck.";
		next;
		mes "[Ellond Lawrence]";
		mes "There was zero monster in the beginning for sure, but, out of the total blue, they started to appear in the underground dungeons.";
		next;
		mes "[Ellond Lawrence]";
		mes "It doesn't mean we're goofing off around here!";
		next;
		emotion ET_KEK;
		mes "[Ellond Lawrence]";
		mes "We crusaders are doing our best to eliminate the monsters in the underground dungeon as much as we can.";
		next;
		mes "[Ellond Lawrence]";
		mes "Unfortunately, the numbers kept growing to a degree that we can't handle them all by ourselves.";
		next;
		mes "[Ellond Lawrence]";
		mes "I hate to admit, but we haven't even identified where these monsters come from.";
		next;
		mes "[Ellond Lawrence]";
		mes "In the underground dungeon, they are...No. I don't think I should say it right here. You'll see once you get inside.";
		next;
		select("So, what can I do for you?");
		mes "[Ellond Lawrence]";
		mes "Oh, I'm sorry. I think I have said too much.";
		next;
		mes "[Ellond Lawrence]";
		mes "There is no need to submit any investigation report. We've got ours, too.";
		next;
		mes "[Ellond Lawrence]";
		mes "What I would like to ask you to do for us is to mop out the monsters in the underground dungeon as much as you can.";
		next;
		completequest 5415;// Restricted Sector
		mes "[Ellond Lawrence]";
		mes "While you're at it, I would much appreciate it if you can let me in on what goes on inside the underground dungeon.";
		close;
	case 2:
		for ( .@quest_id = 5416; .@quest_id < 5424; .@quest_id++ ) {
			if (isbegin_quest(.@quest_id) == 1)
				break;
			.@total_completed += isbegin_quest(.@quest_id);
		}
		switch(.@quest_id) {
		case 5416:
			select("I've been to the Sector A.");
			emotion ET_HUK;
			completequest 5416;// Restricted Sector A
			mes "[Ellond Lawrence]";
			mes "Whoa, what did you just say? You've been to Sector A?";
			next;
			mes "[Ellond Lawrence]";
			mes "I haven't met that bloke in that sector yet, but one of my fellows appointed to that area did say he can be pretty ferocious.";
			next;
			mes "[Ellond Lawrence]";
			mes "Anyway, it is a relief to hear he hasn't caused any trouble there.";
			close;
		case 5417:
			select("I've been to the Sector B.");
			emotion ET_SURPRISE;
			completequest 5417;// Restricted Sector B
			mes "[Ellond Lawrence]";
			mes "Oh, have you?";
			next;
			mes "[Ellond Lawrence]";
			mes "~Laughs~ He had been my junior to me.";
			next;
			mes "[Ellond Lawrence]";
			mes "He can be pretty annoying, I know. He would ask to make a lifelike doll, and even try to hit on his female fellows.";
			next;
			mes "[Ellond Lawrence]";
			mes "So if he hasn't changed much, that means he's not going to make a problem. I'm relieved to hear that.";
			close;
		case 5418:
			select("I've been to the Sector C.");
			emotion ET_SMILE;
			completequest 5418;// Restricted Sector C
			mes "[Ellond Lawrence]";
			mes "~Laughs~ Have you been to Sector C, eh?";
			next;
			mes "[Ellond Lawrence]";
			mes "Oh, my days! Did he really say you'll be rewarded for those chores? What an improvement!";
			next;
			mes "[Ellond Lawrence]";
			mes "It's not uncommon for the Crusaders to lose something they are not supposed to...";
			next;
			mes "[Ellond Lawrence]";
			mes "I can see they have improved for some reason. They probably like you a lot.";
			close;
		case 5419:
			select("I've been to the Sector D.");
			emotion ET_HUK;
			completequest 5419;// Restricted Sector D
			mes "[Ellond Lawrence]";
			mes "~Gasps~ D...Se...Sector...D...?! ~Gulps~";
			next;
			mes "[Ellond Lawrence]";
			mes "Don't ever let his looks deceive you! He can be the most dangerous one in the prison.";
			next;
			mes "[Ellond Lawrence]";
			mes "If he doesn't try to do anything to you, it must be the best that could ever happen.";
			close;
		case 5420:
			select("I've been to the Sector E.");
			emotion ET_SHY;
			completequest 5420;// Restricted Sector E
			mes "[Ellond Lawrence]";
			mes "I know a few things about the Sector E, actually.";
			next;
			mes "[Ellond Lawrence]";
			mes "Unlike what he looks like, he has such a delicate and warm heart. Still, he can certainly go berserk if things go haywire.";
			next;
			mes "[Ellond Lawrence]";
			mes "Just make sure he doesn't see red. Otherwise, you're going to do fine, I guess.";
			close;
		case 5421:
			select("I've been to the Sector F.");
			emotion ET_OHNO;
			completequest 5421;// Restricted Sector F
			mes "[Ellond Lawrence]";
			mes "Sector F, eh? ~Laughs~ The real troublemaker is locked in there.";
			next;
			mes "[Ellond Lawrence]";
			mes "He would not even lift a finger, bossing everyone around. He thinks the world revolves around him.";
			next;
			mes "[Ellond Lawrence]";
			mes "He can be a complainer but he's harmless. I think you'll be fine with him.";
			close;
		case 5422:
			select("I've been to the Sector G.");
			emotion ET_SCRATCH;
			completequest 5422;// Restricted Sector G
			mes "[Ellond Lawrence]";
			mes "Oh, Sector G you say? Hmm, that zone must be...";
			next;
			mes "[Ellond Lawrence]";
			mes "That prisoner is often called as the sleeping beauty in the prison. I remember he's been sleeping for quite a while.";
			next;
			mes "[Ellond Lawrence]";
			mes "I don't have much to say about him because all I saw about him was sleeping. Well, I think you can make good friends with him.";
			close;
		case 5423:
			select("I've been to the Sector H.");
			emotion ET_HUK;
			completequest 5423;// Restricted Sector H
			mes "[Ellond Lawrence]";
			mes "Ah, Sector H! ~Bursts into laughter~ Is he still a whiner?";
			next;
			mes "[Ellond Lawrence]";
			mes "I was responsible for him when I first came here and his requests were endless!";
			next;
			mes "[Ellond Lawrence]";
			mes "Anyway, he means well.";
			close;
		default:
			break;
		}
		if (.@total_completed == 16 && isbegin_quest(5424) == 0) {
			emotion ET_HUK;
			mes "[Ellond Lawrence]";
			mes "Oh, I almost forgot.";
			next;
			mes "[Ellond Lawrence]";
			mes "In case you forgot, you took a full tour around the underground dungeon.";
			next;
			mes "[Ellond Lawrence]";
			mes "Phenomenal! You are indeed worthy to be invited to the royal banquet on behalf of other numerous adventurers.";
			next;
			mes "[Ellond Lawrence]";
			mes "One more thing. I reported what I requested to you to the superiors.";
			next;
			mes "[Ellond Lawrence]";
			mes "They provided the special reward money for your credibility.";
			next;
			setquest 5424;// [Complete]Restricted Sector
			completequest 5424;// [Complete]Restricted Sector
			getexp 2100000,5500000;
			getitem 6919,2;// TokenOfHonor
			mes "[Ellond Lawrence]";
			mes "Now that you received the special reward money, please keep up the good work.";
			close;
		}
		mes "[Ellond Lawrence]";
		if (isbegin_quest(5424) == 2)
			mes "I appreciate what you do for us, adventurer.";
		else
			mes "I must say it's quite rare to see such a diligent adventurer like you.";
		next;
		mes "[Ellond Lawrence]";
		mes "Are you ready to enter the underground dungeon? Do you have anything you'd like to ask?";
		next;
		switch( select( "To the Underground Dungeon...", "About the Underground Dungeon", "About Them", "I think I saw a bunch like them..." ) ) {
		case 1:
			mes "[Ellond Lawrence]";
			mes "I wish you godspeed.";
			close2;
			warp "prt_prison",160,290;
			end;
		case 2:
			mes "[Ellond Lawrence]";
			mes "Is there something you'd like to know about the underground dungeon?";
			next;
			mes "[Ellond Lawrence]";
			mes "Nothing particular. What you can imagine about the dungeon of the kingdom is all there is.";
			next;
			mes "[Ellond Lawrence]";
			mes "I was told it was made to lock up the menaces to peace and safety of Rune-Midgarts.";
			next;
			mes "[Ellond Lawrence]";
			mes "Basically, it's strongly made, but...";
			next;
			mes "[Ellond Lawrence]";
			mes "The facility there is very old so it must need some mending works here and there.";
			next;
			mes "[Ellond Lawrence]";
			mes "But, as you can see, we can't even find the time to fix anything.";
			next;
			mes "[Ellond Lawrence]";
			mes "The situation here is getting worse, so please take good care of yourself so that you won't get hurt in the dungeon.";
			close;
		case 3:
			mes "[Ellond Lawrence]";
			mes "What you saw in the dungeon are monsters, for sure. What else could they be?";
			next;
			mes "[Ellond Lawrence]";
			mes "This facility is so old and there is no document written about it. We just pass down what people say about it.";
			next;
			mes "[Ellond Lawrence]";
			mes "What's certain is that they were the culprit of the chaos created in Rune-Midgarts in the past.";
			next;
			mes "[Ellond Lawrence]";
			mes "Anyway, there is no document left about them ? for what they were charged or sentences confirmed against them.";
			next;
			mes "[Ellond Lawrence]";
			mes "Although there is a document saying that some crusader lost the document containing the charge and the sentence made...";
			next;
			mes "[Ellond Lawrence]";
			mes "Well, I guess those in the underground dungeon don't seem to care too much about him, so it'd be alright.";
			next;
			mes "[Ellond Lawrence]";
			mes "Some of them must still be inside the prison even when they've done the time.";
			close;
		case 4:
			mes "[Ellond Lawrence]";
			mes "Oh, I heard about that story, too.";
			next;
			mes "[Ellond Lawrence]";
			mes "The Crusaders are consisting of various bunches so some of them are adventurers like yourself.";
			next;
			mes "[Ellond Lawrence]";
			mes "A friend of mine said he saw the monsters from the underground dungeon are going about the world outside of it.";
			next;
			mes "[Ellond Lawrence]";
			mes "The Crusaders say he is bluffing a lot probably because he was an adventurer.";
			next;
			emotion ET_HUK;
			mes "[Ellond Lawrence]";
			mes "No offense, adventurer. This is not about you. He's just full of baloney...";
			next;
			mes "[Ellond Lawrence]";
			mes "I guarantee you that the monsters in the outer world and those in the dungeon must be different beings from each other.";
			next;
			mes "[Ellond Lawrence]";
			mes "They must be remotely related or something.";
			close;
		}
	}

OnTouch:
	if (isbegin_quest(5415) == 0) {
		emotion ET_SORRY;
		mes "[Ellond Lawrence]";
		mes "I am sorry, but unauthorized access to this place is restricted.";
		next;
		mes "[Ellond Lawrence]";
		mes "Sorry for the inconvenience and your cooperation will be appreciated.";
		close;
	}
	end;
}

prt_pri00,58,128,4	script	Overwatcher Terketh#ep16	4_M_JOB_HUNTER,{
	if (ep16_royal < 13) {
		npctalk "...Such a disturbance to my training.", "", bc_self;
		end;
	}
	if (ep16_royal == 13) {
		npctalk "Oh, my! What the...", "", bc_self;
		mes "[Terketh]";
		mes "You are out from the Past Memories of the Royal Family?";
		mes "Since you know the way here, you must have got the permission to move.";
		next;
		mes "[Terketh]";
		mes "Let me send you out.";
		mes "If you move straight up the stairs, you'll find the Crusader's Office.";
		mes "You must to where to go after that, right?";
		erasequest 7695;// Escape from the Past Memories of the Royal Family
		setquest 7696;// What's Next?
		ep16_royal = 14;
		warp "prt_pri00",53,128;
		end;
	}
	mes "[Terketh]";
	mes "What do you want?";
	next;
	if (select( "To the Past Memories of the Royal Family", "To the outside" ) == 2) {
		setpcblock PCBLOCK_NPC, true;
		sleep2 2000;
		npctalk "Well, sure.", "", bc_self;
		sleep2 2000;
		setpcblock PCBLOCK_NPC, false;
		warp "prt_pri00",53,128;
		end;
	}
	setpcblock PCBLOCK_NPC, true;
	sleep2 2000;
	npctalk "Take care. Do not snoop around too much!", "", bc_self;
	sleep2 2000;
	setpcblock PCBLOCK_NPC, false;
	warp "prt_lib",9,28;
	end;
}


// Sector A
prt_prison,243,265,6	script	Prisoner 243AD265#EP161A	4_M_DRAKE,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5415) < 2) {// Restricted Sector
		emotion ET_BLABLA;
		mes "[Prisoner 243AD265]";
		mes "Who is it? Who's calling me?";
		next;
		mes "The prisoner is howling. Is something happening?";
		close;
	}
	if (BaseLevel < 140) {
		mes "[Prisoner 243AD265]";
		mes "You must be adventurer, are you? Hmm...You seem like a beginner. I don't see much charm in you.";
		close;
	}
	switch( isbegin_quest(5425) ) {
	case 0:
		emotion ET_SPARK;
		mes "[Prisoner 243AD265]";
		mes "Pleasure. It's been a while I saw a human around here.";
		next;
		mes "[Prisoner 243AD265]";
		mes "You don't seem like that crusader who put me in here. From what I see, I guess you're an adventurer...Is that so?";
		next;
		mes "[Prisoner 243AD265]";
		mes "It's been a while I saw an adventurer. What brought you here?";
		next;
		mes "- I explained why I came here. -";
		next;
		emotion ET_FRET;
		mes "[Prisoner 243AD265]";
		mes "I thought the Crusaders released them all, no? I must've thought wrong, then.";
		next;
		mes "[Prisoner 243AD265]";
		mes "I just thought the Crusaders released them to disrupt the prisoners' peaceful break.";
		next;
		mes "[Prisoner 243AD265]";
		mes "Anyway, I am sorry that I can't be of any help to you.";
		next;
		emotion ET_QUESTION;
		mes "[Prisoner 243AD265]";
		mes "Human adventurer, I couldn't be of help, but do you mind if I ask you to do me a favor?";
		next;
		select("Let's hear what it is, shall we?");
		mes "[Prisoner 243AD265]";
		mes "Thank you. I was once a seaman, voyaging around the sea.";
		next;
		mes "[Prisoner 243AD265]";
		mes "I met a whole lot of fellow seamen as much as I had been on a voyage. Pleasing fellow, bluffing fellow, chicken-hearted fellow...";
		next;
		emotion ET_BLABLA;
		mes "- The prisoner seems reminiscent of his past, pounding his left chest with his fist. -";
		next;
		mes "[Prisoner 243AD265]";
		mes "Yes, I've had a lot of fellow seamen from all walks of life. But we had to part with each other after we got here...";
		next;
		mes "[Prisoner 243AD265]";
		mes "I've been here for as long as I can remember but that sound...It's pretty recent around here.";
		next;
		mes "[Prisoner 243AD265]";
		mes "It's indistinct but...I can hear the sound from the very far into the darkness, calling me...";
		next;
		mes "[Prisoner 243AD265]";
		mes "Can you find an old fellow of mine who must be locked somewhere in the prison for me?";
		next;
		select("Consider it done.");
		setquest 5416;// Restricted Sector A
		setquest 5425;// To My Beloved Fellow
		mes "[Prisoner 243AD265]";
		mes "Thank you. I hope it is the cry from that fellow.";
		close;
	case 1:
		if (countitem(6925) < 1) {
			mes "[Prisoner 243AD265]";
			mes "Please. I hope it's one of my fellow men. You have no idea how long it's been.";
			close;
		}
		emotion ET_SPARK;
		mes "[Prisoner 243AD265]";
		mes "You came, at last! So what was that sound? Did you meet my man?";
		next;
		mes "- I explained what happened to his fellow. -";
		next;
		mes "[Prisoner 243AD265]";
		mes "So what I heard from darkness was indeed the voice from my fellow man. I hoped he'd be alright.";
		next;
		mes "[Prisoner 243AD265]";
		mes "So he is no longer alive...I know it's been quite a while since that happened, but it's still a shame.";
		next;
		mes "[Prisoner 243AD265]";
		mes "Thank you so much for finding that out for me. I'm much obliged.";
		next;
		mes "[Prisoner 243AD265]";
		mes "By the way, I haven't even asked your name. What is your name?";
		next;
		select("Tell him your name.");
		mes "[Prisoner 243AD265]";
		mes "" + strcharinfo(0) + "....";
		next;
		emotion ET_BLABLA;
		mes "- The prisoner grabs a fist and pounds his left chest. -";
		next;
		delitem 6925,1;// Prisoner_Letter
		completequest 5425;// To My Beloved Fellow
		setquest 5426;// [Stand by]To My Beloved Fellow
		getexp 700000,500000;
		getitem 6919,4;// TokenOfHonor
		mes "[Prisoner 243AD265]";
		mes "I'll inscribe your name right here. I hope you would continue to be the messenger for my fellow men.";
		close;
	case 2:
		switch( checkquest(5426,PLAYTIME) ) {
		case -1:
			if (isbegin_quest(5427) == 0) {
				emotion ET_SPARK;
				mes "[Prisoner 243AD265]";
				mes "Hello. " + strcharinfo(0) + " Howdy.";
				mes "Can you locate an old fellow of mine, again, and deliver his story to me?";
				next;
				if (select( "You can count on me.", "I've got my hands full today." ) == 2) {
					emotion ET_OTL;
					mes "[Prisoner 243AD265]";
					mes "Is that so? That's a shame. Be sure to come back again if you have the time...";
					close;
				}
				setquest 5427;// [Repeat]To My Beloved Fellow
				mes "[Prisoner 243AD265]";
				mes "I sure am counting on you.";
				close;
			}
			if (countitem(6925) < 1) {
				mes "[Prisoner 243AD265]";
				mes "I can't wait to hear it.";
				close;
			}
			mes "[Prisoner 243AD265]";
			mes "I owe you big time. You have no idea.";
			next;
			emotion ET_BLABLA;
			mes "- The prisoner grabs a fist and pounds his left chest. -";
			next;
			delitem 6925,1;// Prisoner_Letter
			erasequest 5427;// [Repeat]To My Beloved Fellow
			setquest 5426;// [Stand by]To My Beloved Fellow
			getexp 700000,500000;
			getitem 6919,4;// TokenOfHonor
			mes "[Prisoner 243AD265]";
			mes "I'll inscribe your name right here. I hope you would continue to be the messenger for my fellow men.";
			close;
		case 0:
		case 1:
			mes "[Prisoner 243AD265]";
			mes "Now that the fellow has become freer from death, I wonder what he's up to. I wonder what kind of memory he would write in his next letter.";
			next;
			mes "The prisoner started singing as if he was reminiscing about something.";
			close2;
			setpcblock PCBLOCK_NPC, true;
			switch( rand(1,5) ) {
			case 1:
				npctalk "Prisoner 243AD265: Good-bye~~ So long~~ My dear lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: I was ordered~~ to go back~~ to my hometown~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: If I do, I will never see you again, my beautiful lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Good-bye~~ So long~~ My dear lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: We will scream~~ We will shout~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Even on the sea~~ We will scream~~ We will shout~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Good-bye~~ So long~~ My dear lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Every mate~~ Fill her up~~ Drink it all up~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: It's for the men~~ We're sad~~ Let's drink away~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Good-bye~~ So long~~ My dear lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: I was ordered~~ to go back~~ to my hometown~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: If I do, I will never see you again, my beautiful lady~~", "", bc_self;
				break;
			case 2:
				npctalk "Prisoner 243AD265: Listen up~~ Young mates~~ Let me tell you about the sea you're all wondering about~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Wind is blowing~~ So is storm~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: When the wind starts to blow~~ Everyone is here together~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Listen up~~ Young mates~~ Let me tell you about the sea you're all wondering about~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: The wind is blowing~~ Storm is coming~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: The wind is blowing~~ The ship is sailing along~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Listen up~~ Young mates~~ Let me tell you about the sea you're all wondering about~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Eels are flying, wagging its fin~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: We spread the sail and dodge the rock~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Listen up~~ Young mates~~ Let me tell you about the sea you're all wondering about~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Shark with sharp teeth is swimming~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: If you eat bread~~ I'll eat the meat~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Listen up~~ Young mates~~ Let me tell you about the sea you're all wondering about~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Large whale~~ swims~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: If you want the wind~~ let me create a gust~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Listen up~~ Young mates~~ Let me tell you about the sea you're all wondering about~~", "", bc_self;
				break;
			case 3:
				npctalk "Prisoner 243AD265: We're coming home~~ We're coming home~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Move forward~~ Move forward~~ Hello~~ Lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: When we return home~~ When we do~~ We'll be good to our parents~~ We will~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Move forward~~ Move forward~~ Hello~~ Lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: The lady here~~ is pretty~~ and amusing~~ She is~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Move forward~~ Move forward~~ Hello~~ Lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Hard-earned money~~ Spend it~~ Spend it all~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Move forward~~ Move forward~~ Hello~~ Lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Let's dance~~ Dance~~ Until~~ We return home~~ Dance away~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Move forward~~ Move forward~~ Hello~~ Lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: When we go home~~ When we do~~ We will dance~~ with our fiancee", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Move forward~~ Move forward~~ Hello~~ Lady~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Say farewell~~ to our loved ones~~ Say~~ farewell~~ Drink up~~ Dance away~~ Dance~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Move forward~~ Move forward~~ Hello~~ Lady~~", "", bc_self;
				break;
			case 4:
				npctalk "Prisoner 243AD265: Hey, hey~~ Set a ship afloat~~ Hey, hey~~ Set it afloat~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Early~~ in the morning~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: What should we do~~ with the drunk sailors~~ What should we do~~ with the drunk sailors~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Early~~ in the morning~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Stick the hose~~ Sink it in the drainage hole~~ Stick the hose~~ Sink it in the drainage hole~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Early~~ in the morning~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: When he wakes up~~ Lock him inside the cabin~~ When he wakes up~~ Lock him inside the cabin~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Early~~ in the morning~~", "", bc_self;
				break;
			case 5:
				npctalk "Prisoner 243AD265: Ahoy~~ Mate~~ Early in the morning~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Ahoy~~ Mate~~ Spread the sail~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Ahoy~~ Mate~~ Pour the liquor~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Ahoy~~ Mate~~ Sing a song~~", "", bc_self;
				sleep2 2000;
				npctalk "Prisoner 243AD265: Ahoy~~ Mate~~", "", bc_self;
				break;
			}
			sleep2 2000;
			npctalk "Prisoner 243AD265: ... ... ...", "", bc_self;
			sleep2 2000;
			setpcblock PCBLOCK_NPC, false;
			emotion ET_HNG;
			npctalk "Prisoner 243AD265: It is far from amusing when there is no fellow sailor around.", "", bc_self;
			end;
		case 2:
			erasequest 5426;// [Stand by]To My Beloved Fellow
			mes "[Prisoner 243AD265]";
			mes "Is it already that time to hear the news from the old fellow of mine?";
			close;
		}
	}
}

prt_prison,205,139,4	script	Dark Shape#EP161A01	4_GHOST_STAND,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if ((isbegin_quest(5425) != 1 && isbegin_quest(5427) != 1) || countitem(6925) > 0)
		mes "The Dark Shape is floating in the dark space. As soon as I showed an interest, it was gone nowhere.";
	else if (isbegin_quest(5427) == 1) {
		mes "The Dark Shape starts to sway when it saw me. Did it mean it's delighted to see me?";
		next;
		select("Anything else to give me?");
		getitem 6925,1;// Prisoner_Letter
		mes "The Dark Shape handed you the letter and was gone.";
		next;
		playbgm "148";
		mes "The Dark Shape seems to be in a good mood, humming along.";
	}
	else {
		mes "The Dark Shape is floating in the dark space. What should I do about it?";
		next;
		select("Ask if he's the fellow of 243AD265.");
		mes "[Dark Shape]";
		mes "That ... ... you ... ... fell ... ... scen ... ... wind ... ...";
		next;
		select("... ... ... ?");
		mes "[Dark Shape]";
		mes "... ... Is ... ... so ... ... who ... ... and ... ... it";
		next;
		select("... ... ... ?");
		mes "[Dark Shape]";
		mes "... I ... ... see ... ... the ... ... airr ... ... ough ...";
		next;
		mes "You have no idea what it's talking about, but get the impression, from its response to what you say, that it must be the one of the Prisoner 243AD265's fellows.";
		next;
		mes "What should you do?";
		next;
		if (select( "Just leave.", "Wait a little more." ) == 2) {
			getitem 6925,1;// Prisoner_Letter
			mes "The Dark Shape handed you the letter and left. Did it mean to ask you to deliver it?";
		}
		else {
			mes "You are becoming increasingly agitated as you can't communicate with it effectively. So you decided to leave.";
			next;
			mes "The Dark Shape must've noticed it. It's gone nowhere, too.";
		}
	}
	.@num = atoi( replacestr( strnpcinfo(2), "EP161A0", "" ) );
	setarray .@npc_num[1],1,2,3,4,5;
	deletearray .@npc_num[.@num],1;
	disablenpc();
	enablenpc "Dark Shape#EP161A0" + .@npc_num[ rand(1,4) ];// enable another npc randomly
	close;

OnInit:
	.@npc_num = atoi( replacestr( strnpcinfo(2), "EP161A0", "" ) );
	if (.num_enabled == 0)
		.num_enabled = rand(1,5);
	if (.num_enabled != .@npc_num)
		disablenpc();// disable 4/5 npcs
	end;
}
prt_prison,153,175,4	duplicate(Dark Shape#EP161A01)	Dark Shape#EP161A02	4_GHOST_STAND
prt_prison,160,224,6	duplicate(Dark Shape#EP161A01)	Dark Shape#EP161A03	4_GHOST_STAND
prt_prison,169,81,6	duplicate(Dark Shape#EP161A01)	Dark Shape#EP161A04	4_GHOST_STAND
prt_prison,203,215,4	duplicate(Dark Shape#EP161A01)	Dark Shape#EP161A05	4_GHOST_STAND

// Sector B
prt_prison,267,184,8	script	Prisoner 267BD184#EP161B	4_DRACULA,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5415) < 2) {// Restricted Sector
		emotion ET_SLEEPY;
		mes "The prisoner here is sitting with the extremely bored look. If you talk to him at this point, you may have to sit down to hang out with him.";
		close;
	}
	if (BaseLevel < 140) {
		mes "[Prisoner 267BD184]";
		mes "Yes, I'm bored as you must've imagined, but I can't hang out with you. Why? You don't have the eyes that I want.";
		close;
	}
	switch( isbegin_quest(5428) ) {
	case 0:
		emotion ET_COOL;
		mes "[Prisoner 267BD184]";
		mes "Hey! Yes, you outside of the steel bars. You have such pretty eyes. My cup of tea.";
		next;
		mes "[Prisoner 267BD184]";
		mes "Please be nice and give me either of your eyes. I'll cherish them.";
		next;
		emotion ET_PROFUSELY_SWEAT, playerattached();
		mes "[" + strcharinfo(0) + "]";
		mes "Whoa, you're being too forward.";
		next;
		emotion ET_CRY;
		mes "[Prisoner 267BD184]";
		mes "Am I? Because those eyes look so gorgeous.";
		mes "Even if you give me one of those, you still have one left. How hard can it be?";
		next;
		emotion ET_HNG;
		mes "[Prisoner 267BD184]";
		mes "You're one greedy fella.";
		next;
		mes "[Prisoner 267BD184]";
		mes "Well, if you say so, can you just find the time to talk with me, then?";
		next;
		if (select( "I can do it.", "No." ) == 2) {
			emotion ET_FRET;
			mes "[Prisoner 267BD184]";
			mes "You're pretty straightforward. If you say so...";
			close;
		}
		mes "[Prisoner 267BD184]";
		mes "Alright, then! What should we talk about first?";
		next;
		mes "[Prisoner 267BD184]";
		mes "How about this? Do you know what charge people put against me? It's the marriage scam!";
		next;
		emotion ET_FRET;
		mes "[Prisoner 267BD184]";
		mes "Marriage scam? Ridiculous! Do I look like someone who would dupe anyone into marrying me?";
		next;
		emotion ET_THINK, playerattached();
		mes "[" + strcharinfo(0) + "]";
		mes "Well, uh...";
		next;
		mes "[Prisoner 267BD184]";
		mes "Oh? You thought so, too?";
		next;
		mes "[Prisoner 267BD184]";
		mes "Pretty eyes don't do any good, I guess! You should open your mind to match those pretty little eyes!";
		next;
		emotion ET_COOL;
		mes "[Prisoner 267BD184]";
		mes "I was merely attracted to the woman with pretty eyes. It was pure love. People don't get me.";
		next;
		emotion ET_SURPRISE;
		mes "[Prisoner 267BD184]";
		mes "Oh, I remember. Yes, there is a bunch who's walking around the underground dungeon as freely as they desire.";
		next;
		mes "[Prisoner 267BD184]";
		mes "I thought that was weird and recently found the cheeky ones with the bat wings when they're not even bats.";
		next;
		emotion ET_OK;
		mes "[Prisoner 267BD184]";
		mes "They were cheeky indeed, but I thought they have pretty blue eyes.";
		next;
		mes "[Prisoner 267BD184]";
		mes "So I told them I would gracefully let them pass with their wings and, in return, they should give me that blue gems.";
		next;
		mes "[Prisoner 267BD184]";
		mes "But they wouldn't listen.";
		next;
		mes "[Prisoner 267BD184]";
		mes "But they might listen to you because you have pretty eyes.";
		next;
		mes "[Prisoner 267BD184]";
		mes "Can you just go ask them to give their pretty gems? I'm not allowed to leave here.";
		next;
		setquest 5417;// Restricted Sector B
		setquest 5428;// Lowly Standards
		mes "[Prisoner 267BD184]";
		mes "If they wouldn't listen, why don't you just take them? How about 20? I'm giving you the special grant.";
		close;
	case 1:
		if (countitem(6924) < 20) {
			mes "[Prisoner 267BD184]";
			mes "It started off with a little chat, but ended up as a request. Haha!";
			next;
			emotion ET_SHY;
			mes "[Prisoner 267BD184]";
			mes "I believe someone with pretty eyes like you should forgive me. So...";
			next;
			mes "[Prisoner 267BD184]";
			mes "Go and get those pretty gems from the cheeky bunch with the bat wings.";
			next;
			mes "[Prisoner 267BD184]";
			mes "You should get me at least 20, alright?";
			close;
		}
		mes "[Prisoner 267BD184]";
		mes "No way! What I saw were blue eyes but these are red! That's odd!";
		next;
		mes "[Prisoner 267BD184]";
		mes "I'll have to take a close look. Will you hand them to me?";
		next;
		mes "[Prisoner 267BD184]";
		mes "Now that I have a job to do for today and you've done a good job. Maybe I should give you a present.";
		next;
		completequest 5428;// Lowly Standards
		delitem 6924,20;// Red_Eyes
		setquest 5429;// [Stand by]Lowly Standards
		getexp 700000,500000;
		getitem 6919,4;// TokenOfHonor
		mes "[Prisoner 267BD184]";
		mes "Humans who had been here before gave me this. I don't like this kind of design, so I'll give it to you.";
		close;
	case 2:
		switch( checkquest(5429,PLAYTIME) ) {
		case -1:
			if (isbegin_quest(5430) == 0) {
				mes "[Prisoner 267BD184]";
				mes "This time, again, I took a close look at it.";
				next;
				emotion ET_OTL;
				mes "[Prisoner 267BD184]";
				mes "But I couldn't find what turned the blue eyes into the red ones.";
				next;
				mes "[Prisoner 267BD184]";
				mes "So I'm asking you ? will you take the blue gems from them again?";
				next;
				if (select( "Give a hand.", "Refuse to help." ) == 2) {
					emotion ET_HNG;
					mes "[Prisoner 267BD184]";
					mes "I thought you'd be different. So disappointing.";
					close;
				}
				setquest 5430;// [Repeat]Lowly Standards
				mes "[Prisoner 267BD184]";
				mes "You should get me at least 20, alright?";
				close;
			}
			if (countitem(6924) < 20) {
				mes "[Prisoner 267BD184]";
				mes "Oh~~ I wish I would get the pretty blue eyes this time~~";
				close;
			}
			emotion ET_COOL;
			mes "[Prisoner 267BD184]";
			mes "Oh, you indeed brought them! I'll take a close look. Let me.";
			next;
			erasequest 5430;// [Repeat]Lowly Standards
			delitem 6924,20;// Red_Eyes
			setquest 5429;// [Stand by]Lowly Standards
			getexp 700000,500000;
			getitem 6919,4;// TokenOfHonor
			mes "[Prisoner 267BD184]";
			mes "Oh, I almost forgot. This is the thing I talked to you the last time. I don't like this kind of design, so I'll give it to you.";
			close;
		case 0:
		case 1:
			emotion ET_STARE;
			mes "He's really taking the time looking closely at the red eyes you brought.";
			next;
			mes "He must not be responding to whatever you say to him now.";
			close;
		case 2:
			emotion ET_SLEEPY;
			erasequest 5429;// [Stand by]Lowly Standards
			mes "[Prisoner 267BD184]";
			mes "Oh, I have nothing else to do. I'm so bored. I should do something.";
			next;
			mes "[Prisoner 267BD184]";
			mes "Oh! Human with pretty eyes! You've come at the right time.";
			close;
		}
	}
}

// Sector C
prt_prison,265,154,4	script	Prisoner 265CM154#EP161C	4_MOONLIGHT,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5415) < 2) {// Restricted Sector
		mes "The prisoner here is gazing around the corners like a hunting lion. You want to get away before you get caught.";
		close;
	}
	if (BaseLevel < 140) {
		mes "[Prisoner 265CM154]";
		mes "Whoa, this is human!";
		mes "I'm sorry to say this but I have to work now. Let me play with you later.";
		close;
	}
	switch( isbegin_quest(5431) ) {
	case 0:
		mes "[Prisoner 265CM154]";
		mes "Whoa, this is human!";
		mes "How did you get in here? You've got some skills!";
		next;
		emotion ET_SEXY;
		mes "[Prisoner 265CM154]";
		mes "Hehe-";
		next;
		emotion ET_GOODBOY, playerattached();
		mes "~Stroking~";
		next;
		emotion ET_BEST;
		mes "[Prisoner 265CM154]";
		mes "Let me give you a compliment stamp. Here it is!";
		next;
		mes "[Prisoner 265CM154]";
		mes "Hehe- I think it's all good since I don't have to see the menacing ones. Right?";
		next;
		emotion ET_QUESTION;
		mes "[Prisoner 265CM154]";
		mes "What I learned is that the humans would do anything for a reward. Am I right or what?";
		next;
		emotion ET_QUESTION;
		mes "[Prisoner 265CM154]";
		mes "Let me give you quite a good one. Just follow one of my 'orders.'";
		next;
		select("Just listen anyway.");
		mes "[Prisoner 265CM154]";
		mes "Oh, good! How nice!";
		mes "You're such a good human. See? You'll know what I mean if you have eyes.";
		next;
		mes "[Prisoner 265CM154]";
		mes "This underground dungeon used to be clean and neat. Once the humans came along a while ago, it got dirty probably because they haven't done the proper cleaning.";
		next;
		mes "[Prisoner 265CM154]";
		mes "Watch this, human. Trust my detective instinct. Do you see them wandering around here?";
		next;
		emotion ET_STARE;
		mes "[Prisoner 265CM154]";
		mes "I have no idea how they got in, but I'm absolutely sure they're the cause of dirtiness in the prison.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Do you want me to attack them?";
		next;
		emotion ET_HUK;
		mes "[Prisoner 265CM154]";
		mes "What are you talking about, human? They're nice. I didn't know you'd be this violent. I'm disappointed.";
		next;
		setquest 5418;// Restricted Sector C
		setquest 5431;// Clean Life
		mes "[Prisoner 265CM154]";
		mes "Stop harassing the innocent kids. Just go around the prison and clean up the mess.";
		close;
	case 1:
		if (isbegin_quest(5432) == 0) {
			mes "[Prisoner 265CM154]";
			mes "Human! Don't try to cut corners ? wipe it all up here and there. Make it clean. Do it right.";
			close;
		}
		emotion ET_BEST;
		mes "[Prisoner 265CM154]";
		mes "You've done your cleaning? Yay! Here's your compliment stamp!";
		next;
		emotion ET_BEST;
		mes "[Prisoner 265CM154]";
		mes "Now that the prison becomes clean, you must be feeling good, too, aren't you, human? We should do the cleaning more often.";
		next;
		mes "[Prisoner 265CM154]";
		mes "Oh, right! I told you I'd give you a reward, didn't I?";
		mes "This is what the human who worked here before gave me. You've been such a sport so let me give you this.";
		next;
		completequest 5431;// Clean Life
		erasequest 5432;// Cleaning is complete.
		setquest 5433;// [Stand by]Clean Life
		getexp 700000,500000;
		getitem 6919,4;// TokenOfHonor
		mes "[Prisoner 265CM154]";
		mes "If you come back again tomorrow and give me a hand, there will be more of this. Come back often!";
		close;
	case 2:
		switch( checkquest(5433,PLAYTIME) ) {
		case -1:
			if (isbegin_quest(5434) == 0) {
				mes "[Prisoner 265CM154]";
				mes "Now that the prison has gotten messy as I intended. So it's finally the time for cleaning.";
				next;
				emotion ET_WRAP;
				mes "[Prisoner 265CM154]";
				mes "Cleaning will make the day rewarding!";
				next;
				if (select( "Let's go!", "No way! I will never do it. Over my dead body." ) == 2) {
					emotion ET_OHNO;
					mes "[Prisoner 265CM154]";
					mes "Oh, you...! I knew you'd be better but I didn't know you were this lazy. Big letdown!";
					close;
				}
				setquest 5434;// [Repeat]Clean Life
				emotion ET_BEST;
				mes "[Prisoner 265CM154]";
				mes "Let the cleaning begin!";
				close;
			}
			if (isbegin_quest(5435) == 0) {
				mes "[Prisoner 265CM154]";
				mes "Human! Don't try to cut corners ? wipe it all up here and there. Make it clean. Do it right.";
				close;
			}
			emotion ET_BEST;
			mes "[Prisoner 265CM154]";
			mes "What a good human! You've earned another compliment stamp! Here it is!";
			next;
			erasequest 5434;// [Repeat]Clean Life
			erasequest 5435;// [Repeat]Cleaning is complete.
			setquest 5433;// [Stand by]Clean Life
			getexp 700000,500000;
			getitem 6919,4;// TokenOfHonor
			mes "[Prisoner 265CM154]";
			mes "Now that you finished cleaning for today, let me give you this. Come back tomorrow!";
			close;
		case 0:
		case 1:
			emotion ET_OHNO;
			mes "[Prisoner 265CM154]";
			mes "You don't seem to know the fun of messing things up. Messing is as fun as cleaning!";
			next;
			mes "[Prisoner 265CM154]";
			mes "That's about enough now. You can do the rest tomorrow.";
			close;
		case 2:
			erasequest 5433;// [Stand by]Clean Life
			mes "[Prisoner 265CM154]";
			mes "You've come at the right time. The prison has gotten properly messy, so it's time for cleaning.";
			close;
		}
	}
}

// Rubbish heap
prt_prison,118,247,4	script	Rubbish heap#EP161C01	4_ENERGY_BLACK,{
	if ((isbegin_quest(5431) == 1 && isbegin_quest(5432) == 0) || (isbegin_quest(5434) == 1 && isbegin_quest(5435) == 0)) {
		mes "Some stuff left around the floor are lumped together.";
		next;
		if (select( "Clean them.", "Just leave them." ) == 1) {
			progressbar "ffff00",2;
			.@r = rand(1,100);
			if (.@r < 10 || .@r > 30)
				mes "You're sad but there still are much to clean. Go find something to clean up.";
			else {
				mes "You finished cleaning. Report the result.";
				if (isbegin_quest(5431) == 1)
					setquest 5432;// [Repeat]Cleaning is complete.
				else
					setquest 5435;// [Repeat]Cleaning is complete.
			}
			initnpctimer;
			disablenpc();
		}
		close;
	}
	end;
OnTimer30000:
OnTimer60000:
OnTimer90000:
OnTimer120000:
OnTimer150000:
OnTimer180000:
OnTimer210000:
OnTimer240000:
OnTimer270000:
	if (rand(1,2) == 1) {
		stopnpctimer;
		enablenpc();
	}
	end;
OnTimer300000:
	stopnpctimer;
	enablenpc();
	end;
}
prt_prison,171,247,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C02	4_ENERGY_BLACK
prt_prison,181,230,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C03	4_ENERGY_BLACK
prt_prison,238,165,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C04	4_ENERGY_BLACK
prt_prison,252,132,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C05	4_ENERGY_BLACK
prt_prison,232,137,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C06	4_ENERGY_BLACK
prt_prison,200,133,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C07	4_ENERGY_BLACK
prt_prison,212,107,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C08	4_ENERGY_BLACK
prt_prison,235,107,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C09	4_ENERGY_BLACK
prt_prison,198,87,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C10	4_ENERGY_BLACK
prt_prison,218,75,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C11	4_ENERGY_BLACK
prt_prison,232,83,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C12	4_ENERGY_BLACK
prt_prison,207,50,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C13	4_ENERGY_BLACK
prt_prison,231,55,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C14	4_ENERGY_BLACK
prt_prison,220,19,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C15	4_ENERGY_BLACK
prt_prison,168,31,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C16	4_ENERGY_BLACK
prt_prison,160,70,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C17	4_ENERGY_BLACK
prt_prison,156,87,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C18	4_ENERGY_BLACK
prt_prison,140,93,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C19	4_ENERGY_BLACK
prt_prison,113,98,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C20	4_ENERGY_BLACK
prt_prison,91,101,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C21	4_ENERGY_BLACK
prt_prison,112,79,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C22	4_ENERGY_BLACK
prt_prison,122,42,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C23	4_ENERGY_BLACK
prt_prison,135,127,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C24	4_ENERGY_BLACK
prt_prison,67,149,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C25	4_ENERGY_BLACK
prt_prison,251,259,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C26	4_ENERGY_BLACK
prt_prison,220,255,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C27	4_ENERGY_BLACK
prt_prison,243,239,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C28	4_ENERGY_BLACK
prt_prison,276,195,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C29	4_ENERGY_BLACK
prt_prison,188,186,4	duplicate(Rubbish heap#EP161C01)	Rubbish heap#EP161C30	4_ENERGY_BLACK

// Sector D
prt_prison,243,17,4	script	Prisoner 243DV17#EP161D	4_PORING,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5415) < 2 || BaseLevel < 140) {// Restricted Sector
		emotion ET_THINK, playerattached();
		emotion ET_THINK;
		mes "... ... ... ...";
		close;
	}
	if (isbegin_quest(5419) == 0) {
		mes "[Prisoner 243DV17]";
		mes "What is it, human? Anything you want to say to me?";
		next;
		input .@string$;
		setquest 5419;// Restricted Sector D
		mes "[Prisoner 243DV17]";
		mes "What are you talking about? I don't have time for this. Beat it.";
		close2;
		warp "prt_prison",160,290;
		end;
	}
	.@r = rand(1,10);
	if (.@r == 3) {
		mes "[Prisoner 243DV17]";
		mes "What?! Do you have anything to say to me? Spit it out, then!";
		next;
		input .@string$;
		mes "[" + strcharinfo(0) + "]";
		mes "" + .@string$ + "";
		next;
		mes "[Prisoner 243DV17]";
		mes "" + .@string$ + " ? Is that it?";
		next;
		mapannounce "prt_prison", "Mysterious Shout: Idiot " + strcharinfo(0) + " says " + .@string$ + "", bc_map, 0x9CFF00;
		sleep2 3000;
		mapannounce "prt_prison", "Mysterious Laughter: Giggle", bc_map, 0x9CFF00;
		mes "I was ridiculed for no reason and it really feels bad.";
		next;
		mes "[Prisoner 243DV17]";
		mes "What?! Do you have a problem with me? Be gone now.";
		close;
	}
	if (.@r == 7) {
		emotion ET_KIK;
		mes "[Prisoner 243DV17]";
		mes "~Giggles~ I suddenly feel better now. Alright, what the heck. I'll send you to the sector you want for 1 Jellopy.";
		next;
		if (countitem(909) < 1) {
			emotion ET_HUM;
			mes "[Prisoner 243DV17]";
			mes "What? You don't even have Jellopy with you? How useless are you?";
			close;
		}
		delitem 909,1;// Jellopy
		setarray .@sector$[0], "Prison Entrance", "Sector A", "Sector B", "Sector C", "Sector D", "Sector E", "Sector F", "Sector G", "Sector H";
		.@s = select( implode(.@sector$,":") ) - 1;
		mes "[Prisoner 243DV17]";
		if (.@s == 4)	// Sector D
			mes "What? Sector D is right here! Well, I've got my Jellopy so I don't care. Let me send you there.";
		else
			mes "Thank you for Jellopy! " + .@sector$[.@s] + " it is, then. Off you go!";
		close2;
		switch(.@s) {
		case 0:
			warp "prt_prison",160,290;	// Prison Entrance
			break;
		case 1:
			warp "prt_prison",245,255;	// Sector A
			break;
		case 2:
			warp "prt_prison",265,195;	// Sector B
			break;
		case 3:
			warp "prt_prison",255,155;	// Sector C
			break;
		case 4:
			warp "prt_prison",230,20;	// Sector D
			break;
		case 5:
			warp "prt_prison",105,75;	// Sector E
			break;
		case 6:
			warp "prt_prison",105,190;	// Sector F
			break;
		case 7:
			warp "prt_prison",95,215;	// Sector G
			break;
		case 8:
			warp "prt_prison",55,125;	// Sector H
			break;
		}
		end;
	}
	emotion ET_OHNO;
	mes "[Prisoner 243DV17]";
	mes "Just leave me alone! Go away!";
	close;
}

// Sector E
prt_prison,95,72,6	script	Prisoner 95EB72#EP161E	4_BAPHOMET,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5415) < 2) {// Restricted Sector
		specialeffect EF_SLEEPATTACK;
		mes "Zzzzzzzzz...~Snores~";
		next;
		mes "The prisoner is breathing calmly so he must be sleeping.";
		close;
	}
	if (BaseLevel < 140) {
		mes "[Prisoner 95EB72]";
		mes "What a worthless human!";
		close;
	}
	switch( isbegin_quest(5436) ) {
	case 0:
		emotion ET_SEXY;
		mes "[Prisoner 95EB72]";
		mes "~Sniffs~ This smell...Yes...It is human...";
		next;
		emotion ET_KIK;
		mes "[Prisoner 95EB72]";
		mes "~Giggles~ It's been such a while since any human came along in this dark underground. Get over here, human. It's been a while so I will show mercy and let you live.";
		next;
		select("Approach closer.");
		npctalk "~Cringes~", "", bc_self;
		sleep2 2000;
		emotion ET_SWEAT;
		mes "[Prisoner 95EB72]";
		mes "~Evil laughter~ You've got the courage, human!";
		mes "I can't wait to let the dumb humans taste of my fist of terror!";
		next;
		mes "[Prisoner 95EB72]";
		mes "Now I can't let myself out of this dark and damp place because of the chicken-hearted human. Once I get out of here, I will never forgive the humans.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well...there is particularly no need to...";
		next;
		npctalk "~Cringes~", "", bc_self;
		sleep2 2000;
		emotion ET_KIK;
		mes "[Prisoner 95EB72]";
		mes "~Evil laughter~";
		mes "Talking back to me? How dare you! But I like your audacity, too. You can be my underling, then.";
		next;
		select("By the way, didn't you just cringe?");
		emotion ET_QUESTION, playerattached();
		sleep2 2000;
		emotion ET_STARE;
		mes "[Prisoner 95EB72]";
		mes "Wa-hahaha! I think I've got myself a cocky underling.";
		mes "Remember. A dark and humid place like this one is a match for a doppelganger who is blatantly wicked and doesn't even have its own face.";
		next;
		mes "[Prisoner 95EB72]";
		mes "~Evil laughter~";
		mes "Let me give a chance to this amusing underling to prove your sense of loyalty. I'll have to brighten up this place first.";
		next;
		emotion ET_BLABLA, playerattached();
		mes "[" + strcharinfo(0) + "]";
		mes "Haven't we just...met?";
		next;
		setquest 5420;// Restricted Sector E
		setquest 5436;// Finding Lights
		mes "[Prisoner 95EB72]";
		mes "Underling. Get me the torch burning brightly in the prison. This place is too dark. I'll have to turn this place bright like my own hometown.";
		close;
	case 1:
		if (countitem(6923) < 1) {// Bright Light
			mes "[Prisoner 95EB72]";
			mes "Underling. Get me the torch burning brightly in the prison. I'll have to turn this place bright like my own hometown.";
			close;
		}
		mes "[Prisoner 95EB72]";
		mes "~Evil laughter~";
		mes "What a loyal subordinate! Now I can lead a bright life, at least for a while, thanks to your contribution.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I mean, I am not your under...";
		next;
		emotion ET_OHNO;
		mes "[Prisoner 95EB72]";
		mes "I would like to give you a reward, but I'm afraid I don't have much. I would've given you a world of treasures if it were my golden days.";
		next;
		mes "[Prisoner 95EB72]";
		mes "Underling, this is a shame, but I'll give you something I took from the human who would come in here.";
		next;
		completequest 5436;// Finding Lights
		setquest 5437;// [Stand by]Finding Lights
		delitem 6923,1;// Bright_Lights
		getexp 700000,500000;
		getitem 6919,4;// TokenOfHonor
		mes "[Prisoner 95EB72]";
		mes "I promise you a lot more rewards the day when I stand tall in the world again.";
		close;
	case 2:
		switch( checkquest(5437,PLAYTIME) ) {
		case -1:
			if (isbegin_quest(5438) == 0) {
				mes "[Prisoner 95EB72]";
				mes "It's time to demonstrate your sense of loyalty. Get me the torch burning brightly in the prison.";
				next;
				if (select( "Not so fast.", "Okay..." ) == 1) {
					mes "[Prisoner 95EB72]";
					mes "Is there anything you should do now? I'm perplexed to hear it but I will do my best to understand you.";
					mes "Still, don't make me wait too long.";
					close;
				}
				setquest 5438;// [Repeat]Finding Lights
				mes "[Prisoner 95EB72]";
				mes "~Laughter~ Go! Go and get the torch burning most brightly in the prison.";
				close;
			}
			if (countitem(6923) < 1) {// Bright Light
				mes "[Prisoner 95EB72]";
				mes "Go and get the torch burning most brightly in the prison, again.";
				close;
			}
			emotion ET_SMILE;
			mes "[Prisoner 95EB72]";
			mes "What an exemplary subordinate! Now I can lead a bright life, at least for a while, thanks to your contribution.";
			next;
			erasequest 5438;// [Repeat]Finding Lights
			setquest 5437;// [Stand by]Finding Lights
			delitem 6923,1;// Bright_Lights
			getexp 700000,500000;
			getitem 6919,4;// TokenOfHonor
			mes "[Prisoner 95EB72]";
			mes "Keep this in mind. I promise you a lot more rewards the day when I stand tall in the world again.";
			close;
		case 0:
		case 1:
			mes "[Prisoner 95EB72]";
			mes "Things haven't changed much but it still feels good to see this place has gotten brighter.";
			close;
		case 2:
			erasequest 5437;// [Stand by]Finding Lights
			mes "[Prisoner 95EB72]";
			mes "Just so you know, the torchlight you brought is waning. It's time to show me your sense of worth to me again.";
			close;
		}
	}
}

// Torchs
prt_prison,146,268,4	script	Torch#EP161EB01	CLEAR_NPC,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5436) == 0 && isbegin_quest(5438) == 0)
		end;
	mes "This is a large torch burning quite brightly.";
	if (countitem(6923) < 1) {
		next;
		select("Collect the light.");
		progressbar "ffff00",2;
		.@r = rand(1,100);
		if (.@r >= 25 && .@r <= 50) {
			getitem 6923,1;// Bright Light
			specialeffect2 EF_LIGHTSPHERE;
			mes "You carefully collected the light and obtained the bright light.";
		}
		else {
			specialeffect2 406;
			mes "You carefully collected the light but it scattered.";
		}
		initnpctimer;
		disablenpc();
	}
	close;

OnTimer30000:
OnTimer60000:
OnTimer90000:
OnTimer120000:
OnTimer150000:
	if (rand(1,2) == 1) {
		stopnpctimer;
		enablenpc();
	}
	end;
OnTimer180000:
	stopnpctimer;
	enablenpc();
	end;
}
prt_prison,177,268,4	duplicate(Torch#EP161EB01)	Torch#EP161EB02	CLEAR_NPC
prt_prison,170,286,4	duplicate(Torch#EP161EB01)	Torch#EP161EB03	CLEAR_NPC
prt_prison,39,160,4	duplicate(Torch#EP161EB01)	Torch#EP161EB04	CLEAR_NPC
prt_prison,72,160,4	duplicate(Torch#EP161EB01)	Torch#EP161EB05	CLEAR_NPC
prt_prison,81,148,4	duplicate(Torch#EP161EB01)	Torch#EP161EB06	CLEAR_NPC
prt_prison,81,138,4	duplicate(Torch#EP161EB01)	Torch#EP161EB07	CLEAR_NPC
prt_prison,72,126,4	duplicate(Torch#EP161EB01)	Torch#EP161EB08	CLEAR_NPC
prt_prison,38,126,4	duplicate(Torch#EP161EB01)	Torch#EP161EB09	CLEAR_NPC
prt_prison,141,152,4	duplicate(Torch#EP161EB01)	Torch#EP161EB10	CLEAR_NPC
prt_prison,159,153,4	duplicate(Torch#EP161EB01)	Torch#EP161EB11	CLEAR_NPC
prt_prison,158,135,4	duplicate(Torch#EP161EB01)	Torch#EP161EB12	CLEAR_NPC
prt_prison,141,135,4	duplicate(Torch#EP161EB01)	Torch#EP161EB13	CLEAR_NPC
prt_prison,122,46,4	duplicate(Torch#EP161EB01)	Torch#EP161EB14	CLEAR_NPC
prt_prison,129,46,4	duplicate(Torch#EP161EB01)	Torch#EP161EB15	CLEAR_NPC
prt_prison,186,46,4	duplicate(Torch#EP161EB01)	Torch#EP161EB16	CLEAR_NPC
prt_prison,186,37,4	duplicate(Torch#EP161EB01)	Torch#EP161EB17	CLEAR_NPC
prt_prison,237,139,4	duplicate(Torch#EP161EB01)	Torch#EP161EB18	CLEAR_NPC
prt_prison,246,140,4	duplicate(Torch#EP161EB01)	Torch#EP161EB19	CLEAR_NPC

// Sector F
prt_prison,117,188,4	script	Prisoner 117FM188#EP161F	4_MISTRESS,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5415) < 2) {// Restricted Sector
		emotion ET_BLABLA;
		mes "[Prisoner 117FM188]";
		mes "Hey, are you that new servant?";
		next;
		mes "The prisoner inside seems to be looking for a servant. I think he saw me but I'll just have to act like I didn't hear him.";
		close;
	}
	if (BaseLevel < 140) {
		mes "[Prisoner 117FM188]";
		mes "Tsk, tsk. Even a servant is supposed to know manners.";
		close;
	}
	switch( isbegin_quest(5439) ) {
	case 0:
		emotion ET_HNG;
		mes "[Prisoner 117FM188]";
		mes "Are you that new servant? I guess the prisoner keeper has sent another human servant, then.";
		next;
		mes "[Prisoner 117FM188]";
		mes "I didn't like the human servant last time. He was too weak. I don't know about you.";
		next;
		mes "[Prisoner 117FM188]";
		mes "I'm worried but there is nothing else I can do.";
		next;
		emotion ET_QUESTION;
		mes "[Prisoner 117FM188]";
		mes "Human servant. What is your name? What should I call you?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "" + strcharinfo(0) + "..";
		next;
		emotion ET_SCRATCH;
		mes "[Prisoner 117FM188]";
		mes "" + strcharinfo(0) + " What a weird and difficult name to pronounce! I wanted to call you by your name, but, I don't think I can.";
		next;
		mes "[Prisoner 117FM188]";
		mes "Oh, right, you're Noyel! I like the sound of the name. Your name is Noyel from now on.";
		next;
		mes "[Prisoner 117FM188]";
		mes "Noyel, I have a question! Are the other human prisoners living in this dire environment?";
		next;
		mes "[Prisoner 117FM188]";
		mes "I know I'm a prisoner here, but I don't understand why they have to lock me in this place that is so dirty and humid.";
		next;
		emotion ET_FRET;
		emotion ET_BLABLA;
		mes "[Prisoner 117FM188]";
		mes "Noyel, go ahead and bring that prisoner keeper. I have a bone to pick with him.";
		next;
		emotion ET_SCRATCH, playerattached();
		mes "[" + strcharinfo(0) + "]";
		mes "I don't think that's going to happen.";
		next;
		mes "[Prisoner 117FM188]";
		mes "I didn't know a servant has no right to meet with the prisoner keepers. My apology.";
		next;
		mes "[Prisoner 117FM188]";
		mes "But I can't go there myself. That means it's impossible to meet him then. We should come up with an alternative.";
		next;
		mes "[Prisoner 117FM188]";
		mes "... ... ... ... ...";
		next;
		mes "[Prisoner 117FM188]";
		mes "Now I remember. The servant who used to serve me gave me that. I'm not sure it's still here.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What item is it?";
		next;
		mes "[Prisoner 117FM188]";
		mes "For what I remember, it was something that you humans use. It is called a dehumidifier removing humidity around you. Do you know what that is?";
		next;
		setquest 5421;// Restricted Sector F
		setquest 5439;// Refreshing Prison Life
		mes "[Prisoner 117FM188]";
		mes "Maybe I should use it because I don't have any other option. Bring me about 20 of them.";
		close;
	case 1:
		if (countitem(6921) < 20) {
			mes "[Prisoner 117FM188]";
			mes "Still no dehumidifiers for me, Noyel? I don't need many. 20 dehumidifiers will do.";
			close;
		}
		emotion ET_DELIGHT;
		mes "[Prisoner 117FM188]";
		mes "I start to feel the damp and soggy place is getting freshened up, Noyel.";
		next;
		mes "[Prisoner 117FM188]";
		mes "Good job. Go have a rest until I call you back up.";
		next;
		delitem 6921,20;// Desiccant
		completequest 5439;// Refreshing Prison Life
		setquest 5440;// [Stand by]Refreshing Prison Life
		getexp 700000,500000;
		getitem 6919,4;// TokenOfHonor
		mes "[Prisoner 117FM188]";
		mes "It's nothing. I don't need it so you take and use it.";
		close;
	case 2:
		switch( checkquest(5440,PLAYTIME) ) {
		case -1:
			if (isbegin_quest(5441) == 0) {
				emotion ET_SURPRISE;
				mes "[Prisoner 117FM188]";
				mes "Noyel, the humidifier you brought for me doesn't seem to work. Will you bring another new one?";
				next;
				if (select( "Will do right away.", "Ah...I've got other business to go about now." ) == 2) {
					emotion ET_OTL;
					mes "[Prisoner 117FM188]";
					mes "Noyel! Where do you think you're going? Noel.";
					close;
				}
				setquest 5441;// [Repeat]Refreshing Prison Life
				mes "[Prisoner 117FM188]";
				mes "Thank you, Noyel. I will wait for you to bring me 20 dehumidifiers.";
				close;
			}
			if (countitem(6921) < 20) {
				emotion ET_FRET;
				mes "[Prisoner 117FM188]";
				mes "Noyel, when can I get those 20 dehumidifiers? The air feels so soggy and it's starting to feel unpleasant.";
				close;
			}
			emotion ET_FRET;
			mes "[Prisoner 117FM188]";
			mes "You're late, Noyel. Did you have a hard time getting the dehumidifier?";
			next;
			mes "[Prisoner 117FM188]";
			mes "I was actually starting to feel displeased by the dampening air.";
			next;
			delitem 6921,20;// Desiccant
			erasequest 5441;// [Repeat]Refreshing Prison Life
			setquest 5440;// [Stand by]Refreshing Prison Life
			getexp 700000,500000;
			getitem 6919,4;// TokenOfHonor
			mes "[Prisoner 117FM188]";
			mes "You did a good job getting the humidifier, Noyel.";
			close;
		case 0:
		case 1:
			emotion ET_DELIGHT;
			mes "[Prisoner 117FM188]";
			mes "Noyel, the air I breathe couldn't be more fresh now!";
			next;
			mes "[Prisoner 117FM188]";
			mes "Even the prisoners deserve the pleasant environment to live. Keep that in mind, Noyel. Just in case.";
			close;
		case 2:
			emotion ET_FRET;
			erasequest 5440;// [Stand by]Refreshing Prison Life
			mes "[Prisoner 117FM188]";
			mes "Welcome, Noyel.";
			mes "The dehumidifier you brought doesn't seem to function well. It's time to replace it with a new one.";
			close;
		}
	}
}

// Sector G
prt_prison,103,214,4	script	Prisoner 103GD214#EP161G	4_DARKLORD,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5415) < 2) {// Restricted Sector
		emotion ET_BLABLA;
		mes "[Prisoner 103GD214]";
		mes "~Keeps giggling~";
		next;
		mes "The prisoner here is smiling out of his pain. I don't think he's in normal condition. Should I pass him?";
		close;
	}
	if (BaseLevel < 140) {
		mes "[Prisoner 117FM188]";
		mes "... ... ... ... ...";
		close;
	}

	setarray .@flowers[0],
		 710, 100,	// ID, percent
		6509, 50,
		6510, 50,
		 704, 30,
		 709, 30,
		 703, 30,
		 708, 30,
		6511, 10,
		 712, 10;
	.@size = getarraysize(.@flowers);
	for ( .@index = 0; .@index < .@size; .@index += 2 ) {
		if (countitem(.@flowers[.@index]) > 0)
			break;
	}
	switch( isbegin_quest(5442) ) {
	case 0:
		emotion ET_BLABLA;
		mes "[Prisoner 103GD214]";
		mes "~Evil laughter continues~";
		next;
		mes "[Prisoner 103GD214]";
		mes "~Giggles~ How long have I waited for a guest?";
		next;
		mes "[Prisoner 103GD214]";
		mes "Even if your fear of me binds me here in the land of darkness, you can never bind my will. Mark my word.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What are you talking about?";
		next;
		mes "[Prisoner 103GD214]";
		mes "Hahaha!! Now I remember.";
		next;
		mes "[Prisoner 103GD214]";
		mes "Ever since the cowards stopped coming to this land of darkness, I took my last sleep out of boredom.";
		next;
		mes "[Prisoner 103GD214]";
		mes "B.U.T.!";
		next;
		mes "[Prisoner 103GD214]";
		mes "That was my mistake. Darkness inside of me became greater during my sleep and the followers awaken by darkness changed a lot of things in this land.";
		next;
		emotion ET_BLABLA;
		specialeffect EF_DEVIL4;
		specialeffect EF_POISONSMOKE;
		mes "[Prisoner 103GD214]";
		mes "~Evil laughter~";
		mes "I hate to admit this but darkness is stomping around. I need something to bring it under control.";
		next;
		mes "[Prisoner 103GD214]";
		mes "~Grunts~ Human...";
		mes "It doesn't happen every day for a lard to ask you to do something. ~Grunts~ Bring me...some flowers...";
		next;
		mes "[Prisoner 103GD214]";
		mes "Flowers representing the world are what not only soothes down darkness but also brings the peace of mind.";
		next;
		mes "[Prisoner 103GD214]";
		mes "~Grunts~ It must be effective in calming down the growing darkness.";
		next;
		specialeffect EF_DEVIL4;
		specialeffect EF_POISONSMOKE;
		mes "[Prisoner 103GD214]";
		mes "Aaarrgghh--!!";
		next;
		setquest 5422;// Restricted Sector G
		setquest 5442;// Suppressing Darkness
		mes "[Prisoner 103GD214]";
		mes "Hurry. ~Grunts~ Darkness inside of me is trying to stomp around. If you don't want to see the world brought to ashes by this darkness, bring me...flowers...Now.";
		close;
	case 1:
		if (.@flowers[.@index] < 1) {
			mes "[Prisoner 103GD214]";
			mes "~Grunts~ I'll wait here for you. Any flowers would do. Bring me flowers.";
			close;
		}
		mes "[Prisoner 103GD214]";
		mes "You brought the flowers, human!";
		mes "~Evil laughter~ Human! You saved the world against darkness. Be glad!";
		next;
		specialeffect EF_HEALSP;
		mes "[Prisoner 103GD214]";
		mes "I can feel darkness inside is getting under control.";
		next;
		mes "[Prisoner 103GD214]";
		mes "~Grunts~ How pathetic I have become, getting help from a human...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "You don't need to thank me. But, why the flowers?";
		next;
		emotion ET_STARE;
		mes "[Prisoner 103GD214]";
		mes "Human! Don't be so nosy.";
		next;
		mes "[Prisoner 103GD214]";
		mes "Wait. Maybe it's alright after all since you're my savior.";
		next;
		mes "[Prisoner 103GD214]";
		mes "Alright, whatever. I'll let you in on it just this once.";
		next;
		mes "[Prisoner 103GD214]";
		mes "It was around the time when I was holding sway in the world. I was conquering one of the human towns with my followers.";
		next;
		mes "[Prisoner 103GD214]";
		mes "I met a girl in that village who was different from other humans.";
		next;
		mes "[Prisoner 103GD214]";
		mes "Humans who got scared silly were busy running away from me and my followers but that girl was different. She reached out to me.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "So, what happened?";
		next;
		mes "[Prisoner 103GD214]";
		mes "You, human! Don't people often say you can be a wet blanket?";
		next;
		mes "[Prisoner 103GD214]";
		mes "This story doesn't deserve repetition.";
		next;
		mes "[Prisoner 103GD214]";
		mes "It's true that you've been of help so let me give you one of the things that the followers left for me.";
		next;
		delitem .@flowers[.@index],1;
		completequest 5442;// Suppressing Darkness
		setquest 5443;// [Stand by]Suppressing Darkness
		getexp 700000,500000;
		getitem 6919,4;// TokenOfHonor
		mes "[Prisoner 103GD214]";
		mes "~Grunts~ If you don't want to see my darkness drags down the whole world to ashes, you'd better come often and bring me flowers.";
		close;
	case 2:
		switch( checkquest(5443,PLAYTIME) ) {
		case -1:
			if (isbegin_quest(5444) == 0) {
				specialeffect EF_DEVIL4;
				specialeffect EF_POISONSMOKE;
				mes "[Prisoner 103GD214]";
				mes "Aarghh!! Darkness is about to stomp around!";
				next;
				mes "[Prisoner 103GD214]";
				mes "Darkness should be taken under control. Give me that flower...quick! Aargh!!";
				next;
				mes "[Prisoner 103GD214]";
				mes "Please get me one flower to calm down darkness, human...";
				next;
				if (select( "Okay.", "I'm sorry, but now..." ) == 2) {
					specialeffect EF_DEVIL4;
					specialeffect EF_POISONSMOKE;
					mes "[Prisoner 103GD214]";
					mes "I'll hang in there. Just don't be too late...";
					close;
				}
				setquest 5444;// [Repeat]Suppressing Darkness
				mes "[Prisoner 103GD214]";
				mes "Please...~Grunts~ Human...";
				close;
			}
			if (.@flowers[.@index] < 1) {
				mes "[Prisoner 103GD214]";
				mes "Oh, no. It's getting out of my hand. Before this darkness goes berserk, bring me...flowers...~Grunts~";
				close;
			}
			mes "[Prisoner 103GD214]";
			mes "Flower...? ~Grunts~ Darkness should be stable...";
			next;
			delitem .@flowers[.@index],1;
			if (rand(1,100) > .@flowers[.@index+1]) {
				specialeffect EF_DEVIL4;
				specialeffect EF_POISONSMOKE;
				mes "[Prisoner 103GD214]";
				mes "Aaarrgghhh--!!";
				next;
				mes "- The flower you just gave has withered. -";
				next;
				mes "[Prisoner 103GD214]";
				mes "This flower isn't enough to calm down darkness. Bring in more...!";
				close;
			}
			erasequest 5444;// [Repeat]Suppressing Darkness
			setquest 5443;// [Stand by]Suppressing Darkness
			getexp 700000,500000;
			getitem 6919,4;// TokenOfHonor
			specialeffect EF_HEALSP;
			mes "[Prisoner 103GD214]";
			mes "...It's working. Thank you, human. You've been a lot of help, too, this time.";
			next;
			mes "[Prisoner 103GD214]";
			mes "Let me give you one of the things that the followers left for me.";
			next;
			mes "[Prisoner 103GD214]";
			mes "I'll contact you again when the darkness inside of me starts to stomp around.";
			close;
		case 0:
		case 1:
			emotion ET_KIK;
			mes "[Prisoner 103GD214]";
			mes "~Grunts~ Pray, human. Pray if you don't want my darkness flail around. You don't want to see the end of the world.";
			close;
		case 2:
			erasequest 5443;// [Stand by]Suppressing Darkness
			mes "[Prisoner 103GD214]";
			mes "Aarghh!! Darkness is about to stomp around!";
			next;
			mes "[Prisoner 103GD214]";
			mes "Darkness should be taken under control. Give me that flower...quick! Aargh!!";
			close;
		}
	}
}

// Sector H
prt_prison,55,115,2	script	Prisoner 55HK115#EP161H	4_STORMKNIGHT,{
	if (checkweight(1301,1) == 0) {
		mes "- You cannot proceed with the quest since you have too many items. -";
		close;
	}
	if (isbegin_quest(5415) < 2) {// Restricted Sector
		mes "[Prisoner 55HK115]";
		mes "Manager! Isn't there a manager?";
		next;
		mes "I wonder the prisoner here may think this prison as some kind of a hotel. He's looking for a manager. I'll just let this one pass.";
		close;
	}
	if (BaseLevel < 140) {
		mes "[Prisoner 55HK115]";
		mes "I would like to talk to the manager, not some normal clerk!";
		close;
	}
	switch( isbegin_quest(5445) ) {
	case 0:
		emotion ET_QUESTION;
		mes "[Prisoner 55HK115]";
		mes "You look like a manager to me. I have to tell you, the service here is downright poor. Don't you agree, manager? Huh?!";
		next;
		emotion ET_OK;
		mes "[Prisoner 55HK115]";
		mes "You've come at a good time, I guess. I haven't had the time to take care of my horn and it's still hanging in there.";
		next;
		mes "[Prisoner 55HK115]";
		mes "My horn used to be praised by the horned bunch and...I hate to even imagine what they would say to me if they get to see this ugly horn now.";
		next;
		mes "[Prisoner 55HK115]";
		mes "Before my horn gets really damaged, I need to get it taken care of. But I don't see proper materials around here.";
		next;
		emotion ET_SURPRISE;
		mes "[Prisoner 55HK115]";
		mes "!!";
		next;
		mes "[Prisoner 55HK115]";
		mes "Hey, manager. I think you're in luck. I think I've found something just right.";
		next;
		mes "[Prisoner 55HK115]";
		mes "I see Taffy, the inferior species, walking around. I think their skin should make a good alternative to the Sandpaper to trim down this thingies at the end of my horn.";
		next;
		emotion ET_SHY;
		mes "[Prisoner 55HK115]";
		mes "Look at this. This protruded area at the end of my horn. If it gets trimmed down, I would definitely get a peace of mind.";
		next;
		setquest 5423;// Restricted Sector H
		setquest 5445;// Bothersome Little Thing
		mes "[Prisoner 55HK115]";
		mes "What are you doing? I told you to skin that Taffy and bring me 20!";
		close;
	case 1:
		if (countitem(6922) < 20) {
			mes "[Prisoner 55HK115]";
			mes "What are you doing? Still haven't left?";
			next;
			emotion ET_OK;
			mes "[Prisoner 55HK115]";
			mes "You see Taffy walking around there? I think their skin should make a good alternative to the Sandpaper. Bring 20 of them.";
			close;
		}
		delitem 6922,20;// Sandpaper
		completequest 5445;// Bothersome Little Thing
		setquest 5446;// [Stand by]Bothersome Little Thing
		getexp 700000,500000;
		getitem 6919,4;// TokenOfHonor
		mes "[Prisoner 55HK115]";
		mes "What in the world are they taking so long? They're slow with poor service...I know my manners as knight so I can't just pick a fight. Alright. Just take this tip.";
		next;
		mes "[Prisoner 55HK115]";
		mes "~Sighs~ Given the condition of my horn, I don't think a couple of these won't do any good at all.";
		close;
	case 2:
		switch( checkquest(5446,PLAYTIME) ) {
		case -1:
			if (isbegin_quest(5447) == 0) {
				mes "[Prisoner 55HK115]";
				mes "You've come at the right time, manager.";
				next;
				mes "[Prisoner 55HK115]";
				if (rand(1,5) == 1)
					mes "I was putting on a cool pair of shoes but something happened and I broke my toenails.";
				else
					mes "That thing you brought me last time was pretty good. I'm impressed by your skinning ability. How about changing your job to skin master?";
				next;
				mes "[Prisoner 55HK115]";
				mes "In that spirit, why don't you bring me those 20 Sandpapers again?";
				next;
				if (select( "I'll be on my way.", "I'm tied up." ) == 2) {
					emotion ET_HNG;
					mes "[Prisoner 55HK115]";
					mes "I knew it. Talk about poor service!";
					close;
				}
				setquest 5447;// [Repeat]Bothersome Little Thing
				mes "[Prisoner 55HK115]";
				mes "I can't wait to see what you'll bring this time.";
				close;
			}
			if (countitem(6922) < 20) {
				mes "[Prisoner 55HK115]";
				if (gettime(DT_MONTH) == 2 && (gettime(DT_DAYOFMONTH) == 24 || gettime(DT_DAYOFMONTH) == 25))
					mes "Rudolph the hero of reindeers said time is gold. I think it applies to humans, too.";
				else
					mes "You can't turn back time once it passes. Hurry up. You have no time to lose.";
				close;
			}
			delitem 6922,20;// Sandpaper
			erasequest 5447;// [Repeat]Bothersome Little Thing
			setquest 5446;// [Stand by]Bothersome Little Thing
			getexp 700000,500000;
			getitem 6919,4;// TokenOfHonor
			mes "[Prisoner 55HK115]";
			mes "This time, the service is acceptable.";
			next;
			mes "[Prisoner 55HK115]";
			mes "Here's your tip for your satisfactory work. Come back again.";
			close;
		case 0:
		case 1:
			mes "[Prisoner 55HK115]";
			mes "Oh, this alternative is better than I thought.";
			close;
		case 2:
			erasequest 5446;// [Stand by]Bothersome Little Thing
			mes "[Prisoner 55HK115]";
			mes "You've come at the right time, manager.";
			close;
		}
	}
}

// GM NPC
prt_prison,20,20,4	script	Underground Dungeon Helper#EP161D	4_PORING,{
	if (callfunc("F_GM_NPC",1854,0,1,9999) < 1)
		end;
	mes "[Underground Dungeon Helper]";
	mes "Select the service to use.";
	next;
	switch( select( "Reset Quest", "Individual quest setting", "Reset cooldown." ) ) {
	case 1:
		mes "[Underground Dungeon Helper]";
		mes "All quests related with the underground dungeon will be reset.";
		next;
		select("Setting");
		mes "[Underground Dungeon Helper]";
		for ( .@quest_id = 5415; .@quest_id < 5447; ++.@quest_id ) {
			if (isbegin_quest(.@quest_id) > 0)
				erasequest .@quest_id;
			mes "" + .@quest_id + " Delete";
		}
		next;
		break;
	case 2:
		mes "[Underground Dungeon Helper]";
		mes "Choose the quest to customize the setting.";
		next;
		switch( select( "Sector A - To My Beloved Fellow", "Sector B - Lowly Standards", "Sector C - Clean Life", "Sector E - Finding Lights", "Sector F - Refreshing Prison Life", "Sector G - Suppressing Darkness", "Sector H - Bothersome Little Thing" ) ) {
		case 1:
			mes "[Underground Dungeon Helper]";
			mes "This quest is currently in the state of";
			mes "5425(" + isbegin_quest(5425) + ")/5426(" + checkquest(5426,PLAYTIME) + ")/5427(" + isbegin_quest(5427) + ")";
			next;
			switch( select( "Move to the position.", "First Quest", "Right before the reward" ) ) {
			case 1:
				warp "prt_prison",245,255;
				break;
			case 2:
				if (select( "Complete", "Reset" ) == 1) {
					if (isbegin_quest(5425) == 0)
						setquest 5425;
					if (isbegin_quest(5425) == 1)
						completequest 5425;
					break;
				}
				if (isbegin_quest(5425) > 0)
					erasequest 5425;
				break;
			case 3:
				mes "[Underground Dungeon Helper]";
				mes "Accept a quest before you customize the setting.";
				next;
				select("Setting");
				getitem 6925,1;	// Prisoner_Letter
				break;
			}
			break;
		case 2:
			mes "[Underground Dungeon Helper]";
			mes "This quest is currently in the state of";
			mes "5428(" + isbegin_quest(5428) + ")/5429(" + checkquest(5429,PLAYTIME) + ")/5430(" + isbegin_quest(5430) + ")";
			next;
			switch( select( "Move to the position.", "First Quest", "Right before the reward" ) ) {
			case 1:
				warp "prt_prison",265,195;
				break;
			case 2:
				if (select( "Complete", "Reset" ) == 1) {
					if (isbegin_quest(5428) == 0)
						setquest 5428;
					if (isbegin_quest(5428) == 1)
						completequest 5428;
					break;
				}
				if (isbegin_quest(5428) > 0)
					erasequest 5428;
				break;
			case 3:
				mes "[Underground Dungeon Helper]";
				mes "Accept a quest before you customize the setting.";
				next;
				select("Setting");
				getitem 6924,20;	// Red_Eyes
				break;
			}
			break;
		case 3:
			mes "[Underground Dungeon Helper]";
			mes "This quest is currently in the state of";
			mes "5431(" + isbegin_quest(5431) + ")/5432(" + isbegin_quest(5432) + ")/5433(" + checkquest(5433,PLAYTIME) + ")/5434(" + isbegin_quest(5434) + ")/5435(" + isbegin_quest(5435) + ")";
			next;
			switch( select( "Move to the position.", "First Quest", "Right before the reward" ) ) {
			case 1:
				warp "prt_prison",255,155;
				break;
			case 2:
				if (select( "Complete", "Reset" ) == 1) {
					if (isbegin_quest(5431) == 0)
						setquest 5431;
					if (isbegin_quest(5431) == 1)
						completequest 5431;
					if (isbegin_quest(5432) == 0)
						setquest 5432;
					if (isbegin_quest(5432) == 1)
						completequest 5432;
					break;
				}
				if (isbegin_quest(5431) > 0)
					erasequest 5431;
				if (isbegin_quest(5432) > 0)
					erasequest 5432;
				break;
			case 3:
				mes "[Underground Dungeon Helper]";
				mes "Accept a quest before you customize the setting.";
				next;
				select("Setting");
				if (isbegin_quest(5431) == 1) {
					if (isbegin_quest(5432) == 0)
						setquest 5432;
				}
				else {
					if (isbegin_quest(5435) == 0)
						setquest 5435;
				}
				break;
			}
			break;
		case 4:
			mes "[Underground Dungeon Helper]";
			mes "This quest is currently in the state of";
			mes "5436(" + isbegin_quest(5436) + ")/5437(" + checkquest(5437,PLAYTIME) + ")/5438(" + isbegin_quest(5438) + ")";
			next;
			switch( select( "Move to the position.", "First Quest", "Right before the reward" ) ) {
			case 1:
				warp "prt_prison",105,75;
				break;
			case 2:
				if (select( "Complete", "Reset" ) == 1) {
					if (isbegin_quest(5436) == 0)
						setquest 5436;
					if (isbegin_quest(5436) == 1)
						completequest 5436;
					break;
				}
				if (isbegin_quest(5436) > 0)
					erasequest 5436;
				break;
			case 3:
				mes "[Underground Dungeon Helper]";
				mes "Accept a quest before you customize the setting.";
				next;
				select("Setting");
				getitem 6923,1;	// Bright_Lights
				break;
			}
			break;
		case 5:
			mes "[Underground Dungeon Helper]";
			mes "This quest is currently in the state of";
			mes "5439(" + isbegin_quest(5439) + ")/5440(" + checkquest(5440,PLAYTIME) + ")/5441(" + isbegin_quest(5441) + ")";
			next;
			switch( select( "Move to the position.", "First Quest", "Right before the reward" ) ) {
			case 1:
				warp "prt_prison",105,190;
				break;
			case 2:
				if (select( "Complete", "Reset" ) == 1) {
					if (isbegin_quest(5439) == 0)
						setquest 5439;
					if (isbegin_quest(5439) == 1)
						completequest 5439;
					break;
				}
				if (isbegin_quest(5439) > 0)
					erasequest 5439;
				break;
			case 3:
				mes "[Underground Dungeon Helper]";
				mes "Accept a quest before you customize the setting.";
				next;
				select("Setting");
				getitem 6921,20;	// Desiccant
				break;
			}
			break;
		case 6:
			mes "[Underground Dungeon Helper]";
			mes "This quest is currently in the state of";
			mes "5442(" + isbegin_quest(5442) + ")/5443(" + checkquest(5443,PLAYTIME) + ")/5444(" + isbegin_quest(5444) + ")";
			next;
			switch( select( "Move to the position.", "First Quest", "Right before the reward" ) ) {
			case 1:
				warp "prt_prison",95,215;
				break;
			case 2:
				if (select( "Complete", "Reset" ) == 1) {
					if (isbegin_quest(5442) == 0)
						setquest 5442;
					if (isbegin_quest(5442) == 1)
						completequest 5442;
					break;
				}
				if (isbegin_quest(5442) > 0)
					erasequest 5442;
				break;
			case 3:
				mes "[Underground Dungeon Helper]";
				mes "Accept a quest before you customize the setting.";
				next;
				select("Setting");
				getitem 710,1;	// Illusion_Flower
				break;
			}
			break;
		case 7:
			mes "[Underground Dungeon Helper]";
			mes "This quest is currently in the state of";
			mes "5445(" + isbegin_quest(5445) + ")/5446(" + checkquest(5446,PLAYTIME) + ")/5447(" + isbegin_quest(5447) + ")";
			next;
			switch( select( "Move to the position.", "First Quest", "Right before the reward" ) ) {
			case 1:
				warp "prt_prison",55,125;
				break;
			case 2:
				if (select( "Complete", "Reset" ) == 1) {
					if (isbegin_quest(5445) == 0)
						setquest 5445;
					if (isbegin_quest(5445) == 1)
						completequest 5445;
					break;
				}
				if (isbegin_quest(5445) > 0)
					erasequest 5445;
				break;
			case 3:
				mes "[Underground Dungeon Helper]";
				mes "Accept a quest before you customize the setting.";
				next;
				select("Setting");
				getitem 6922,20;	// Sandpaper
				break;
			}
			break;
		}
		break;
	case 3:
		mes "[Underground Dungeon Helper]";
		mes "Resets the Underground Dungeon cooldown.";
		next;
		select("Setting");
		setarray .@list[0],
			5426, 5429, 5433, 5437,
			5440, 5443, 5446, 5426;
		.@size = getarraysize(.@list);
		for ( .@i = 0; .@i < .@size; ++.@i ) {
			if (isbegin_quest(.@i) > 0)
				erasequest .@i;
		}
		break;
	}
	mes "[Underground Dungeon Helper]";
	mes "Complete";
	close;
}
