//===== rAthena Script =======================================
//= Phantasmagorika Quests (episodes 15.2).
//===== Description: =========================================
//= [Official Conversion]
//--- Memory Record Daily Quests:
//- 'Help Her'
//- 'Air Purifier'
//- 'Grape Harvest'
//- 'Subdue Hysterical Patients'
//- 'Daily Necessities Transport'
//--- Others Quests:
//- Final part of the Phantasmagorika Main Quest
//- 'Vestige' (part 3 of 'To Phantasmagorika!')
//- 'Krotzel's Request'
//===== Changelogs: ==========================================
//= 1.0 First version. [Capuche]
//= 2.0 Updated using Aegis files [Capuche]
//============================================================

// Main quest
moc_para01,133,170,4	script	Commander Arquien#e152a1	4_F_EDEN_MASTER,{
	if (checkweight(1301,3) == 0) {
		mes "- Cannot progress quest because you have too many items in your possession. -";
		close;
	}
	if (ep15_1_atnad == 0) {
		cutin "Arquien_n_atnad02.bmp",2;
		mes "[Commander Arquien]";
		mes "Huh? I don't know who you are but don't come in here without permission.";
		mes "I would like it if you left immediately.";
		close3;
	}
	if (ep15_1_atnad < 3) {
		if (ep15_1_atnad == 1) {
			mes "[Commander Arquien]";
			cutin "Arquien_n_atnad01.bmp",2;
			mes "Oh, you're that famous " + strcharinfo(0) + "?";
			mes "I should offer you some tea or something but I don't have any tea.";
			mes "Sorry about that.";
			next;
			mes "[Commander Arquien]";
			mes "I will introduce myself first. I am the founder of the Eden Group and its Commander Arquien Nile Atnad.";
			mes "My name is complicated so you can just call me Nile.";
			next;
			switch( select( "What brings you to see me?", "Your middle name?" ) ) {
			case 1:
				cutin "Arquien_n_atnad03.bmp",2;
				mes "[Nile]";
				mes "Huh, right to the point?";
				mes "I welcome it.";
				mes "You know what is the biggest rumor going around town these days?";
				break;
			case 2:
				mes "[Nile]";
				mes "It's childhood name my mother gave me when I was young..";
				mes "It feels better to hear than the name given to me by my damn father, okay?";
				next;
				mes "[Nile]";
				mes "Instead of being entertained by other people's personal life, why don't you focus on something else?";
				mes "They are talking about it a lot these days.";
				break;
			}
			next;
			cutin "Arquien_n_atnad01.bmp",2;
			mes "[Nile]";
			mes "Right. About the extended excavation of Juperos.";
			mes "They already excavated as much as they could..";
			mes "Hasn't it been awhile since people have been turning it over claiming it as some kind of unknown mechanical civilization, a product of scientific power?";
			next;
			mes "[Nile]";
			mes "So.. Why are they promoting and recruiting for the excavation now?";
			mes "Didn't you see the recruitment notice posted on the squad office?";
			next;
			mes "[Nile]";
			mes "First this is the information we have.";
			mes "A new passage is discovered in the Juperos area.";
			mes "So we thought it was another area of Juperos...";
			next;
			mes "[Nile]";
			mes "Surprisingly the newly discovered area is connected to Juperos but it is another site with a different form.";
			mes "This excavation's goal is that newly discovered area.";
			next;
			cutin "Arquien_n_atnad04.bmp",2;
			mes "[Nile]";
			mes "What.. was.. the name. Ah.. I don't know.";
			mes "It is commonly being referred to as the 'Phantasmagorika' plan.";
			mes "Rekenber of Lighthalzen is the sponsor of the excavation recruitment and support.";
			next;
			select("So?");
			mes "[Nile]";
			mes "Huh? Not that interesting?";
			mes "Should I stop here?";
			mes "I was prepared because Rahim recommended you.";
			next;
			if (select( "Please continue.", "Please stop." ) == 2) {
				cutin "Arquien_n_atnad02.bmp",2;
				mes "[Nile]";
				mes "Well, I'm not interested in telling more to somebody who's not interested either.";
				mes "You're not the only one registered with the Eden Group.";
				next;
				mes "[Nile]";
				mes "I should ask Rahim to recommend me someone else.";
				mes "I get it so go on along now.";
				ep15_1_atnad = 2;
				close3;
			}
			cutin "Arquien_n_atnad01.bmp",2;
			mes "[Nile]";
			mes "Sure. We also wanted to participate in the Phantasmagorika.";
		}
		else {
			cutin "Arquien_n_atnad02.bmp",2;
			mes "[Nile]";
			mes "... What, you're interested again now?";
			next;
			if (select("Yes","No.") == 2) {
				cutin "Arquien_n_atnad01.bmp",2;
				mes "[Nile]";
				mes "As you wish.";
				close3;
			}
			cutin "Arquien_n_atnad01.bmp",2;
			mes "[Nile]";
			mes "Should I continue talking?";
			mes "We also wanted to participate in the Phantasmagorika.";
		}
		mes "Of course under the name of Eden Group.";
		next;
		mes "[Nile]";
		mes "Although we operated mostly as a broker between clients and implementers";
		mes "we can't be stuck with Morocc forever.";
		next;
		mes "[Nile]";
		mes "Rahim argued that we can advance further by using this as an opportunity.";
		mes "Through this work we have during that time become acquainted and networked with many adventurers and strong warriors like you..";
		next;
		cutin "Arquien_n_atnad03.bmp",2;
		mes "[Nile]";
		mes "I'm saying we want to use your manpower. Aren't we pros at introducing human resources? Ahahahahaha~";
		next;
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "Truthfully the infamously haughty Rekenber requested us.";
		mes "They are in need to a lot of manpower so they need us to broker.";
		next;
		mes "[Nile]";
		mes "Not a bad proposition. Honestly it's a good opportunity.";
		mes "We introduce people and get paid, you work and get paid.";
		next;
		select("Wanting to participate in Phantasmagorika?");
		mes "[Nile]";
		mes "It can be summarized as such.";
		mes "Basically you're participating in the site excavation work but";
		mes "you can help with a personal favor as well.";
		next;
		mes "[Nile]";
		mes "If you participate in the excavation team can you confirm something for me?";
		mes "You will hear more details from Rahim..";
		next;
		mes "[Nile]";
		mes "I want one thing.";
		mes "There are several excavation teams and organizations currently participating in the Phantasmagorika excavation.";
		mes "I would like you to work in an excavation team Rahim introduces.";
		next;
		cutin "Arquien_n_atnad02.bmp",2;
		mes "[Nile]";
		mes "And, as your working with the excavation team ^4d4dffask about the Last Exploration^000000.";
		mes "Rahim will give you the details.";
		next;
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "It's the next room so you can get the details there.";
		mes "Also, if you find out anything let me know. You don't need to tell anybody else.";
		mes "Come right back here. Got it?";
		ep15_1_atnad = 3;
		erasequest 7607;// Eden Group Leader
		setquest 7608;// Atnad Excavation Team 1
		close3;
	}
	if (ep15_1_atnad == 3) {
		cutin "Arquien_n_atnad04.bmp",2;
		mes "[Nile]";
		mes "Rahim is waiting in the next room.";
		mes "He is the one who started this work first so get the details from him.";
		close3;
	}
	if (ep15_1_atnad == 4) {
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "Hey, are you beginning in earnest now?";
		mes "Then what are you doing here? Run off now!";
		next;
		cutin "Arquien_n_atnad04.bmp",2;
		mes "[Nile]";
		mes "Run off and look at that stuck-up doctor for me.";
		mes "Ah....He's not starving and being weak is he? Huh?";
		mes "Observe and tell me.";
		next;
		mes "[Nile]";
		mes "Now-! Go now!";
		close3;
	}
	if (ep15_1_atnad < 21) {
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "How is work on the excavation team?";
		mes "..Rahim is doing well right?";
		next;
		cutin "Arquien_n_atnad02.bmp",2;
		mes "[Nile]";
		mes "... The old man. He's doing well? What? Is he? Maybe it's funny and childish to be like this at this point.";
		mes "Darn! I don't know. Get out!";
		close3;
	}
	if (ep15_1_atnad == 21) {
		cutin "Arquien_n_atnad03.bmp",2;
		mes "[Nile]";
		mes "Huh? What's going on?";
		mes "If it's about reports, I am getting them through Luke.";
		mes "I heard you are working pretty hard?";
		next;
		mes "[Nile]";
		mes "Thanks to that your position with the Atnad excavator and Eden Group are getting better so it is great.";
		mes "... It would better if it wasn't for my damn father.";
		next;
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "Anyway, why did you come?";
		mes "Did you find out about the Last Exploration?";
		next;
		mes "[Nile]";
		mes "He told you to being something back?";
		mes "What, is that?";
		next;
		input .@string$;
		while(.@string$ != "Record Player" && .@string$ != "record player" && .@string$ != "Record player") {
			cutin "Arquien_n_atnad01.bmp",2;
			mes "[Nile]";
			mes "I am not sure what you're talking about but..";
			mes "He told you to bring it back?";
			mes "Why would I?";
			next;
			mes "[Nile]";
			mes "Tell me exactly what it is you have to take back.";
			next;
			input .@string$;
		}
		cutin "Arquien_n_atnad02.bmp",2;
		mes "[Nile]";
		mes "Hum...Record Player?";
		mes "He actually remembers there was something like that in the house?";
		next;
		cutin "Arquien_n_atnad04.bmp",2;
		mes "[Nile]";
		mes "I don't know how this will affect your position but...";
		mes "I don't think so?";
		mes "Reject!";
		ep15_1_atnad = 22;
		close3;
	}
	if (ep15_1_atnad == 22) {
		cutin "Arquien_n_atnad02.bmp",2;
		mes "[Nile]";
		mes "......";
		next;
		mes "[Nile]";
		mes "......";
		mes "........";
		next;
		cutin "Arquien_n_atnad04.bmp",2;
		mes "[Nile]";
		mes "Darn it.";
		mes "Okay. I got it.";
		mes "I have the record player.";
		mes "Give me Memory Records if you have them!";
		next;
		if (countitem(6757) < 1) {
			cutin "Arquien_n_atnad04.bmp",2;
			mes "[Nile]";
			mes "What? No?";
			mes "Well.. this is bad,";
			mes "want to get a Record player.";
			mes "Brings the Memory Record player!";
			close3;
		}
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "Hm.. is this it?";
		mes "Looks like it will fit.";
		mes "You mean this came out of that place?";
		mes "But this might be a bit tough.";
		next;
		mes "[Nile]";
		mes "My stupid father didn't care about the things in the house because he was too busy outside.";
		mes "Can't he didn't notice something like this.";
		next;
		mes "[Nile]";
		mes "Humph. Unfortunately I think somebody took this Memory Record apart on purpose.";
		mes "It won't run with just one piece.";
		mes "I need at least five.";
		next;
		mes "[Nile]";
		mes "Hm..";
		mes "Okay. Then let's do this.";
		mes "I will go to the excavation site with the record player.";
		next;
		mes "[Nile]";
		mes "You collect the remaining Memory Records during that time.";
		mes "Somebody probably did it on purpose so pieces will be scattered around.";
		next;
		mes "[Nile]";
		mes "You understood, what I said?";
		mes "Then let's see each other in Verus.";
		erasequest 7644;// Record Player
		setquest 7645;// Piece of Memory Record
		ep15_1_atnad = 23;
		close3;
	}
	if (ep15_1_atnad == 23) {
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "Collect ^4d4dff5 things like memory records^000000.";
		mes "They will be hidden in places around Verus somewhere, so good luck.";
		next;
		mes "[Nile]";
		mes "..You.. Me going to the excavation site..";
		mes "Keep it a secret from my father..";
		mes "..Hm..";
		mes "Well, no special reason to keep it a secret.";
		mes "Do as you wish.";
		close3;
	}
	cutin "Arquien_n_atnad01.bmp",2;
	mes "[Nile]";
	mes "I'm not going there myself because of curiosity.";
	mes "I am a busy person myself.";
	close3;
}

lhz_in01,277,234,3	script	Rekenber Guard#e152i01	4_M_LGTGUARD,{
	mes "[Rekenber Guard]";
	if (ep15_1_atnad < 31) {
		mes "I am sorry but you cannot enter further without approval.";
		close;
	}
	mes "You are a member of the Atnad excavation team.";
	mes "I will guide you inside.";
	close2;
	warp "lhz_in01",275,241;
	end;
}

lhz_in01,275,251,3	script	Luke Lapez#ep152i01	4_M_EDEN_GUARDER,{
	cutin "looke_rapez04.bmp", 0;
	mes "[Luke]";
	mes "Sh. I'm just here as escort.";
	close2;
	cutin "",255;
	npctalk "So much for the damn escort...", "Luke Lapez#ep152i01";
	setpcblock PCBLOCK_NPC, true;
	sleep2 500;
	setpcblock PCBLOCK_NPC, false;
	emotion ET_FRET, getnpcid(0, "Commander Arquien#ep152i");
	emotion ET_THINK, getnpcid(0, "Luke Lapez#ep152i01");
	end;
}

lhz_in01,270,257,4	script	Rekenber Chairman#e152i	4_M_REKENBER,{
	if (ep15_1_atnad < 31)
		end;
	if (ep15_1_atnad == 31) {
		cutin "ep15_rekenber01.bmp",0;
		mes "[Rekenber Chairman]";
		mes "I am the chairman of Rekenber.";
		mes "I invited you to come.";
		next;
		mes "[Rekenber Chairman]";
		mes "I have heard a lot and am familiar with the activities of the Atnad excavation team.";
		mes "A lot of big results are being achieved as a corporation.";
		mes "Thanks to you.";
		next;
		mes "[Rekenber Chairman]";
		mes "The reason I have invited you....";
		mes "You may already know as team leader Dr. Atnad.";
		next;
		cutin "verus_ian02.bmp",2;
		mes "[Ian Atnad]";
		mes "Could it be......";
		next;
		cutin "ep15_rekenber01.bmp",0;
		mes "[Rekenber Chairman]";
		mes "It is what you are predicting.";
		mes "It's about the Memory Records contents you have been working so hard to collect.";
		next;
		mes "[Rekenber Chairman]";
		mes "We plan to dispose of the content known through the Memory Records and the word of the Memory Records themselves as if it never happened.";
		mes "I hope you will cooperate with this.";
		next;
		select("What did you say?");
		mes "[Rekenber Chairman]";
		mes "If this information is leaked outside, the corporation is willing to treat your excavation team with courtesy.";
		next;
		cutin "verus_ian03.bmp",2;
		mes "[Ian Atnad]";
		mes "Treatment? Courtesy?";
		mes "What are you trying to sell!";
		next;
		mes "[Ian Atnad]";
		mes "What is the reason people can't know about the past of the city buried underground!";
		mes "Who are you to act like this!";
		next;
		mes "[Ian Atnad]";
		mes "We are people who look to truth and fact through the past.";
		mes "Are you trying to block your eyes and ears now?";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Chief Secretary]";
		mes "Instead we will give you sole rights to everything related to the Memory Records.";
		next;
		cutin "verus_ian02.bmp",2;
		mes "[Ian Atnad]";
		mes "What are you talking about now?";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Chief Secretary]";
		mes "We do not mean cease your work.";
		mes "We are not saying discard all the information you have found.";
		mes "However, what we want is...";
		next;
		mes "[Chief Secretary]";
		mes "I want to bury the story between myself, and you.";
		mes "Do you not remember?";
		mes "We are probably acquainted.";
		mes "Although I did make some preparations.";
		next;
		cutin "verus_ian02.bmp",2;
		mes "[Ian Atnad]";
		mes "... Now that I think you do look familiar..";
		mes "Juperos!";
		mes "Yes, I saw you at Juperos.";
		next;
		cutin "verus_ian03.bmp",2;
		mes "[Ian Atnad]";
		mes "That time you did.. in the crack that looked like a passage...";
		mes "......You attacked me!";
		mes "You bastard.. Because of you..!!";
		next;
		cutin "verus_aures.bmp",0;
		mes "[Aures]";
		mes "Hoho. I meet the main culprit of my family's destruction.";
		mes "Is this meant to be?";
		next;
		select("What do you mean family's destruction?");
		mes "[Aures]";
		mes "The time, that accident or whatever you call it.";
		mes "When I found a seemingly artificial obstacle during the Juperos excavation..";
		mes "Ian suddenly disappeared.";
		emotion ET_SURPRISE, getnpcid(0, "Commander Arquien#ep152i");
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "I found myself in a motel room in Juno when I came to.";
		mes "I didn't even know how much time has passed.";
		next;
		cutin "verus_aures.bmp",0;
		mes "[Aures]";
		mes "The man went to look around the excavation site and didn't return in over a week...";
		mes "What do you think we thought?";
		mes "We wondered if he suffered an unfortunate accident.";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "My teeth gnash whenever I think of that time.";
		mes "Because of the vague memories of that time..";
		mes "I clung to Juperos like a mad man.";
		next;
		cutin "ep15_tatio02.bmp",0;
		mes "[Chief Secretary]";
		mes "......I am sorry about that.";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "You're the one who attacked me, right?";
		mes "What happened to the week I lost.";
		mes "...After that, I chased after an illusion I wasn't sure was a dream or hallucination.";
		next;
		mes "[Ian Atnad]";
		mes "I blindly went around Juperos.";
		mes "Lost my team members.. even forgot that I had a family and a home to go back to.";
		next;
		cutin "Arquien_n_atnad01.bmp",0;
		mes "[Arquien]";
		mes "...Why did you?";
		mes "Please tell me. Chief Secretary.";
		mes "Why did you attack father?";
		next;
		cutin "ep15_tatio03.bmp",0;
		mes "[Chief Secretary]";
		mes "That is.. because the doctor saw something he shouldn't have at the time.";
		mes "Verus city was not ready to be revealed.";
		next;
		cutin "verus_ian02.bmp",2;
		mes "[Ian Atnad]";
		mes "What?! Verus!!!";
		mes "So what I found then was a passage to Verus?!";
		next;
		cutin "Arquien_n_atnad02.bmp",0;
		mes "[Arquien]";
		mes "No no wait wait.";
		mes "Father, speak to me for a moment.";
		mes "I just need a moment.";
		next;
		mes "I don't know what is happening.";
		mes "Should we listen to the Atnads first?";// cross line?
		ep15_1_atnad = 32;
		close3;
	}
	if (ep15_1_atnad == 32) {
		cutin "ep15_rekenber02.bmp",0;
		mes "[Rekenber Chairman]";
		mes ".... What can we do.";
		mes "We will wait. Please speak.";
		close3;
	}
	cutin "ep15_rekenber01.bmp",0;
	mes "[Rekenber Chairman]";
	mes "A chairman's job is to do nothing in times like this.";
	mes "... That is it.";
	close3;
}

lhz_in01,267,257,5	script	Chief Secretary#e152i01	4_M_TATIO,{
	if (ep15_1_atnad < 31) {
		cutin "ep15_tatio01.bmp",0;
		mes "[Chief Secretary]";
		mes "....";
		close3;
	}
	if (ep15_1_atnad == 31) {
		mes "[Chief Secretary]";
		cutin "ep15_tatio01.bmp",0;
		mes "The chairman has waited for a long time.";
		mes "I as well.";
		close3;
	}
	if (ep15_1_atnad == 32) {
		mes "[Chief Secretary]";
		cutin "ep15_tatio01.bmp",0;
		mes "Are you taken aback?";
		mes "So have I. I did not think people's lives to be tied together as so.";
		mes "Anyway that young lady...";
		next;
		cutin "ep15_tatio03.bmp",0;
		mes "[Chief Secretary]";
		mes ".. has a good strong attitude.";
		mes "True.";
		mes "Please speak.";
		mes "I will wait.";
		close3;
	}
	if (ep15_1_atnad == 33) {
		mes "[Chief Secretary]";
		cutin "ep15_tatio01.bmp",0;
		mes "I see it is my turn again.";
		mes "I will formally introduce you.";
		mes "The last survivor of Verus City, Tatio.W.00H-1.";
		mes "Simply call him Tatio.";
		next;
		npctalk "What?!", "Ian Atnad#ep152i01";
		mes "[Tatio]";
		mes "Not revealing the contents of the Memory Records by the corporation.";
		mes "Attacking you at Juperos was all because I wanted to.";
		next;
		cutin "ep15_tatio02.bmp",0;
		mes "[Tatio]";
		mes "To tell you this I have no choice but to reveal my identity.";
		mes "I have prepared for this but.. it does not feel great.";
		next;
		cutin "",255;
		mes "Everybody seems frozen by the massive news.";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Tatio]";
		mes "I am the Tatio in the Memory Records you have discovered.";
		mes "And Atnad is Lasse Atnad, the great-grandfather of Dr. Atnad.";
		next;
		cutin "ep15_tatio03.bmp",0;
		mes "[Tatio]";
		mes "Lasse is one of the people who made me, and a friend.";
		mes "I wanted to protect Verus, which is home to my undead machine body...";
		next;
		mes "[Tatio]";
		mes "I have committed that discourtesy that the time.";
		mes "And on top of that, I had a hand on hiding what the doctor saw........";
		mes "I manipulated his memory a bit.";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Tatio]";
		mes "That is why you have that one week gap.";
		mes "I took care of you for four days and sent you to the motel in Juno.";
		next;
		cutin "ep15_tatio02.bmp",0;
		mes "[Tatio]";
		mes "I would not have done that if I knew you were a descendant of Lasse.";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Tatio]";
		mes "Verus city a long.. long. Time ago was once side by side with Juperos..";
		mes "No surpassed it as a great city of science with a scientific civilization.";
		next;
		mes "[Tatio]";
		mes "Although an unfortunate accident turned it the way it is now.";
		mes "I did not die because I was made of machines so I just watched over Verus.";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "This story. Does the chairman know?";
		mes "Wait. He already knows I bet. Isn't that why he called us here.";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Tatio]";
		mes "That is right.";
		mes "The chairman knows of me and the Verus City secrets.";
		mes "Only two in the whole world knew of this secret.";
		next;
		mes "[Tatio]";
		mes "Ah, No. One of the founders, Janet Zerter knows of this as well.";
		mes "Also one of the descendants of Verus City.";
		next;
		cutin "ep15_tatio02.bmp",0;
		mes "[Tatio]";
		mes ".....Do you now understand my previous proposal?";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "Oh oh well...";
		mes "Although open, Verus City is still something you want to protect ..I see.";
		mes "That is why the Memory Records...";
		next;
		mes "[Ian Atnad]";
		mes "Then this doesn't apply to the other data in the city?";
		mes "You're trying to hide it to prevent your's and my name being revealed and becoming a public issue, right?";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Tatio]";
		mes "The quantum level core technology unsuitable for this world's civilization has already been discarded.";
		mes "Just like how lethal weapons are not put in the hands of children.";
		next;
		mes "[Tatio]";
		mes "Although most of the data has been lost by accident...";
		mes "You will probably gain plenty with what is now remaining.";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "Why did you reveal it?";
		mes "Should have wrapped it tightly instead.";
		mes "Like you did to me.";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Tatio]";
		mes "..To be honest, the first reason is that I could not easily approach the laboratories because of the energy storms during the time";
		next;
		mes "[Tatio]";
		mes "And because although I do not know the reason the energy storms disappeared and";
		mes "I assessed it as not being too dangerous.";
		next;
		mes "[Tatio]";
		mes "The right time to reveal it has came.";
		mes "This place has also come to understand what is science and engineering.";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes ".. Something is doubtful, but okay.";
		mes "I guess I should be satisfied at even having this kind of opportunity.";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Tatio]";
		mes "I thank you for understanding.";
		mes "I will give you sole rights to the Memory Records.";
		mes "However the revealing of information and timing must be decided here.";
		next;
		mes "[Tatio]";
		mes "And... In order to avoid affecting our descendants";
		mes "we should keep it a secret between us as well.";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "I understand that.";
		mes "Then I will handle the collecting of the Memory Records as I have been until now.";
		mes "I will decide to report directly or not through you.";
		next;
		mes "[Ian Atnad]";
		mes "That is it, right?";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Tatio]";
		mes "That is right.";
		mes "In reality there is not much change to the actual work.";
		mes "Ah also...";
		mes "For working diligently as a member of the Atnad excavation team..";
		mes "" + strcharinfo(0) + " I will give you a small reward.";
		getexp 4500000,3000000;
		ep15_1_atnad = 34;
		next;
		mes "[Tatio]";
		mes "The contents of the Memory Records are precious memories to me.";
		mes "...It is like going through my diary. So I hope you take care in the future.";
		close3;
	}
	cutin "ep15_tatio03.bmp",0;
	mes "[Tatio]";
	mes "...I hope everything goes smoothly with this...";
	close3;
}

lhz_in01,272,255,3	script	Ian Atnad#ep152i01	4_M_IAN,{
	if (ep15_1_atnad < 31)
		end;
	mes "[Ian Atnad]";
	if (ep15_1_atnad == 31) {
		cutin "verus_ian01.bmp",2;
		mes "Have you arrived now?";
		mes "It seems everybody has gathered.";
		mes "So, let's see what it was you had to say to everybody.";
		close3;
	}
	if (ep15_1_atnad == 32) {
		cutin "verus_ian01.bmp",2;
		mes "So, what do you want to say?";
		mes "What is it that you cut me off in this important moment.";
		next;
		cutin "Arquien_n_atnad01.bmp",0;
		mes "[Arquien]";
		mes "What that man just said, was the incident of your disappearance?";
		mes "The reason why you were running around outside for years.";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Chief Secretary]";
		mes "No.. it's not that..";
		mes "The time I was with the doctor was only four days.";
		next;
		cutin "Arquien_n_atnad04.bmp",0;
		mes "[Arquien]";
		mes "Before you said you were stuck somewhere for a week!";
		mes "And running around like you were possessed by a ghost!";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "That.. that..!";
		mes "Don't treat my passion for my field like a runaway ghost!";
		mes "At the time I thought I was going to find something about my grand-grandfather..";
		next;
		mes "[Ian Atnad]";
		mes "The place I saw.. The memory I had of that place...";
		mes ".....";
		mes "...?";
		next;
		mes "[Ian Atnad]";
		mes "Wait a minute. Are you blaming me now?";
		mes "I sent letters home, but you were the one who didn't reply!";
		next;
		cutin "Arquien_n_atnad04.bmp",0;
		mes "[Arquien]";
		mes "All the letters were sent back because the address wasn't clear!";
		mes "Why are you talking big!";
		next;
		cutin "verus_ian03.bmp",2;
		mes "[Ian Atnad]";
		mes "And didn't you sell the house and sent all my letters back!";
		mes "You couldn't wait a few years so sell the house and disappear?!";
		mes "What do you have to say for yourself!";
		next;
		mes "The situation is overheating due to the fight between father and daughter.";
		mes "Aures and the secretary giving embarrassed looks.";
		next;
		select("Should the table be turned over?");
		cutin "Arquien_n_atnad01.bmp",0;
		mes "[Arquien]";
		mes "What's that sound..";
		mes "An..anyway isn't that secretary the main instigator of this whole incident?";
		mes "What happened?";
		ep15_1_atnad = 33;
		close3;
	}
	if (ep15_1_atnad == 33) {
		cutin "verus_ian01.bmp",2;
		mes "We keep losing the point.";
		mes "Shouldn't you ask why he attacked me first.";
		mes "Let's please listen to what he has to say. Daughter.";
		close3;
	}
	cutin "verus_ian01.bmp",2;
	mes "It is confusing to hear a surprising story at once but";
	mes "At the same time it's cathartic.";
	mes "Hm.. I see. I see.";
	close3;
}

lhz_in01,267,255,7	script	Aures#ep152i01	4_M_OLDSCHOLAR,{
	if (ep15_1_atnad == 31) {
		cutin "verus_aures.bmp",0;
		mes "[Aures]";
		mes "Now you are here.";
		mes "Sit here comfortably.";
		mes "Although it might uncomfortable to sit on the corporation toilet.";
		next;
		mes "[Aures]";
		mes "It is amusing to see those two together.";
		mes "Seems you cannot trick blood.";
		mes "Seeing how they talk alike.";
		close3;
	}
	cutin "verus_aures.bmp",0;
	mes "[Aures]";
	mes "I loathe fighting but.. It is fun to see them together. Yes.";
	close3;
}

lhz_in01,272,251,3	script	Commander Arquien#ep152i	4_F_EDEN_MASTER,{
	if (ep15_1_atnad < 31)
		end;
	if (ep15_1_atnad == 31) {
		mes "[Arquien]";
		cutin "Arquien_n_atnad01.bmp",2;
		mes "Let's see if you gathered all of us to give us some bombastic story.";
		close3;
	}
	if (ep15_1_atnad == 32) {
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "So, what do you want to say?";
		mes "What is it that you cut me off in this important moment.";
		next;
		cutin "Arquien_n_atnad01.bmp",0;
		mes "[Arquien]";
		mes "What that man just said, was the incident of your disappearance?";
		mes "The reason why you were running around outside for years.";
		next;
		cutin "ep15_tatio01.bmp",0;
		mes "[Chief Secretary]";
		mes "No.. it's not that..";
		mes "The time I was with the doctor was only four days.";
		next;
		cutin "Arquien_n_atnad04.bmp",0;
		mes "[Arquien]";
		mes "Before you said you were stuck somewhere for a week!";
		mes "And running around like you were possessed by a ghost!";
		next;
		cutin "verus_ian01.bmp",2;
		mes "[Ian Atnad]";
		mes "That.. that..!";
		mes "Don't treat my passion for my field like a runaway ghost!";
		mes "At the time I thought I was going to find something about my grandfather..";
		next;
		mes "[Ian Atnad]";
		mes "The place I saw.. The memory I had of that place...";
		mes ".....";
		mes "...?";
		next;
		mes "[Ian Atnad]";
		mes "Wait a minute. Are you blaming me now?";
		mes "I sent letters home, but you were the one who didn't reply!";
		next;
		cutin "Arquien_n_atnad04.bmp",0;
		mes "[Arquien]";
		mes "All the letters were sent back because the address wasn't clear!";
		mes "Why are you talking big!";
		next;
		cutin "verus_ian03.bmp",2;
		mes "[Ian Atnad]";
		mes "And didn't you sell the house and sent all my letters back!";
		mes "You couldn't wait a few years so sell the house and disappear?!";
		mes "What do you have to say for yourself!";
		next;
		mes "The situation is overheating due to the fight between father and daughter.";
		mes "Aures and the secretary giving embarrassed looks.";
		next;
		select("Should the table be turned over?");
		cutin "Arquien_n_atnad04.bmp",2;
		mes "[Arquien]";
		mes "What's that sound..";
		mes "An..anyway isn't that secretary the main instigator of this whole incident?";
		mes "What happened?";
		ep15_1_atnad = 33;
		close3;
	}
	if (ep15_1_atnad == 33) {
		mes "[Arquien]";
		mes ".......Let's keep listening to that secretary guy.";
		mes "If give me nonsense I'm going to flip this company over.";
		close3;
	}
	cutin "Arquien_n_atnad02.bmp",2;
	mes "[Arquien]";
	mes "So he means we can know the embarrassing past of the secretary by collecting and listening to the Memory Records?";
	mes "That is kind of interesting.";
	next;
	cutin "Arquien_n_atnad03.bmp",2;
	mes "[Arquien]";
	mes "What are you doing?";
	mes "Let's go back now.";
	mes "To the city that was too good for its own good.";
	close3;
}


// Part 3 : Vestige - ep15_2_underbs
verus01,221,65,5	script	Du#Verus	4_M_REDMAN,{
	if (ep15_1_atnad < 19)	// extra check
		end;
	mes "[Du]";
	if (ep15_2_bslast < 2) {
		if (ep15_1_elb < 15) {
			mes "Investigations are supposed to be done calmly...";
			cutin "bu_du3.bmp",2;
			close3;
		}
		if (ep15_2_bslast == 0) {
			mes "Isn't this a complete mess?";
			mes "Whew, barely got in!";
			mes "I hate these access protocols.";
			cutin "bu_du3.bmp",2;
			next;
			mes "[Mark]";
			mes "I think it's an essential protocol needed for safety.";
			cutin "bu_mark3.bmp",0;
			next;
			mes "[Du]";
			mes "You guys, look at this!";
			cutin "bu_du2.bmp",2;
			next;
			mes "[Du]";
			mes "Isn't this a complete mess?";
			next;
			mes "[Mark]";
			mes "Hey...";
			mes "Didn't you just say that?";
			cutin "bu_mark3.bmp",0;
			next;
			mes "[Alph]";
			mes "Hey.";
			mes "Forget about that and let's start on the investigation instead.";
			cutin "bu_alp1.bmp",2;
			next;
			mes "[Tamarin]";
			mes "By the way I think I know why only this place was sealed off.";
			cutin "ep143_tasta.bmp",2;
			next;
			mes "[Tamarin]";
			mes "There are no intact buildings and the cracks on the ground are much more severe compared to other areas...";
			next;
			mes "[Tamarin]";
			mes "Not to mention these monsters...";
			cutin "ep143_tahuk.bmp",2;
			next;
			mes "[Tamarin]";
			mes "It seems they are only found here so something is wrong...";
			next;
			mes "[Du]";
		}
		mes "Right!";
		mes "Our job is to investigate that!";
		cutin "bu_du2.bmp",2;
		next;
		mes "[Alph]";
		mes "Come to think of it the people passing by earlier did say there is an incredible device in the center...";
		cutin "bu_alp3.bmp",2;
		next;
		mes "[Mark]";
		mes "Then let's investigate that part first.";
		cutin "bu_mark1.bmp",0;
		if (ep15_2_bslast == 0) {
			setquest 11381;// Vestige
			ep15_2_bslast = 1;
		}
		close3;
	}
	mes "Investigations are supposed to be done calmly...";
	cutin "bu_du3.bmp",2;
	close3;
}

verus01,151,173,3	script	Fruit#Verus	4_F_FRUIT,{
	if (ep15_2_bslast < 2) {
		mes "[Fruit]";
		mes "Coooooooooolll!!!!";
		mes "See this?";
		mes "Right here!!!!";
		cutin "EP15_2_fru_2.bmp",2;
		next;
		mes "[Fruit]";
		mes "Doesn't it look like something will go swirly?!";
		mes "Haaa!";
		if (ep15_2_bslast == 0)
			close3;
		next;
		mes "[Fruit]";
		mes "I wish I could take the whole thing to my laboratory!";
		mes "I can only watch on...";
		cutin "EP15_2_fru_3.bmp",2;
		next;
		mes "[Fruit]";
		mes "So I was thinking...";
		mes "I was busy here so I haven't been able to go down to the underground bunker they say is right underneath.";
		cutin "EP15_2_fru_2.bmp",2;
		next;
		mes "[Fruit]";
		mes "Do you want to go?";
		next;
		mes "[Fruit]";
		mes "It isn't common to have someone tell you all the investigation points, right?";
		next;
		mes "[Fruit]";
		mes "I am not asking you to work for free either!";
		mes "If you bring back interesting results there will be rewards!";
		next;
		mes "[Fruit]";
		mes "What do you think?";
		next;
		if (select( "Quit.", "Do it." ) == 1) {
			mes "[Fruit]";
			mes "Eh...";
			cutin "EP15_2_fru_1.bmp",2;
			close3;
		}
		mes "[Fruit]";
		mes "Yahoo!!!";
		mes "If you go in a little ways there will probably be someone to guide you.";
		next;
		mes "[Fruit]";
		mes "I will be expecting you to bring back lots of fun stuff.";
		// completequest 11381;	// completed officially
		erasequest 11381;// Vestige
		setquest 11382;// Vestige
		ep15_2_bslast = 2;
		close3;
	}
	if (ep15_2_bslast == 2) {
		mes "[Fruit]";
		mes "Yahoo!!!";
		mes "If you go in a little ways there will probably be someone to guide you.";
		cutin "EP15_2_fru_2.bmp",2;
		next;
		mes "[Fruit]";
		mes "I will be expecting you to bring back lots of fun stuff.";
		close3;
	}
	if (ep15_2_bslast < 9) {
		mes "[Fruit]";
		mes "How, is there any progress in the investigation?";
		mes "Although it is an underground bunker, the scale is not a joke!";
		cutin "EP15_2_fru_3.bmp",2;
		next;
		mes "[Fruit]";
		mes "Wouldn't it be lost?";
		close3;
	}
	if (checkweight(1119,3) == 0) {
		mes "- You are carrying too many items to proceed with the quest -";
		close;
	}
	if (checkquest(11380,HUNTING) == 2) {
		mes "[Fruit]";
		mes "Aarrghhhh!!!";
		mes "Amazing!!!";
		cutin "EP15_2_fru_2.bmp",2;
		next;
		mes "[Fruit]";
		mes "So? So? Then what?";
		mes "Come on! Tell me more!!!";
		erasequest 11380;// Last Room
		getexp 200000,0;
		getitem 6827,1;// Normal_Parts
		getitem 6828,1;// Gravity_Parts
		close3;
	}
	mes "[Fruit]";
	mes "Hm... Is there anything more interesting?";
	cutin "EP15_2_fru_1.bmp",2;
	next;
	if (select( "Trade goods.", "Quit." ) == 1) {
		mes "[Fruit]";
		mes "I will give you equipment in return for 17 intact machine components!";
		next;
		switch( select( "Runaway Chip", "Broken Chip 1", "Broken Chip 2" ) ) {
		case 1:
			mes "[Fruit]";
			mes "Runaway Chip is HIT + 50, FLEE + 50, MSP - 50%";
			next;
			mes "[Fruit]";
			mes "When equipped together with Broken Chip 1 and Broken Chip 2, you get unlimited movement acceleration.";
			next;
			mes "[Fruit]";
			mes "ATK and MATK + 50. If helmet refinement is at 9, it has an affect of MSP + 50%, MHP + 10%.";
			.@item_id = 18997;	// Riot_Chip
			break;
		case 2:
			mes "[Fruit]";
			mes "Broken Chip 1 has STR + 4. If equipped with Broken Chip 2, it has a STR + 8, INT+ 8 affect.";
			.@item_id = 28326;	// Broken_Chip_1
			break;
		case 3:
			mes "[Fruit]";
			mes "Broken Chip 2 has INT + 4. If equipped with Broken Chip 1, it has a STR + 8, INT+ 8 affect.";
			.@item_id = 28327;	// Broken_Chip_2
			break;
		}
		next;
		if (select( "Exchange", "Quit." ) == 1) {
			if (countitem(6827) < 17) {
				mes "[Fruit]";
				mes "Not enough!!!";
				close3;
			}
			delitem 6827,17;// Normal_Parts
			getitem .@item_id,1;
			close3;
		}
		// continue
	}
	mes "[Fruit]";
	mes "Is this not what you wanted?";
	close3;
}

un_bunker,100,96,3	script	Mark#Bunker Entrance	4_M_BLUEMAN,{
	if (ep15_2_bslast == 2 || ep15_2_bslast == 3) {
		if (ep15_2_bslast == 2) {
			mes "This part is very pristinely preserved compared to the upper parts.";
			mes "But this disgusting smell....";
			cutin "bu_mark4.bmp",0;
			next;
			mes "[Mark]";
			mes "The Undead not seen in other areas can be easily seen in this zone.";
			next;
			mes "[Mark]";
			mes "If you look at the structure of this place...";
			mes "Or the condition, I think this place was built to be used as a bunker.";
			next;
			mes "[Tamarin]";
			mes "Then that means... The Undead...";
			cutin "ep143_tahuk.bmp",2;
			next;
			mes "[Maggi]";
			mes "Eeeeeeeeeeek!!!!!";
			cutin "bu_maggi4.bmp",2;
			next;
			mes "[Mark]";
		}
		mes "It might be a good idea to calm down first...and look around thoroughly.";
		cutin "bu_mark1.bmp",0;
		next;
		mes "[Du]";
		mes "O...o...o...okay!";
		mes "Thi...thi...this stuff..... is...is nothing...";
		cutin "bu_du5.bmp",2;
		next;
		mes "[Alph]";
		mes "Then let's look around individually and send a signal when something of value is found.";
		cutin "bu_alp1.bmp",2;
		next;
		mes "[Du]";
		mes "Wa...wait!!";
		mes "Wouldn't it be better to move together since it's dangerous?";
		cutin "bu_du5.bmp",2;
		next;
		mes "[Du]";
		mes "Hey!";
		mes "Look!";
		mes "Don't leave me!";
		mes "Hey!!!";
		next;
		mes "[Du]";
		mes "Wait for me!!!!!";
		if (ep15_2_bslast == 2) {
			completequest 11382;
			setquest 11383;// Vestige
			ep15_2_bslast = 3;
		}
		close3;
	}
	mes "[Mark]";
	mes "What is this disgusting smell?";
	cutin "bu_mark4.bmp",0;
	close3;
}

un_bunker,363,171,3	script	Alph#Entrance	4_M_BLACKMAN,{
	if (ep15_2_bslast < 3) {
		mes "[Alph]";
		mes "There are too many suspicious places...";
		cutin "bu_alp3.bmp",2;
		close3;
	}
	if (ep15_2_bslast == 3) {
		mes "[Alph]";
		mes "Um...";
		mes "You're here...";
		cutin "bu_alp3.bmp",2;
		next;
		mes "[Alph]";
		mes "I didn't send the signal yet but did you come here because you also got a strange feeling?";
		cutin "bu_alp1.bmp",2;
		next;
		mes "[Alph]";
		mes "A long time ago...";
		mes "...";
		next;
		mes "[Alph]";
		mes "No...no.";
		mes "Let's call the others and start the investigation.";
		cutin "bu_alp2.bmp",2;
		next;
		switch( select( "Quit.", "Investigate." ) ) {
		case 1:
			mes "[Alph]";
			mes "...";
			mes "Don't forget our goal is to investigate...";
			cutin "bu_alp1.bmp",2;
			close3;
		case 2:
			mes "[Alph]";
			mes "I just sent out the signal so the others will arrive soon.";
			cutin "bu_alp1.bmp",2;
			next;
			mes "[Du]";
			mes "Aaarghhhh!!!!";
			mes "Get away you unctuous bastards!!!!!";
			cutin "bu_du5.bmp",2;
			next;
			mes "[Mark]";
			mes "Be quiet...";
			cutin "bu_mark3.bmp",0;
			next;
			mes "[Verity]";
			mes "Is there something special about this room?";
			cutin "EP15_2_brt_3.bmp",2;
			next;
			mes "[Du]";
			mes "Oh! The woman at the entrance earlier?";
			mes "Why are you at a dangerous place like this?";
			cutin "bu_du5.bmp",2;
			next;
			mes "[Verity]";
			mes "Oh?";
			mes "Did you not hear?";
			mes "That..";
			cutin "EP15_2_brt_5.bmp",2;
			next;
			mes "[Tamarin]";
			mes "Come to think of it that girl did say there would probably be a guide.";
			cutin "ep143_tasmi.bmp",2;
			next;
			mes "[Alph]";
			mes "....Um...";
			mes "Was there...";
			cutin "bu_alp1.bmp",2;
			next;
			mes "[Mark]";
			mes "Anyway it seems everybody is here so let's go in.";
			cutin "bu_mark1.bmp",0;
			next;
			mes "[Alph]";
			mes "Right...";
			mes "There's a bad energy so be careful...";
			cutin "bu_alp1.bmp",2;
			completequest 11383;
			setquest 11384;// Vestige
			ep15_2_bslast = 4;
			close2;
			warp "un_bunker",385,83;
			end;
		}
	}
	mes "[Alph]";
	mes "Is there more left to investigate in this room?";
	cutin "bu_alp1.bmp",2;
	next;
	if (select( "Quit.", "Go in." ) == 1) {
		mes "[Alph]";
		mes "...";
		mes "Don't forget our goal is to investigate...";
		close3;
	}
	mes "[Alph]";
	mes "Right...";
	mes "There's a bad energy so be careful...";
	close2;
	warp "un_bunker",385,83;
	end;
}

un_bunker,388,86,3	script	Alph#Entrance2	4_M_BLACKMAN,{
	if (ep15_2_bslast == 4) {
		mes "[Alph]";
		mes "As expected..";
		mes "Only this room has a different lay out than the rest...";
		cutin "bu_alp3.bmp",2;
		next;
		mes "[Mark]";
		mes "I see.";
		mes "There's a door that doesn't seem to belong in a very unnatural location.";
		cutin "bu_mark1.bmp",0;
		next;
		mes "[Tamarin]";
		mes "...There is no other way but to go in and investigate ourselves?";
		cutin "ep143_taang.bmp",2;
		next;
		mes "[Du]";
		mes "Charge!!!!!";
		cutin "bu_du5.bmp",2;
		completequest 11384;
		setquest 11385;// Vestige
		ep15_2_bslast = 5;
		close2;
		warp "un_myst",11,206;
		end;
	}
	mes "[Alph]";
	mes "Unnatural room... Unnatural door...";
	cutin "bu_alp1.bmp",2;
	next;
	if (select( "Quit.", "Go in." ) == 1) {
		mes "[Alph]";
		mes "...";
		close3;
	}
	mes "[Alph]";
	mes "Haa...";
	close2;
	warp "un_myst",11,206;
	end;
}

un_myst,27,208,5	script	Verity#Myst	4_F_BERRYTEA,{
	mes "[Verity]";
	mes "This space is suffocating.";
	mes "My head is starting to throb already.";
	cutin "EP15_2_brt_3.bmp",2;
	next;
	if (ep15_2_bslast == 5 || ep15_2_bslast == 6) {
		mes "[Tamarin]";
		mes "What is this space?";
		mes "It seems to be poorly built for it to be used as a bunker...";
		cutin "ep143_tasta.bmp",2;
		next;
		mes "[Alph]";
		mes "The disgusting smell has gotten worse...";
		cutin "bu_alp5.bmp",2;
		next;
		mes "[Tamarin]";
		mes "There looks to be another door there so let's check it out.";
		cutin "ep143_tasta.bmp",2;
		if (ep15_2_bslast == 5) {
			completequest 11385;
			setquest 11386;// Vestige
			ep15_2_bslast = 6;
			close3;
		}
		next;
	}
	if (ep15_2_bslast == 6)
		.@string$ = "Move to the door.";
	else
		.@string$ = "Quit.";
	if (select( .@string$, "Leave." ) == 1) {
		mes "[Verity]";
		mes "...Should have brought some painkillers for headaches.";
		cutin "EP15_2_brt_4.bmp",2;
		close3;
	}
	mes "[Verity]";
	mes "Are you quitting the investigation?";
	cutin "EP15_2_brt_4.bmp",2;
	close2;
	warp "un_bunker",300,166;
	end;
}

un_myst,56,206,0	script	#myst_1	WARPNPC,1,1,{
	end;
OnTouch:
	//if (ep15_2_bslast < 5) {	// typo ?
	if (ep15_2_bslast < 6) {
		mes "- Unable to enter the place -";
		close2;
		warp "un_bunker",300,166;
		end;
	}
	if (ep15_2_bslast == 6) {
		mes "- Does not seem locked but blocked by something.-";
		next;
		if (select( "Break it.", "Quit." ) == 2) {
			mes "[Du]";
			mes "You want to leave a place like this alone?";
			cutin "bu_du1.bmp",2;
			close3;
		}
		mes "[Du]";
		mes "Alright then....";
		mes "One!";
		mes "Two!";
		mes "Three!";
		cutin "bu_du5.bmp",2;
		completequest 11386;
		setquest 11387;// Vestige
		ep15_2_bslast = 7;
		ep15_2_bsmemo = 1;
		close2;
	}
	ep15_2_bsmemo = 1;
	warp "un_myst",81,190;
	end;
}

un_myst,100,190,3	script	Du#Hall	4_M_REDMAN,{
	if (ep15_2_bslast == 7 || ep15_2_bslast == 8) {
		if (ep15_2_bslast == 7) {
			mes "[Du]";
			mes "Wow...What is this place?";
			cutin "bu_du1.bmp",2;
			next;
			mes "[Mark]";
			mes "It is a really suspicious place...";
			mes "I didn't think such a space would exist inside a bunker...";
			cutin "bu_mark1.bmp",0;
			next;
			mes "[Maggi]";
			mes "Ah...Ah...";
			cutin "bu_maggi3.bmp",2;
			next;
			mes "[Tamarin]";
			mes "It seems to be haphazardly made considering its use... Hm...";
			cutin "ep143_tasta.bmp",2;
			next;
			mes "[Maggi]";
			mes "The...door....";
			cutin "bu_maggi3.bmp",2;
			next;
			mes "[Alph]";
			mes "There is a kind of subtlety for it be a secret space...";
			cutin "bu_alp3.bmp",2;
			next;
			mes "[Maggi]";
			mes "Door...door....";
			cutin "bu_maggi3.bmp",2;
			next;
			mes "[Du]";
			mes "Maggi what are you gaping about?";
			cutin "bu_du2.bmp",2;
			next;
			mes "[Maggi]";
			mes "The...door is stuck.";
			cutin "bu_maggi4.bmp",2;
			next;
			mes "[Du]";
			mes "Eh?";
			cutin "bu_du5.bmp",2;
			next;
			mes "[Mark]";
			mes "What?!?!?";
			cutin "bu_mark4.bmp",0;
			next;
			mes "[Du]";
			mes "Argh!!!";
			mes "It's true?!";
			cutin "bu_du5.bmp",2;
			next;
		}
		mes "[Du]";
		mes "Are we all trapped here?!";
		next;
		mes "[Mark]";
		mes "Wa..wait let's think about this stoically.";
		cutin "bu_mark4.bmp",0;
		next;
		mes "[Verity]";
		mes "Oh no what do we do...";
		cutin "EP15_2_brt_5.bmp",2;
		next;
		mes "[Alph]";
		mes "Ah...";
		cutin "bu_alp2.bmp",2;
		next;
		mes "[Verity]";
		mes "Since there is no way to get out, should we go further inside?";
		cutin "EP15_2_brt_4.bmp",2;
		next;
		mes "[Du]";
		mes "Wait... Come to think Verity!";
		mes "You say you are a guide and you don't know the way out?";
		cutin "bu_du5.bmp",2;
		next;
		mes "[Verity]";
		mes "This is the first time for me go in this deep...";
		mes "There is no other way!";
		cutin "EP15_2_brt_6.bmp",2;
		if (ep15_2_bslast == 7) {
			completequest 11387;
			setquest 11388;// Vestige
			ep15_2_bslast = 8;
		}
		close3;
	}
	mes "[Du]";
	mes "Wow...What is this place?";
	cutin "bu_du1.bmp",2;
	next;
	mes "[Mark]";
	mes "It is a really suspicious place...";
	mes "I didn't think such a space would exist inside a bunker...";
	cutin "bu_mark1.bmp",0;
	close3;
}

un_myst,333,206,3	script	Weird piece#01	4_GC109,{
	if (ep15_2_bslast < 8) {
		mes "There is a weird piece.";
		close;
	}
	if (ep15_2_bsmemo == 1) {// A
		mes "I cannot tell how long it has been since I entered this place.";
		mes "In this darkness my sense of time grows dull and the people are quickly growing tired.";
		next;
		mes "They talk of escaping without knowing the outside situation... Is this the right choice?";
		next;
		mes "But we have already lost our way back.";
		mes "Yes.... This was not an escape.";
		mes "Merely fleeing to survive...";
		next;
		mes "How long can we keep running?";
		close2;
		if (ep15_2_bslast < 9) {
			completequest 11388;
			setquest 11389;// Vestige
		}
		warp "un_myst",260,204;
		ep15_2_bsmemo = 2;
		end;
	}
	if (ep15_2_bsmemo == 2) {
		mes "Even though I was ready for this, the situation is deteriorating.";
		mes "I can only say I would not have survived if I stayed at that place.";
		next;
		mes "Hope...";
		next;
		mes "Many have already become incapable of hope...";
		close2;
		warp "un_myst",260,204;
		ep15_2_bsmemo = 3;
		end;
	}
	mes "We should have been out by now according to the calculations but there is only dirt still.";
	next;
	mes "The calculations could be wrong and we may be going in circles.";
	mes "It doesn't feel right.";
	next;
	mes "No..";
	mes "I haven't felt at ease since that day.";
	close2;
	warp "un_myst",347,138;
	if (ep15_2_bsmemo == 3)
		ep15_2_bsmemo = 4;
	end;
}

un_myst,182,137,3	script	Weird piece#02	4_GC109,{
	if (ep15_2_bsmemo < 4) {
		mes "There is a weird piece.";
		close;
	}
	if (ep15_2_bsmemo == 4) {// B
		mes "I may have reached my limits.";
		mes "I must blame my overtaxed body for not listening to me now.";
		next;
		mes "The numbers of survivors are dwindling.";
		next;
		mes "Like this...";
		mes "I thought it was karma that I am witnessing the end...";
		mes "Perhaps it is my selfishness.";
		mes "I don't think there is no such time left for me..";
		close2;
		warp "un_myst",86,136;
		ep15_2_bsmemo = 5;
		end;
	}
	if (ep15_2_bsmemo == 5) {
		mes "Even walking is difficult now.";
		next;
		mes "Once I confidently claimed I will lead all of us...";
		mes "I find myself pathetic for becoming a burden much less of help.";
		next;
		mes "Everything is regretful.";
		mes "Everything I started...";
		mes "Everything of mine...";
		close2;
		warp "un_myst",86,136;
		ep15_2_bsmemo = 6;
		end;
	}
	if (ep15_2_bsmemo == 6) {
		mes "It would be better to abandon me...";
		close2;
		warp "un_myst",86,136;
		ep15_2_bsmemo = 7;
		end;
	}
	mes "The days I am asleep are outnumbering the days I am awake now.";
	next;
	mes "I suddenly picture his face in my increasingly hazy consciousness.";
	next;
	mes "Tatio...";
	next;
	mes "A person sweet to me even though all I only cared about was my work.";
	next;
	mes "Ha... person...";
	mes "I cannot endure the shame of my past for considering him a mere successful project.'";
	next;
	mes "Though I cannot help that I may die here...";
	mes "If only to apologize to him...";
	mes "If only to muster one sweet word, I have thoughts of survival.";
	next;
	mes "..Is it possible?";
	close2;
	warp "un_myst",14,92;
	if (ep15_2_bsmemo == 7)
		ep15_2_bsmemo = 8;
	end;
}

un_myst,214,86,3	script	Weird piece#03	4_GC109,{
	if (ep15_2_bsmemo < 8) {
		mes "There is a weird piece.";
		close;
	}
	if (ep15_2_bsmemo < 16) {
		if (ep15_2_bsmemo == 8)// C
			mes "01001000010001010100110001001100010011110101011101001111010100100100110001000100";
		else if (ep15_2_bsmemo == 9)
			mes "01001001010000010100110101000110010010010100111001000101";
		else if (ep15_2_bsmemo == 10)
			mes "@#$%&!#...";
		else if (ep15_2_bsmemo == 11)
			mes "debugging";
		else if (ep15_2_bsmemo == 12) {
			mes "File...error...restore...";
			mes "Operation...range...25%...30%...35%.......";
		}
		else if (ep15_2_bsmemo == 13)
			mes "45%...50%... Minimal normal operations possible start safety mode operations";
		else if (ep15_2_bsmemo == 14)
			mes "60% movement speed normal. Bodily functions normal.";
		else if (ep15_2_bsmemo == 15)
			mes "70% Most language function restored. Slight symptoms of septic anemia but it seems it will be fixed soon.";
		close2;
		warp "un_myst",160,89;
		ep15_2_bsmemo++;
		end;
	}
	if (ep15_2_bsmemo == 16) {
		mes "80% Surgery was fairly successful despite having had no proper preparations.";
		mes "Planning to apply treatment to the rest of the survivors based on this success.";
		close2;
		warp "un_myst",209,33;
		ep15_2_bsmemo = 17;
		end;
	}
	mes "98% Corrupt sector detected.";
	mes "For more effective operations I have copied the memory chip and constructed 'T_W_O_002b.'";
	mes "There seems to have been some loss of data during the copying process...";
	close2;
	warp "un_myst",209,33;
	end;
}

un_myst,209,42,3	script	Tamarin#Lastroom Entrance	4_M_TAMARIN,{
	if (checkweight(1119,3) == 0) {
		mes "- You are carrying too many items to proceed with the quest -";
		close;
	}
	mes "[Tamarin]";
	mes "... It seems the last survivors have lingered here...";
	cutin "ep143_taang.bmp",2;
	next;
	mes "[Tamarin]";
	mes "I feel scared to open the next door for some reason.";
	next;
	if (ep15_2_bsmemo == 17) {
		select("Open door.");
		if (ep15_2_bslast < 9) {
			ep15_2_bslast = 9;
			ep15_2_bsmemo = 18;
			completequest 11389;// Vestige
			getexp 0,1000000;
			getitem 6827,1;// Normal_Parts
			getitem 6828,1;// Gravity_Parts
		}
		close2;
		warp "un_myst",142,38;
		end;
	}
	.@s = select( "Open door.", "Go outside." ) - 1;
	mes "[Tamarin]";
	mes "There is a bitter feeling of sorts...";
	close2;
	if (.@s == 0)
		warp "un_myst",142,38;
	else
		warp "un_bunker",98,91;
	end;
}

verus01,123,181,3	script	Verity#Warper	4_F_BERRYTEA,{
	mes "[Verity]";
	mes "Hello.";
	mes "Are you here for the underground bunker investigation?";
	cutin "EP15_2_brt_2.bmp", 2;
	next;
	switch( select( "Yes", "No.", "Use gravity safety device" ) ) {
	case 1:
		mes "[Verity]";
		mes "It seems very dangerous below so please be careful.";
		cutin "EP15_2_brt_1.bmp",2;
		next;
		mes "[Verity]";
		mes "If you consider the appearance of monsters not seen in other areas, something is...";
		cutin "EP15_2_brt_3.bmp",2;
		close2;
		warp "un_bunker",98,91;
		end;
	case 2:
		break;
	case 3:
		mes "[Verity]";
		mes "You can easily reach the entrance of the last room by using the gravity safety device.";
		cutin "EP15_2_brt_1.bmp",2;
		next;
		if (select( "Use.", "Quit." ) == 1) {
			mes "[Verity]";
			if (countitem(6828) < 1) {
				mes "I see you do not have the gravity safety device with you.";
				close3;
			}
			delitem 6828,1;// Gravity_Parts
			close2;
			warp "un_myst",142,38;
			end;
		}
		break;
	}
	mes "[Verity]";
	mes "Is that so?";
	mes "Hm...";
	cutin "EP15_2_brt_1.bmp",2;
	close3;
}


// Others
verus03,167,257,5	script	Access Controller Damhw#atnd02	4_M_LGTGUARD,{
	.@visible_name$ = strnpcinfo(1);
	if (.@visible_name$ == "Access Controller Damhw")
		.@npc_name$ = "Damhwa";
	else if (.@visible_name$ == "Access Controller Geuma")
		.@npc_name$ = "Geuman";
	else
		.@npc_name$ = "Gyuhwa";

	switch( isbegin_quest(7641) ) {
	case 0:
		mes "[" + .@npc_name$ + "]";
		mes "I am sorry, only permitted excavation team members are permitted access.";
		mes "If you work hard with your current excavation team the permit will come.";
		close;
	case 1:
		mes "[" + .@npc_name$ + "]";
		mes "This place can only be accessed by permitted members.";
		mes "Where are you coming from?";
		next;
		if (select("I am coming from the atnad excavation", "Why am I prohibited?") == 1) {
			mes "[" + .@npc_name$ + "]";
			mes "Ah. You are a member of the Atnad excavation team.";
			mes "Yes I have confirmed you on the list.";
			mes "Atnad excavators are permitted access.";
			next;
			select("Why is access prohibited?");
		}
		mes "[" + .@npc_name$ + "]";
		mes "Verus City is divided into four large sections.";
		mes "Did you know?";
		next;
		mes "[" + .@npc_name$ + "]";
		mes "The area currently open are the town and plaza.";
		mes "While the reason is unknown this place has been closed off and prohibited.";
		next;
		mes "[" + .@npc_name$ + "]";
		mes "During independent corporate investigations before excavator recruitment,";
		mes "we found that there was a large explosion here and to check the safety of the area,";
		mes "an inspection period was needed.";
		next;
		mes "[" + .@npc_name$ + "]";
		mes "This is place currently not seen as a great risk other than the dangerous terrain and possibility of";
		mes "being attacked by machines like the plaza, so access is limited only to the excavation team.";
		next;
		mes "[" + .@npc_name$ + "]";
		mes "Please note that the permit also includes the zone connected in the West.";
		next;
		mes "[" + .@npc_name$ + "]";
		mes "Anyway, since you are permitted you may enter freely from now on.";
		mes "Then I expect there to be good results!";
		completequest 7641;// Access Permitted (note : player can enter in verus01 without this quest)
		close;
	case 2:
		mes "[" + .@npc_name$ + "]";
		mes "How is the research and investigation going?";
		mes "The machines in the restricted area are quite dangerous so please be careful.";
		close;
	}
	end;

OnInit:
	questinfo( QTYPE_QUEST, QMARK_YELLOW, "isbegin_quest(7641) == 1" );
	end;
}
verus03,172,257,3	duplicate(Access Controller Damhw#atnd02)	Access Controller Gyuhw#atnd03	4_M_LGTGUARD
verus03,52,250,5	duplicate(Access Controller Damhw#atnd02)	Access Controller Geuma#atnd01	4_M_LGTGUARD

verus03,55,245,3	script	Rekenber Scholar#e152a01	2_M_MOLGENSTEIN,{
	mes "[Rekenber Scholar]";
	mes "Hm.. This machine seems to be have been used for tracking something.";
	mes "What do you think?";
	next;
	mes "[Rekenber Technician]";
	mes "I think so as well.";
	mes "This screen probably indicates the position or condition of what it is tracking or detecting.";
	next;
	mes "[Rekenber Scholar]";
	mes "Was it showing the situation of this closed area, perhaps?";
	mes "It is presumed that it was impossible to directly enter based on the interior situation a while ago.";
	next;
	mes "[Rekenber Technician]";
	mes "Probably so.";
	mes "We can assume there was a large explosion just by observation with our eyes..";
	mes "Then the reason for the people outside to install something like this ....";
	next;
	mes "[Rekenber Scholar]";
	mes "Yes. It is to find out the interior situation.";
	mes "Maybe.. there was a big accident so it might be for searching for survivors..";
	next;
	mes "[Rekenber Technician]";
	mes "Indeed. You are probably right.";
	mes "And our role is to find out the secrets of what happened here.";
	close;

}
verus03,55,243,3	duplicate(Rekenber Scholar#e152a01)	Rekenber technician#e152a02	4_M_REPAIR

verus03,59,250,7	script	Coral Excavation team C#e152a03	2_M_SAGE_B,{
	mes "[Cecil]";
	mes "Hey, Kobell. If we want to be chosen as an outstanding excavation team...!";
	next;
	mes "[Kobell]";
	mes "To be..?";
	next;
	mes "[Cecil]";
	mes "Is to figure out the identity of these unknown mechanical devices!";
	next;
	mes "[Kobell]";
	mes "Whaat? How did this happen?";
	mes "We didn't even major in engineering!";
	next;
	mes "[Cecil]";
	mes "This place if full of machines! We can receive recognition like the Atnad excavators if we analyze them!";
	next;
	mes "[Kobell]";
	mes "Aha! Indeed so.";
	mes "But I think the Atnad excavators are around here...?";
	next;
	mes "[Cecil]";
	mes "Hah! Our research goals cannot be discovered. This is a secret between you and I!";
	next;
	mes "[Kobell]";
	mes "Let's do that~";
	close;
}
verus03,61,250,7	duplicate(Coral Excavation team C#e152a03)	Coral Excavation team C#e152a04	4_M_ALCHE_C


//- Krotzel's Request
verus02,79,31,4	script	Krotzel#1	4_F_HUWOMAN,{
	if (ep15_1_atnad < 19)
		end;
	mes "[Krotzel]";
	switch(ep15_2_brigan) {
	case 0:
		mes "I am Monthly Brigan's senior reporter Krotzel! As this place is revealed to the many, many Adventurers are gathering here.";
		next;
		mes "[Krotzel]";
		mes "Not a lot of information has been relayed to general Adventurers. So we are interviewing Adventurers ourselves! Doing the legwork and gathering information.";
		next;
		mes "[Krotzel]";
		mes "Please give us good information if you have it. If it is a good piece of info we can give you a small reward.";
		next;
		mes "[Krotzel]";
		mes "Who are we? We are Monthly Brigan's Adventure team 2...";
		next;
		mes "[Krotzel]";
		mes "...?";
		next;
		mes "[Krotzel]";
		mes "Where did everybody go? Ha these pains in the butt! Adventure team 2 consists of two senior reporters, one veteran and one Probationary reporter for a total of four.";
		next;
		mes "[Krotzel]";
		mes "I am in charge of interviews and arranging stories and my colleague is photographs. Veteran senior acts as a guide. As a magazine specializing in Adventure we go to cover dangerous places a lot.";
		next;
		mes "[Krotzel]";
		mes "While I am not completely lacking combat experience my forte is reporting! But where did everybody really go? One might think we're on a picnic!";
		ep15_2_brigan = 1;
		close;
	case 1:
		mes "I am most worried about the Probationary member. He is still new so won't know anything. It is highly possible he followed the veteran senior. If it is okay, can you find him?";
		next;
		if (select( "Look for Probationary reporter", "Too busy" ) == 1) {
			mes "[Krotzel]";
			mes "Thank you so much. If he followed the veteran senior he might have gone to the ruined area. I saw his limpid eyes looking at the senior.";
			next;
			mes "[Krotzel]";
			mes "I will look around in this area. You don't have to bring him. Even though it's the Probationary period he should know how to work by himself! Just let me know where he is when you find him.";
			close2;
			setquest 13195;// Monthly Brigan
			ep15_2_brigan = 2;
			end;
		}
		close;
	case 2:
		mes "If she followed the veteran senior she might have gone to the ruined area. If you find her please let me know where she is.";
		close;
	case 3:
		mes "As I thought. I am glad he is at least safe. If it's okay can you find my colleague Sunny Kim as well?";
		next;
		mes "[Krotzel]";
		mes "We got along well since joining and eventually made a team together so I cannot help but be worried.";
		next;
		mes "[Krotzel]";
		mes "She started singing about the architecture style as soon as she came here so she will be around this area.";
		close2;
		setquest 13196;// Monthly Brigan
		ep15_2_brigan = 4;
		end;
	case 4:
		mes "We got along well since joining and eventually made a team together so I cannot help but be worried.";
		next;
		mes "[Krotzel]";
		mes "He started to sing about the architecture style as soon as he came here so he will be around this area. I beg you.";
		close;
	case 5:
		mes "I don't think it can be helped that people will worry. The last veteran reporter, Grizzly Grylls! Designated survival reporter!";
		next;
		mes "[Krotzel]";
		mes "The nickname stuck because he survived anywhere but honestly he has no talent in combat. He is just lucky.";
		next;
		mes "[Krotzel]";
		mes "Although I think he will be safe... can you find out where about he is? He probably ran to the ruins there...";
		close2;
		setquest 13197;// Monthly Brigan
		ep15_2_brigan = 6;
		end;
	case 6:
		mes "Find me Grizzly Grylls, veteran reporter who can survive anywhere. I think he may be in the ruins to the east...";
		next;
		mes "[Krotzel]";
		mes "Come to think of it he's similar to a guild master I interviewed a while back. The fact that he jumps into danger and comes back no matter what... Easier to avoid danger in the first place!";
		close;
	case 7:
		mes "Good! So everybody is safe. Everybody will create a news item on their own, right?";
		next;
		mes "[Krotzel]";
		mes "If they don't return tomorrow I should look for them.";
		close2;
		setquest 13199;// Krotzel's Request - Complete
		getexp 1500000,1000000;
		ep15_2_brigan = 8;
		end;
	default:
		break;
	}
	switch( checkquest(13199,PLAYTIME) ) {
	case -1:
	case 2:
		switch( isbegin_quest(13198) ) {
		case 0:
			mes "You're the adventurer I met last time! Our team members still haven't returned so I am worried. If it's okay, can you check if they are safe?";
			next;
			switch( select( "Look for team members", "Right now is not a good time", "Converse" ) ) {
			case 1:
				mes "[Krotzel]";
				mes "They all have a professional mindset so if they haven't finished working just see if they are safe.";
				if (isbegin_quest(13199) > 0)
					erasequest 13199;// Krotzel's Request - Complete
				setquest 13195;// Monthly Brigan
				setquest 13196;// Monthly Brigan
				setquest 13197;// Monthly Brigan
				setquest 13198;// Monthly Brigan : Krotzel's Request
				close;
			case 2:
				mes "[Krotzel]";
				mes "I will wait for you.";
				close;
			case 3:
				mes "[Krotzel]";
				mes "What is monthly Brigan? You know. Booty that can be obtained from monsters. It is not a jewel but it can provide quite an income. It is like sweet rain to an Adventurer.";
				next;
				mes "[Krotzel]";
				mes "The boss' goal is that. Not the jackpot for an Adventurer but let's make a magazine that can provide sweet info! That's kind of the purpose apparently.";
				close;
			}
			end;
		case 1:
			if (isbegin_quest(13195) > 0 || isbegin_quest(13196) > 0 || isbegin_quest(13197) > 0) {
				mes "I should check if everybody is safe. Please find and see if all three are working hard.";
				close;
			}
			mes "Well we are all safe today. Because we are Adventure team 2! Thank you for helping!";
			close2;
			erasequest 13198;// Monthly Brigan : Krotzel's Request
			setquest 13199;// Krotzel's Request - Complete
			getexp 1000000,500000;
			end;
		case 2:
			mes "[Krotzel]";
			mes "I should check if everybody is safe.";
			close;
		}
		end;
	case 0:
	case 1:
		mes "It seems they are still working. I'm worried but I should be focusing on my work! We are the monthly Brigan Adventure team 2!";
		close;
	}
}

verus02,134,169,4	script	Photo Journalist#1	4_F_GON,{
	if (ep15_2_brigan < 4 || ep15_2_brigan == 6 || ep15_2_brigan == 7) {
		mes "[Sunny Kim]";
		mes "Monthly Brigan's senior photo journalist...Ahah! Monsters keep coming! It's dangerous!";
		close;
	}
	if (ep15_2_brigan == 4) {
		mes "[Sunny Kim]";
		mes "Krotzel? Ah you mean my partner. I still have to capture the cool architecture style and monsters. Tell her I am fine.";
		close2;
		erasequest 13196;// Monthly Brigan
		ep15_2_brigan = 5;
		end;
	}
	if (ep15_2_brigan == 5) {
		mes "[Sunny Kim]";
		mes "I thought I worked a lot on the ground but I am impressed! I will capture all of it in my palm!";
		close;
	}
	switch( select( "Ask if safe", "Is there anything to help with?", "Converse" ) ) {
	case 1:
		mes "[Sunny Kim]";
		if (isbegin_quest(13196) == 0) {
			mes "How is this incredible architecture underground? The more I know the more curious I am.";
			close;
		}
		mes "Of course! I have struggled a lot at the bottom! I am still taking photos. Tell her I will go when I am ready.";
		close2;
		erasequest 13196;
		end;
	case 2:
		mes "[Sunny Kim]";
		switch( checkquest(13203,PLAYTIME) ) {
		case -1:
		case 2:
			switch( checkquest(13202,HUNTING) ) {
			case -1:
				mes "Do you have any thoughts on helping me as a righteous Adventurer?";
				next;
				if (select( "Help Photo Journalist Sunny Kim", "Decline" ) == 1) {
					mes "[Sunny Kim]";
					mes "Photographing cool structures, dynamic monsters and an Adventurer! I am taking photos with two themes but you can help me with one!";
					next;
					mes "[Sunny Kim]";
					mes "Take care of the surrounding monsters for me. I will capture it in photos! Then I can photograph the area in peace!";
					if (isbegin_quest(13203))
						erasequest 13203;// Photo Journalist's Request - Complete
					setquest 13202;// Monthly Brigan : Photo Journalist's Request
				}
				close;
			case 0:
			case 1:
				mes "So you have to stand there and take care of the monsters! With dynamic and large movements if possible! Photographs need a proper concept.";
				close;
			case 2:
				mes "Thanks to you, I think a great piece of work will be produced! I will go back to taking building photos.";
				erasequest 13202;// Monthly Brigan : Photo Journalist's Request
				setquest 13203;// Photo Journalist's Request - Complete
				getexp 1000000,500000;
				close;
			}
		case 0:
		case 1:
			mes "I took a lot of photos but I need time to confirm them. Some of them may be out of focus or I may need better photos, so next time.";
			close;
		}
	case 3:
		mes "[Sunny Kim]";
		mes "I can't always take great photos. Photography is about instants. But you can save the moment for a long time. That is the beauty of photography!";
		close;
	}
}

verus01,41,103,4	script	Exhausted Journalist#1	52,{
	if (ep15_2_brigan < 6) {
		mes "[Grylls]";
		mes "Haha are you an Adventurer? I am Grizzly Grylls! A reporter who likes adventure.";
		close;
	}
	if (ep15_2_brigan == 6) {
		mes "[Grylls]";
		mes "Krotzel is concerned? Don't joke. I am veteran reporter Grizzly Grylls! I am enjoying an adventure! Tell her to not worry.";
		close2;
		erasequest 13197;// Monthly Brigan
		ep15_2_brigan = 7;
		end;
	}
	if (ep15_2_brigan == 7) {
		mes "[Grylls]";
		mes "Now I am confused whether I am a reporter or an adventurer. I even got the nickname survival king for being able to survive anywhere!";
		close;
	}
	switch( select( "Ask if safe", "Is there anything to help with?", "Converse" ) ) {
	case 1:
		mes "[Grylls]";
		if (isbegin_quest(13197) == 0) {
			mes "Other than this place being more dangerous than I thought! I am hungry from diligently running away. I wish there was something to eat.";
			close;
		}
		mes "I am enjoying an adventure! Tell her to not worry. I am a little hungry though...";
		close2;
		erasequest 13197;// Monthly Brigan
		end;
	case 2:
		mes "[Grylls]";
		switch( checkquest(13205,PLAYTIME) ) {
		case -1:
		case 2:
			if (isbegin_quest(13204) == 0) {
				mes "This isn't a big deal but do you have some time?";
				next;
				if (select( "Help survival reporter Grylls", "Decline" ) == 1) {
					mes "[Grylls]";
					mes "I haven't been able to eat at all from all the running away. All day! I noticed these bugs that eat metal.";
					next;
					mes "[Grylls]";
					mes "I need to taste these bugs. I think it will be a good news story as well! The survival king's roasted metal bugs! That's the headline!";
					setquest 13204;// Monthly Brigan : Grylls' Request
				}
				close;
			}
			if (countitem(11597) < 30) {
				mes "A bug that gnaws away metal. I wonder how it tastes. I am so curious! This is why I can't quit being a reporter.";
				close;
			}
			mes "I will cook now! I am salivating at the thought of the flavor!";
			delitem 11597,30;// Iron_Bug
			erasequest 13204;// Monthly Brigan : Grylls' Request
			if (isbegin_quest(13205) > 0)
				erasequest 13205;
			setquest 13205;// Grylls' Request - Complete
			getexp 1000000,500000;
			close;
		case 0:
		case 1:
			mes "I am a little busy cooking these bugs. You want a bite as well?";
			close;
		}
	case 3:
		mes "[Grylls]";
		mes "Amazing that there are bugs that gnaw at metal! But they must be a good source of precious protein and high in nutrition!";
		close;
	}
}

verus01,172,146,4	script	Lame Journalist#1	4_M_HUBOY,{
	if (ep15_2_brigan < 2 || ep15_2_brigan > 3 && ep15_2_brigan < 8) {
		mes "[Rookie Reporter]";
		mes "Hello! I am Rookie reporter Trapp! Of Monthly Brigan's Adventure Team 2! I will cover the stories even through danger!";
		close;
	}
	if (ep15_2_brigan == 2) {
		mes "[Rookie Reporter]";
		mes "Hello! I am Trapp! The newest member of Monthly Brigan's Adventure team 2! My senior is worried? I will cover this story and return!";
		close2;
		erasequest 13195;// Monthly Brigan
		ep15_2_brigan = 3;
		end;
	}
	if (ep15_2_brigan == 3) {
		mes "[Rookie Reporter]";
		mes "Please tell her to not worry so much! I am a reporter too now! However if you have the time I would like you to help me with something. I mean later.";
		close;
	}
	switch( select( "Ask if safe", "Is there anything to help with?", "Converse" ) ) {
	case 1:
		mes "[Rookie Reporter]";
		if (isbegin_quest(13195) == 0) {
			mes "Grylls is nicknamed survival king! Because he survives even in the most extreme areas! I want to become a cool reporter like that.";
			close;
		}
		mes "She is really concerned about me! Tell her as soon as Grylls' work is done I will follow!";
		close2;
		erasequest 13195;// Monthly Brigan
		end;
	case 2:
		mes "[Rookie Reporter]";
		switch( checkquest(13201,PLAYTIME) ) {
		case -1:
		case 2:
			switch( checkquest(13200,HUNTING) ) {
			case -1:
				mes "I mustered some courage and followed him but it was dangerous. If it's okay can you help me?";
				next;
				if (select( "Help Rookie reporter Trapp", "Decline" ) == 1) {
					mes "[Rookie Reporter]";
					mes "Please eradicate the monsters for me! I am trying my best but I am still not used to this. I beg of you.";
					if (isbegin_quest(13201))
						erasequest 13201;
					setquest 13200;
				}
				close;
			case 0:
			case 1:
				mes "Because of the nickname survival king, I thought Grizzly was good in combat but he is really just good at surviving. As soon as monsters showed up he disappeared like the wind.";
				close;
			case 2:
				mes "Did you eradicate that much already? I am not done yet but thank you!";
				erasequest 13200;// Monthly Brigan : Rookie's Request
				setquest 13201;// Rookie's Request - Complete
				getexp 1000000,500000;
				close;
			}
		case 0:
		case 1:
			mes "I am fighting hard to become a specialized survival reporter! Even though...not now but please come back later, if that's okay with you!";
			close;
		}
	case 3:
		mes "[Rookie Reporter]";
		mes "Realizing the world's truth and justice is the mission of the reporter! We have to protect those two despite any hardship and environment!";
		close;
	}
}


// Memory record
un_bunker,382,335,3	script	Box#e152p00	4_ENERGY_BLUE,{
	if (checkweight(1301,3) == 0) {
		mes "- You are carrying too many items to proceed with the quest. -";
		close;
	}
	.@npc_name$ = strnpcinfo(1);
	if (ep15_1_atnad == 27 && countitem(6824) < 5) {
		if (.@npc_name$ == "Box")
			mes "It is a loosely sealed box.";
		else if (.@npc_name$ == "Under desk")
			mes "Something shiny is seen under the desk.";
		else if (.@npc_name$ == "Machine Remains") {
			mes "Random machine remains are piled in a heap.";
			mes "A familiar object is seen amongst the unmoving machine remains.";
		}
		else if (.@npc_name$ == "Thicket") {
			mes "Thickets have grown disregarding it being underground and inside.";
			mes "Something is shining under the thicket.";
		}
		else if (.@npc_name$ == "Organized food tray")
			mes "Food trays are neatly laid on top of each other.";
		else if (.@npc_name$ == "Document pile") {
			mes "All sorts of documents and office supplies are piled up in a heap.";
			mes "Most of the writing is damaged and hard to read.";
		}
		next;
		if (select( "Check adequately.", "Quit." ) == 2) {
			mes "Decided to investigate something else.";
			close;
		}
		progressbar "ffff00",3;
		disablenpc();
		initnpctimer;
		if (.@npc_name$ == "Box") {
			mes "Found a Memory Record in the box.";
			mes "It seems to have been dropped while wrapping something else.";
		}
		else if (.@npc_name$ == "Under desk")
			mes "Found a Memory Record.";
		else if (.@npc_name$ == "Machine Remains")
			mes "Found a Memory Record amongst the machine remains.";
		else if (.@npc_name$ == "Thicket")
			mes "Found a Memory Record amongst the thicket.";
		else if (.@npc_name$ == "Organized food tray") {
			mes "Found a Memory Record stuck between the neatly stacked food trays.";
			mes "Did it drop while organizing the food trays.";
		}
		else if (.@npc_name$ == "Document pile") {
			mes "Found a Memory Record between the piles of documents.";
			mes "Seems like someone hid it there on purpose.";
		}
		getitem 6824,1;	// Lab_Memory_Record
		close;
	}
	if (countitem(6824) > 4) {
		if (.@npc_name$ == "Box")
			mes "The Memory Record in this box has already been collected.";
		else if (.@npc_name$ == "Under desk") {
			mes "Enough Memory Records are collected.";
			mes "No need to keep on crawling and searching.";
		}
		else if (.@npc_name$ == "Machine Remains") {
			mes "Enough Memory Records are collected.";
			mes "No more need to go through the heap of garbage.";
		}
		else if (.@npc_name$ == "Thicket") {
			mes "Enough Memory Records are collected.";
			mes "No need to keep going through the thicket.";
		}
		else if (.@npc_name$ == "Organized food tray") {
			mes "Enough Memory Records are collected.";
			mes "No need to keep going through the food trays one by one.";
		}
		else if (.@npc_name$ == "Document pile") {
			mes "Enough Memory Records are collected.";
			mes "No more need to go through the pile of documents.";
		}
		close;
	}
	if (isbegin_quest(7652) != 1) {
		mes "Nothing special is found.";
		close;
	}
	mes "Something may come out by a search.";
	next;
	if (select( "Check adequately.", "Quit." ) == 2) {
		mes "Decided to investigate something else.";
		close;
	}
	progressbar "ffff00",3;
	disablenpc();
	initnpctimer;
	mes "Found a Memory Record.";
	getitem 6824,1;	// Lab_Memory_Record
	close;

OnTimer30000:
	enablenpc();
	stopnpctimer;
	end;
}
un_bunker,87,167,3	duplicate(Box#e152p00)	Under desk#e152p01	4_ENERGY_BLUE
un_bunker,316,243,3	duplicate(Box#e152p00)	Under desk#e152p02	4_ENERGY_BLUE
un_bunker,103,175,3	duplicate(Box#e152p00)	Under desk#e152p03	4_ENERGY_BLUE

un_bunker,50,292,3	duplicate(Box#e152p00)	Machine Remains#e152p04	4_ENERGY_BLUE
un_bunker,57,314,3	duplicate(Box#e152p00)	Machine Remains#e152p05	4_ENERGY_BLUE
un_bunker,128,314,3	duplicate(Box#e152p00)	Machine Remains#e152p06	4_ENERGY_BLUE
un_bunker,143,308,3	duplicate(Box#e152p00)	Machine Remains#e152p07	4_ENERGY_BLUE
un_bunker,147,287,3	duplicate(Box#e152p00)	Machine Remains#e152p08	4_ENERGY_BLUE

un_bunker,245,360,3	duplicate(Box#e152p00)	Thicket#e152p09	4_ENERGY_BLUE
un_bunker,286,348,3	duplicate(Box#e152p00)	Thicket#e152p10	4_ENERGY_BLUE
un_bunker,331,375,3	duplicate(Box#e152p00)	Thicket#e152p11	4_ENERGY_BLUE

un_bunker,321,305,3	duplicate(Box#e152p00)	Organized food tray#e152p12	4_ENERGY_BLUE
un_bunker,287,304,3	duplicate(Box#e152p00)	Organized food tray#e152p13	4_ENERGY_BLUE

un_bunker,288,263,3	duplicate(Box#e152p00)	Document pile#e152p14	4_ENERGY_BLUE
un_bunker,280,243,3	duplicate(Box#e152p00)	Document pile#e152p15	4_ENERGY_BLUE

verus02,60,30,1	script	Strewn paper#e152a01	4_ENERGY_BLUE,{
	if (checkweight(1301,3) == 0) {
		mes "- Cannot progress quest because you have too many items in your possession. -";
		close;
	}
	if (isbegin_quest(7645) == 0 && isbegin_quest(7650) == 0 && ep15_1_atnad != 19) {
		mes "Nothing special is found.";
		close;
	}
	else if (ep15_1_atnad == 19 && countitem(6757) < 1)
		callsub(S_Type, 1);
	else if (ep15_1_atnad == 20) {
		mes "Decided to deliver the 'Memory Record' found in the heap to Dr. Ian Atnad.";
		mes "Right now a piece of paper hard to read is left.";
		close;
	}
	else if (ep15_1_atnad == 23 && countitem(6757) < 5)
		callsub(S_Type, 2);
	else if (countitem(6757) > 4) {
		mes "Enough Memory Records are collected.";
		mes "No more need to go through the heap of garbage.";
		close;
	}
	else if (isbegin_quest(7650) == 1 && countitem(6757) < 5)
		callsub(S_Type, 3);
	mes "Nothing special is found.";
	close;

OnTimer60000:
	stopnpctimer;
	enablenpc();
	end;

S_Type:
	.@type = getarg(0):
	if (.@type == 3)
		mes "Something may come out by a search.";
	else {
		mes "All sorts of documents and office supplies are piled up in a heap.";
		mes "Most of the writing is damaged and hard to read.";
	}
	next;
	if (select( "Check adequately.", "Quit." ) == 2) {
		mes "Decided to investigate something else.";
		close;
	}
	progressbar "ffff00",3;
	disablenpc();
	initnpctimer;
	getitem 6757,1;// Memory_Record

	switch(.@type) {
	case 1:
		mes "You find a object never seen before as you go through the clutter of documents and office supplies.";
		mes "^4d4dffThis needs to be checked if it has enough research value to be brought back to Dr. Ian Atnad.^000000";
		erasequest 7642;// Explore Research facilities
		setquest 7643;// Mysterious Piece
		ep15_1_atnad = 20;
		close;
	case 2:
		mes "Found a Memory Record between the piles of documents.";
		mes "Seems like someone hid it there on purpose.";
		close;
	case 3:
		mes "Found a Memory Record.";
		close;
	}
	end;
}
verus02,178,32,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a02	4_ENERGY_BLUE
verus02,102,135,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a03	4_ENERGY_BLUE
verus02,42,37,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a04	4_ENERGY_BLUE
verus02,155,64,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a05	4_ENERGY_BLUE
verus02,80,129,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a06	4_ENERGY_BLUE
verus02,29,129,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a07	4_ENERGY_BLUE
verus02,125,85,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a08	4_ENERGY_BLUE
verus02,51,237,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a09	4_ENERGY_BLUE
verus02,160,150,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a10	4_ENERGY_BLUE

verus04,172,149,3	script	Commander Arquien#e152v01	4_F_EDEN_MASTER,{
	mes "[Nile]";
	if (ep15_1_atnad < 23) {
		cutin "Arquien_n_atnad01.bmp",2;
		mes "I just.. Don't want to let it be known I am there..";
		mes "If you have business, let's meet officially in the Eden Group office.";
		close3;
	}
	switch(ep15_1_atnad) {
	case 23:
		if (countitem(6757) < 5) {// Memory_Record
			cutin "Arquien_n_atnad04.bmp",2;
			mes "Do you not remember what I told you at the office?";
			mes "I said if you want to play it, you need at least five.";
			next;
			cutin "Arquien_n_atnad01.bmp",2;
			mes "[Nile]";
			mes "The other pieces should be at the place you first found the 'Memory Record'.";
			mes "So go there and thoroughly search the area.";
			close3;
		}
		cutin "Arquien_n_atnad01.bmp",2;
		mes "Did you bring it?";
		mes "Good. Put them together like this...";
		mes "Put it here...";
		next;
		mes "[Nile]";
		mes "Alright, all ready.";
		mes "You push the play switch youself.";
		delitem 6757,5;// Memory_Record
		erasequest 7645;// Piece of Memory Record
		setquest 7646;// Play Memory Record
		ep15_1_atnad = 24;
		emotion ET_SURPRISE, getnpcid(0,"Record player#e152a01");
		close3;
	case 24:
		cutin "Arquien_n_atnad01.bmp",2;
		mes "It's the table right here.";
		mes "I set it up so you can operate it.";
		mes "You just have to play it.";
		close3;
	case 25:
		cutin "Arquien_n_atnad02.bmp",2;
		mes "...The content is not a big deal.";
		mes "Why.. is the name Atnad mentioned?";
		mes "Does the old man know too?";
		next;
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "No, no. He probably doesn't know.";
		mes "Still feels like there is something to this.";
		mes "..Ah thinking like this isn't my thing.";
		next;
		mes "[Nile]";
		mes "You go and tell him about the content.";
		mes "And this Memory Record.. Oh..?";
		specialeffect EF_SPELLBREAKER,AREA,"Record player#e152a01";
		next;
		select("What just happened..");
		mes "[Nile]";
		mes "What is this..? Is it static?";
		mes "The content won't be erased, right?";
		mes "What do you call this type. Was it physical record.";
		mes "I am not sure but the content itself should be fine.";
		mes "It would be problematic if this much disappears.";
		next;
		mes "[Nile]";
		mes "Recite the general idea to the old man, and ask him why the name Atnad is mentioned.";
		erasequest 7646;// Play Memory Record
		setquest 7647;// Report Memory Record
		ep15_1_atnad = 26;
		getexp 750000,500000;
		close3;
	case 26:
		cutin "Arquien_n_atnad04.bmp",2;
		mes "You remember the gist right?";
		mes "Just go and report it.";
		mes "Tell him I will collect the items myself.";
		mes "He will probably have no problem.";
		mes "Since the old man is soooooo superior.";
		close3;
	case 27:
		if (countitem(6824) < 5) {// // Lab_Memory_Record
			cutin "Arquien_n_atnad04.bmp",2;
			mes "Ha. That old man..";
			mes "He will never come here himself, will he?";
			mes "So this time it's the laboratories Memory Records?";
			next;
			cutin "Arquien_n_atnad03.bmp",2;
			mes "[Nile]";
			mes "I can press the record player switch for you.";
			mes "Am I not generous?";
			next;
			mes "[Nile]";
			mes "Bring back the Memory Records of the laboratories you want to play.";
			mes "You know 5 have to be collected, right?";
			close3;
		}
		cutin "Arquien_n_atnad01.bmp",2;
		mes "So it's these things.";
		mes "Okay.";
		mes "I don't feel that great but work is work.";
		next;
		mes "[Nile]";
		mes "It's done.";
		mes "You'll get what you want just by playing it.";
		mes "Record the message properly and pass it along to the doctor. Got it?";
		delitem 6824,5;// Lab_Memory_Record
		ep15_1_atnad = 28;
		close3;
	case 28:
		cutin "Arquien_n_atnad01.bmp",2;
		mes "The record player is next to me.";
		mes "Listen to it yourself, record the messages yourself.";
		close3;
	case 29:
		cutin "Arquien_n_atnad02.bmp",2;
		mes "So that crunching noise, wasn't static but the sound of the connecting part cracking?";
		mes "You can play it if you connect them into 5 again, the content will be preserved...";
		mes "Anyway...";
		next;
		mes "[Nile]";
		mes "..The content this time again is peculiar.";
		mes "The experimental work, is it talking about the experiment that turned this place like this?";
		mes "I mean the laboratories Memory Records.";
		next;
		cutin "Arquien_n_atnad04.bmp",2;
		mes "[Nile]";
		mes "It may perhaps play a big role in revealing the secrets of this area?";
		mes "Although some of these findings are repeating the same content.";
		next;
		select("Show piece.");
		cutin "Arquien_n_atnad02.bmp",2;
		mes "[Nile]";
		mes "Ho..this is interesting.";
		mes "Was there an empty space in the middle of the record?";
		mes "This part was breaking.";
		mes "I feel a great evil design from this piece.";
		mes "Make sure to handle this carefully.";
		mes "You don't know what can happen.";
		next;
		cutin "Arquien_n_atnad03.bmp",2;
		mes "[Nile]";
		mes "Talking about these Memory Records.";
		mes "It is interesting to listen to.";
		mes "I'm going to participate so bring the Memory Records to me next time.";
		next;
		mes "[Nile]";
		mes "You understand what I am saying?";
		mes "Then, go to the old man and report this news.";
		erasequest 7648;// Memory Records of the Laboratories
		setquest 7649;// Report Memory Record Content
		ep15_1_atnad = 30;
		getexp 750000,500000;
		next;
		mes "^4d4dffYou can now receive daily quests for collecting Memory Records through Arquien Nile Atnad.^000000";
		close3;
	default:
		cutin "Arquien_n_atnad01.bmp",2;
		mes "What's going on?";
		next;
		switch( select( "Research facilities Memory Records", "Laboratories Memory Records", "Converse", "I just stopped by." ) ) {
		case 1:
			mes "[Nile]";
			switch( checkquest(7651,PLAYTIME) ) {
			case -1:
				if (isbegin_quest(7650) > 0) {
					if (countitem(6757) < 5) {
						mes "5 Research facilities Memory Records.";
						mes "I'm looking forward to hear about my ancestors again.";
						close3;
					}
					mes "You obtained all the Memory Records.";
					mes "I wonder how many Memory Records are out there with this content?";
					next;
					mes "[Nile]";
					mes "I guess we have no choice to gather as much information as possible?";
					mes "Preparations for playing the record is finished.";
					mes "Just have to play it now.";
					delitem 6757,5;// Memory_Record
					if (isbegin_quest(7654) == 0)
						setquest 7654;// Play Research facilities Memory Records
					close3;
				}
				mes "Are you here to collect Research facilities Memory Records?";
				mes "Let's do what we have been doing.";
				mes "Collecting 5 Research facilities Memory Records.";
				next;
				mes "[Nile]";
				mes "In the meantime I will be preparing the record player to play it right away.";
				mes "I wonder what the content will be this time.";
				next;
				if (select( "Accept.","Reject." ) == 2) {
					mes "[Nile]";
					mes "Well, what can I do.";
					mes "You are probably busy too from everybody you have to answer to.";
					mes "Then see you later.";
					close3;
				}
				mes "[Nile]";
				mes "I knew you'd say that.";
				mes "You're curious about the content too, right?";
				mes "I will be looking forward to it as well.";
				setquest 7650;// Collect Memory Records of Research facilities
				close3;
			case 0:
			case 1:
				mes "As for collecting the Research Facilities Memory Records, we decided to do it only once a day, right?";
				mes "Should we drive the old man into anxiety by working slowly and roughly?";
				next;
				mes "[Nile]";
				mes "So, come back if the time I suggested is passed.";
				mes "And you will be tired as well.";
				mes "I am not the type to shove people around.";
				close3;
			case 2:
				erasequest 7651;// One Memory a Day
				mes "Hm.. Should we start to gather Memory Records again?";
				mes "Let me know if you want to.";
				mes "I will be tuning the record player in the meanwhile.";
				close3;
			}
		case 2:
			mes "[Nile]";
			switch( checkquest(7653,PLAYTIME) ) {
			case -1:
				if (isbegin_quest(7652) > 0) {
					if (countitem(6824) < 5) {
						mes "5 laboratories area's Memory Records.";
						mes "I wonder what that Dorothy lady will talk about this time.";
						close3;
					}
					mes "I see you have obtained all the laboratories Memory Records.";
					mes "I wonder how many Memory Records are out there with this content?";
					next;
					mes "[Nile]";
					mes "I guess we have no choice to gather as much information as possible?";
					mes "Preparations for playing the record is finished.";
					mes "Just have to play it now.";
					delitem 6824,5;// Lab_Memory_Record
					if (isbegin_quest(7655) == 0)
						setquest 7655;// Play Laboratories Memory Records
					close3;
				}
				mes "Are you here to collect Research facilities Memory Records?";
				mes "Let's do what we have been doing.";
				mes "I mean ^4d4dffcollecting 5 laboratories Memory Records in the underground facility of laboratories^000000.";
				next;
				mes "[Nile]";
				mes "In the meantime I will be preparing the record player to play it right away.";
				mes "I wonder what the content will be this time.";
				next;
				if (select( "Accept.", "Reject." ) == 2) {
					mes "[Nile]";
					mes "Well, what can I do.";
					mes "You are probably busy too from everybody you have to answer to.";
					mes "Then see you later.";
					close3;
				}
				mes "[Nile]";
				mes "I knew you'd say that.";
				mes "You're curious about the content too, right?";
				mes "I will be looking forward to it as well.";
				setquest 7652;// Collect Memory Records of Laboratories
				close3;
			case 0:
			case 1:
				cutin "Arquien_n_atnad01.bmp",2;
				mes "As for collecting the laboratories Memory Records, we decided to do it only once a day, right?";
				mes "Should we drive the old man into anxiety by working slowly and roughly?";
				next;
				mes "[Nile]";
				mes "So, come back if the time I suggested is passed.";
				mes "And you will be tired as well.";
				mes "I am not the type to shove people around.";
				close3;
			case 2:
				erasequest 7653;// One Memory a Day 2
				mes "Hm.. Should we start to gather Memory Records again?";
				mes "Let me know if you want to.";
				mes "I will be tuning the record player in the meanwhile.";
				close3;
			}
		case 3:
			mes "[Nile]";
			if (ep15_1_atnad != 30) {
				cutin "Arquien_n_atnad02.bmp",2;
				mes "The truth is I didn't really have hard feelings torwards my father.";
				mes "I just wanted to hear one apology...";
				close3;
			}
			if (ep15_2_permit == 6) {
				mes "Wait, something is going on?";
				mes "That tent there is where the excavation team is, right?";
				mes "It seems someone is visiting?";
				mes "Go along now!";
				cutin "",255;
				close;
			}
			mes "What do you want to say?";
			next;
			select("About the Last Exploration");
			mes "[Nile]";
			mes "Ah, that..?";
			mes "Forget about that.";
			mes "Now that I think about it I need to hear it from him directly.";
			next;
			mes "[Nile]";
			mes "According to Aures he blindly clung onto Juperos..";
			mes "I think I might know why he did that now.";
			next;
			select("Perhaps for the contents in the Memory Records?");
			mes "[Nile]";
			mes "That's right.";
			mes "The old man. My father probably vaguely knows as well.";
			mes "He's looking for his roots.";
			mes "Although it is my childhood memories, the grandfathers had a lot of secrets.";
			next;
			cutin "Arquien_n_atnad03.bmp",2;
			mes "[Nile]";
			mes "Even so... haha. Can I really be a descendant of this area of Verus?";
			mes "It's probably just the same name. Hahaha...";
			close3;
		case 4:
			mes "[Nile]";
			cutin "Arquien_n_atnad01.bmp",2;
			mes "Hey. I don't have that much time to spare okay?";
			close3;
		}
	}
}

verus04,170,150,3	script	Record player#e152a01	CLEAR_NPC,{
	if (.is_playing == 1) {
		mes "This thing is currently playing..";
		close;
	}
	if (ep15_1_atnad == 24) {
		.is_playing = 1;
		mes "Playing audible information of the Memory Record.";
		sleep2 1000;
		npctalk "Whirr------ Zizip---";
		sleep2 3000;
		npctalk "Zizip-- Hey! What are you doing? Hey, are you listening?";
		sleep2 3000;
		npctalk "I'm listening. Zerter. .. Ah! You. Your voice got in this!";
		sleep2 3000;
		npctalk "What? You were recording? For what?";
		sleep2 3000;
		npctalk "For.. Zizizip--- Installing. Ah.. It's going to -zizizip.";
		sleep2 3000;
		npctalk "Hahahahaha that's what you are thinking? No one is like you Atnad. Aren't you --zizzip.";
		sleep2 1000;
		npctalk "..Atnad?";
		sleep2 3000;
		npctalk "Zizizip-- zizip..It's going to..criing---.. Bzz----";
		sleep2 3000;
		.is_playing = 0;
		next;
		ep15_1_atnad = 25;
		mes "All audible information in the Memory Record has been played.";
		close;
	}
	if (ep15_1_atnad == 28) {
		.is_playing = 1;
		mes "Playing audible information of the Memory Record.";
		sleep2 1000;
		npctalk "I am Dorothy Florence. I picked up a Memory Record in the Monitoring room today.";
		sleep2 4000;
		npctalk "It could be a black box recorded on the day of the experiment. I will play it!";
		sleep2 4000;
		npctalk "Zizip-- Ah.. static noise first... Ah. There it is.";
		sleep2 4000;
		npctalk "Goodluck..";
		sleep2 4000;
		npctalk "(Female Voice) Ha.. I regret never having dated.";
		sleep2 4000;
		npctalk "(Another Female Voice) Ah...... I should be seeing this while having chicken and beer.... zizizip--";
		sleep2 4000;
		npctalk "Huh? Is this all? But this voice. Ahhhhhh Artemia who checked her laundry!";
		sleep2 4000;
		npctalk "..Hum.. I see. That day. This is what happened.....";
		sleep2 4000;
		npctalk "Click";
		sleep2 3000;
		.is_playing = 0;
		next;
		mes "All audible information in the Memory Record has been played.";
		ep15_1_atnad = 29;
		if (countitem(22691) < 1 && countitem(22692) < 1 && countitem(22693) < 1 && countitem(22694) < 1 && countitem(22695) < 1) {
			getitem 22691,1;// Piece_Of_Record1
			setquest 7653;// One Memory a Day 2
		}
		next;
		mes "As you try to eject the Memory Record, the connecting part breaks with a cracking sound and returns to it's disassembled form.";
		close;
	}
	if (ep15_1_atnad < 30) {
		cutin "Arquien_n_atnad01.bmp",2;
		mes "[Nile]";
		mes "Can you, not touch things without asking?";
		close3;
	}
	.@quest_7654 = isbegin_quest(7654);// Play Research facilities Memory Records
	if (.@quest_7654 != 1 && isbegin_quest(7655) != 1) {
		mes "There are no more Memory Records to play.";
		close;
	}
	.is_playing = 1;
	mes "Playing audible information of the Memory Record.";
	sleep2 1000;
	if (.@quest_7654 == 1) {
		switch( rand(1,14) ) {
		case 1:
			npctalk "printf(Hello, World!)";
			sleep2 4000;
			npctalk "return 0";
			sleep2 4000;
			npctalk "Finished coding up to this point and shot 10 arrows.";
			sleep2 4000;
			npctalk "Ferdinando";
			break;
		case 2:
			npctalk "Hello, Tatio";
			sleep2 4000;
			npctalk "I don't know how many years it has been.";
			sleep2 4000;
			npctalk "I guess I did a good thing by giving you eternal life.";
			sleep2 4000;
			npctalk "I guess you know the results of the outside exploration team? I am going to live outside.";
			sleep2 4000;
			npctalk "In this land where scientific civilization is a myth, I am going to live like primal man.";
			sleep2 4000;
			npctalk "Should I quit science and learn this thing called magic? Hahahahaha";
			sleep2 4000;
			npctalk "Smack! Stop saying stupid stuff!";
			sleep2 4000;
			npctalk "Ah.. Got hit again. My..zizizip.. hurts... zizizip";
			break;
		case 3:
			npctalk "Hello, Tatio. Can you collect these and pick them up?";
			sleep2 4000;
			npctalk "I am playing around for you left alone in the city.";
			sleep2 4000;
			npctalk "Sorry for dumping all our hope and despair on you.";
			sleep2 4000;
			npctalk "How long do you have to stay in this grave of a city in solitude?";
			sleep2 4000;
			npctalk "I've decided to hide Memory Records for you.";
			sleep2 4000;
			npctalk "Of course I didn't even forget about the tiny parcels~!";
			sleep2 4000;
			npctalk "I was hoping to find the luxury to find and listen to these.";
			sleep2 4000;
			npctalk "...Your companion forever. Lasse Atnad.";
			break;
		case 4:
			npctalk "Ah test test.. oh.. it works?";
			sleep2 4000;
			npctalk "Hello I am software engineer Sukurita.";
			sleep2 4000;
			npctalk "Today I am here to inform you of the points to note on Sukuta language used in the Sukuta engine.";
			sleep2 4000;
			npctalk "Skuta language can use both global and local variables..";
			sleep2 4000;
			npctalk "The global variable is like the devil and if you fall for the sweet allurement of";
			sleep2 4000;
			npctalk "the global variable you will suffer a heart palpitating and";
			sleep2 4000;
			npctalk "cold sweat inducing epilepsy over 1 byte of space or special syntax.";
			sleep2 4000;
			npctalk "Next time I will explain the alternative to Skuta language mhm mhm";
			sleep2 4000;
			npctalk "Sukurita language invented by I, Sukurita. Heeheeheehee";
			break;
		case 5:
			npctalk "Click-zizip don't stop me Puhahaha I will leave this on record!";
			sleep2 4000;
			npctalk "Puhahahahahahahahaha";
			sleep2 4000;
			npctalk "I am not crazy, this is funny! It's because it's funny.";
			sleep2 4000;
			npctalk "This is a time to be laughing?";
			sleep2 4000;
			npctalk "Ah, of course not. It's not but hehehehe";
			sleep2 4000;
			npctalk "...Then should I cry? Huh? Hasn't this given you hope?";
			sleep2 4000;
			npctalk "Our hope!";
			sleep2 4000;
			npctalk "Clack-! Ah... this.. this smashing is Ze..Zerte.....";
			sleep2 4000;
			npctalk "Ugh. Blimey. You're a lot to handle.";
			sleep2 4000;
			npctalk "Huh? This was still recording?";
			break;
		case 6:
			npctalk "Today is the last experiment and 4885th project of Verus city.";
			sleep2 4000;
			npctalk "Everybody wished to see the experiment succeed and went to the laboratories to observe.";
			sleep2 4000;
			npctalk "Except for me who is on shift in the Research facilities. Hahahaha";
			sleep2 4000;
			npctalk "Aha. Now I think Tatio is also not a member of the main project so is here with me in the Research facilities.";
			sleep2 4000;
			npctalk "It is lonely work.... Only if something good happened..";
			sleep2 4000;
			npctalk "Didn't something just flash? Hey!";
			sleep2 4000;
			npctalk "Booom! Zizizizip";
			break;
		case 7:
			npctalk "Measurements for the survivors in the panic room are no longer being shown on the disaster system screen.";
			sleep2 4000;
			npctalk "What in the world happened?";
			sleep2 4000;
			npctalk "What is going on? Is it a system error?";
			sleep2 4000;
			npctalk "Tatio says Dr. Fresa is still alive.";
			sleep2 4000;
			npctalk "I pray that his heart is okay...";
			break;
		case 8:
			npctalk "Hello, I am Lasse Atnad. I am on Research facility night duty again today.";
			sleep2 4000;
			npctalk "Huh? What is this? What are you doing now Atnad?";
			sleep2 4000;
			npctalk "Ey, can't you tell? I am voice recording!";
			sleep2 4000;
			npctalk "You're using an outdated recorder in this day and age? Record video. Video.";
			sleep2 4000;
			npctalk "That's my choice! Please don't disrupt me. Argh You attacked my weak spot Ahahaha";
			sleep2 4000;
			npctalk "...Zizip..click";
			break;
		case 9:
			npctalk "Hey, Lasse. I am curious about something. Can you answer?";
			sleep2 4000;
			npctalk "What is it? What is it that you're pushing my recorder into my face?";
			sleep2 4000;
			npctalk "Since this is an interview. I am Zete, striving to reach the pinnacle of bioengineering..";
			sleep2 4000;
			npctalk "Enough with bragging. What are you curious about? What is it?";
			sleep2 4000;
			npctalk "It's just about Tatio, but he is mostly metameres. I heard that is Dr. Fresa's work, right?";
			sleep2 4000;
			npctalk "Yes. Dr. Fresa did research on mechanical substitution for the nervous system before coming to Verus city...";
			sleep2 4000;
			npctalk "Oh lala, then that couple came to meet because of that work?";
			sleep2 4000;
			npctalk "That's probably right? Tatio himself agreed to the human experiment without hesitation, so it was meant to be.";
			sleep2 4000;
			npctalk "Mhm.. So was it the fruit of an one-sided crush?";
			sleep2 4000;
			npctalk "Eh? What are you talking about? How did you conclude that? Others' personal life at that...";
			sleep2 4000;
			npctalk "Noo look. Fresa who distinguishes people into those useful for research, and to those useless..";
			sleep2 4000;
			npctalk "Then one day brings a husband so you know how surprised I was?!?!?!";
			sleep2 4000;
			npctalk "So, what you were interested in wasn't biotechnology but Dr. Fresa's love life. Ugh..";
			sleep2 4000;
			npctalk "Right! The Fresa! That stone of a woman has a lover..!! Can you believe it?";
			sleep2 4000;
			npctalk "I am sorry but. Isn't that enough?";
			sleep2 4000;
			npctalk "Heeek! Tatio, when. Did. You come hahahahaha !!! This. This isn't anything!";
			sleep2 4000;
			npctalk "Crash---! Click!";
			break;
		case 10:
			npctalk "Explosion Day 32, voice record Lasse Atnad.";
			sleep2 4000;
			npctalk "The explosions inside the laboratories are not stopping.";
			sleep2 4000;
			npctalk "The condition of the researchers participating or observing the experiment is unknown";
			sleep2 4000;
			npctalk "except through the system vitals connected to the panic room.";
			sleep2 4000;
			npctalk "The plaza and research facilities have only been partially damaged by the explosion aftermath.";
			sleep2 4000;
			npctalk "However.. Some of the researchers and citizens have been killed by an unknown shock wave..";
			sleep2 4000;
			npctalk "We are currently assembling an exploration robot using the research facilities.";
			sleep2 4000;
			npctalk "Verus city main power source has stopped so minimal facilities are being powered by a secondary energy cube.";
			sleep2 4000;
			npctalk "Energy storms are still making accessing pass the laboratories partition impossible.";
			sleep2 4000;
			npctalk "The majority of the researchers are sick of being isolated in the city and are arguing for research on Time Sleep.";
			sleep2 4000;
			npctalk "..Within this grave we can't escape, we dream of going back in time.";
			break;
		case 11:
			npctalk "Which side, I am on the side of being useful to research.";
			sleep2 4000;
			npctalk "That is the worth of my existence when it comes to her. This a fact I knew well.";
			sleep2 4000;
			npctalk "The reason I could not refuse, the reason I could not help but follow her as if I was lured by a mirage...";
			sleep2 4000;
			npctalk "Because she already was the owner of my heart...";
			sleep2 4000;
			npctalk "Rustle";
			sleep2 4000;
			npctalk "Hurk.. You. So it was true. It was a one way crush as ever.";
			sleep2 4000;
			npctalk "Huh? What are you looking at.. Urk isn't that Tatio's diary?";
			sleep2 4000;
			npctalk "Be quiet! Idiot! What if we get caught!";
			sleep2 4000;
			npctalk "What, you are reading this while recording it?!?!?!?!";
			break;
		case 12:
			npctalk "Hello, Tatio.";
			sleep2 4000;
			npctalk "Most of the people are dead.";
			sleep2 4000;
			npctalk "I do not feel guilt even though I turned all those people into dust in order to survive.";
			sleep2 4000;
			npctalk "Above all I worry about you being left alone.";
			sleep2 4000;
			npctalk "So I have decided to stop despairing.";
			sleep2 4000;
			npctalk "It is tomorrow. The day all of us leave this place with you here...";
			sleep2 4000;
			npctalk "Until we can see each other again, good bye.";
			break;
		case 13:
			npctalk "Hello. This is Silvia Loren.";
			sleep2 4000;
			npctalk "My hobby is chicken. I like beer~.";
			sleep2 4000;
			npctalk "Eh... Kind of went overboard by taking on a project today.";
			sleep2 4000;
			npctalk "Honestly it isn't a subject I was interested in.";
			sleep2 4000;
			npctalk "Vincent was participating in it.";
			sleep2 4000;
			npctalk "Ah.......";
			sleep2 4000;
			npctalk "No wait wait. I didn't mean to explain that. Oh now!! Cancel it!! - Zizipzizip";
			break;
		case 14:
			npctalk "Explosion Day 1, voice record Lasse Atnad.";
			sleep2 4000;
			npctalk "Experiment evaluated as failture. Automatic disaster device engaged in Verus city.";
			sleep2 4000;
			npctalk "Closed off from the outside and partition generated by zones.";
			sleep2 4000;
			npctalk "System is being quickly restored but being cut off from the outside is the biggest problem.";
			sleep2 4000;
			npctalk "Maybe Versus city is assessing itself as the source of the disaster.";
			sleep2 4000;
			npctalk "Separating from the outside to prevent the damage from spreading and being silent...";
			sleep2 4000;
			npctalk "......Damn...";
			sleep2 4000;
			npctalk "I don't want to leave this kind of stuff on the record...";
			break;
		}
		sleep2 3000;
		.is_playing = 0;
		next;
		mes "All audible information in the Memory Record has been played.";
		erasequest 7650;// Collect Memory Records of Research facilities
		erasequest 7654;// Play Research facilities Memory Records
		setquest 7651;// One Memory a Day
		if (ep15_2_permit < 5)
			ep15_2_permit++;
	}
	else {
		switch( rand(1,18) ) {
		case 1:
			npctalk "This is Dorothy Florence. Dorothy who only knows how to do laundry.";
			sleep2 4000;
			npctalk "I want to save the remains of the people with the only things I have.";
			sleep2 4000;
			npctalk "This place has a lot of people. They are still alive.";
			sleep2 4000;
			npctalk "I hope to save as many stories of the people as I can.";
			sleep2 4000;
			npctalk "As I hope somebody will remember how we were instead.";
			sleep2 4000;
			npctalk "Okay.. then.. who should I interview first?";
			break;
		case 2:
			npctalk "This is Dorothy Florence.";
			sleep2 4000;
			npctalk "Individual assignments have been established under Dr. Fresa's command.";
			sleep2 4000;
			npctalk "We have to survive here until the energy storm outside stops.";
			sleep2 4000;
			npctalk "We have decided to consult the former cafeteria owner Yangsang on the food problem.";
			sleep2 4000;
			npctalk "They say we can last about 40 days.";
			sleep2 4000;
			npctalk "This panic room is amazing.";
			break;
		case 3:
			npctalk "This is Dorothy Florence.";
			sleep2 4000;
			npctalk "We had a small party today";
			sleep2 4000;
			npctalk "We had the first harvest of the plants being cultivated!";
			sleep2 4000;
			npctalk "According to the biotechnology managers harvest is possible at least once every 2 weeks";
			sleep2 4000;
			npctalk "due to a growth acceleration technology.";
			sleep2 4000;
			npctalk "I can taste fresh grapes again today.";
			break;
		case 4:
			npctalk "This is Dorothy Florence. This is the 3rd night.";
			sleep2 4000;
			npctalk "People are looking to Dr. Fresa as the leader of this current situation and rendering yesterday's criticism meaningless.";
			sleep2 4000;
			npctalk "Biotechnology engineers, mechanical engineers, facility managers.. we have everybody we need.";
			sleep2 4000;
			npctalk "There are also lowly kitchen maids like myself as well.";
			sleep2 4000;
			npctalk "I was here just to deliver some laundry.";
			sleep2 4000;
			npctalk "How did I get caught up in something like this?";
			break;
		case 5:
			npctalk "I am Dorothy Florence. I picked up a Memory Record in the Monitoring room today.";
			sleep2 4000;
			npctalk "It could be a black box recorded on the day of the experiment. I will play it!";
			sleep2 4000;
			npctalk "Zizip-- Ah.. static noise first... Ah. There it is.";
			sleep2 4000;
			npctalk "Goodluck..";
			sleep2 4000;
			npctalk "(Female Voice) Ha.. I regret never having dated.";
			sleep2 4000;
			npctalk "(Another Female Voice) Ah...... I should be seeing this while having chicken and beer.... zizizip--";
			sleep2 4000;
			npctalk "Huh? Is this all? But this voice. Ahhhhhh Artemia who checked her laundry!";
			sleep2 4000;
			npctalk "..Hum.. I see. That day. This is what happened.....";
			sleep2 4000;
			npctalk "Click";
			break;
		case 6:
			npctalk "This is Dorothy Florence.";
			sleep2 4000;
			npctalk "The plants cultivated by the biologist have sprouted shoots one day.";
			sleep2 4000;
			npctalk "Should I be happy?";
			sleep2 4000;
			npctalk "It is something to be happy about but, there is still no contact with the outside world.";
			sleep2 4000;
			npctalk "A week has passed, and the only joy of the people in the panic room...";
			sleep2 4000;
			npctalk "Is watching the germination of the plants.";
			break;
		case 7:
			npctalk "This is Dorothy Florence. It has been a month of panic room life.";
			sleep2 4000;
			npctalk "People were busy since the morning due to the Air cleaner being broken.";
			sleep2 4000;
			npctalk "I can only watch on since the only thing I know how to do is wash clothes.";
			sleep2 4000;
			npctalk "Fortunately the machine manias have already made a new air cleaner";
			sleep2 4000;
			npctalk "so there will be no problem breathing.";
			sleep2 4000;
			npctalk "What a relief, isn't it?";
			break;
		case 8:
			npctalk "This is Dorothy. This is the last recording.";
			sleep2 4000;
			npctalk ".I don't want to die. Whimper..";
			sleep2 4000;
			npctalk "I don't want to be like them!!";
			sleep2 4000;
			npctalk "...I want to live...";
			break;
		case 9:
			npctalk "This is Dorothy Florence. I am recording this";
			sleep2 4000;
			npctalk "because someone has to leave behind the memories of this terrible accident.";
			sleep2 4000;
			npctalk "The outside has been completely cut off from the explosion that occurred with the experiment.";
			sleep2 4000;
			npctalk "Most of the people have currently evacuated to the panic room.";
			sleep2 4000;
			npctalk "There is no contact with the outside world.";
			sleep2 4000;
			npctalk "Going out side will be difficult for the time being.";
			break;
		case 10:
			npctalk "Hello, I am Ate. The assistant engineer of Verus city.";
			sleep2 4000;
			npctalk "Haha.. isn't this awkward?";
			sleep2 4000;
			npctalk "I.. fermented alcohol a while ago with the grapes in the bunker.";
			sleep2 4000;
			npctalk "Life in the bunker is becoming more impoverished the more we lose life on the surface.";
			sleep2 4000;
			npctalk "I didn't share that much but the guy next to me must be drunk because he keeps clinging on to me.";
			sleep2 4000;
			npctalk "Doesn't this guy have something better to do than to cling onto me.";
			sleep2 4000;
			npctalk "I'm kind of on the popular side. Haha.";
			sleep2 4000;
			npctalk "But, seeing that clingy guy reminded me of the kid somehow.";
			sleep2 4000;
			npctalk "Long black braided hair and face full of freckles...";
			sleep2 4000;
			npctalk "..Ate! Can you check this for a minute?";
			sleep2 4000;
			npctalk "Ah.. sorry. I have to go to work. I will do more when I have the chance.";
			sleep2 4000;
			npctalk "Eh, Ate's interview will be continued next time! This has been Dorothy!";
			break;
		case 11:
			npctalk "This is Dorothy Florence. Day 50 of the explosion.";
			sleep2 4000;
			npctalk "After a long discussion, the research staff of Dr. Fresa seem to have decided to";
			sleep2 4000;
			npctalk "go through part of the partition where these is no energy storm.";
			sleep2 4000;
			npctalk "They are leaving by digging an underground tunnel.. !";
			sleep2 4000;
			npctalk "I thought we were trapped by the protective wall?";
			break;
		case 12:
			npctalk "Hello! Ate! Do you have time?";
			sleep2 4000;
			npctalk "Hello, Dorothy. Is this that thing last time? Did I really have to continue?";
			sleep2 4000;
			npctalk "I did promise. No choice. Where was I?";
			sleep2 4000;
			npctalk "The kid with long black braided hair and face full of freckles!";
			sleep2 4000;
			npctalk "Ah, yes. That kid. He would follow me around annoyingly.";
			sleep2 4000;
			npctalk "A time when he was a even more of a kid. .. Haa..";
			sleep2 4000;
			npctalk "I was relieved to think I was finally rid of him in Verus city.";
			sleep2 4000;
			npctalk "Until I ran into him at the laboratories. Haha, isn't he quite the kid?";
			sleep2 4000;
			npctalk "Always honest in his feelings, unchanging....";
			sleep2 4000;
			npctalk "But the kid, never told me he liked me because his stubbornness.";
			sleep2 4000;
			npctalk "Even though it was written on his face.";
			sleep2 4000;
			npctalk "Chasing me around like a stalker. Humph... Hahaha";
			sleep2 4000;
			npctalk "But today I am missing you kid. .. Hoho.";
			sleep2 4000;
			npctalk ".....But that day you probably, hm.. that day....";
			sleep2 4000;
			npctalk ".................Dorothy . ..Let's stop.";
			break;
		case 13:
			npctalk "This is Dorothy Florence. A month and a week has passed.";
			sleep2 4000;
			npctalk "There is bad news today.";
			sleep2 4000;
			npctalk "The people who went outside the multiplex protective wall to measure the atmosphere have not come back.";
			sleep2 4000;
			npctalk "Maybe.. They were swallowed up by the energy storm.";
			sleep2 4000;
			npctalk "I hope they find freedom again.";
			break;
		case 14:
			npctalk "This is Dorothy Florence. Day 44 of the explosion.";
			sleep2 4000;
			npctalk "I hear a portion of the people within the protective wall have changed strangely.";
			sleep2 4000;
			npctalk "Apparently it is related to having gone outside.";
			sleep2 4000;
			npctalk "People are scrambling to check the wall.";
			sleep2 4000;
			npctalk "What is going to happen to us...?";
			break;
		case 15:
			npctalk "--------Bang-----";
			sleep2 4000;
			npctalk "Urk..";
			sleep2 4000;
			npctalk "Sob sob...";
			sleep2 4000;
			npctalk "Why! Why did it happen like this!!!";
			sleep2 4000;
			npctalk "Sob sob..";
			sleep2 4000;
			npctalk "-------Baang-----";
			sleep2 4000;
			npctalk "--Zizip-Ah --doctor --before --zizizip-- he zizip- look zizip--for..";
			sleep2 4000;
			npctalk "--Zizizip--here.";
			sleep2 4000;
			npctalk "-Click-";
			sleep2 4000;
			npctalk "Hm. The doctor looks very tired as well.";
			sleep2 4000;
			npctalk "Ah! This was on? I'm going to get in trouble for leaving it on too long..";
			sleep2 4000;
			npctalk "Umph! Hm! This is Vanilla Luide. I am tired a lot these days for some reason.";
			sleep2 4000;
			npctalk "I guess looking at the situation it's not a shock to see everybody's state.";
			sleep2 4000;
			npctalk "Hoo...";
			sleep2 4000;
			npctalk "Bzz..";
			break;
		case 16:
			npctalk "This is Dorothy Florence. Explosion Day 2. It is still confusing.";
			sleep2 4000;
			npctalk "People are pouring criticism onto";
			sleep2 4000;
			npctalk "the project's chief researcher and manager, Dr. Fresa.";
			sleep2 4000;
			npctalk "This is an accident that cannot be helped by one individual though.";
			sleep2 4000;
			npctalk "Perhaps those people needed somebody to take responsibility.";
			break;
		case 17:
			npctalk "This is Dorothy Florence.";
			sleep2 4000;
			npctalk "They are moving the living necessities inside after the incident yesterday.";
			sleep2 4000;
			npctalk "It seems a part of the trusty panic room has been contaminated by something.";
			sleep2 4000;
			npctalk "We are moving to the cleanest areas.";
			break;
		case 18:
			npctalk "My name is Vincent";
			sleep2 4000;
			npctalk "Eh~ I have entered the server room to replace Mother Comp's main CPU~";
			sleep2 4000;
			npctalk "There's dust everywhere.... Damn it... Ah the mic is on...";
			sleep2 4000;
			npctalk "Let's see. The unit I am about to install is a Nana product made in about the year 11. It's an expensive CPU.";
			sleep2 4000;
			npctalk "Even a small scratch is like losing the worth of a few apartments. However it is my toy now.";
			sleep2 4000;
			npctalk "Take out the guy that was inside... like this. Install new product.";
			sleep2 4000;
			npctalk "There all done. It's really simple.";
			sleep2 4000;
			npctalk "Hey Silvia want to eat chicken? I want the one with green onions.. (Bzz..bzz)";
			sleep2 4000;
			npctalk "Bzz..bzz";
			break;
		}
		sleep2 3000;
		.is_playing = 0;
		next;
		mes "All audible information in the Memory Record has been played.";
		erasequest 7652;// Collect Memory Records of Laboratories
		erasequest 7655;// Play Laboratories Memory Records
		setquest 7653;// One Memory a Day 2
		// memory record daily quests
		if (countitem(22691) < 1 && countitem(22692) < 1 && countitem(22693) < 1 && countitem(22694) < 1 && countitem(22695) < 1)
			getitem rand(22691,22695),1;// Record_Fragment
	}
	getexp 1500000,1000000;
	next;
	specialeffect EF_SPELLBREAKER;
	mes "As you try to eject the Memory Record, the connecting part breaks with a cracking sound and returns to it's disassembled form.";
	next;
	cutin "Arquien_n_atnad01.bmp",2;
	mes "[Nile]";
	mes "Darn. There's only one content but it annoyingly breaks every time it doesn't play.";
	mes "I'm starting to think it's made like this on purpose.";
	mes "Annoying to clean up..";
	next;
	mes "[Nile]";
	mes "Why make things like this with all that science and talent and whatnot?";
	mes "Not to mention there is the occasional overlap..";
	mes "It feels like someone is coaxing us to find out about the past no matter what.";
	next;
	mes "[Nile]";
	mes "Anyway I will record this content separately and deliver it to the old man.";
	mes "Good work today.";
	next;
	mes "[Nile]";
	if (ep15_2_permit != 5)
		mes "Then come back tomorrow.";
	else {
		mes "Wait, something is going on?";
		mes "That tent there is where the excavation team is, right?";
		mes "It seems someone is visiting?";
		mes "Go along now!";
		ep15_2_permit = 6;
	}
	close3;
}


// Bunker - ep15_2_memory
function	script	F_time_limit_recorder	{
	if (getarg(1,1) && checkweight(1301,1) == 0) {
		mes "- You are carrying too many items to proceed with the quest -";
		close;
	}
	setarray .@quest_id[0], 5341,5351,5358,5363,5366;
	for ( .@i = 0; .@i < 5; ++.@i ) {
		switch( checkquest(.@quest_id[.@i],PLAYTIME) ) {
		case -1:
			set getelementofarray( getarg(0), .@i ), 0;
			break;
		case 0:
		case 1:
			set getelementofarray( getarg(0), .@i ), 1;
			break;
		case 2:
			mes "Your whole body suddenly becomes heavy and time seems to be passing faster around you.";
			close2;	// custom (player can't read the text without this)
			ep15_2_memory = 0;
			for ( .@i = 5341; .@i <= 5369; ++.@i ) {
				if (isbegin_quest(.@i) > 0)
					erasequest .@i;
			}
			if (isbegin_quest(5370) == 1)
				mes "Your whole body suddenly becomes heavy and time seems to be passing faster around you.";
			else {
				mes "Ah- This cozy and snug fe...el.....ling";
				if (getarg(2,1))
					warp "un_bunker",98,91;
				else
					consumeitem 602;// Wing_Of_Butterfly
			}
			close;
		}
	}
	return;
}

un_bk_q,103,147,4	script	Bunker Sayhu#EP15.2MR	4_M_ALCHE_C,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if ((.@cooldown_status_day[0] + .@cooldown_status_day[1] + .@cooldown_status_day[2] + .@cooldown_status_day[3] + .@cooldown_status_day[4]) == 0) {
		emotion 46;
		mes "[Bunker Sayhu]";
		mes "First congratulations on surviving. I'm glad you got into the air-raid shelter. If you were outside..";
		next;
		mes "[Bunker Sayhu]";
		mes "...";
		next;
		mes "[Bunker Sayhu]";
		mes "Whew.. even thinking about it makes me dizzy. Both of us were lucky. Don't you think so?";
		next;
		select("I think so too.");
		emotion 28;
		mes "[Bunker Sayhu]";
		mes "I feel a lot of sympathy though. It looks like a lot of people are blaming this explosion on Fresa.";
		next;
		mes "[Bunker Sayhu]";
		mes "The explosion can't be only Lona's responsibility.";
		next;
		select("Lona?");
		emotion 1, playerattached();
		mes "[Bunker Sayhu]";
		mes "A great person for sure despite failing the experiment.";
		next;
		mes "[Bunker Sayhu]";
		mes "She took charge of figuring out the number of survivors in that confusing mess of a situation.";
		next;
		mes "[Bunker Sayhu]";
		mes "If it was me...";
		next;
		mes "[Bunker Sayhu]";
		mes "I would probably be wandering around without knowing what do to right about now..";
		next;
		mes "[Bunker Sayhu]";
		mes "Ugh- I guess even I should go and help. Want to help?";
		next;
		select("Agree to help.");
		emotion 15;
		mes "[Bunker Sayhu]";
		mes "Really? You will help? What a relief because I wasn't confident about going by myself.";
		next;
		mes "[Bunker Sayhu]";
		mes "There is a researcher with a cold demeanor in the center of this room, right?";
		next;
		mes "[Bunker Sayhu]";
		mes "She is the head of the experiment, Lona Fresa. People usually call her Dr. Fresa.";
		next;
		if (isbegin_quest(5370) == 1)
			erasequest 5370;
		setquest 5341;
		setquest 5342;
		mes "[Bunker Sayhu]";
		mes "Do you want to go and ask her if she needs any help?";
		close;
	}
	if (.@cooldown_status_day[0] == 1) {
		.@quest_day_1 = 
			isbegin_quest(5342) + isbegin_quest(5343) + isbegin_quest(5344) + isbegin_quest(5345) + isbegin_quest(5346) + 
			isbegin_quest(5347) + isbegin_quest(5348) + isbegin_quest(5349) + isbegin_quest(5350);
		switch(.@quest_day_1) {
		case 1:
			mes "[Bunker Sayhu]";
			mes "There is a researcher with a cold demeanor in the center of this room, right?";
			next;
			mes "[Bunker Sayhu]";
			mes "Do you want to go and ask her if she needs any help?";
			close;
		case 2:
		case 3:
			mes "[Bunker Sayhu]";
			mes "I was asked to find out how many are capable of cooking.";
			next;
			mes "[Bunker Sayhu]";
			mes "We have to try hard even though the air-raid shelter is complex and wide.";
			close;
		default:
			mes "[Bunker Sayhu]";
			mes "Thanks for helping her.";
			next;
			mes "[Bunker Sayhu]";
			mes "Is it because we helped? I thought I saw a faint smile on her face.";
			close;
		}
	}
	if (.@cooldown_status_day[1] == 1) {
		emotion 1;
		mes "[Bunker Sayhu]";
		mes "Uh?! I don't think I've seen you before in the air-raid shelter?";
		next;
		mes "[Bunker Sayhu]";
		mes "Ah! Are you the Adventurer who's helping with moving the newly made air cleaning unit?";
		next;
		mes "[Bunker Sayhu]";
		mes "You are working a lot because of those thoughtless Mechanicians.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Bunker Sayhu]";
		mes "The Bioengineers succeeded in cultivating grapes right?";
		next;
		mes "[Bunker Sayhu]";
		mes "They say at least one grape harvest every 2 weeks is possible? The harvest day is probably either today or tomorrow.";
		next;
		mes "[Bunker Sayhu]";
		mes "I want to taste fresh grapes soon. I've been eating only dry food for the past few days.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Bunker Sayhu]";
		mes "There's a rumor going around in the air-raid shelter.";
		next;
		mes "[Bunker Sayhu]";
		mes "A while ago the Chemical Substance Specialist and a few others went outside the air-raid shelter.";
		next;
		mes "[Bunker Sayhu]";
		mes "Apparently some contaminated substance got inside the air-raid shelter.";
		next;
		mes "[Bunker Sayhu]";
		mes "I heard the number of convulsing patients are rapidly increasing because of the contaminant.";
		next;
		mes "[Bunker Sayhu]";
		mes "Ah! It's just a rumor! A Rumor!!";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Bunker Sayhu]";
		mes "It seems the rumor going around was true.";
		next;
		mes "[Bunker Sayhu]";
		mes "I hear they are moving supplies to the clean Zone Z-2 even though it's newly opened because of the contaminant.";
		next;
		mes "[Bunker Sayhu]";
		mes "I think I will lend a hand even just a little.";
		close;
	}
	mes "[Bunker Sayhu]";
	mes "Nice to meet you, my name is Bunker Sayhu.";
	close;
}

un_bk_q,93,168,4	script	Dr.Fresa#EP15.2MR	4_F_BERRYTEA,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		.@quest_day_1 = 
			isbegin_quest(5342) + isbegin_quest(5343) + isbegin_quest(5344) + isbegin_quest(5345) + isbegin_quest(5346) + 
			isbegin_quest(5347) + isbegin_quest(5348) + isbegin_quest(5349) + isbegin_quest(5350);
		switch(.@quest_day_1) {
		case 1:
			emotion 17;
			mes "[Lona Fresa]";
			mes "I am sorry. Right now I am a little busy with several problems. Can we speak later?";
			next;
			select("No! What I mean..");
			emotion 0;
			emotion 1;
			mes "[Lona Fresa]";
			mes "What?! The Adventurer wants to help me?";
			next;
			mes "[Lona Fresa]";
			mes "Good. The people are uncontrollable because they are shocked and confused.";
			next;
			mes "[Lona Fresa]";
			mes "If the intimidating Adventurer helps out it will be easier to control the confused masses.";
			next;
			mes "[Lona Fresa]";
			mes "Good!! I approve. Just in time for a troublesome problem as well.";
			next;
			select("Troublesome problem?");
			emotion 1, playerattached();
			mes "[Lona Fresa]";
			mes "The personnel with various specialties such as yourself have not changed their positions and are easy to grasp, but the other employees are the problem.";
			next;
			mes "[Lona Fresa]";
			mes "Surely they are moving according to the Emergency Situation Guidelines of their respective teams.";
			next;
			emotion 20;
			mes "[Lona Fresa]";
			mes "I cannot figure out from here where they are and what they are doing.";
			next;
			mes "[Lona Fresa]";
			mes "So I was thinking if you";
			next;
			.@r = rand(1,4);
			setquest (5342 + .@r);
			mes "[Lona Fresa]";
			if (.@r == 1)
				mes "Can you figure out the number of ^0000FFBioengineers ^000000?";
			else if (.@r == 2)
				mes "Can you figure out the number of ^0000FFMechanicians^000000?";
			else if (.@r == 3)
				mes "Can you figure out the number of ^0000FFFacilities managers^000000?";
			else
				mes "Can you figure out the number of ^0000FFChemical Substance Specialists^000000?";
			next;
			mes "[Lona Fresa]";
			mes "I ask you for this favor even though it won't be easy in this large and complex shelter.";
			close;
		case 2:
			emotion 0;
			emotion 1;
			mes "[Lona Fresa]";
			mes "Huh?! You're already back? You came back earlier than I thought.";
			next;
			mes "[Lona Fresa]";
			mes "The favor that I asked.. ah?! Ah!!";
			next;
			mes "[Lona Fresa]";
			if (isbegin_quest(5343) == 1)
				mes "The number of ^0000FFBioengineers^000000? How many do they say have survived?";
			else if (isbegin_quest(5344) == 1)
				mes "The number of ^0000FFMechanicians^000000? How many do they say have survived?";
			else if (isbegin_quest(5345) == 1)
				mes "The number of ^0000FFFacilities managers^000000? How many do they say have survived?";
			else
				mes "The number of ^0000FFChemical Substance Specialists^000000? How many do they say have survived?";
			next;
			input(.@num,1,99);
			mes "[Lona Fresa]";
			mes "" + .@num + " people you say?";
			next;
			emotion 20;
			mes "[Lona Fresa]";
			mes "That's strange? According to the list they have never been that number.";
			next;
			mes "[Lona Fresa]";
			mes "Can you check again?";
			close;
		case 3:
			emotion 0;
			mes "[Lona Fresa]";
			mes "Ah! You are here. Isn't the interior of the shelter a bit complicated? The favor I asked of you..";
			next;
			mes "[Lona Fresa]";
			if (isbegin_quest(5343) == 1)
				mes "The number of ^0000FFBioengineers^000000? How many do they say have survived?";
			else if (isbegin_quest(5344) == 1)
				mes "The number of ^0000FFMechanicians^000000? How many do they say have survived?";
			else if (isbegin_quest(5345) == 1)
				mes "The number of ^0000FFFacilities managers^000000? How many do they say have survived?";
			else
				mes "The number of ^0000FFChemical Substance Specialists^000000? How many do they say have survived?";
			next;
			input(.@num,1,99);
			if (.@num != ep15_2_memory) {
				mes "[Lona Fresa]";
				mes "" + .@num + " people you say?";
				next;
				mes "[Lona Fresa]";
				mes "That's strange? According to the list they have never been that number.";
				next;
				mes "[Lona Fresa]";
				mes "Can you check again?";
				close;
			}
			mes "[Lona Fresa]";
			mes "Really? It is roughly the same as the number on the list. Good work.";
			next;
			mes "[Lona Fresa]";
			mes "Sayhu says Adventurers like this kind of stuff. This is compensation for your help.";
			next;
			mes "The small round capsule has percolated through the skin. It feels like experience has accumulated.";
			next;
			for ( .@i = 5342; .@i < 5351; ++.@i ) {
				if (isbegin_quest(.@i) > 0)
					erasequest .@i;
			}
			ep15_2_memory = 0;
			setquest 5370;
			getexp 750000,750000;
			mes "[Lona Fresa]";
			mes "Good work. I know it is frustrating but I hope you will adjust to the life inside the air-raid shelter until the outside situation becomes safer.";
			close;
		default:
			mes "[Lona Fresa]";
			mes "Good work. I know it is frustrating but I hope you will adjust to the life inside the air-raid shelter until the outside situation becomes safer.";
			close;
		}
	}
	if (.@cooldown_status_day[1] == 1 || .@cooldown_status_day[2] == 1) {
		emotion 17;
		mes "[Lona Fresa]";
		mes "I am sorry. Right now I am a little busy with several problems. Can we speak later?";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		.@quest_day_4 = isbegin_quest(5364) + isbegin_quest(5365);
		if (.@quest_day_4 == 1) {
			mes "[Lona Fresa]";
			mes "How did you come in? It's weird!";
			close;
		}
		if (.@quest_day_4 == 2) {
			emotion 17;
			mes "[Lona Fresa]";
			mes "I am sorry. Right now I am a little busy with several problems. Can we speak later?";
			next;
			select("I have something urgent to tell you.");
			mes "[Lona Fresa]";
			mes "What?! What is going on?";
			next;
			mes "Explain current situation at the temporary clinic.";
			next;
			emotion 23;
			mes "[Lona Fresa]";
			mes "Patients are convulsing simultaneously.. this is not good.";
			next;
			mes "[Lona Fresa]";
			mes "I got it. We need to take measures.";
			next;
			if (isbegin_quest(5364) > 0)
				erasequest 5364;
			if (isbegin_quest(5365) > 0)
				erasequest 5365;
			setquest 5370;
			getexp 750000,750000;
			mes "The small round capsule has percolated through the skin. It feels like experience has accumulated.";
			next;
			mes "[Lona Fresa]";
			mes "Thank you for informing me.";
			close;
		}
		emotion 19;
		mes "[Lona Fresa]";
		mes "This situation is grave so we need to quickly take measures.";
		close;
	}
	emotion 17;
	mes "[Lona Fresa]";
	mes "I am sorry. Right now I am a little busy with several problems. Can we speak later?";
	close;
}

un_bk_q,213,303,4	script	Bioengineer Touring#EP15.2MR	4W_M_02,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		.@quest_day_1 = 
			isbegin_quest(5342) + isbegin_quest(5343) + isbegin_quest(5344) + isbegin_quest(5345) + isbegin_quest(5346) + 
			isbegin_quest(5347) + isbegin_quest(5348) + isbegin_quest(5349) + isbegin_quest(5350);
		switch(.@quest_day_1) {
		case 2:
			if (isbegin_quest(5343) != 1) {
				mes "[Bioengineer Touring]";
				mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
				close;
			}
			emotion 1;
			mes "[Bioengineer Touring]";
			mes "Huh?! Who are you?";
			next;
			select("I am...");
			emotion 0;
			mes "[Bioengineer Touring]";
			mes "Ah! Dr. Fresa sent you to check the conditions of survivor assignments?";
			next;
			mes "[Bioengineer Touring]";
			mes "What a relief. The disaster network came on a bit ago and we just confirmed how many Bioengineers have survived.";
			next;
			setquest 5347;
			.@r = rand(19,22);
			ep15_2_memory = .@r;
			mes "[Bioengineer Touring]";
			mes "We have confirmed ^FF0000" + .@r + " ^000000Bioengineers have survived including myself.";
			next;
			mes "[Bioengineer Touring]";
			mes "Oh yeah! Tell Dr. Fresa that the Bioengineers are using growth acceleration technology for food production according to the Emergency Situation Guidelines.";
			next;
			emotion 15;
			mes "[Bioengineer Touring]";
			mes "I will count on you.";
			close;
		case 3:
			if (isbegin_quest(5347) != 1) {
				mes "[Bioengineer Touring]";
				mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
				close;
			}
			mes "[Bioengineer Touring]";
			mes "We have confirmed ^FF0000" + ep15_2_memory + " ^000000Bioengineers have survived including myself.";
			next;
			mes "[Bioengineer Touring]";
			mes "Oh yeah! Tell Dr. Fresa that the Bioengineers are using growth acceleration technology for food production according to the Emergency Situation Guidelines.";
			next;
			emotion 15;
			mes "[Bioengineer Touring]";
			mes "I will count on you.";
			close;
		default:
			mes "[Bioengineer Touring]";
			mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
			close;
		}
	}
	if (.@cooldown_status_day[1] == 1) {
		emotion 17;
		mes "[Bioengineer Touring]";
		mes "Wait a minute. You cannot enter the farm right now.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		.@quest_day_3 = isbegin_quest(5359) + isbegin_quest(5360) + isbegin_quest(5361) + isbegin_quest(5362);
		switch(.@quest_day_3) {
		case 1:
			mes "[Bioengineer Touring]";
			mes "Are you harvesting grapes? You have worked hard!";
			close;
		case 2:
			mes "[Bioengineer Touring]";
			mes "We have just finished the last grape harvest and are getting ready for the next one.";
			next;
			emotion 17;
			mes "[Bioengineer Touring]";
			mes "If people come and go often, it may interfere with the work so access is prohibited.";
			close;
		default:
			emotion 17;
			mes "[Bioengineer Touring]";
			mes "If people come and go often, it may interfere with the work for the next harvest so access will be prohibited.";
			close;
		}
	}
	if (.@cooldown_status_day[3] == 1 || .@cooldown_status_day[4] == 1) {
		mes "[Bioengineer Touring]";
		mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
		next;
		emotion 17;
		mes "[Bioengineer Touring]";
		mes "If people come and go often, it may interfere with the work for the next harvest so access will be prohibited.";
		close;
	}
	mes "[Bioengineer Touring]";
	mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
	close;
}

un_bk_q,82,323,2	script	Mechanician Al#EP15.2MR	4_M_REPAIR,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		.@quest_day_1 = 
			isbegin_quest(5342) + isbegin_quest(5343) + isbegin_quest(5344) + isbegin_quest(5345) + isbegin_quest(5346) + 
			isbegin_quest(5347) + isbegin_quest(5348) + isbegin_quest(5349) + isbegin_quest(5350);
		switch(.@quest_day_1) {
		case 2:
			if (isbegin_quest(5344) != 1) {
				mes "[Mechanician Al]";
				mes "So busy. This is why I asked for additional manpower in the first place. No use now I guess.";
				close;
			}
			emotion 2;
			mes "[Mechanician Al]";
			mes "You are?";
			next;
			select("I am...");
			emotion 20;
			mes "[Mechanician Al]";
			mes "Fresa? Hm? Who is Fresa?";
			next;
			mes "[Mechanician Al]";
			mes "Ah?! Ah!! The chief director of the experiment was ^0000FF Lona Fresa^000000.";
			next;
			mes "[Mechanician Al]";
			mes "OK Adventurer man, identity confirmation complete!!";
			next;
			mes "[Mechanician Al]";
			mes "Was it your business to check the Mechanician survivor headcount?";
			next;
			setquest 5348;
			ep15_2_memory = rand(14,18);
			mes "[Mechanician Al]";
			mes "There weren't many in the first place, and too bad for the poor bastards who didn't make it into the shelter.";
			next;
			mes "[Mechanician Al]";
			mes "Tell Fresa, Fress or whatever her name is, that the Mechanicians are inspecting";
			next;
			mes "[Mechanician Al]";
			mes "the mechanical systems in the air-raid shelter according to the emergency protocols. Thanks~";
			close;
		case 3:
			if (isbegin_quest(5348) == 1) {
				mes "[Mechanician Al]";
				mes "^FF0000" + ep15_2_memory + "^000000 Mechanicians have survived.";
				next;
				mes "[Mechanician Al]";
				mes "Tell Fresa, Fress or whatever her name is, that the Mechanicians are inspecting the mechanical systems in the air-raid shelter.";
				close;
			}
			emotion 6;
			mes "[Mechanician Al]";
			mes "So busy. This is why I asked for additional manpower in the first place. No use now I guess.";
			close;
		default:
			mes "[Mechanician Al]";
			mes "The Mechanicians are checking for irregularities in the internal mechanical systems according to Emergency Situation Guidelines.";
			next;
			emotion 6;
			mes "[Mechanician Al]";
			mes "Darn it- Why am I even explaining this? You're bothering me so go away.";
			close;
		}
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Mechanician Al]";
		mes "So busy. This is why I asked for additional manpower in the first place. No use now I guess.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		.@quest_day_3 = isbegin_quest(5359) + isbegin_quest(5360) + isbegin_quest(5361) + isbegin_quest(5362);
		switch(.@quest_day_3) {
		case 2:
			if (isbegin_quest(5360) != 1) {
				mes "[Mechanician Al]";
				mes "Is that grape for me? It's not? Pssh!!";
				close;
			}
			mes "[Mechanician Al]";
			mes "What? Grapes? You are delivering this?";
			next;
			emotion 23;
			mes "[Mechanician Al]";
			mes "You picked this one by one with your bare hands?";
			next;
			mes "[Mechanician Al]";
			mes "Why are you doing such cumbersome work? You could've ask us to make a grape harvesting machine..";
			next;
			mes "[Mechanician Al]";
			mes "Thanks tough. This is compensation. Fress said to compensate adventurers who are caught up in the accident against their will.";
			next;
			if (isbegin_quest(5359) > 0)
				erasequest 5359;
			if (isbegin_quest(5360) > 0)
				erasequest 5360;
			if (isbegin_quest(5361) > 0)
				erasequest 5361;
			if (isbegin_quest(5362) > 0)
				erasequest 5362;
			setquest 5370;
			getexp 1000000,1000000;
			mes "- The small round capsule has percolated through skin. It feels like experience has accumulated.";
			next;
			mes "[Mechanician Al]";
			mes "If you meet Ebrik tell him thanks for the grapes.";
			close;
		default:
			mes "[Mechanician Al]";
			mes "If you meet Ebrik tell him thanks for the grapes.";
			close;
		}
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Mechanician Al]";
		mes "So busy. This is why I asked for additional manpower in the first place. No use now I guess.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		.@quest_day_5 = isbegin_quest(5367) + isbegin_quest(5368) + isbegin_quest(5369);
		switch(.@quest_day_5) {
		case 1:
			mes "[Mechanician Al]";
			mes "Huh? What's going on?";
			next;
			mes "[Mechanician Al]";
			mes "What, shouldn't the items be moved to Zone Z-2 and not here? Take them there.";
			close;
		case 2:
			mes "[Mechanician Al]";
			mes "Huh? What's going on? I heard the Adventurers are being used to move the supplies?";
			next;
			select("The message from Ernon..");
			mes "[Mechanician Al]";
			mes "Ernon? Goods manager Ernon? He has a message for me? What is it?";
			next;
			input .@string$;
			if (isbegin_quest(5369) == 0)
				setquest 5369;
			if (.@string$ == "You idiots!! Stop wasting material with stupid machines!!")
				ep15_2_memory = 1;
			else
				ep15_2_memory = 0;
			mes "[" + strcharinfo(0) + "]";
			mes "" + .@string$ + "";
			next;
			emotion 57;
			mes "[Mechanician Al]";
			mes "Huh.. uh.. buh.. buh..";
			next;
			mes "He seems shocked and out of it. Go back to Ernon since the message has been delivered.";
			close;
		case 3:
			emotion 57;
			mes "[Mechanician Al]";
			mes "Huh.. uh.. buh.. buh..";
			next;
			mes "He is out of it. Go back to Ernon since the message has been delivered.";
			close;
		default:
			emotion 57;
			mes "[Mechanician Al]";
			mes "Er.. non.. ar.. argh!!";
			next;
			mes "He is convulsing like an infected patient.";
			close;
		}
	}
	mes "[Mechanician Al]";
	mes "So busy. This is why I asked for additional manpower in the first place. No use now I guess.";
	close;
}

un_bk_q,347,217,4	script	Facilities manager Remodeling#EP15.2MR	4_M_EINMAN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		.@quest_day_1 = 
			isbegin_quest(5342) + isbegin_quest(5343) + isbegin_quest(5344) + isbegin_quest(5345) + isbegin_quest(5346) + 
			isbegin_quest(5347) + isbegin_quest(5348) + isbegin_quest(5349) + isbegin_quest(5350);
		switch(.@quest_day_1) {
		case 2:
			if (isbegin_quest(5345) != 1) {
				mes "[Facilities manager Remodeling]";
				mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
				close;
			}
			emotion 1;
			mes "[Facilities manager Remodeling]";
			mes "Uh?! Hello. First time meeting you. What brings you here?";
			next;
			select("Explain situation.");
			mes "[Facilities manager Remodeling]";
			mes "Ah! Is that so? Fresa you say? It hasn't been long since my department was placed here.";
			next;
			mes "[Facilities manager Remodeling]";
			mes "I only heard of the name Fresa.";
			next;
			setquest 5349;
			.@r = rand(25,29);
			ep15_2_memory = .@r;
			mes "[Facilities manager Remodeling]";
			mes "Anyway the current number of us facilities managers is ^FF0000" + .@r + "^000000.";
			next;
			mes "[Facilities manager Remodeling]";
			mes "There might be some others who are hiding somewhere but as of right now there are ^FF0000" + .@r + "^000000.";
			next;
			mes "[Facilities manager Remodeling]";
			mes "Tell Fresa on your way that Facilities managers are inspecting facilities in their assigned areas because the air-raid shelter facilities have not really been used.";
			close;
		case 3:
			if (isbegin_quest(5349) == 1) {
				mes "[Facilities manager Remodeling]";
				mes "The current number of facilities managers is ^FF0000" + ep15_2_memory + "^000000.";
				next;
				mes "[Facilities manager Remodeling]";
				mes "Tell Fresa that Facilities managers are inspecting facilities in their assigned areas because the air-raid shelter facilities have not really been used.";
				close;
			}
			mes "[Facilities manager Remodeling]";
			mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
			close;
		default:
			mes "[Facilities manager Remodeling]";
			mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
			close;
		}
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Facilities manager Remodeling]";
		mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		.@quest_day_3 = isbegin_quest(5359) + isbegin_quest(5360) + isbegin_quest(5361) + isbegin_quest(5362);
		switch(.@quest_day_3) {
		case 2:
			if (isbegin_quest(5361) != 1) {
				mes "[Facilities manager Remodeling]";
				mes "What!! That grape!! I had some already so I am guessing it's not mine.";
				close;
			}
			mes "[Facilities manager Remodeling]";
			mes "Good job.";
			next;
			emotion 1;
			mes "[Facilities manager Remodeling]";
			mes "The rumors say the Mechanicians smashed a grape tree but is it true?";
			next;
			select("According to Ebrik.");
			mes "[Facilities manager Remodeling]";
			mes "Thought so.. Mechanician Al is kind of a machine supremacist. I guess that is why he became a mechanician.";
			next;
			emotion 15;
			mes "[Facilities manager Remodeling]";
			mes "Anyway I will enjoy this grape you delivered. This is a reward.";
			next;
			if (isbegin_quest(5359) > 0)
				erasequest 5359;
			if (isbegin_quest(5360) > 0)
				erasequest 5360;
			if (isbegin_quest(5361) > 0)
				erasequest 5361;
			if (isbegin_quest(5362) > 0)
				erasequest 5362;
			setquest 5370;
			getexp 1000000,1000000;
			mes "- The small round capsule has percolated through skin. It feels like experience has accumulated.";
			next;
			mes "[Facilities manager Remodeling]";
			mes "If you meet Ebrik tell him thanks for the grapes.";
			close;
		default:
			mes "[Facilities manager Remodeling]";
			mes "If you meet Ebrik tell him thanks for the grapes.";
			close;
		}
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Facilities manager Remodeling]";
		mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
		close;
	}
	mes "[Facilities manager Remodeling]";
	mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
	close;
}

un_bk_q,86,121,4	script	Chemical Substance Specialist Karsten#EP15.2MR	4_M_ALCHE_B,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		.@quest_day_1 = 
			isbegin_quest(5342) + isbegin_quest(5343) + isbegin_quest(5344) + isbegin_quest(5345) + isbegin_quest(5346) + 
			isbegin_quest(5347) + isbegin_quest(5348) + isbegin_quest(5349) + isbegin_quest(5350);
		switch(.@quest_day_1) {
		case 2:
			if (isbegin_quest(5346) != 1) {
				mes "[Chemical Substance Specialist Karsten]";
				mes "We are checking for hazardous substances within the air-raid shelter according to emergency protocol.";
				close;
			}
			emotion 1;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Who are you?";
			next;
			select("I am...");
			emotion 0;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Ah! Ah! Fresa? I have met her a few times at plenary sessions.";
			next;
			mes "[Chemical Substance Specialist Karsten]";
			mes "If I recall she is the one in charge of this failed project?";
			next;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Anyway!!";
			next;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Not everybody is fit to be director. A headcount in this hectic situation.";
			next;
			emotion 19;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Wait a minute. I did a headcount and wrote it down somewhere..";
			next;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Was it this number? That number? Ah?! This number.";
			next;
			setquest 5350;
			.@r = rand(8,12);
			ep15_2_memory = .@r;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Total number of Chemical Substance Specialists is ^FF0000" + .@r + "^000000. Damn a lot less.";
			next;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Ah! Tell Fresa on your way that we are checking for hazardous substances within the air-raid shelter according to emergency protocol.";
			next;
			mes "[Chemical Substance Specialist Karsten]";
			mes "We have to do our job even if there aren't many of us left.";
			close;
		case 3:
			if (isbegin_quest(5350) == 1) {
				mes "[Chemical Substance Specialist Karsten]";
				mes "Total number of Chemical Substance Specialists is ^FF0000" + ep15_2_memory + "^000000.";
				next;
				mes "[Chemical Substance Specialist Karsten]";
				mes "Tell Fresa that although there are only a few left but, we are checking for hazardous substances within the air-raid shelter.";
				close;
			}
			mes "[Chemical Substance Specialist Karsten]";
			mes "We are checking for hazardous substances within the air-raid shelter according to emergency protocol.";
			close;
		default:
			mes "[Chemical Substance Specialist Karsten]";
			mes "We are checking for hazardous substances within the air-raid shelter according to emergency protocol.";
			close;
		}
	}
	if (.@cooldown_status_day[1] == 1) {
		emotion 18;
		mes "[Chemical Substance Specialist Karsten]";
		mes "Our Chemical Substance Specialists are living like we always do. It's not like we can do chemical experiments in a place like this.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		.@quest_day_3 = isbegin_quest(5359) + isbegin_quest(5360) + isbegin_quest(5361) + isbegin_quest(5362);
		switch(.@quest_day_3) {
		case 2:
			if (isbegin_quest(5362) != 1) {
				mes "[Chemical Substance Specialist Karsten]";
				mes "I've been eating nothing but dried food so eating fresh grape makes me feel fresh.";
				close;
			}
			mes "[Chemical Substance Specialist Karsten]";
			mes "Is that the first grape harvested by the Bioengineers?";
			next;
			emotion 1;
			mes "[Chemical Substance Specialist Karsten]";
			mes "The rumors say a grape tree got smashed because of the Mechanicians but it seems it hasn't affected the harvest.";
			next;
			mes "[Chemical Substance Specialist Karsten]";
			mes "Anyway thanks. I prepared this for compensation.";
			next;
			if (isbegin_quest(5359) > 0)
				erasequest 5359;
			if (isbegin_quest(5360) > 0)
				erasequest 5360;
			if (isbegin_quest(5361) > 0)
				erasequest 5361;
			if (isbegin_quest(5362) > 0)
				erasequest 5362;
			setquest 5370;
			getexp 1000000,1000000;
			mes "- The small round capsule has percolated through skin. It feels like experience has accumulated.";
			next;
			emotion 28;
			mes "[Chemical Substance Specialist Karsten]";
			mes "I've been eating nothing but dried food for the past few days so it moves me to eat fresh grape.";
			close;
		default:
			mes "[Chemical Substance Specialist Karsten]";
			mes "I've been eating nothing but dried food so eating fresh grape makes me feel fresh.";
			close;
		}
	}
	emotion 18;
	mes "[Chemical Substance Specialist Karsten]";
	mes "Our Chemical Substance Specialists are living like we always do. It's not like we can do chemical experiments in a place like this.";
	close;
}

un_bk_q,56,286,4	script	Mechanician Mugeosi#EP15.2MR	4_M_REPAIR,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Mechanician Mugeosi]";
		mes "Are you an Adventurer? This is the machine warehouse.";
		next;
		mes "[Mechanician Mugeosi]";
		mes "It was originally a warehouse but it is now being used by Mechanicians to assemble machines for the air-raid shelter.";
		next;
		emotion 6;
		mes "[Mechanician Mugeosi]";
		mes "You want to know the total number of Mechanicians? I don't think I know?";
		next;
		mes "[Mechanician Mugeosi]";
		mes "Ah! Al up there might know. Go to Al.";
		close;
	}
	if ((.@cooldown_status_day[0] + .@cooldown_status_day[1] + .@cooldown_status_day[2] + .@cooldown_status_day[3] + .@cooldown_status_day[4]) == 0) {
		mes "[Mechanician Mugeosi]";
		mes "An adventure to move the air cleaner?";
		next;
		mes "[Mechanician Mugeosi]";
		mes "You look solid just like the other researchers mentioned. I bet you can lift the air cleaner like nothing!!";
		next;
		mes "[Mechanician Mugeosi]";
		mes "We shouldn't be ordering people like you who got caught up in an accident, but the situation is urgent.";
		next;
		mes "[Mechanician Mugeosi]";
		mes "We made a new air cleaning unit because the one operating previously broke down a while ago.";
		next;
		mes "[Mechanician Mugeosi]";
		mes "We should have made it in modular form. Made it as one solid piece by mistake.";
		next;
		emotion 18;
		mes "[Mechanician Mugeosi]";
		mes "Didn't think of it when we were making it!!";
		next;
		mes "[Mechanician Mugeosi]";
		mes "It happens. Right?";
		next;
		mes "[Mechanician Mugeosi]";
		mes "Facilities managers are making a fuss about needing the air cleaning unit soon.";
		next;
		mes "[Mechanician Mugeosi]";
		mes "We can't move the air cleaning unit with the equipment we have now..";
		next;
		mes "[Mechanician Mugeosi]";
		mes "We could make the machine that can transport it if we had more time..";
		next;
		mes "[Mechanician Mugeosi]";
		mes "So we ended up asking the strong Adventurer.";
		next;
		select("Yes sir.");
		emotion 18;
		mes "[Mechanician Mugeosi]";
		mes "Aren't you refreshing!!";
		next;
		if (isbegin_quest(5370) == 1)
			erasequest 5370;
		setquest 5351;
		setquest 5352;
		mes "[Mechanician Mugeosi]";
		mes "We are counting on you. Take five air cleaning units to areas C-0, F-1, F-2, I-0, Z-0. Talk to me when you're ready.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		.@quest_day_2 = isbegin_quest(5352) + isbegin_quest(5353) + isbegin_quest(5354) + isbegin_quest(5355) + isbegin_quest(5356) + isbegin_quest(5357);
		if (.@quest_day_2 > 0 && .@quest_day_2 < 6) {
			emotion 1;
			mes "[Mechanician Mugeosi]";
			mes "Are you ready to move heavy objects?";
			next;
			select("Give it to me.");
			if ((MaxWeight - Weight) < 10000) {
				mes "[Mechanician Mugeosi]";
				mes "You look strong but seems you are weak. You can't lift the air cleaning unit like that.";
				close;
			}
			getitem 6825,1;
			mes "[Mechanician Mugeosi]";
			mes "Deliver them to zones C-0, F-1, F-2, I-0, Z-0. The order doesn't matter and please be careful since they are precise machines.";
			close;
		}
		if (.@quest_day_2 == 6) {
			emotion 21;
			mes "[Mechanician Mugeosi]";
			mes "Good work. The air cleaning units are heavy, right?";
			next;
			mes "[Mechanician Mugeosi]";
			mes "Sayhu says Adventurers like this kind of stuff and I should use this as compensation after giving you work.";
			next;
			for ( .@i = 5352; .@i < 5358; .@i++ ) {
				if (isbegin_quest(.@i) > 0)
					erasequest .@i;
			}
			ep15_2_memory = 0;
			setquest 5370;
			getexp 1000000,1000000;
			mes "The small round capsule has percolated through skin. It feels like experience has accumulated.";
			next;
			mes "[Mechanician Mugeosi]";
			mes "Thanks to you we overcame a crisis. I need to make a machine that can move heavy objects in case this happens again.";
			close;
		}
		mes "[Mechanician Mugeosi]";
		mes "Good work. Let's relax for now.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Mechanician Mugeosi]";
		mes "Have you tried the grapes made by the Bioengineers using that growth thingy?";
		next;
		mes "[Mechanician Mugeosi]";
		mes "We can now eat fresh fruit in this dull and dark air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Mechanician Mugeosi]";
		mes "Are you worried because people are suddenly attacking? What? You aren't infected right?";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Mechanician Mugeosi]";
		mes "Why is everybody rejecting us making a machine that can make shipping easier? Pssh!!";
		close;
	}
	// unknown text
	end;
}

un_bk_q,212,294,6	script	Zone C-0 Facilities man#EP15.2MR	4_M_EINMAN2,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Facilities manager]";
		mes "We are inspecting the interior facilities of the air-raid shelter according to emergency regulations.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		switch( isbegin_quest(5353) ) {
		case 0:
			emotion 2;
			mes "[Facilities manager]";
			mes "Oh- You're here? I was waiting.";
			next;
			mes "[Facilities manager]";
			mes "I have heard Adventurers are all strong as oxen but it is still impressive.";
			next;
			if (countitem(6825) < 1) {
				mes "[Facilities manager]";
				mes "But where is the air cleaning unit? You didn't bring the most important thing. Bring it here.";
				close;
			}
			delitem 6825,1;
			setquest 5353;
			mes "[Facilities manager]";
			mes "Good work. Good work. We have received the air cleaning unit.";
			close;
		case 1:
			mes "[Facilities manager]";
			mes "Good work. Good work. We have received the air cleaning unit.";
			close;
		case 2:
			end;	// shouldn't happen
		}
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Facilities manager]";
		mes "Have you tried the grape made by the Bioengineers?";
		next;
		mes "[Facilities manager]";
		mes "Science is truly amazing to have us enjoy fresh grapes in this underground air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Facilities manager]";
		mes "I think the air cleaner might be useless because the contaminant has already infiltrated the air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Facilities manager]";
		mes "You are going through a lot.";
		close;
	}
	mes "[Facilities manager]";
	mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
	close;
}

un_bk_q,223,217,4	script	Zone F-1 Facilities man#EP15.2MR	4_M_EINMAN2,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Facilities manager]";
		mes "We are inspecting the interior facilities of the air-raid shelter according to emergency regulations.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		switch( isbegin_quest(5354) ) {
		case 0:
			emotion 15;
			mes "[Facilities manager]";
			mes "Oh my you are working hard. You can place the item over here.";
			next;
			mes "[Facilities manager]";
			mes "Whoa- I heard the rumors but you are really strong.";
			next;
			mes "[Facilities manager]";
			mes "It's hard for even four of us Facilities managers to lift it for a moment..";
			next;
			if (countitem(6825) < 1) {
				mes "[Facilities manager]";
				mes "But where is the air cleaning unit? You didn't bring the most important thing. Bring it here.";
				close;
			}
			delitem 6825,1;
			setquest 5354;
			mes "[Facilities manager]";
			mes "Anyway we have received the air cleaning unit.";
			close;
		case 1:
			mes "[Facilities manager]";
			mes "Anyway we have received the air cleaning unit.";
			close;
		case 2:
			end;	// shouldn't happen
		}
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Facilities manager]";
		mes "Have you tried the grape made by the Bioengineers?";
		next;
		mes "[Facilities manager]";
		mes "Science is truly amazing to have us enjoy fresh grapes in this underground air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Facilities manager]";
		mes "I think the air cleaner might be useless because the contaminant has already infiltrated the air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Facilities manager]";
		mes "You are going through a lot.";
		close;
	}
	mes "[Facilities manager]";
	mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
	close;
}

un_bk_q,372,217,6	script	Zone F-2 Facilities man#EP15.2MR	4_M_EINMAN2,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Facilities manager]";
		mes "We are inspecting the interior facilities of the air-raid shelter according to emergency regulations.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		switch( isbegin_quest(5355) ) {
		case 0:
			emotion 1;
			mes "[Facilities manager]";
			mes "Ah?! Are you the Adventurer who's delivering air cleaning units?";
			next;
			if (countitem(6825) < 1) {
				mes "[Facilities manager]";
				mes "But where is the air cleaning unit? Did you not bring it?";
				close;
			}
			delitem 6825,1;
			setquest 5355;
			mes "[Facilities manager]";
			mes "We need to work fast so place the item here.";
			close;
		case 1:
			mes "[Facilities manager]";
			mes "We have received the air cleaning unit.";
			close;
		case 2:
			end;	// shouldn't happen
		}
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Facilities manager]";
		mes "Have you tried the grape made by the Bioengineers?";
		next;
		mes "[Facilities manager]";
		mes "Science is truly amazing to have us enjoy fresh grapes in this underground air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Facilities manager]";
		mes "I think the air cleaner might be useless because the contaminant has already infiltrated the air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Facilities manager]";
		mes "You are going through a lot.";
		close;
	}
	mes "[Facilities manager]";
	mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
	close;
}

un_bk_q,389,276,6	script	Zone I-0 Facilities man#EP15.2MR	4_M_EINMAN2,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Facilities manager]";
		mes "We are inspecting the interior facilities of the air-raid shelter according to emergency regulations.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		switch( isbegin_quest(5356) ) {
		case 0:
			emotion 1;
			mes "[Facilities manager]";
			mes "Has the adventurer not delivered the air cleaning unit yet? Uh?! It's here. Hurry.. the air cleaning unit..";
			next;
			if (countitem(6825) < 1) {
				mes "[Facilities manager]";
				mes "Arwhat!! Why didn't you bring it. Bring it now, okay?";
				close;
			}
			delitem 6825,1;
			setquest 5356;
			mes "[Facilities manager]";
			mes "It's urgent. I'll thank you later..";
			close;
		case 1:
			mes "[Facilities manager]";
			mes "Don't talk to me. Every hour is precious.";
			close;
		case 2:
			end;	// shouldn't happen
		}
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Facilities manager]";
		mes "Have you tried the grape made by the Bioengineers?";
		next;
		mes "[Facilities manager]";
		mes "Science is truly amazing to have us enjoy fresh grapes in this underground air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Facilities manager]";
		mes "I think the air cleaner might be useless because the contaminant has already infiltrated the air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Facilities manager]";
		mes "You are going through a lot.";
		close;
	}
	mes "[Facilities manager]";
	mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
	close;
}

un_bk_q,291,158,4	script	Zone Z-0 Facilities man#EP15.2MR	4_M_EINMAN2,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Facilities manager]";
		mes "We are inspecting the interior facilities of the air-raid shelter according to emergency regulations.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		switch( isbegin_quest(5357) ) {
		case 0:
			emotion 21;
			mes "[Facilities manager]";
			mes "Oh- You're here? I was waiting.";
			next;
			mes "[Facilities manager]";
			mes "I have heard Adventurers are all strong as oxen but it is still impressive.";
			next;
			if (countitem(6825) < 1) {
				mes "[Facilities manager]";
				mes "But where is the air cleaning unit? You didn't bring the most important thing. Bring it here.";
				close;
			}
			delitem 6825,1;
			setquest 5357;
			mes "[Facilities manager]";
			mes "Good work. Good work. We have received the air cleaning unit.";
			close;
		case 1:
			mes "[Facilities manager]";
			mes "Good work. Good work. We have received the air cleaning unit.";
			close;
		case 2:
			end;	// shouldn't happen
		}
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Facilities manager]";
		mes "Have you tried the grape made by the Bioengineers?";
		next;
		mes "[Facilities manager]";
		mes "Science is truly amazing to have us enjoy fresh grapes in this underground air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Facilities manager]";
		mes "I think the air cleaner might be useless because the contaminant has already infiltrated the air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Facilities manager]";
		mes "You are going through a lot.";
		close;
	}
	mes "[Facilities manager]";
	mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
	close;
}

un_bk_q,220,350,4	script	Bioengineer Ebrik#EP15.2MR	4_M_01,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Bioengineer Ebrik]";
		mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Bioengineer Ebrik]";
		mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
		close;
	}
	if ((.@cooldown_status_day[0] + .@cooldown_status_day[1] + .@cooldown_status_day[2] + .@cooldown_status_day[3] + .@cooldown_status_day[4]) == 0) {
		emotion 1;
		mes "[Bioengineer Ebrik]";
		mes "Are you the Adventurer here to help us with the grape harvest? Nice to meet you.";
		next;
		mes "[Bioengineer Ebrik]";
		mes "Bioengineers alone do not have enough hands to harvest the amount of grapes we need to provide all the people inside the air-raid shelter.";
		next;
		mes "[Bioengineer Ebrik]";
		mes "So we ended up asking the Adventurers.";
		next;
		select("Are there others who can help?");
		mes "[Bioengineer Ebrik]";
		mes "Don't even mention it. We gave the task of harvesting grapes to the meandering Mechanicians and..";
		next;
		emotion 16;
		mes "[Bioengineer Ebrik]";
		mes "They ended up smashing one of the grape trees!!";
		next;
		mes "[Bioengineer Ebrik]";
		mes "We were lucky to have found out and stopped them before they destroyed the other trees. The thought of it is horrible.";
		next;
		mes "[Bioengineer Ebrik]";
		mes "Ah! That is not what's important.";
		next;
		mes "[Bioengineer Ebrik]";
		mes "We used growth acceleration to make ripe grapes drop periodically.";
		next;
		mes "[Bioengineer Ebrik]";
		mes "It would be nice if you can wait in front of the grape tree and collect 30 bunches of grapes.";
		next;
		mes "[Bioengineer Ebrik]";
		mes "You can collect more, but the remaining ones from the harvest will naturally decompose and disappear.";
		next;
		if (isbegin_quest(5370) == 1)
			erasequest 5370;
		setquest 5358;
		setquest 5359;
		mes "[Bioengineer Ebrik]";
		mes "Then the soil fertility will recover partially. Good luck.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		.@quest_day_3 = isbegin_quest(5359) + isbegin_quest(5360) + isbegin_quest(5361) + isbegin_quest(5362);
		switch(.@quest_day_3) {
		case 1:
			if (countitem(6826) < 30) {
				mes "[Bioengineer Ebrik]";
				mes "We have decided to give out one grape box per team.";
				next;
				mes "[Bioengineer Ebrik]";
				mes "One box can hold 30~32 bunches so collect accordingly.";
				close;
			}
			emotion 21;
			mes "[Bioengineer Ebrik]";
			mes "Whoa good job. As I thought Adventurers are so much more capable than Mechanicians.";
			next;
			mes "[Bioengineer Ebrik]";
			mes "Since the grapes are harvested should we deliver them to each team?";
			next;
			mes "[Bioengineer Ebrik]";
			mes "I will be rude and ask you another favor on top of your hard work.";
			next;
			mes "[Bioengineer Ebrik]";
			mes "Let's see.. the grapes you just harvested";
			next;
			delitem 6826, countitem(6826);
			.@r = rand(1,3);
			setquest (5359 + .@r);
			mes "[Bioengineer Ebrik]";
			if (.@r == 1)
				mes "should be delivered to the Mechanical AI team. You can deliver this to Mugeosi.";
			else if (.@r == 2)
				mes "should be delivered to the Facilities manager team. You can deliver this to Remodeling.";
			else
				mes "should be delivered to the Chemical Substance team. You can deliver this to Karsten.";
			next;
			mes "[Bioengineer Ebrik]";
			mes "Oh! You do not have to come back after the deliveries. We will be busy starting the next project.";
			next;
			mes "[Bioengineer Ebrik]";
			mes "The people receiving the deliveries will probably give you compensation. If they don't, you can nag them.";
			close;
		case 2:
			mes "[Bioengineer Ebrik]";
			mes "That grape box you are holding";
			next;
			mes "[Bioengineer Ebrik]";
			if (isbegin_quest(5360) == 1)
				mes "has to be delivered to Mugeosi of the Mechanical AI team.";
			else if (isbegin_quest(5361) == 1)
				mes "has to be delivered to Remodeling of the Facilities manager team.";
			else
				mes "has to be delivered to Karsten of the Chemical substance team.";
			next;
			mes "[Bioengineer Ebrik]";
			mes "Compensation will be paid by the people receiving the deliveries so you do not have to come back here.";
			close;
		default:
			mes "[Bioengineer Ebrik]";
			mes "I thought I told you don't have to come back. Anyway how did you get inside?";
			close;
		}
	}
	mes "[Bioengineer Ebrik]";
	mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
	close;
}

un_bk_q,333,333,0	script	Grape System#EP15.2MR	HIDDEN_WARP_NPC,{
	end;
OnInit:
	initnpctimer;
	end;
OnTimer30000:
OnTimer210000:
	callsub( S_Random_Grap, 240,244, 389,391, 1,2,1 );
	end;
OnTimer60000:
OnTimer240000:
	callsub( S_Random_Grap, 271,275, 389,391, 1,1,2 );
	end;
OnTimer90000:
OnTimer270000:
	callsub( S_Random_Grap, 314,318, 342,344, 2,1,1 );
	end;
OnTimer120000:
OnTimer300000:
	callsub( S_Random_Grap, 239,243, 341,343, 1,2,1 );
	end;
OnTimer180000:
	callsub( S_Random_Grap, 331,333, 357,361, 1,1,2 );
	end;
OnTimer330000:
	callsub( S_Random_Grap, 331,333, 357,361, 1,1,2 );
	initnpctimer;
	end;

S_Random_Grap:
	for ( .@i = 0; .@i < 3; ++.@i ) {
		do {
			.@x = rand( getarg(0), getarg(1) );
			.@y = rand( getarg(2), getarg(3) );
		}
		while( !checkcell("un_bk_q",.@x,.@y,cell_chkpass) );
		makeitem 6826, getarg(4+.@i), "un_bk_q",.@x,.@y;
	}
	return;
}

un_bk_q,276,243,4	script	Nurse Lapplad#EP15.2MR	4_F_BRZ_WOMAN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1)	// Unknown text
		end;
	if (.@cooldown_status_day[1] == 1)	// Unknown text
		end;
	if (.@cooldown_status_day[2] == 1)	// Unknown text
		end;
	if ((.@cooldown_status_day[0] + .@cooldown_status_day[1] + .@cooldown_status_day[2] + .@cooldown_status_day[3] + .@cooldown_status_day[4]) == 0) {
		emotion 17;
		mes "[Nurse Lapplad]";
		mes "Sorry. Did you wait long? There are a lot of suspected infection patients as you can see..";
		next;
		select("Not really..");
		emotion 23;
		mes "[Nurse Lapplad]";
		mes "Eh?! You didn't wait? That's strange? Did you cut in line? Cutting is bad.";
		next;
		mes "[Nurse Lapplad]";
		mes "As you know there are infectees who are suddenly showing strange phenomena..";
		next;
		emotion 10;
		mes "[Nurse Lapplad]";
		mes "Um...";
		next;
		mes "[Nurse Lapplad]";
		mes "...Ah...";
		next;
		emotion 0;
		mes "[Nurse Lapplad]";
		mes "...Oh!!";
		next;
		mes "[Nurse Lapplad]";
		mes "I don't see any problematic symptoms. Fortunate.";
		next;
		mes "[Nurse Lapplad]";
		mes "We are having trouble because of the suddenly convulsing patients.";
		next;
		mes "[Nurse Lapplad]";
		mes "Look here. My skin is getting crispy from not being able to sleep for days~";
		next;
		if (mobcount( "un_bk_q", "Nurse Lapplad#EP15.2MR::OnMyMobDead" ) < 1) {
			disablenpc "Patient#EP15.2MR_01";
			monster "un_bk_q",286,254, "Convulsing Patient", 1015,1, "Nurse Lapplad#EP15.2MR::OnMyMobDead";	// ZOMBIE
			.mob_id[1] = $@mobid[0];
			initnpctimer;
		}
		mes "Thudunk!! Babang!! Crash!!";
		next;
		emotion 18;
		mes "[Nurse Lapplad]";
		mes "Yes.. Just like that";
		next;
		emotion 10;
		mes "[Nurse Lapplad]";
		mes "... ...";
		next;
		mes "[Nurse Lapplad]";
		mes "Argh!! Another convulsing patient.";
		next;
		mes "[Nurse Lapplad]";
		mes "Hey. Aren't you an adventurer? You must be really strong.";
		next;
		if (isbegin_quest(5370) == 1)
			erasequest 5370;
		setquest 5363;
		setquest 5364;
		mes "[Nurse Lapplad]";
		mes "Can you suppress that convulsing patient? I am counting on you.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		.@quest_day_4 = isbegin_quest(5364) + isbegin_quest(5365);
		if (.@quest_day_4 == 1) {
			if (mobcount( "un_bk_q", "Nurse Lapplad#EP15.2MR::OnMyMobDead" ) < 1) {
				mes "[Nurse Lapplad]";
				mes "You didn't get bit or scratched by the convulsing patient, did you?";
				next;
				select("Why?");
				mes "[Nurse Lapplad]";
				mes "Hmm~ I don't see any particular wounds.";
				next;
				mes "[Nurse Lapplad]";
				mes "Since I can't figure out the infection route...";
				next;
				mes "[Nurse Lapplad]";
				mes "We have to prepare for a possible disaster...";
				next;
				mes "[Nurse Lapplad]";
				mes "Anyway, Adventurer~ Assuring and the best!";
				next;
				mes "[Nurse Lapplad]";
				mes "I haven't been that bewildered by simultaneously convulsing patients before..";
				next;
				mes "[Nurse Lapplad]";
				mes "Lucky you were here to suppress it with ease.";
				next;
				mes "[Nurse Lapplad]";
				mes "I am sorry but can you report this to Fresa on your way? You know who Fresa is?";
				next;
				setquest 5365;
				mes "[Nurse Lapplad]";
				mes "It is a situation so I am asking you a favor.";
				close;
			}
			emotion 28;
			mes "[Nurse Lapplad]";
			mes "Ee~~ ee~ ek~~~~~~~~~!!";
			next;
			mes "[Nurse Lapplad]";
			mes "Take those patients down quickly! You're an adventurer!!";
			close;
		}
		if (.@quest_day_4 == 2) {
			mes "[Nurse Lapplad]";
			mes "I am sorry but can you report this to Fresa on your way? This is a favor.";
			close;
		}
		mes "[Nurse Lapplad]";
		mes "Strange? How did you get in here? You should be prohibited access..";
		close;
	}
	if (.@cooldown_status_day[4] == 1)	// Unknown text
		end;
	// Unknown text
	end;

OnMyMobDead:
	if (mobcount( "un_bk_q", "Nurse Lapplad#EP15.2MR::OnMyMobDead" ) < 1) {
		killmonster "un_bk_q", "Nurse Lapplad#EP15.2MR::OnMyMobDead";
		enablenpc "Patient#EP15.2MR_01";
		enablenpc "Patient#EP15.2MR_02";
		enablenpc "Patient#EP15.2MR_03";
		enablenpc "Patient#EP15.2MR_04";
		enablenpc "Patient#EP15.2MR_05";
		enablenpc "Patient#EP15.2MR_06";
		enablenpc "Patient#EP15.2MR_07";
		stopnpctimer;

		.@r = rand(1,8);
		if (.@r == 1) setarray .@xy[0],286,254;
		else if (.@r == 2) setarray .@xy[0],296,252;
		else if (.@r == 3) setarray .@xy[0],316,231;
		else if (.@r == 4) setarray .@xy[0],281,226;
		else if (.@r == 5) setarray .@xy[0],320,249;
		else if (.@r == 6) setarray .@xy[0],306,233;
		else if (.@r == 7) setarray .@xy[0],310,261;
		else
			end;	// stop here
		disablenpc "Patient#EP15.2MR_0" + .@r;
		monster "un_bk_q",.@xy[0],.@xy[1], "Convulsing Patient", 1015,1, "Nurse Lapplad#EP15.2MR::OnMyMobDead";	// ZOMBIE
		.mob_id[.@r] = $@mobid[0];
		initnpctimer;
		end;
	}
	end;
OnTimer3000:
	if (rand(1,3) == 3) {
		setarray .@text$[1],
			"Woouuu~",
			"Wooaa~",
			"Ha-ak-ha-ak~",
			"Eh~",
			"Uh- Ugh~",
			"Eh~",
			"Kur..urk..kekek..";
		for ( .@i = 1; .@i < 8; ++.@i ) {
			if (.mob_id[.@i] && unitexists(.mob_id[.@i]))
				unittalk .mob_id[.@i], .@text$[.@i];
		}
	}
	initnpctimer;
	end;
}

un_bk_q,286,254,4	script	Patient#EP15.2MR_01	4_M_LIEMAN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day, 0 );
	emotion 19;
	mes "[Patient]";
	mes "Hurts.. It hurts..";
	close;
}

un_bk_q,296,252,4	script	Patient#EP15.2MR_02	4_M_DSTMANDEAD,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day, 0 );
	mes "[Patient]";
	mes "I'm fine. They're making a fuss for no reason.";
	close;
}

un_bk_q,316,231,4	script	Patient#EP15.2MR_03	4_M_DIEMAN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day, 0 );
	emotion 45;
	mes "[Patient]";
	mes "I keep feeling sleepy for some reason. Is it because I'm sick?";
	close;
}

un_bk_q,281,226,4	script	Patient#EP15.2MR_04	4_F_PATIENT,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day, 0 );
	emotion 54;
	mes "[Patient]";
	mes "My head feels blank.. Uh? Did you say something?";
	close;
}

un_bk_q,320,249,4	script	Patient#EP15.2MR_05	4_M_PATIENT,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day, 0 );
	emotion 53;
	mes "[Patient]";
	mes "Ugh.. Feels like my whole body is cramped.";
	close;
}

un_bk_q,306,233,4	script	Patient#EP15.2MR_06	4_M_DIEMAN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day, 0 );
	emotion 43;
	mes "[Patient]";
	mes "Urk.. I feel sick even though I didn't drink.";
	close;
}

un_bk_q,310,261,4	script	Patient#EP15.2MR_07	4_M_LIEMAN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day, 0 );
	emotion 57;
	mes "[Patient]";
	mes "Oh no is there a transfectant found in me..";
	close;
}

un_bk_q,279,294,4	script	Transportation Executive Ernon#EP15.2MR	4_M_LGTMAN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Transportation Executive Ernon]";
		mes "We used to deliver things like daily necessities or research tools here before the accident.";
		next;
		mes "[Transportation Executive Ernon]";
		mes "Work that involved going out to other places a lot more even as a staff member here.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		emotion 1;
		mes "[Transportation Executive Ernon]";
		mes "What?! Is something going on? The Mechanicians and Facilities managers look busy.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		emotion 21;
		mes "[Transportation Executive Ernon]";
		mes "Yaa~ Did you try the grapes?";
		next;
		mes "[Transportation Executive Ernon]";
		mes "Isn't it great that we can grow fresh grapes in an underground evacuation facility like this?";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Transportation Executive Ernon]";
		mes "Some people are suddenly attacking others.";
		next;
		mes "[Transportation Executive Ernon]";
		mes "What in the hell is going on?";
		close;
	}
	if ((.@cooldown_status_day[0] + .@cooldown_status_day[1] + .@cooldown_status_day[2] + .@cooldown_status_day[3] + .@cooldown_status_day[4]) == 0) {// start Day 5
		emotion 1;
		mes "[Transportation Executive Ernon]";
		mes "They were talking about it in the broadcast since yesterday so you know the gist of the situation, right?";
		next;
		mes "[Transportation Executive Ernon]";
		mes "The contaminant is getting to the interior of the air-raid shelter so the decision has been made to move all supplies to the uncontaminated zone Z-2 that the Chemical Substance Specialists found.";
		next;
		mes "[Transportation Executive Ernon]";
		mes "There was a request to move the cargo with the Adventurers since the scrawny researchers won't be of help.";
		next;
		mes "[Transportation Executive Ernon]";
		mes "Alright- let's move the cargo to Zone Z-2 first.";
		next;
		mes "[Transportation Executive Ernon]";
		mes "If you go to the machine Warehouse on your way back there will a person called Al. Tell him";
		next;
		emotion 29;
		mes "[Transportation Executive Ernon]";
		mes "^0000FFYou idiots!! Stop wasting material with stupid machines!!^000000.";
		next;
		select("Eh?");
		mes "[Transportation Executive Ernon]";
		mes "Don't understand? Tell Al in the machine Warehouse";
		next;
		emotion 29;
		mes "[Transportation Executive Ernon]";
		mes "^0000FFYou idiots!! Stop wasting material with stupid machines!!^000000.";
		next;
		if (isbegin_quest(5370) == 1)
			erasequest 5370;
		setquest 5366;
		setquest 5367;
		mes "[Transportation Executive Ernon]";
		mes "Remember to get every postposition right and convey my feeling 100%.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		.@quest_day_5 = isbegin_quest(5367) + isbegin_quest(5368) + isbegin_quest(5369);
		switch(.@quest_day_5) {
		case 1:
			mes "[Transportation Executive Ernon]";
			mes "Transport the cargo to Zone Z-2 first.";
			next;
			mes "[Transportation Executive Ernon]";
			mes "On your way back go to the machine Warehouse and tell Al";
			next;
			emotion 29;
			mes "[Transportation Executive Ernon]";
			mes "^0000FF You idiots!! Stop wasting material with stupid machines!!^000000?? for me and come back.";
			close;
		case 2:
			mes "[Transportation Executive Ernon]";
			mes "Did you deliver the goods to Zone Z-2?";
			next;
			mes "[Transportation Executive Ernon]";
			mes "Oh! Wasn't there one more thing I requested? Did you send the message to the Mechanicians?";
			next;
			select("Not yet..");
			mes "[Transportation Executive Ernon]";
			mes "Ah.. What should I do.. Should I go since most of the goods are moved?";
			next;
			mes "[Transportation Executive Ernon]";
			mes "If I leave it like this those idiots who know nothing outside of machines might do something with the precious components...";
			next;
			mes "[Transportation Executive Ernon]";
			mes "What should we do? Should I go? Or do you want to go back?";
			next;
			if (select( "Go back.", "Do not go back." ) == 1) {
				mes "[Transportation Executive Ernon]";
				mes "Alright. Go back.";
				close;
			}
			mes "[Transportation Executive Ernon]";
			mes "Yeah? I guess the machine Warehouse is kind of far.";
			next;
			mes "[Transportation Executive Ernon]";
			mes "Since we're almost done here I will finish up quickly and go. This is compensation for the work.";
			next;
			if (isbegin_quest(5367) > 0)
				erasequest 5367;
			if (isbegin_quest(5368) > 0)
				erasequest 5368;
			if (isbegin_quest(5369) > 0)
				erasequest 5369;
			setquest 5370;
			ep15_2_memory = 0;
			getexp 500000,500000;
			mes "- The small round capsule has percolated through skin. It feels like experience has accumulated.";
			next;
			mes "[Transportation Executive Ernon]";
			mes "Though our survival isn't sure because of the contaminant,";
			next;
			mes "[Transportation Executive Ernon]";
			mes "The chief researcher told us to adequately compensate the adventurers who were caught up in the explosion.";
			next;
			mes "[Transportation Executive Ernon]";
			mes "Don't worry about it though.";
			close;
		case 3:
			mes "[Transportation Executive Ernon]";
			mes "You conveyed my feeling right?";
			next;
			mes "[Transportation Executive Ernon]";
			mes "They should be smartened up by now. They wouldn't waste precious components again, right?";
			next;
			mes "[Transportation Executive Ernon]";
			mes "Here! This is compensation for the job.";
			next;
			for ( .@i = 5367; .@i < 5370; .@i++ ) {
				if (isbegin_quest(.@i) > 0)
					erasequest .@i;
			}
			if (ep15_2_memory == 0)
				getexp 750000,500000;
			else
				getexp 750000,1000000;
			ep15_2_memory = 0;
			setquest 5370;
			mes "- The small round capsule has percolated through skin. It feels like experience has accumulated.";
			next;
			mes "[Transportation Executive Ernon]";
			mes "Though our survival isn't sure because of the contaminant,";
			next;
			mes "[Transportation Executive Ernon]";
			mes "The chief researcher told us to adequately compensate the adventurers who were caught up in the explosion.";
			next;
			mes "[Transportation Executive Ernon]";
			mes "Don't worry about it though.";
			close;
		default:
			mes "[Transportation Executive Ernon]";
			mes "Though our survival isn't sure because of the contaminant,";
			next;
			mes "[Transportation Executive Ernon]";
			mes "The chief researcher told us to adequately compensate the adventurers who were caught up in the explosion.";
			next;
			mes "[Transportation Executive Ernon]";
			mes "Don't worry about it though.";
			close;
		}
	}
	// unknown text
	end;
}

un_bk_q,72,53,4	script	Distribution Chief Avrandi#EP15.2MR	4_M_TWTEAMAN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day );
	if (.@cooldown_status_day[0] == 1) {
		emotion 54;
		mes "[Distribution Chief Avrandi]";
		mes "It is a relief we were able to evacuate to the air-raid shelter interior in advance.";
		next;
		mes "[Distribution Chief Avrandi]";
		mes "If we weren't able to evacuate..? We probably won't be here.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		emotion 1;
		mes "[Distribution Chief Avrandi]";
		mes "Is there something wrong?";
		next;
		mes "[Distribution Chief Avrandi]";
		mes "A while ago the Facilities managers were running around in haste.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		emotion 23;
		mes "[Distribution Chief Avrandi]";
		mes "What in the world?! You ate fresh grapes? Why didn't I get to eat them? Why?";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		emotion 40;
		mes "[Distribution Chief Avrandi]";
		mes "This place is sure quiet. Why you ask?";
		next;
		mes "[Distribution Chief Avrandi]";
		mes "Not many people come this far.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		.@quest_day_5 = isbegin_quest(5367) + isbegin_quest(5368) + isbegin_quest(5369);
		switch(.@quest_day_5) {
		case 1:
			mes "[Distribution Chief Avrandi]";
			mes "Ah! Come on in. It seems there are a lot of visitors today because of the broadcast this morning.";
			next;
			mes "[Distribution Chief Avrandi]";
			mes "You're here because Ernon sent you right?";
			next;
			mes "[Distribution Chief Avrandi]";
			mes "I have received the item you have brought.";
			next;
			setquest 5368;
			mes "[Distribution Chief Avrandi]";
			mes "Eh-? Are you taking it back? That is a lot of work.";
			close;
		default:
			mes "[Distribution Chief Avrandi]";
			mes "You are going through a lot.";
			close;
		}
	}
	// unknown text
	end;
}

un_bk_q,22,279,4	script	Machine Warehouse	4_BULLETIN_BOARD2,{ end; }
un_bk_q,22,259,4	duplicate(Machine Warehouse)	L-1 Zone#J0	4_BULLETIN_BOARD2
un_bk_q,25,193,4	duplicate(Machine Warehouse)	J-0 Zone#L1	4_BULLETIN_BOARD2
un_bk_q,58,185,4	duplicate(Machine Warehouse)	Control room#Left	4_BULLETIN_BOARD2
un_bk_q,58,171,4	duplicate(Machine Warehouse)	b_Monitoring room#L1Left	4_BULLETIN_BOARD2
un_bk_q,49,137,4	duplicate(Machine Warehouse)	B-1 Warehouse	4_BULLETIN_BOARD2
un_bk_q,58,121,4	duplicate(Machine Warehouse)	A-0 Zone#L1	4_BULLETIN_BOARD2
un_bk_q,71,121,4	duplicate(Machine Warehouse)	L-1 Zone#A0	4_BULLETIN_BOARD2
un_bk_q,78,125,4	duplicate(Machine Warehouse)	H-0 Zone#Left	4_BULLETIN_BOARD2
un_bk_q,101,122,4	duplicate(Machine Warehouse)	b_Monitoring room#A0Center	4_BULLETIN_BOARD2
un_bk_q,122,125,4	duplicate(Machine Warehouse)	H-0 Zone#Right	4_BULLETIN_BOARD2
un_bk_q,126,121,4	duplicate(Machine Warehouse)	L-2 Zone#A0	4_BULLETIN_BOARD2
un_bk_q,141,115,4	duplicate(Machine Warehouse)	A-0 Zone#L2	4_BULLETIN_BOARD2
un_bk_q,139,171,4	duplicate(Machine Warehouse)	b_Monitoring room#L2Right	4_BULLETIN_BOARD2
un_bk_q,139,187,4	duplicate(Machine Warehouse)	Control room#Right	4_BULLETIN_BOARD2
un_bk_q,173,193,4	duplicate(Machine Warehouse)	K-0 Zone#L2	4_BULLETIN_BOARD2
un_bk_q,171,233,4	duplicate(Machine Warehouse)	L-2 Zone#K0	4_BULLETIN_BOARD2
un_bk_q,278,193,4	duplicate(Machine Warehouse)	A-0 Zone#H0Left	4_BULLETIN_BOARD2
un_bk_q,300,194,4	duplicate(Machine Warehouse)	Z-0 Zone#H0	4_BULLETIN_BOARD2
un_bk_q,301,204,4	duplicate(Machine Warehouse)	Temporary Clinic#H0	4_BULLETIN_BOARD2
un_bk_q,317,193,4	duplicate(Machine Warehouse)	A-0 Zone#H0Right	4_BULLETIN_BOARD2
un_bk_q,322,203,4	duplicate(Machine Warehouse)	G-2 Zone#H0	4_BULLETIN_BOARD2
un_bk_q,340,203,4	duplicate(Machine Warehouse)	H-0 Zone#H0	4_BULLETIN_BOARD2
un_bk_q,349,217,4	duplicate(Machine Warehouse)	F-2 Zone#G2	4_BULLETIN_BOARD2
un_bk_q,339,239,4	duplicate(Machine Warehouse)	Temporary Clinic#G2	4_BULLETIN_BOARD2
un_bk_q,368,267,4	duplicate(Machine Warehouse)	I-0 Zone#G2	4_BULLETIN_BOARD2
un_bk_q,388,266,4	duplicate(Machine Warehouse)	G-2 Zone#I0	4_BULLETIN_BOARD2
un_bk_q,273,203,4	duplicate(Machine Warehouse)	G-1 Zone#H0	4_BULLETIN_BOARD2
un_bk_q,260,203,4	duplicate(Machine Warehouse)	H-0 Zone#G1	4_BULLETIN_BOARD2
un_bk_q,247,217,4	duplicate(Machine Warehouse)	F-1 Zone#G1	4_BULLETIN_BOARD2
un_bk_q,228,217,4	duplicate(Machine Warehouse)	G-1 Zone#F1	4_BULLETIN_BOARD2
un_bk_q,256,239,4	duplicate(Machine Warehouse)	Temporary Clinic#G1	4_BULLETIN_BOARD2
un_bk_q,219,265,4	duplicate(Machine Warehouse)	C-0 Zone#G1	4_BULLETIN_BOARD2
un_bk_q,214,283,4	duplicate(Machine Warehouse)	G-1 Zone#C0	4_BULLETIN_BOARD2
un_bk_q,215,303,4	duplicate(Machine Warehouse)	Farm#C0	4_BULLETIN_BOARD2
un_bk_q,300,184,4	duplicate(Machine Warehouse)	H-0 Zone#Z0	4_BULLETIN_BOARD2
un_bk_q,365,167,4	duplicate(Machine Warehouse)	Z-2 Zone#Z0	4_BULLETIN_BOARD2
un_bk_q,27,55,4	duplicate(Machine Warehouse)	Z-0 Zone#Z2	4_BULLETIN_BOARD2
un_bk_q,230,167,4	duplicate(Machine Warehouse)	Z-1 Zone#Z0	4_BULLETIN_BOARD2
un_bk_q,164,55,4	duplicate(Machine Warehouse)	Z-0 Zone#Z1	4_BULLETIN_BOARD2
un_bk_q,101,92,8	duplicate(Machine Warehouse)	Off Limits#01	4_BULLETIN_BOARD2
un_bk_q,94,92,8	duplicate(Machine Warehouse)	Off Limits#02	4_BULLETIN_BOARD2


un_bk_q,97,84,4	script	Dimension move Portal#EP15.2MR	PORTAL,{
	if (checkweight(1301,1) == 0) {
		mes "- You are carrying too many items to proceed with the quest -";
		close;
	}
	mes "[Dimensional Device]";
	mes "Do you want finish your travels and";
	mes "go back to your original time?";
	mes "^FF0000All traces in this place will be erased if you go back to your original time.^000000";
	next;
	if (select( "Stay here.", "Go back." ) == 1)
		close;
	mes "[Dimensional Device]";
	delitem 6825, countitem(6825);
	delitem 6826, countitem(6826);
	ep15_2_memory = 0;
	for ( .@i = 5341; .@i <= 5370; ++.@i ) {
		if (isbegin_quest(.@i) > 0)
			erasequest .@i;
	}
	mes "Your whole body becomes heavy and time seems to be passing faster around you.";
	warp "un_bunker",98,91;
	end;
}

un_bunker,103,95,4	script	Mysterious Device#EP15.2MR1	2_BOARD2,{
	setarray .@quest_id[0], 5341,5351,5358,5363,5366;
	for ( .@i = 0; .@i < 5; ++.@i ) {
		switch( checkquest(.@quest_id[.@i],PLAYTIME) ) {
		case -1:
			.@cooldown_status_day[.@i] = 0;
			break;
		case 0:
		case 1:
			.@cooldown_status_day[.@i] = 1;
			break;
		case 2:
			.@cooldown_status_day[.@i] = 2;
			break;
		}
	}
	.@all = .@cooldown_status_day[0] + .@cooldown_status_day[1] + .@cooldown_status_day[2] + .@cooldown_status_day[3] + .@cooldown_status_day[4];
	if (.@all == 1) {
		mes "A mysteriously intense driving energy can be felt from this device.";
		next;
		if (select( "Ignore", "Pull it" ) == 1)
			close;
		if (.@cooldown_status_day[0] == 1)
			warp "un_bk_q",98,143;
		else if (.@cooldown_status_day[1] == 1)
			warp "un_bk_q",45,276;
		else if (.@cooldown_status_day[2] == 1)
			warp "un_bk_q",217,346;
		else if (.@cooldown_status_day[3] == 1)
			warp "un_bk_q",273,235;
		else
			warp "un_bk_q",275,290;
		end;
	}
	else if (.@all == 2) {
		delitem 6825, countitem(6825);
		delitem 6826, countitem(6826);
		ep15_2_memory = 0;
		for ( .@i = 5341; .@i <= 5370; ++.@i ) {
			if (isbegin_quest(.@i) > 0)
				erasequest .@i;
		}
		mes "The surrounding distortion of time seems to be returning to normal.";
		close;
	}
	mes "This device's use cannot be figured out.";
	close;
}
un_bunker,102,161,4	duplicate(Mysterious Device#EP15.2MR1)	Mysterious Device#EP15.2MR2	2_BOARD2
un_bunker,51,272,4	duplicate(Mysterious Device#EP15.2MR1)	Mysterious Device#EP15.2MR3	2_BOARD2
un_bunker,220,342,4	duplicate(Mysterious Device#EP15.2MR1)	Mysterious Device#EP15.2MR4	2_BOARD2
un_bunker,295,234,4	duplicate(Mysterious Device#EP15.2MR1)	Mysterious Device#EP15.2MR5	2_BOARD2
un_bunker,279,297,4	duplicate(Mysterious Device#EP15.2MR1)	Mysterious Device#EP15.2MR6	2_BOARD2

un_bk_q,100,312,6	script	Mechanician Bukal#EP15.2MR	4_M_REPAIR,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Mechanician Bukal]";
		mes "You're conducting a headcount?";
		next;
		mes "[Mechanician Bukal]";
		mes "I am not sure. Maybe you can ask Al over there?";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Mechanician Bukal]";
		mes "I mean the air cleaning unit you are moving now.";
		next;
		mes "[Mechanician Bukal]";
		mes "I made that. Isn't it awesome?";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Mechanician Bukal]";
		mes "Ah!! You're the adventurer. You could check out the farm.";
		next;
		mes "[Mechanician Bukal]";
		mes "Isn't the farm good because it's warm? I made the temperature control device there. Isn't it awesome?";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Mechanician Bukal]";
		mes "I am worried of the people suddenly attacking.";
		next;
		mes "[Mechanician Bukal]";
		mes "Since we're already here should I make something like a patient suppression device?";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Mechanician Bukal]";
		mes "I don't know why everybody is rejecting a device that can move heavy objects.";
		next;
		mes "[Mechanician Bukal]";
		mes "I should have made one when they were making new air cleaning units..";
		close;
	}
	mes "[Mechanician Bukal]";
	mes "Ugh.. I want to make something.";
	close;
}

un_bk_q,76,175,4	script	Researcher Grum#EP15.2MR	4_F_SCIENCE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Researcher Grum]";
		mes "Who is that woman to conduct a headcount as if she's the leader?";
		next;
		mes "[Researcher Grum]";
		mes "There wouldn't have been an explosion if there was no experiment the first place? Right?";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Researcher Grum]";
		mes "I think the self-righteous and haggardly Fresa has changed.";
		next;
		mes "[Researcher Grum]";
		mes "She's become more warm compared to the past, right?";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Researcher Grum]";
		mes "Fresa has definitely changed a lot.";
		next;
		mes "[Researcher Grum]";
		mes "Today she is handing out grapes to people. In the past that would have been unimaginable.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Researcher Grum]";
		mes "Why is that Fresa acting like the leader alone but still hasn't taken measures?";
		next;
		mes "[Researcher Grum]";
		mes "Measures need to taken about the convulsing patients. Are you going to cover this up like in the past?";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Researcher Grum]";
		mes "So this is what's happening?";
		next;
		mes "[Researcher Grum]";
		mes "I should have known when she tried to half-ass things.";
		close;
	}
	mes "[Researcher Grum]";
	mes "I really don't like self-righteous and hypocritical Fresa.";
	close;
}

un_bk_q,297,287,6	script	Adventurer Jean#EP15.2MR	4_M_HUBOY,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Adventurer Jean]";
		mes "Uh?! You're an adventurer too?";
		next;
		mes "[Adventurer Jean]";
		mes "Ugh.. It seems you are unlucky as well.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Adventurer Jean]";
		mes "Don't you think this place is trying to exploit us Adventurers?";
		next;
		mes "[Adventurer Jean]";
		mes "The Cafeteria food is good though.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Adventurer Jean]";
		mes "Grapes were served on the side today.";
		next;
		mes "[Adventurer Jean]";
		mes "I like grapes. I want to eat more.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Adventurer Jean]";
		mes "A friend I made here is confined in the temporary clinic. They found a transfectant or something.";
		next;
		mes "[Adventurer Jean]";
		mes "To us adventurers a healthy body is an asset.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Adventurer Jean]";
		mes "I ate a lot of different things from adventuring places.";
		next;
		mes "[Adventurer Jean]";
		mes "I think the food here is one of the best.";
		close;
	}
	mes "[Adventurer Jean]";
	mes "I ate a lot of different things from adventuring places.";
	next;
	mes "[Adventurer Jean]";
	mes "I think the food here is one of the best.";
	close;
}

un_bk_q,318,299,2	script	Cafeteria Lady#EP15.2MR	4_F_CAVE1,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Cafeteria Lady]";
		mes "Sorry. We aren't ready to distribute food yet.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Cafeteria Lady]";
		mes "Grab a plate or tray and wait in line.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Cafeteria Lady]";
		mes "Oh no what should we do? We ran out of grapes.";
		next;
		mes "[Cafeteria Lady]";
		mes "New grapes should be delivered from the farm soon. Do you want to wait?";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Cafeteria Lady]";
		mes "Do you know that's the temporary clinic? You cannot go that way now.";
		next;
		mes "[Cafeteria Lady]";
		mes "The passage is blocked because of convulsing patients.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Cafeteria Lady]";
		mes "You are working hard.";
		close;
	}
	mes "[Cafeteria Lady]";
	mes "Grab a plate or tray and wait in line.";
	close;
}

un_bk_q,102,97,2	script	Adventurer Breezin#EP15.2MR	4_F_BRZ_INDOLD,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Adventurer Breezin]";
		mes "Ahh.. Why did I travel here..";
		next;
		mes "[Adventurer Breezin]";
		mes "Hey don't think of going out that way. It's going to be dangerous because of the explosion.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Adventurer Breezin]";
		mes "Today is strange. Hey do you see the mysterious device over there too?";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Adventurer Breezin]";
		mes "I think I said it 30 times today alone but there is no device at the door.";
		next;
		mes "[Adventurer Breezin]";
		mes "I am itching for an adventure but safety outside isn't confirmed so don't think of going outside.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Adventurer Breezin]";
		mes "A while I ago I couldn't stop the Chemical Substance Specialists from going outside.";
		next;
		mes "[Adventurer Breezin]";
		mes "Seeing how they didn't return, they must be dead, right?";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Adventurer Breezin]";
		mes "The situation has grown out of control.";
		next;
		mes "[Adventurer Breezin]";
		mes "Haa- Should have I stopped those people leaving the air-raid shelter?";
		close;
	}
	mes "[Adventurer Breezin]";
	mes "Today is strange. Hey do you see the mysterious device over there too?";
	close;
}

un_bk_q,313,280,8	script	Access Control Guard#EP15.2MR	4_M_HUMAN_02,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Access Control Guard]";
		mes "You cannot enter this area because it is under construction.";
		next;
		mes "[Access Control Guard]";
		mes "According to the Facilities managers it will be later used as a Clinic.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Access Control Guard]";
		mes "You cannot enter this area because it is under construction.";
		next;
		mes "[Access Control Guard]";
		mes "According to the Facilities managers it will be later used as a Clinic.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Access Control Guard]";
		mes "You cannot enter this area because it is under construction.";
		next;
		mes "[Access Control Guard]";
		mes "According to the Facilities managers it will be later used as a Clinic.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Access Control Guard]";
		mes "Access to the temporary clinic is restricted to quarantine convulsing patients.";
		next;
		mes "[Access Control Guard]";
		mes "I ask for your understanding.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Access Control Guard]";
		mes "Access to the temporary clinic is restricted to quarantine convulsing patients.";
		next;
		mes "[Access Control Guard]";
		mes "I ask for your understanding.";
		close;
	}
	mes "[Access Control Guard]";
	mes "Movement in this area is currently prohibited.";
	next;
	mes "[Access Control Guard]";
	mes "I ask for your understanding.";
	close;
}
un_bk_q,280,280,8	duplicate(Access Control Guard#EP15.2MR)	Access Control Guard#EP15.2MR2	4_M_HUMAN_02
un_bk_q,255,236,2	duplicate(Access Control Guard#EP15.2MR)	Access Control Guard#EP15.2MR3	4_M_HUMAN_02
un_bk_q,298,203,4	duplicate(Access Control Guard#EP15.2MR)	Access Control Guard#EP15.2MR4	4_M_HUMAN_02
un_bk_q,340,235,6	duplicate(Access Control Guard#EP15.2MR)	Access Control Guard#EP15.2MR5	4_M_HUMAN_02

un_bk_q,98,246,8	script	Facilities manager Jiko#EP15.2MR	4_M_EINMAN2,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Facilities manager Jiko]";
		mes "Aah- I don't know the reason but the control room is";
		next;
		mes "[Facilities manager Jiko]";
		mes "is damaged a lot. At this point it isn't a control room but a warehouse.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Facilities manager Jiko]";
		mes "Ah the air cleaning unit doesn't belong here.";
		next;
		mes "[Facilities manager Jiko]";
		mes "If my memory is correct, you have to deliver them to Zones C-0, F-1, F-2, I-0, Z-0.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Facilities manager Jiko]";
		mes "Haa- I have been cleaning the Control room for several days now";
		next;
		mes "[Facilities manager Jiko]";
		mes "This place cannot be organized no matter how I much organize it. I guess we should just use it for storage.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Facilities manager Jiko]";
		mes "Come on in. Welcome to the Warehouse.";
		next;
		mes "[Facilities manager Jiko]";
		mes "Urrghh";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Facilities manager Jiko]";
		mes "This is not the control room.";
		next;
		mes "[Facilities manager Jiko]";
		mes "It's the warehouse!!";
		close;
	}
	// unknown text
	end;
}

un_bk_q,313,261,2	script	Nurse#EP15.2MR1	4_F_NURSE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Nurse]";
	mes "Patient~ That chair is quite high.. doesn't your head ache?";
	close;
}

un_bk_q,322,249,2	script	Nurse#EP15.2MR2	4_F_NURSE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Nurse]";
	mes "Why does he say he has a cramp? The other patients didn't have that problem.";
	close;
}

un_bk_q,316,233,4	script	Nurse#EP15.2MR3	4_F_NURSE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Nurse]";
	mes "Argh- I told you not to scribble on the floor while pretending to sleep.";
	close;
}

un_bk_q,304,233,4	script	Nurse#EP15.2MR4	4_F_NURSE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Nurse]";
	mes "You ran around the elephant trunk thirty times so you must be sick. Claiming he can't feel dizziness. Quite the bluffer.";
	close;
}

un_bk_q,283,226,2	script	Nurse#EP15.2MR5	4_F_NURSE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Nurse]";
	mes "Ah geez! There is no other issues yet but why is he saying he's dizzy?";
	close;
}

un_bk_q,284,255,4	script	Nurse#EP15.2MR6	4_F_NURSE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Nurse]";
	mes "So what do you mean!! Where does it hurt!!";
	close;
}

un_bk_q,296,254,4	script	Nurse#EP15.2MR7	4_F_NURSE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Nurse]";
	mes "What do you mean nothing is wrong, your face has gone purple.";
	close;
}

un_bk_q,240,380,8	script	Bioengineer#EP15.2MR1	4_M_ALCHE_C,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Bioengineer]";
	mes "It seems we can harvest grape tree number 1 without problems. What a relief.";
	next;
	mes "[Bioengineer]";
	mes "My heart sank when the Mechanicians destroyed a tree..";
	close;
}

un_bk_q,274,380,8	script	Bioengineer#EP15.2MR2	4_M_ALCHE_C,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Bioengineer]";
	mes "The soil grape tree number 2 is in seems to be lacking nutrition.";
	next;
	mes "[Bioengineer]";
	mes "We need to prepare fertilizer to provide the soil more nutrition.";
	close;
}

un_bk_q,327,360,6	script	Bioengineer#EP15.2MR3	4_M_ALCHE_C,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Bioengineer]";
	mes "I worried because a lot of weird stuff was growing around grape tree number 3.";
	next;
	mes "[Bioengineer]";
	mes "It seems the harvest will have no problem.";
	close;
}

un_bk_q,316,351,4	script	Bioengineer#EP15.2MR4	4_M_ALCHE_C,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Bioengineer]";
	mes "Grape tree number 4 has no particular problem.";
	next;
	mes "[Bioengineer]";
	mes "Nutrition state good. Harvest state good.";
	close;
}

un_bk_q,249,344,2	script	Bioengineer#EP15.2MR5	4_M_ALCHE_C,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Bioengineer]";
	mes "The nutrition of grape tree number 5 is too good.";
	next;
	mes "[Bioengineer]";
	mes "That doesn't mean there will be a higher harvest yield..";
	close;
}

un_bk_q,103,393,4	script	Memory Record player#EP15.2MR	4_ENERGY_BLUE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "There is a Memory Record somebody is recording.";
	next;
	if (select( "Listen.", "Quit." ) == 2)
		close;
	while(1) {
		mes "Ah ah- One two three test- test-";
		next;
		mes "To distinguish survival days in the air-raid shelter, today will be designated Explosion Day 1 after the experiment explosion.";
		next;
		mes "Everybody fell into panic after seeing the outside situation on the monitor after the explosion.";
		next;
		mes "But chief researcher Dr. Fresa calmly consoled everybody and checked how many survived.";
		next;
		mes "The final number of survivors including adventurers seems to be 326.";
		next;
		mes "The camera showing outside was damaged in the afternoon. It seems we cannot see the situation outside anymore.";
		next;
		if (.@cooldown_status_day[0] == 1) {
			mes "There is no more recorded content.";
			next;
			if (select( "Listen again.", "Quit." ) == 2)
				close;
			continue;
		}
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 2";
		next;
		mes "A witch hunt against the director and chief researcher Fresa began.";
		next;
		mes "My opinion is different. The research and experiment was conducted under her direction but this is an accident.";
		next;
		mes "If not Fresa, they would have made somebody else to blame.";
		next;
		mes "But she is handling it in a dignified manner despite concerns.";
		next;
		mes "She says problem solving is more important than blame and is checking assignments of survivors before the accident.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 3";
		next;
		mes "Fresa.. She naturally became the leader of the survivors.";
		next;
		mes "There was no vote of sorts, but nobody is complaining about her being the leader.";
		next;
		mes "The day before she had a briefing on the situation of the total survivors.";
		next;
		mes "20 Bioengineers";
		mes "16 Mechanicians";
		mes "27 Facilities managers";
		mes "10 Chemical Substance Specialists";
		mes "Other than specialists the assignments of survivors such as cafeteria staff, janitors, gardeners, distribution directors, health professionals, adventurers caught in the accident have been assessed.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 4";
		next;
		mes "Everybody's work has been decided based on Fresa's briefing the day before.";
		next;
		mes "It was decided that researchers including myself know nothing much research and must continue our lives in the air-raid shelter under the guidance of those who have technical skill needed for survival.";
		next;
		mes "First the Chemical Substance Specialists and Facilities managers started to install Air Contamination Gauge Sensors in the air-raid shelter.";
		next;
		mes "After evaluating that oxygen levels were low the Mechanicians have started to assemble Air cleaning units.";
		next;
		mes "Lora, a former cafeteria employee was consulted on the important problem of food.";
		next;
		mes "We assessed that about 40 days of survival is possible based on the food in the warehouse and the number of survivors.";
		next;
		mes "This prompted the Bioengineers to cultivate plants that can self-produce.";
		next;
		mes "Other miscellaneous assignments were issued under Fresa's direction.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 5";
		next;
		mes "I don't know the details but the air pollution level outside of the shelter was measured.";
		next;
		mes "According to the Chemical Substance Specialists the situation is hopeless.";
		next;
		mes "It seems life in the air-raid shelter has to continue longer. Just can quietly keep working..";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 21";
		next;
		mes "After silently working for several days the Bioengineers have good news.";
		next;
		mes "They have succeeded in artificially germinating a plant that can self-produce.";
		next;
		mes "Fortunately the air-raid shelter has a warehouse spacious enough to grow plants in.";
		next;
		mes "It seems we can forget about our food problem now.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 30";
		next;
		mes "A small problem has occurred in the air-raid shelter. The air cleaning units made in the beginning are broken.";
		next;
		mes "Fortunately there will be no problem maintaining oxygen concentration levels thanks to the air cleaning units the Mechanicians made without approval.";
		next;
		mes "They are too heavy so adventurers were deployed because nobody else is able to move them.";
		next;
		if (.@cooldown_status_day[1] == 1) {
			mes "There is no more recorded content.";
			next;
			if (select( "Listen again.", "Quit." ) == 2)
				close;
			continue;
		}
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 32";
		next;
		mes "Today is the first harvest of the grape tree cultivated by the Bioengineers.";
		next;
		mes "Although there was a small problem of the Mechanicians destroying one grape tree";
		next;
		mes "The air-raid shelter residents are throwing a small party to celebrate the successful harvest.";
		next;
		if (.@cooldown_status_day[2] == 1) {
			mes "There is no more recorded content.";
			next;
			if (select( "Listen again.", "Quit." ) == 2)
				close;
			continue;
		}
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 38";
		next;
		mes "Chemical Substance Specialists and some Adventurers sick of living in the air-raid shelter have left the shelter to measure the air.";
		next;
		mes "They have not returned by evening.";
		next;
		mes "Was the freedom of outside better than the life in the dark air-raid shelter?";
		next;
		mes "After midnight the remaining Chemical Substance Specialists assessed that they were dead and everybody had a brief moment of silence.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 40";
		next;
		mes "A dark rumor is going around the shelter.";
		next;
		mes "There is a rumor that a contaminant from the outside has invaded the air-raid shelter because of the people who left a while ago.";
		next;
		mes "Is it because of the contaminant? There are patients who suddenly convulse and attack others.";
		next;
		mes "Under the leader Fresa's decision, everybody was checked and those found with transfectants were quarantined in the temporary clinic.";
		next;
		if (.@cooldown_status_day[3] == 1) {
			mes "There is no more recorded content.";
			next;
			if (select( "Listen again.", "Quit." ) == 2)
				close;
			continue;
		}
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 43";
		next;
		mes "The rumor in the air-raid shelter has come true.";
		next;
		mes "The remaining Chemical Substance Specialists have confirmed that the contaminant is eroding into the air-raid shelter";
		next;
		mes "And Fresa and experts have started taking measures.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Explosion Day 45";
		next;
		mes "The invading contaminant will not stop.";
		next;
		mes "It has been decided to move all equipment and necessities to the less contaminated Zone Z-2";
		next;
		mes "And facility managers have started to install a partition in Zone Z-0 to prevent the contaminant from coming in further.";
		next;
		mes "There is no more recorded content.";
		next;
		if (select( "Listen again.", "Quit." ) == 2)
			close;
	}
	end;
}

un_bk_q,108,243,4	script	Discarded Mechanical Device#EP15.2MR	4_ENERGY_BLUE,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "The mechanical device thrown on the floor cannot be determined if it is still operable.";
		close;
	}
	mes "There is a Memory Record somebody is recording.";
	next;
	if (select( "Listen.", "Quit." ) == 2)
		close;
	while(1) {
		mes "Oh- Is this a memory record? Does it work? Oh it works. Works! Should I try it since I'm bored?";
		next;
		mes "My name is Maso an Adventurer traveling the world. Today is 4th day of entering the air-raid shelter? 3rd day? The vibe here is weird and hard to adjust to.";
		next;
		mes "Verus city has Adventurers amongst its original population but the treatment towards Adventurers is strangely good.";
		next;
		mes "The mood is that Adventurers are people caught up in an uncontrollable accident and need to be treated well.";
		next;
		mes "As an Adventurer who eats and plays as much as he works, I cannot stand the itching for action. Urgh";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Is today day 6? Details aren't told to Adventurers so I am not sure but the people of Verus city seem very gloomy.";
		next;
		mes "The Adventurer's blood is boiling and wanting to explore places but there isn't much to do.";
		next;
		mes "I looked around the air-raid shelter but whoever designed it has not one artistic hair on him.";
		next;
		mes "It is no fun to keep looking at the same hallways and same room lay outs.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Is today day 21? The Verus City people look happy to have solved the food problem.";
		next;
		mes "It is cute to see the mild looking researchers going around cheering and screaming.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "The 30th night but because it's always dark I don't really know if it's night or day. I just ate supper so it must be night.";
		next;
		mes "Today I moved the really heavy air cleaning units made by the Mechanicians with the other Adventurers.";
		next;
		mes "The air-raid shelter is so large that I had no idea where they were but thanks to that I became friends with some of the Adventurers, especially Castle and Blat.";
		next;
		mes "By the way the Mechanicians seem to have mental problems. They make a ruckus for not being able to make machines and got dragged out by the guards.";
		next;
		mes "The Mechanicians are definitely going to cause trouble someday.";
		next;
		if (.@cooldown_status_day[1] == 1) {
			mes "There is no more recorded content.";
			next;
			if (select( "Listen again.", "Quit." ) == 2)
				close;
			continue;
		}
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Today is day 32 and I worked on the grape harvest.";
		next;
		mes "I ate fresh grapes and since I don't have anything to do anything to do, I'm going to sleep early.";
		next;
		mes "Ah.. the grape was good, I want it again. Did they say harvest was possible once every 2 weeks?";
		next;
		if (.@cooldown_status_day[2] == 1) {
			mes "There is no more recorded content.";
			next;
			if (select( "Listen again.", "Quit." ) == 2)
				close;
			continue;
		}
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Today is the 38th day of being in the shelter and there is a fuss since the morning.";
		next;
		mes "This morning the recruited Adventurers to join the Chemical Substance Specialists for an investigation outside the air-raid shelter, many volunteered despite the dangers.";
		next;
		mes "I am of the belief danger should be avoided but my friends Castle and Blat volunteered.";
		next;
		mes "Well I understand that they were sick of living in the shelter for a while.";
		next;
		mes "They have not returned past the afternoon. Verus City leader Fresa has concluded that the people who left are dead.";
		next;
		mes "Everybody had a moment of silence at dawn. They were good people so it is sad to part like this.";
		next;
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Is it since the morning of the 40th day? There is a mysterious infectious disease going around the shelter.";
		next;
		mes "A few people have suddenly attacked those near them and convulsed";
		next;
		mes "And Adventurers have been deployed to suppress the convulsing people because a lot of the weak researchers are wounded.";
		next;
		mes "There is a rumor saying a contaminant came in because of the people who went outside the shelter a while go.";
		next;
		if (.@cooldown_status_day[3] == 1) {
			mes "There is no more recorded content.";
			next;
			if (select( "Listen again.", "Quit." ) == 2)
				close;
			continue;
		}
		if (select( "Continue listening.", "Quit." ) == 2)
			close;
		mes "Lunch during day 44 the air-raid shelter leader Fresa gathered the Adventurers and had a presentation.";
		next;
		mes "The rumor has been confirmed true and a safety partition will be built in Zone Z-0";
		next;
		mes "A decision has been made to move necessities to Zone Z-2 tomorrow and I heard they need the help of Adventurers.";
		next;
		mes "I have to work tomorrow so I am doing to sleep early.";
		next;
		mes "There is no more recorded content.";
		next;
		if (select( "Listen again.", "Quit." ) == 2)
			close;
	}
	end;
}

un_bk_q,34,138,4	script	Warehouse Keeper Pik#EP15.2MR	4W_M_03,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Warehouse Keeper Pik]";
		mes "I don't know what brings you here but please don't touch anything.";
		next;
		mes "[Warehouse Keeper Pik]";
		mes "I haven't finished checking the stock and it would be annoying if anything went missing.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Warehouse Keeper Pik]";
		mes "You're an adventurer. You don't have to deliver air cleaners here.";
		next;
		mes "[Warehouse Keeper Pik]";
		mes "It's a warehouse anyway. The independent air circulation system is enough.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Warehouse Keeper Pik]";
		mes "Aahh- Looking after the warehouse is annoying.";
		next;
		mes "[Warehouse Keeper Pik]";
		mes "There is nobody to rotate my shift";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Warehouse Keeper Pik]";
		mes "Wha- wha- wait stop!!";
		next;
		mes "[Warehouse Keeper Pik]";
		mes "You're not here to ambush me right? It's alright if not.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Warehouse Keeper Pik]";
		mes "Are you here to move items?";
		next;
		mes "[Warehouse Keeper Pik]";
		mes "The goods in this warehouse should not be today I think? From what I know today we are moving necessities first.";
		close;
	}
	// unknown text
	end;
}

un_bk_q,91,283,2	script	Guard#EP15.2MR	4_M_HUMAN_02,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Guard]";
		mes "Hello adventurer?";
		next;
		mes "[Guard]";
		mes "I don't know the reason, but Fresa assigned me here.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Guard]";
		mes "I always wondered why I was assigned here but now I think I know the reason.";
		next;
		mes "[Guard]";
		mes "It is to watch if the Mechanicians make useless things.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Guard]";
		mes "The Mechanicians occasionally want to make something.";
		next;
		mes "[Guard]";
		mes "My job is to stop them.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Guard]";
		mes "I hear patients these days are convulsing and attacking the people around them?";
		next;
		mes "[Guard]";
		mes "The Mechanician constantly convulse saying they want to make something so it's not weird to me.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Guard]";
		mes "The convulsion of Mechanicians are reaching extremes.";
		next;
		mes "[Guard]";
		mes "They are convulsing so much I may need to call back up.";
		close;
	}
	mes "[Guard]";
	mes "Hello adventurer?";
	close;
}

un_bk_q,56,192,4	script	Chemical Substance Specialist Kori#EP15.2MR	4_M_ALCHE_B,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Chemical Substance Specialist Kori]";
		mes "We are seeing if there are hazardous substances within the air-raid shelter according to emergency protocol.";
		next;
		mes "[Chemical Substance Specialist Kori]";
		mes "You want to know how many Chemical Substance Specialists there are? Go to Karsten then. Should be here somewhere.";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Chemical Substance Specialist Kori]";
		mes "This next room is temporarily being used by the Chemical Substance Specialist.";
		next;
		mes "[Chemical Substance Specialist Kori]";
		mes "We tightly hid away dangerous things but don't touch anything just in case.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Chemical Substance Specialist Kori]";
		mes "Karsten gave me grapes.";
		next;
		mes "[Chemical Substance Specialist Kori]";
		mes "How fresh and tasty it was.";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Chemical Substance Specialist Kori]";
		mes "My colleagues left the air-raid shelter to investigate and haven't come back.";
		next;
		mes "[Chemical Substance Specialist Kori]";
		mes "It was concluded they are dead but are they really all dead? I want to see my colleagues.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Chemical Substance Specialist Kori]";
		mes "Good work.";
		next;
		mes "[Chemical Substance Specialist Kori]";
		mes "We are working to find a solution for the contaminant.";
		close;
	}
	// unknown text
	end;
}

un_bk_q,161,193,6	script	Adventurer Bamdaku#EP15.2MR	4_M_ALCHE_C,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	if (.@cooldown_status_day[0] == 1) {
		mes "[Adventurer Bamdaku]";
		mes "I found this while looking around the air-raid shelter";
		next;
		mes "[Adventurer Bamdaku]";
		mes "but there is a lot of this on the wall. What can it be?";
		close;
	}
	if (.@cooldown_status_day[1] == 1) {
		mes "[Adventurer Bamdaku]";
		mes "I have been investigating this for 30 days already but I do not know what it is.";
		next;
		mes "[Adventurer Bamdaku]";
		mes "I am too proud to ask somebody.";
		close;
	}
	if (.@cooldown_status_day[2] == 1) {
		mes "[Adventurer Bamdaku]";
		mes "I have been investigating this for 32 days already but I do not know what it is.";
		next;
		mes "[Adventurer Bamdaku]";
		mes "Ugh what to do.. Should I just ask somebody?";
		close;
	}
	if (.@cooldown_status_day[3] == 1) {
		mes "[Adventurer Bamdaku]";
		mes "I have been investigating this for 40 days already.";
		next;
		mes "[Adventurer Bamdaku]";
		mes "My pride won't let me quit now.";
		close;
	}
	if (.@cooldown_status_day[4] == 1) {
		mes "[Adventurer Bamdaku]";
		mes "45 days have passed since I started investigating this unknown thing.";
		next;
		mes "[Adventurer Bamdaku]";
		mes "How did I come to investigate this?";
		close;
	}
	// unknown text
	end;
}

un_bk_q,248,258,2	script	Adventurer Dally#EP15.2MR	4_F_SITDOWN,{
	callfunc( "F_time_limit_recorder", .@cooldown_status_day,1,0 );
	mes "[Adventurer Dally]";
	mes "Darn it!! Frustrating";
	next;
	npcskill "AL_INCAGI",10,0,0;
	mes "[Adventurer Dally]";
	if (Sex == SEX_FEMALE)
		mes "Sister- Run~";
	else
		mes "Brother- Run~";
	close;
}


// GM NPC
sec_in02,17,13,4	script	Brigan Helper#1	4_F_HUWOMAN,{
	mes "The current Brigan issue is " + ep15_2_brigan + " ,";
	mes "Number is " + ep15_2_brigan + " .";
	next;
	switch( select( "Setitem", "Task", "Initialization" ) ) {
	case 1:
		mes "Which item to set?";
		next;
		switch( select( "Brigan", "Girlfriend" ) ) {
		case 1:
			mes "The value of brigan is " + ep15_2_brigan + ".";
			next;
			switch( select( "+1", "-1", "Initialization" ) ) {
			case 1:
				mes "Setitem+1";
				ep15_2_brigan++;
				close;
			case 2:
				mes "Setitem-1";
				ep15_2_brigan--;
				close;
			case 3:
				mes "New Value";
				mes "Initialization";
				ep15_2_brigan = 0;
				close;
			}
		case 2:
			mes "The value of girl friend is " + ep15_2_brigan + ".";
			next;
			switch( select( "+1", "-1", "Cancel", "Task start (5)" ) ) {
			case 1:
				mes "New Value";
				mes "Setitem+1";
				ep15_2_brigan++;
				close;
			case 2:
				mes "New Value";
				mes "Setitem-1";
				ep15_2_brigan++;
				close;
			case 3:
				mes "New Value";
				mes "Mushroom residue before receiving";
				ep15_2_brigan = 0;
				close;
			case 4:
				mes "New Value";
				mes "Mushroom residue 5";
				ep15_2_brigan = 5;
				close;
			}
		}
	case 2:
		mes "Delete all tasks";
		for ( .@i = 13195; .@i < 13206; ++.@i ) {
			if (isbegin_quest(.@i) > 0)
				erasequest .@i;
		}
		close;
	case 3:
		for ( .@i = 13195; .@i < 13206; ++.@i )
			erasequest .@i;
		ep15_2_brigan = 0;
		close;
	}
	end;
}
