//===== rAthena Script =======================================
//= Quest NPCs located in Lighthalzen
//===== Description: =========================================
//= Quests related to Lighthalzen City.
//===== Changelogs: ==========================================
//= 4.0 Updated several NPCs to Official (iRO) dialog, and restrucured. [L0ne_W0lf]
//= 4.1 Updated Dungeon quest, and Friendhsip quest to 10.3 standards. [L0ne_W0lf]
//= 4.2 Fixed wrong variable type in use in "Box#cube1". [L0ne_W0lf]
//= 4.3 Fixed a bug where if you relog after you take out the Lab Permit from the Box
//=     You can't finish the quest. (bugreport:1798) [Samuray22]
//= 4.3a Reverted changes from the last version. . [L0ne_W0lf]
//=     Changed temp char vars to normal vars, that unset at end.
//=     Tube just makes sure you have 1 or more permits.
//= 4.4 Replaced effect numerics with constants. [L0ne_W0lf]
//= 4.5 Corrected an Incorrect check of the Shinokas_Quest. (bugreport:2276) [Samuray22]
//=     Replaced effect numerics with constants.
//= 4.5 Official Gangster Alert script. [Gepard]
//= 4.6 Added quest log entries for:
//=     - Cursed Spirit Quest
//= 4.7 Fixed missing label. (bugreport:4654) [L0ne_W0lf]
//= 4.8 Fixed Cursed Spirit Quest EXP reward. [Euphy]
//= 4.9 Fixed incorrect use of 'close'. [Joseph]
//= 5.0 Updated RE/Pre-RE EXP. [Euphy]
//= 5.1 Added GM management NPCs. [Euphy]
//= 5.2 Fixed some quest log issues. [Capuche]
//============================================================

// Gangster Alert [Official Conversion]
//============================================================
lighthalzen,1,1,0	script	Law Enforcement	-1,{
	end;

OnEnable:
	mapannounce "lighthalzen","Attention, citizens. Our security has been breached and the city is in Gangster Alert status. Please find shelter immediately!",bc_map;
	initnpctimer;
	for (set .@i, 0; .@i < 30; set .@i, .@i + 1)
		monster "lighthalzen",0,0,"Gangster",1592,1,"Law Enforcement::OnMyMobDead";
	end;

OnTimer220000:
	killmonster "lighthalzen","Law Enforcement::OnMyMobDead";
	mapannounce "lighthalzen","Attention, citizens. Our law enforcement department has successfully contained the situation. Alert status has been canceled.",bc_map;
	set $@Lhz_Gangster_Alert, 0;
	stopnpctimer;
	end;

OnMyMobDead:
	end;
}

lighthalzen,267,200,3	script	Guard#lhz01	868,{
	if (countitem(7350) > 0) {
		mes "[Guard]";
		mes "Hold it right th--!";
		mes "Oh. I'm sorry. I didn't";
		mes "realize you were carrying";
		mes "a pass and had authorization.";
		close2;
		warp "lighthalzen",303,229;
		end;
	}
	if ($@Lhz_Gangster_Alert >= 100) {
		mes "[Guard]";
		mes "Recently too many people";
		mes "have been traveling between";
		mes "Uptown and the ghetto, so";
		mes "we've heightened security";
		mes "around here. But how can";
		mes "so many sneak through us?";
		close;
	}
	if ($@Lhz_Gangster_Alert > 14) {
		mes "[Guard]";
		mes "Recently too many people";
		mes "have been traveling between";
		mes "Uptown and the ghetto, so";
		mes "we've heightened security";
		mes "around here. But how can";
		mes "so many sneak through us?";
		donpcevent "Law Enforcement::OnEnable";
		set $@Lhz_Gangster_Alert, 100;
		close;
	}
	if (gettime(DT_HOUR) >= 22 || gettime(DT_HOUR) < 2) {
		mes "[Guard]";
		mes "Zzzz... Zzz...";
		mes "ZZZzzzzzzzzzz...";
		next;
		mes "^3355FFThis guard is";
		mes "dozing off, so this is";
		mes "the perfect opportunity";
		mes "to sneak past him.^000000";
		close2;
		set $@Lhz_Gangster_Alert, $@Lhz_Gangster_Alert + 1;
		warp "lighthalzen",303,229;
		end;
	}
	if (rand(1,6) == 3) {
		mes "^3355FFThe guard seems distracted";
		mes "and is looking elsewhere. Now's";
		mes "your chance to sneak past him!^000000";
		close2;
		set $@Lhz_Gangster_Alert, $@Lhz_Gangster_Alert + 1;
		warp "lighthalzen",303,229;
		end;
	}
	else {
		mes "[Guard]";
		mes "Hold it right there!";
		mes "I can't permit anyone";
		mes "to enter the slums.";
		mes "Go back to where you";
		mes "came from, adventurer!";
		close;
	}
}

lighthalzen,294,223,7	script	Guard#lhz02	868,{
	if (countitem(7350) > 0) {
		mes "[Guard]";
		mes "Hold it right th--!";
		mes "Oh. I'm sorry. I didn't";
		mes "realize you were carrying";
		mes "a pass and had authorization.";
		close2;
		warp "lighthalzen",260,199;
		end;
	}
	if ($@Lhz_Gangster_Alert >= 100) {
		mes "[Guard]";
		mes "Recently too many people";
		mes "have been traveling between";
		mes "Uptown and the ghetto, so";
		mes "we've heightened security";
		mes "around here. But how can";
		mes "so many sneak through us?";
		close;
	}
	if ($@Lhz_Gangster_Alert > 14) {
		mes "[Guard]";
		mes "Recently too many people";
		mes "have been traveling between";
		mes "Uptown and the ghetto, so";
		mes "we've heightened security";
		mes "around here. But how can";
		mes "so many sneak through us?";
		donpcevent "Law Enforcement::OnEnable";
		set $@Lhz_Gangster_Alert, 100;
		close;
	}
	if (gettime(DT_HOUR) >= 22 || gettime(DT_HOUR) < 2) {
		mes "[Guard]";
		mes "Zzzz... Zzz...";
		mes "ZZZzzzzzzzzzz...";
		next;
		mes "^3355FFThis guard is";
		mes "dozing off, so this is";
		mes "the perfect opportunity";
		mes "to sneak past him.^000000";
		close2;
		set $@Lhz_Gangster_Alert, $@Lhz_Gangster_Alert + 1;
		warp "lighthalzen",260,199;
		end;
	}
	if (rand(1,6) == 3) {
		mes "^3355FFThe guard seems distracted";
		mes "and is looking elsewhere. Now's";
		mes "your chance to sneak past him!^000000";
		close2;
		set $@Lhz_Gangster_Alert, $@Lhz_Gangster_Alert + 1;
		warp "lighthalzen",260,199;
		end;
	}
	else {
		mes "[Guard]";
		mes "Hold it right there!";
		mes "I can't permit anyone to";
		mes "enter Uptown Lighthalzen!";
		mes "If you don't have a pass,";
		mes "then move on out of here!";
		close;
	}
}

// Cube Room Quest
//============================================================
lighthalzen,341,224,3	script	Fishbone	868,{
	// Retain prior position in quest.
	if (piciburn) {
		set lhz_sincube,piciburn;
		set piciburn,0;
	}
	// Quest is finished.
	if (MISC_QUEST&512) {
			mes "[Fishbone]";
			mes "Oh hey, it's you!";
			mes "Now, listen. If you wanna";
			mes "get into Regenschirm again,";
			mes "you gotta enter that Sewer Pipe";
			mes "that's like, northeast from me.";
			mes "It's gross, but you gotta...";
			next;
			mes "[Fishbone]";
			mes "Anyway, good luck in";
			mes "whatever it is you're doing";
			mes "here in Lighthazlen. Oh, and";
			mes "be real careful! Something";
			mes "shadier than me is going";
			mes "on in this big city~";
			close;
	}
	// Apparantly if the boss quest progress is at 6, you skip the level requirement.
	if (lhz_boss == 6 || BaseLevel >= 60) {
		if (lhz_sincube == 0) {
			mes "[Fishbone]";
			mes "What...?";
			mes "Is there something";
			mes "on my face? Quit looking";
			mes "at me and let me do my work.";
			set lhz_sincube,1;
			close;
		}
		else if (lhz_sincube == 1) {
			mes "[Fishbone]";
			mes "Hey. Hey you.";
			mes "You're still looking";
			mes "at me. Quit it. I'm busy";
			mes "here and you're bothering me.";
			set lhz_sincube,2;
			close;
		}
		else if (lhz_sincube == 2) {
			mes "[Fishbone]";
			mes "Seriously, you are";
			mes "starting to really get";
			mes "on my nerves! What could";
			mes "you possibly want from me?!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Nothing really.";
			mes "I just feel like";
			mes "watching you work.";
			mes "What exactly are you";
			mes "doing anyway, huh?";
			next;
			mes "[Fishbone]";
			mes "Hey! If I could just show";
			mes "you what I'm doing, I wouldn't";
			mes "be so uptight about you looking";
			mes "at what I'm doing, now would I?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Nah...";
			mes "I just think";
			mes "you're uptight";
			mes "in general.";
			next;
			mes "[Fishbone]";
			mes "Muthafruit!";
			mes "So you're just";
			mes "gonna sit and watch";
			mes "me all day?! Fine! Then";
			mes "I'll just ignore you, jerk!";
			next;
			mes "[Fishbone]";
			mes "...";
			mes "......";
			mes "Damn it!";
			mes "This is really";
			mes "ticking me off! Why";
			mes "don't you go away?!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Well, I was also";
			mes "wondering why you're";
			mes "working in a place that's";
			mes "so, um... depressing.";
			next;
			mes "[Fishbone]";
			mes "Alright, fine!";
			mes "But once I tell you";
			mes "what I do here, you're";
			mes "outta here! Okay? Now,";
			mes "your lips are frickin' sealed.";
			mes "See, what I do is kinda illegal.";
			next;
			mes "[Fishbone]";
			mes "I provide routes that let";
			mes "people enter Lighthalzen,";
			mes "or even go anywhere in this";
			mes "city, without authorization.";
			mes "Hell, I could even get you";
			mes "into that Laboratory...";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "W-wait!";
			mes "Laboratory?!";
			mes "Are you serious?";
			mes "Can you get me";
			mes "into that place?";
			next;
			mes "[Fishbone]";
			mes "Sonuva--You're not";
			mes "gonna leave me alone,";
			mes "are you? Look, you seem";
			mes "okay, even if you are kinda";
			mes "stubborn, kid. But I don't trust";
			mes "or serve strangers, period.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "But isn't there";
			mes "anything I can do";
			mes "so you can help me";
			mes "get into the Laboratory?";
			next;
			mes "[Fishbone]";
			mes "No way, no how.";
			mes "No matter how much you";
			mes "beg, I can't take a chance";
			mes "and just trust anyone who";
			mes "wants to know a secret";
			mes "route. Now get outta here!";
			set lhz_sincube,3;
			close;
		}
		else if (lhz_sincube == 3) {
			mes "["+strcharinfo(0)+"]";
			mes "Please...";
			mes "Please tell me";
			mes "how I can get inside";
			mes "the Laboratory. I'm...";
			mes "I'm begging you!";
			next;
			mes "[Fishbone]";
			mes "No! Now shaddup";
			mes "and stop begging, okay?";
			mes "You're only embarassing";
			mes "yourself! Good grief...";
			set lhz_sincube,4;
			close;
		}
		else if (lhz_sincube == 4) {
			mes "["+strcharinfo(0)+"]";
			mes "Why won't you";
			mes "heeeeelp meee?";
			mes "Pleeeeeeeease~";
			mes "You're the only one";
			mes "who knoooooows~";
			next;
			mes "[Fishbone]";
			mes "Yeesh, you're a nutty";
			mes "kid. Look, ''no'' means";
			mes "''no.'' That's it. That's";
			mes "final. How many times do";
			mes "you gotta make me spell it out?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "But there's gotta";
			mes "be something I can";
			mes "do so you'll help me?";
			mes "Th-that's the way i-it";
			mes "always w-works. You";
			mes "can't just-- You c-can't...";
			next;
			mes "[Fishbone]";
			mes "Alright, you got me.";
			mes "But if I'm gonna risk";
			mes "my life to help you get";
			mes "into that Laboratory I want";
			mes "something in return. Okay?";
			next;
			mes "[Fishbone]";
			mes "All you need to do is";
			mes "come back here with";
			mes "^FF000071,381,305,294,921,000 zeny^000000.";
			mes "Then I'll give you all the help";
			mes "you need. Alright, good luck";
			mes "to you, brave adventurer.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "You're joking right?!";
			mes "There's no way I can ever";
			mes "get that much zeny! I'd...";
			mes "I'd have to at least take";
			mes "over the world or, or...";
			next;
			mes "[Fishbone]";
			mes "Good point.";
			mes "Fine, maybe that";
			mes "price is a little high.";
			mes "I'll just cut it in half,";
			mes "then. Still want my";
			mes "help? Then bring me...";
			next;
			mes "[Fishbone]";
			mes " ";
			mes " ";
			mes "...^FF000020 Jellopy^000000.";
			next;
			mes "[Fishbone]";
			mes "Gosh.";
			mes "It's like I'm";
			mes "doing this for free...";
			next;
			if (select("Okay.:No! It's impossible!") == 1) {
				mes "[Fishbone]";
				mes "Alright, then";
				mes "bring me back a";
				mes "total of 20 Jellopy.";
				mes "But you gotta have";
				mes "exactly 20 Jellopy on";
				mes "you, okay? Seeya pal~";
				set lhz_sincube,5;
				setquest 12014;
				close;
			}
			mes "[Fishbone]";
			mes "What are you--";
			mes "Okay, now you're the";
			mes "one who's joking around.";
			mes "Look, it's either bring me";
			mes "20 Jellopy or 71,381,3--";
			mes "whatever number I said-- zeny!";
			close;
		}
		else if (lhz_sincube == 5) {
			mes "[Fishbone]";
			mes "So...";
			mes "Did you bring";
			mes "the stuff?";
			next;
			switch(select("I'm still working on it.:Here you go!:Um... Stuff?")) {
			case 1:
				mes "[Fishbone]";
				mes "Still working on it?";
				mes "Okay, I know I didn't";
				mes "ask you for very much,";
				mes "but gimme some respect";
				mes "and get serious about it!";
				mes "It's 20 friggin' Jellopies!";
				close;
			case 2:
				if (countitem(909) > 19) {
					mes "[Fishbone]";
					mes "Ooh. Hey, good work.";
					mes "Okay, I can see you're";
					mes "the reliable type. A deal";
					mes "is a deal, so I'll tell you";
					mes "how you can get inside";
					mes "that Laboratory.";
					next;
					mes "[Fishbone]";
					mes "Now, if you're wondering";
					mes "why I don't got much qualm";
					mes "against helping you, it's";
					mes "because I used to work in";
					mes "the Laboratory... But then";
					mes "they laid me off unfairly.";
					next;
					mes "[Fishbone]";
					mes "Anyway, anything I can";
					mes "do to cause them trouble";
					mes "is good in my book. Let me";
					mes "get some stuff ready and";
					mes "then I'll tell you what you";
					mes "really need to know.";
					delitem 909,20; //Jellopy
					set lhz_sincube,6;
					close;
				}
				mes "[Fishbone]";
				mes "Uh...";
				mes "I said 20 Jellopies,";
				mes "didn't I? This ain't";
				mes "enough pal, so go out";
				mes "and get some more!";
				close;
			case 3:
				mes "[Fishbone]";
				mes "What the...?";
				mes "How could you forget";
				mes "something like that?";
				mes "Anyway, I asked you to";
				mes "bring 20 Jellopies.";
				close;
			}
		}
		else if (lhz_sincube == 6) {
			mes "[Fishbone]";
			if (lhz_boss == 6) {
				mes "way to get into Regenschrim";
				mes "Lab. However, I do know of";
				mes "this secret maze that should";
				mes "get you there. Still, if you're";
				mes "willing and ready to go...";
			}
			else {
				mes "Okay...";
				mes "Are you ready now?";
				mes "I'm gonna send you";
				mes "someplace where you";
				mes "can find the Lab entrance.";
			}
			next;
			switch(select("Not yet.:Yes.")) {
			case 1:
				mes "[Fishbone]";
				mes "Eh...?";
				mes "Alright, it's";
				mes "not a problem.";
				mes "Just take your time.";
				close;
			}
			mes "[Fishbone]";
			mes "Great!";
			mes "Okay then,";
			mes "here we go!";
			close2;
			set lhz_sincube,7;
			switch(rand(1,3)) {
			case 1: warp "lhz_cube",67,193; break;
			case 2: warp "lhz_cube",66,136; break;
			case 3: warp "lhz_cube",66,74; break;
			}
			end;
		}
		else if (lhz_sincube < 10) {
			mes "[Fishbone]";
			mes "Hm, you must not have";
			mes "accomplished whatever";
			if (lhz_boss == 6) {
				mes "it is you need to do in the";
				mes "Regenschirm Laboratory yet.";
			}
			else {
				mes "it was you were doing";
				mes "in the Laboratory. Do";
			}
			mes "you want me to send";
			mes "you there again?";
			next;
			if (select("No.:Yes.") == 1) {
				mes "[Fishbone]";
				mes "Geez, you must have";
				mes "really had a hard time";
				mes "there. Okay, well, when";
				mes "you're ready to go there,";
				mes "just let me know, got it?";
				close;
			}
			mes "[Fishbone]";
			mes "Got a lot of";
			mes "spirit in you,";
			mes "don't you? Heh!";
			mes "I like you style~";
			mes "Get ready, 'cuz";
			mes "here we go...!";
			close2;
			set lhz_sincube,7;
			switch(rand(1,3)) {
			case 1: warp "lhz_cube",67,193; break;
			case 2: warp "lhz_cube",66,136; break;
			case 3: warp "lhz_cube",66,74; break;
			}
			end;
		}
		else if (lhz_sincube == 10) {
			mes "[Fishbone]";
			mes "Hey, you came back!";
			mes "Good, I was starting";
			mes "to get a little worried";
			mes "about what happened to";
			mes "you. So did you get what";
			mes "you wanted over there?";
			completequest 12014;
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Yeah...";
			mes "I hope so,";
			mes "anyway.";
			next;
			mes "[Fishbone]";
			mes "Good! Whatever you did,";
			mes "I hope it messes them up big";
			mes "time! I usedta be a respected";
			mes "scientist for Regenschirm till";
			mes "they laid me off! Serves those";
			mes "ungrateful jerkoffs right!";
			next;
			mes "[Fishbone]";
			mes "Then again, my current";
			mes "line of work seems to suit";
			mes "me much better. And I don't";
			mes "gotta worry about formulas";
			mes "and algorithms anymore.";
			next;
			mes "[Fishbone]";
			mes "Oh yeah, the place you";
			mes "just went to? There's a";
			mes "secret path the Laboratory";
			mes "there. If you want, I can";
			mes "send you back there. So";
			mes "what do you say?";
			next;
			if (select("Sure:No thanks~") == 1) {
				mes "[Fishbone]";
				mes "Okay then, here";
				mes "we go! Good luck";
				mes "to you, buddy.";
				close2;
				switch(rand(1,3)) {
				case 1: warp "lhz_cube",67,193; break;
				case 2: warp "lhz_cube",66,136; break;
				case 3: warp "lhz_cube",66,74; break;
				}
				end;
			}
			mes "[Fishbone]";
			mes "Alright, it's your";
			mes "choice. Oh, and that";
			mes "pass you have should";
			mes "let you into the Laboratory";
			mes "anyway. Good luck to you, pal.";
			close;
		}
		mes "[Fishbone]";
		mes "Heya pal!";
		mes "It's been a while.";
		mes "You doin' good? I'm";
		mes "just peachy, thanks~";
		close;
	}
	else if (BaseLevel < 60) {
		mes "Hey kid, get";
		mes "outta here! Can't";
		mes "you tell I'm dealin'";
		mes "in something shady";
		mes "here? This is no place";
		mes "for baby faced guys like you!";
		close;
	}
	else if (lhz_boss > 6) {
		mes "[Fishbone]";
		mes "Heya pal!";
		mes "It's been a while.";
		mes "You doin' good? I'm";
		mes "just peachy, thanks~";
		close;
	}
}

lhz_cube,237,198,0	script	Bundle of Files#cube	111,{
	if (lhz_sincube < 7) {
		mes "^3355FFThere are a bunch";
		mes "of files scattered";
		mes "on the ground.^000000";
		close;
	}
	else if (lhz_sincube < 10) {
		if (lhz_secret01 < 1) {
			mes "^3355FFThere are a bunch";
			mes "of files scattered";
			mes "on the ground. They";
			mes "seem to contain all";
			mes "sorts of information,";
			mes "but they're all mixed up.^000000";
			next;
			if (select("Rummage through the files.:Cancel") == 1) {
				mes "^3355FFWhile you are";
				mes "rummaging through";
				mes "the files, a Red Key";
				mes "drops to the ground";
				mes "with a clink. You decide";
				mes "to keep this ^000000Red Key^3355FF.^000000";
				set lhz_secret01,1;
			}
			close;
		}
		mes "^3355FFThis is the place";
		mes "where you found the";
		mes "^000000Red Key^3355FF while you were";
		mes "looking through the files";
		mes "scattered on the ground.^000000";
		close;
	}
	mes "^3355FFThis is the place";
	mes "where you found the";
	mes "^000000Red Key^3355FF while you were";
	mes "looking through the files";
	mes "scattered on the ground.^000000";
	close;
}

lhz_cube,234,202,0	script	Picture#cube	111,{
	if (lhz_secret01 < 2) {
		mes "^3355FFThis picture hanging";
		mes "on the wall catches";
		mes "your attention for some";
		mes "inexplicably strange reason.^000000";
		next;
		if (select("Look behind picture.:Cancel") == 1) {
			mes "^3355FFYou push and pull";
			mes "with all your strength,";
			mes "but the picture won't";
			mes "budge. If it's too hard";
			mes "to move, there must be";
			mes "something hidden behind it.^000000";
		}
		close;
	}
	else if (lhz_secret01 == 2) {
		mes "^3355FFThis picture hanging";
		mes "on the wall catches";
		mes "your attention for some";
		mes "inexplicably strange reason.^000000";
		next;
		if (select("Look behind picture.:Cancel") == 1) {
			mes "^3355FFYou push and pull";
			mes "with all your strength,";
			mes "but this picture is too";
			mes "hard to move with just";
			mes "brute strength alone.^000000";
			next;
			input .@input$;
			if (.@input$ == "Jackknife") {
				mes "^3355FFYou take the";
				mes "Jackknife, thrust";
				mes "it under the picture";
				mes "and twist it in order to";
				mes "pry the picture off the wall.^000000";
				next;
				mes "^3355FFBehind the picture, you";
				mes "find that the following";
				mes "numbers are written:^000000";
				mes " ";
				set .@number_rand,rand(1,3);
				if (.@number_rand == 1) {
					mes "4 3 2 9 1 6 8 2 7";
					set lhz_secret01,3;
				}
				else if (.@number_rand == 2) {
					mes "3 6 4 1 2 8 7 1 5";
					set lhz_secret01,4;
				}
				else {
					mes "4 9 3 7 6 2 8 6 6";
					set lhz_secret01,5;
				}
				close;
			}
			mes "^3355FFUnfortunately,";
			mes "doing that apparently";
			mes "wasn't enough to move";
			mes "the picture. Perhaps you";
			mes "should try something else.^000000";
			close;
		}
		close;
	}
	else if (lhz_secret01 < 6) {
		mes "^3355FFThe following numbers";
		mes "were written behind the";
		mes "picture. If they were hidden,";
		mes "these numbers must have";
		mes "some kind of importance.^000000";
		mes " ";
		if (lhz_secret01 == 3) {
			mes "4 3 2 9 1 6 8 2 7";
		}
		else if (lhz_secret01 == 4) {
			mes "3 6 4 1 2 8 7 1 5";
		}
		else if (lhz_secret01 == 5) {
			mes "4 9 3 7 6 2 8 6 6";
		}
		close;
	}
	mes "^3355FFThere is a picture";
	mes "hanging on the wall.^000000";
	next;
	if (select("Look beneath picture.:Cancel") == 1) {
		mes "^3355FFThere are some";
		mes "numbers behind the";
		mes "picture, but now there is";
		mes "no need to memorize them.^000000";
	}
	close;
}

lhz_cube,242,201,0	script	Drawer#cube	111,{
	if (lhz_secret01 < 1) {
		mes "^3355FFThe drawer here";
		mes "looks interesting,";
		mes "but it's locked and";
		mes "you can't open it.^000000";
		close;
	}
	else if (lhz_secret01 == 1) {
		mes "^3355FF The drawer here";
		mes "looks interesting, but";
		mes "it's locked. Hopefully, you";
		mes "can figure how to open it.^000000";
		next;
		input .@input$;
		if (.@input$ == "Red Key") {
			mes "^3355FFYou insert the Red Key";
			mes "into the lock and open the";
			mes "drawer. Inside, you find a";
			mes "^000000Jackknife^3355FF that you decide";
			mes "to take. After all, it might";
			mes "be handy sometime.^000000";
			set lhz_secret01,2;
		}
		else {
			mes "^3355FFUnfortunately, you";
			mes "can't open or break";
			mes "the lock on the drawer";
			mes "by doing that. You need";
			mes "to try something else.^000000";
		}
		close;
	}
	mes "^3355FFThis is the drawer";
	mes "in which you found the";
	mes "^000000Jackknife^3355FF. It is now empty";
	mes "and devoid of purpose.^000000";
	close;
}

lhz_cube,248,179,0	script	Chest#cube	111,{
	if (lhz_sincube < 7) {
		mes "^3355FFYou've found a chest";
		mes "with an axe laid on";
		mes "top. The axe's purpose";
		mes "is completely utilitarian";
		mes "and isn't suited for battle.^000000";
		close;
	}
	else if (lhz_sincube == 7) {
		mes "^3355FFYou've found a chest,";
		mes "but more importantly,";
		mes "there is a utility Axe";
		mes "laid on top of it.^000000";
		next;
		if (select("Take the utility Axe.:Cancel") == 1) {
			mes "^3355FFWithout shame or";
			mes "an ounce of guilt, you";
			mes "pick up the utility ^000000Axe^3355FF";
			mes "and claim it as your own.^000000";
			set lhz_sincube,8;
		}
		close;
	}
	mes "^3355FFThis is just a normal";
	mes "chest. There used to be";
	mes "a utility ^000000Axe^3355FF on top of";
	mes "it until you picked it up.^000000";
	close;
}

lhz_cube,237,183,0	script	Barrel#cube	111,{
	set number_line,0;
	if (lhz_sincube < 8) {
		mes "^3355FFYou have";
		mes "found a shabbily";
		mes "constructed barrel.^000000";
		close;
	}
	else if (lhz_sincube == 8) {
		mes "^3355FFYou have";
		mes "found a shabbily";
		mes "constructed barrel.";
		mes "You sense that there's";
		mes "something inside, but";
		mes "you need something to";
		mes "smash the barrel open.^000000";
		next;
		input .@input$;
		if (.@input$ == "Axe") {
			mes "^3355FFAxe in hand, you lift";
			mes "it above your head and";
			mes "swing it downwards,";
			mes "smashing off the top of";
			mes "the barrel. Inside, you find a";
			mes "box topped with a metal plate.^000000";
			next;
			mes "^3355FFThe numbers one";
			mes "through nine are";
			mes "etched on the surface";
			mes "of the metal plate on";
			mes "top of the box you found,";
			mes "like some kind of keypad...^000000";
			set lhz_sincube,9;
		}
		else {
			mes "^3355FFDoing that probably won't";
			mes "break open this keg. You'll";
			mes "need to try something else.^000000";
		}
		close;
	}
	else if (lhz_sincube == 9) {
		if (lhz_secret01 < 3) {
			mes "^3355FFYou decide to enter";
			mes "some numbers into the";
			mes "metallic keypad. Remember,";
			mes "you can only enter single";
			mes "digit numbers at one time...^000000";
			next;
			for( set .@i, 0; .@i < 9; set .@i, .@i + 1 )
				input .@input;
			mes "^3355FFNothing happened...^000000";
			close;
		}
		else if (lhz_secret01 >= 3 && lhz_secret01 <= 5) {
			switch(lhz_secret01) {
			case 3: setarray .@numbers[0],4,3,2,9,1,6,8,2,7; break;
			case 4: setarray .@numbers[0],3,6,4,1,2,8,7,1,5; break;
			case 5: setarray .@numbers[0],4,9,3,7,6,2,8,6,6; break;
			}
			mes "^3355FFYou decide to enter";
			mes "some numbers into the";
			mes "numberpad etched on the";
			mes "metal plate on top of the box";
			mes "you found inside the keg.^000000";
			next;
			for( set .@i, 0; .@i < 9; set .@i, .@i + 1 ) {
				input .@input;
				if (.@input == .@numbers[.@i]) set .@number_line,.@number_line+1;
			}
			if (.@number_line == 9) {
				mes "^3355FFThe metal plate slides";
				mes "open and you find a key";
				mes "Key inside the box. You";
				mes "to keep this ^000000Yellow Key^3355FF.^000000";
				set lhz_secret01,6;
			}
			else {
				mes "^3355FFNothing happened.";
				mes "It's likely that you did not";
				mes "enter the correct numbers.^000000";
			}
			close;
		}
		mes "^3355FFThis is the box with";
		mes "the keypad in which you";
		mes "found the ^000000Yellow Key^3355FF.";
		mes "The box is now empty.^000000";
		close;
	}
	mes "^3355FFThis is a box";
	mes "topped with a metal";
	mes "plate that looks like";
	mes "a crudely made keypad.^000000";
	close;
}

lhz_cube,224,192,0	script	Power Generator#cube	111,{
	if (lhz_secret01 < 6) {
		mes "^3355FFThis is a noisily";
		mes "operating huge machine";
		mes "with a front panel that has";
		mes "a strange mark. There is a";
		mes "keyhole on the machine";
		mes "right next to this panel.^000000";
		next;
		input .@input$;
		mes "^3355FFNothing happened.";
		mes "You probably need";
		mes "to find the right key to";
		mes "insert into the keyhole.^000000";
		close;
	}
	else if (lhz_secret01 == 6) {
		mes "^3355FFThis is a noisily";
		mes "operating huge machine";
		mes "with a front panel that has";
		mes "a strange mark. There is a";
		mes "keyhole on the machine";
		mes "right next to this panel.^000000";
		next;
		input .@input$;
		if (.@input$ == "Yellow Key") {
			mes "^3355FFYou insert the";
			mes "Yellow Key into the";
			mes "keyhole and turn it,";
			mes "causing the machine";
			mes "to sputter and deactivate.^000000";
			next;
			mes "^3355FFYou notice that the";
			mes "^000000Status Light ^3355FFnext to the";
			mes "bed has now turned off.^000000";
			set lhz_secret01,7;
		}
		else {
			mes "^3355FFNothing happened.";
			mes "You probably need";
			mes "to find the right key to";
			mes "insert into the keyhole.^000000";
		}
		close;
	}
	mes "^3355FFIt's a giant machine.^000000";
	close;
}

lhz_cube,244,201,0	script	Status Light#cube	111,{
	if (lhz_secret01 < 7) {
		mes "^3355FFThe Status Light is";
		mes "on. It looks like there's";
		mes "something inside the";
		mes "bulb, but you can't get";
		mes "near it since it generates";
		mes "incredibly scorching heat.^000000";
		next;
		mes "^3355FFNow, if you could";
		mes "somehow shut down the";
		mes "Power Generator in this";
		mes "room, the bulb would be";
		mes "cool enough for you to touch...^000000";
		close;
	}
	else if (lhz_secret01 == 7) {
		mes "The Status Light";
		mes "is now off and the";
		mes "bulb has cooled down.";
		next;
		if (select("Smash the light bulb.:Cancel") == 1) {
			mes "^3355FFYou smash the";
			mes "Status Light's bulb";
			mes "and discover another key.";
			mes "You obtained a ^000000Black Key^3355FF.^000000";
			set lhz_secret01,8;
		}
		close;
	}
	mes "^3355FFYou find the remains";
	mes "of a broken light bulb.^000000";
	close;
}

lhz_cube,234,200,0	script	Desk#cube	111,{
	if (lhz_secret02 <= 1) {
		mes "^3355FFYou've found";
		mes "a completely";
		mes "cluttered desk.^000000";
		next;
		switch(select("On the desk:Under the desk:Desk drawer")) {
		case 1:
			mes "^3355FFVarious documents,";
			mes "books and lab equipment";
			mes "are scattered on the desk.";
			mes "But none of them seem";
			mes "all that useful right now.^000000";
			close;
		case 2:
			if (lhz_secret02 < 1) {
				mes "^3355FFUnder this desk, of";
				mes "all conceivable places,";
				mes "you find a ^000000Short Stick^3355FF";
				mes "that you decide to keep.";
				mes "You never know when";
				mes "you'll need one of those.^000000";
				set lhz_secret02,1;
			}
			else {
				mes "^3355FFThis is where you";
				mes "found your ^000000Short Stick^3355FF.";
				mes "Sadly, there are no more";
				mes "hidden treasures for you to";
				mes "discover beneath this desk.^000000";
			}
			close;
		case 3:
			mes "^3355FFThe desk drawer is";
			mes "locked and probably";
			mes "with good reason. After all,";
			mes "you just tried to invade this";
			mes "private and intimate space.^000000";
			close;
		}
	}
	else if (lhz_secret02 == 2) {
		mes "^3355FFYou're back at the";
		mes "messy desk which";
		mes "is probably used by";
		mes "a high ranking executive";
		mes "who has someone else";
		mes "do his desk tidying for him.^000000";
		next;
		switch(select("On the desk:Under the desk:Desk drawer")) {
		case 1:
			mes "^3355FFAlas, no matter how much";
			mes "you rummage through it,";
			mes "the clutter on the desk";
			mes "proves to be useless to you.^000000";
			next;
			if (Sex == SEX_MALE) {
				mes "^3355FFAn issue of the";
				mes "Dancer magazine,";
				mes "''Harmonic Lick'' catches";
				mes "your eye, but you really";
				mes "shouldn't be interested";
				mes "in that publication just";
				mes "because of the pictures.^000000";
			}
			else {
				mes "^3355FFAn issue of the female";
				mes "entertainment magazine,";
				mes "''Magnum Break'' catches";
				mes "your eye, but adventurers";
				mes "have no time to look at";
				mes "pictures of beautiful men.^000000";
			}
			close;
		case 2:
			mes "^3355FFUnder the desk, you";
			mes "discover another Short";
			mes "Stick which happens to";
			mes "fit perfectly into the other";
			mes "Short Stick you found earlier.";
			next;
			mes "^3355FFYou combine the two";
			mes "lesser sticks to create";
			mes "a stick that is superior";
			mes "to the sum of its parts.";
			mes "You are now the proud";
			mes "bearer of a ^000000Long Stick^3355FF.^000000";
			set lhz_secret02,3;
			close;
		case 3:
			mes "^3355FFThis desk drawer is";
			mes "locked shut and probably";
			mes "always will be. It's likely";
			mes "that nothing really valuable";
			mes "is inside, aside from perhaps";
			mes "a hip flask or a candy stash.";
			close;
		}
	}
	mes "^3355FFThis desk is cluttered";
	mes "with all sorts of random";
	mes "objects, but such is its";
	mes "destiny as office equipment.^000000";
	next;
	switch(select("On the desk:Under the desk:Desk drawer")) {
	case 1:
		mes "^3355FFAlas, no matter how much";
		mes "you rummage through it,";
		mes "the clutter on the desk";
		mes "proves to be useless to you.^000000";
		next;
		mes "^3355FFThere's part of a newspaper";
		mes "here, but it's only the Comics";
		mes "section which, of course, isn't";
		mes "informative enough for world";
		mes "savvy adventurers like you.^000000";
		close;
	case 2:
		mes "^3355FFThis is where you found";
		mes "one of two Short Sticks";
		mes "to make your ^000000Long Stick^3355FF.";
		mes "There isn't anything else";
		mes "under here, so it's impossible";
		mes "to make your stick any longer.^000000";
		close;
	case 3:
		mes "^3355FFThis desk drawer is";
		mes "locked very securely.";
		mes "The owner of this desk";
		mes "was wise to provide a";
		mes "measure of drawer security.";
		mes "But why put sticks under the";
		mes "desk? This is most curious...^000000";
		close;
	}
}

lhz_cube,247,198,0	script	Bed#cube	111,{
	if (lhz_secret02 == 0) {
		mes "^3355FFYou've found a bed";
		mes "in which the sheets";
		mes "are slovenly arranged.^000000";
		next;
		if (select("On the bed:Under the bed") == 1) {
			mes "^3355FFNo one's in the bed";
			mes "and if you climbed in,";
			mes "you'd just be alone. For";
			mes "some people, this may";
			mes "be an immutable truth.^000000";
		}
		else {
			mes "^3355FFUnder the bed, you";
			mes "discover a ^000000Short Stick^3355FF";
			mes "which you decide to";
			mes "keep. You never know";
			mes "when certain, seemingly";
			mes "useless objects will save you.^000000";
			set lhz_secret02,2;
		}
		close;
	}
	else if (lhz_secret02 == 1) {
		mes "^3355FFYou've found a bed";
		mes "in which the sheets";
		mes "are slovenly arranged.^000000";
		next;
		if (select("On the bed:Under the bed") == 1) {
			mes "^3355FFNo one's in the bed";
			mes "and if you climbed in,";
			mes "you'd just be alone. For";
			mes "some people, this may";
			mes "be an immutable truth.^000000";
		}
		else {
			mes "^3355FFUnder the bed, you";
			mes "discover another Short";
			mes "Stick which happens to";
			mes "fit perfectly into the other";
			mes "Short Stick you found earlier.";
			next;
			mes "^3355FFYou combine the two";
			mes "lesser sticks to create";
			mes "a stick that is superior";
			mes "to the sum of its parts.";
			mes "You are now the proud";
			mes "bearer of a ^000000Long Stick^3355FF.^000000";
			set lhz_secret02,3;
		}
		close;
	}
	else if (lhz_secret02 == 2) {
		mes "^3355FFYou've found a bed";
		mes "in which the sheets";
		mes "are slovenly arranged.^000000";
		next;
		if (select("On the bed:Under the bed") == 1) {
			mes "^3355FFNo one's in the bed";
			mes "and if you climbed in,";
			mes "you'd just be alone. For";
			mes "some people, this may";
			mes "be an immutable truth.^000000";
		}
		else {
			mes "^3355FFIn a distant and";
			mes "dusty corner beneath";
			mes "the bed, you manage to";
			mes "spot an object. If only you";
			mes "could reach it somehow...^000000";
			next;
			input .@input$;
			if (.@input$ == "Short Stick") {
				mes "^3355FFYou try to reach";
				mes "the object by using";
				mes "your Short Stick. After";
				mes "a few attempts, you had no";
				mes "choice but to admit that your";
				mes "stick just wasn't long enough.^000000";
			}
			else {
				mes "^3355FFUnfortunately,";
				mes "whatever you used to";
				mes "try to reach the object";
				mes "didn't work. You'll have";
				mes "to think of something else.^000000";
			}
		}
		close;
	}
	else if (lhz_secret02 == 3) {
		mes "^3355FFYou find a messy";
		mes "bed that may be more";
		mes "than meets the eye.^000000";
		next;
		if (select("On the bed:Under the bed") == 1) {
			mes "^3355FFNo one's in the bed";
			mes "and if you climbed in,";
			mes "you'd just be alone. For";
			mes "some people, this may";
			mes "be an immutable truth.^000000";
		}
		else {
			mes "^3355FFIn a distant and";
			mes "dusty corner beneath";
			mes "the bed, you manage to";
			mes "spot an object. If only you";
			mes "could reach it somehow...^000000";
			next;
			input .@input$;
			if (.@input$ == "Long Stick") {
				mes "^3355FFWith Long Stick in";
				mes "hand, you manage to";
				mes "reach the object and drag";
				mes "it under the bed towards you.";
				mes "You now possess the ^000000Cube^3355FF";
				mes "that was under the bed.^000000";
				set lhz_secret02,4;
			}
			else {
				mes "^3355FFUnfortunately,";
				mes "whatever you used to";
				mes "try to reach the object";
				mes "didn't work. You'll have";
				mes "to think of something else.^000000";
			}
		}
		close;
	}
	mes "^3355FFYou've found a bed";
	mes "in which the sheets";
	mes "are slovenly arranged.^000000";
	next;
	if (select("On the bed:Under the bed") == 1) {
		mes "^3355FFNo one's in the bed";
		mes "and if you climbed in,";
		mes "you'd just be alone. For";
		mes "some people, this may";
		mes "be an immutable truth.^000000";
		close;
	}
	mes "^3355FFThis is where you";
	mes "managed to find some";
	mes "sort of strange ^000000Cube^3355FF.^000000";
	close;
}

lhz_cube,229,184,0	script	Goblet#cube	111,{
	if (lhz_sincube < 10) {
		if (lhz_secret03 == 0) {
			mes "^3355FFYou see an empty";
			mes "bottle and a goblet.";
			mes "It looks like you";
			mes "missed the party.^000000";
			next;
			if (select("Examine the goblet.:Cancel") == 1) {
				mes "^3355FFInside the goblet,";
				mes "you find a ^000000Rusty Key^3355FF";
				mes "which you decide to keep.";
				mes "However, you'll need to get";
				mes "rid of that rust somehow.";
				mes "Perhaps you can dip the key";
				mes "in some corrosive chemical?^000000";
				set lhz_secret03,1;
			}
			close;
		}
		mes "^3355FFThis is the goblet where";
		mes "you found that ^000000Rusty Key^3355FF.^000000";
		close;
	}
	mes "^3355FFThis is goblet cup where";
	mes "you found that ^000000Rusty Key^3355FF.^000000";
	close;
}

lhz_cube,231,202,0	script	Chemicals#cube	111,{
	if (lhz_secret03 < 1) {
		mes "^3355FFThere is a bottle";
		mes "containing slightly";
		mes "corrosive chemicals";
		mes "that is sitting on the ledge.^000000";
		next;
		input .@input$;
		mes "^3355FFWhatever you tried to";
		mes "pour the chemicals on";
		mes "wasn't affected at all.";
		mes "You should try pouring the";
		mes "chemicals on something else.^000000";
		close;
	}
	else if (lhz_secret03 == 1) {
		mes "^3355FFThere is a bottle";
		mes "containing slightly";
		mes "corrosive chemicals";
		mes "that is sitting on the ledge.^000000";
		next;
		input .@input$;
		if (.@input$ == "Rusty Key") {
			mes "^3355FFPouring the chemicals";
			mes "on the Rusty Key removes";
			mes "the rust, making it usable";
			mes "again. Now that it is clean,";
			mes "the Rusty Key has become";
			mes "a sparkling ^000000Green Key^3355FF.^000000";
			set lhz_secret03,2;
		}
		else {
			mes "^3355FFWhatever you tried to";
			mes "pour the chemicals on";
			mes "wasn't affected at all.";
			mes "You should try pouring the";
			mes "chemicals on something else.^000000";
		}
		close;
	}
	mes "^3355FFThese are the chemicals";
	mes "that you used to clean the";
	mes "Rusty Key so that it was";
	mes "restored to its original glory,";
	mes "becoming the ^000000Green Key^3355FF.^000000";
	close;
}

lhz_cube,249,191,0	script	Cabinet#cube	111,{
	if (lhz_secret03 < 2) {
		mes "^3355FFYou've found a";
		mes "cabinet that contains";
		mes "many drawers. Perhaps";
		mes "something useful is inside?";
		next;
		if (select("Open:Cancel") == 1) {
			input .@input$;
			mes "^3355FFUnfortunately, the";
			mes "cabinet has been locked.";
			mes "You'll need the right key";
			mes "in order to open the drawers.^000000";
		}
		close;
	}
	else if (lhz_secret03 == 2) {
		mes "^3355FFYou've found a";
		mes "cabinet that contains";
		mes "many drawers. Perhaps";
		mes "something useful is inside?";
		next;
		input .@input$;
		if (.@input$ == "Green Key") {
			mes "^3355FFYou take the Green Key";
			mes "and finds that it fits into";
			mes "one of the drawer keyholes.";
			mes "You open the drawer and";
			mes "obtain a strange ^000000Polygon^3355FF.^000000";
			set lhz_secret03,3;
		}
		else {
			mes "^3355FFWhatever you tried";
			mes "did not succeed in";
			mes "opening this cabinet.";
			mes "Think. Think of how";
			mes "locks are unlocked...";
			mes "Then you'll find the";
			mes "answer you seek.^000000";
		}
		close;
	}
	mes "^3355FFThis is the locker";
	mes "where you used the";
	mes "Green Key to open one";
	mes "of the Drawers and obtained";
	mes "a ^000000Polygon^3355FF. You're pretty happy";
	mes "with your Polygon and don't";
	mes "need to open the other drawers.^000000";
	close;
}

lhz_cube,224,197,0	script	Experiment Tube#cube	111,{
	if (lhz_secret01 < 8) {
		mes "^3355FFYou find a strange";
		mes "tube that seems to";
		mes "contain something.";
		mes "Underneath the tube is";
		mes "a thin plate with a keyhole";
		mes "and a card insertion slot.^000000";
		next;
		input .@input$;
		mes "^3355FFNothing happened.";
		mes "You'll probably need";
		mes "to find the right key for";
		mes "the keyhole and the correct";
		mes "card to insert into the slot.^000000";
		close;
	}
	else if (lhz_secret01 == 8) {
		mes "^3355FFYou find a strange";
		mes "tube that seems to";
		mes "contain something.";
		mes "Underneath the tube is";
		mes "a thin plate with a keyhole";
		mes "and a card insertion slot.^000000";
		next;
		input .@input$;
		if (.@input$ == "Black Key") {
			mes "^3355FFYou insert the Black Key";
			mes "into the keyhole, causing";
			mes "the experiment tube to open";
			mes "and reveal an ^000000Oval^3355FF which you";
			mes "you choose to take with you.^000000";
			set lhz_secret01,9;
		}
		else {
			mes "^3355FFNothing happened...^000000";
		}
		close;
	}
	else if (lhz_secret01 == 9) {
		mes "^3355FFThis is where you";
		mes "obtained the ^000000Oval^3355FF.";
		mes "As you look around";
		mes "the tube's location,";
		mes "you notice an artificial";
		mes "ground fissure which";
		mes "can probably open up...^000000";
		close;
	}
	else {
		if (lhz_sincube == 10) {
			mes "^3355FFThere is a narrow,";
			mes "rectangular card slot";
			mes "in front of the tube.^000000";
			next;
			input .@input$;
			if (.@input$ == "Laboratory Permit") {
				if (countitem(2657)) {
					mes "^3355FFYou insert the";
					mes "Laboratory Permit";
					mes "into the slot and the";
					mes "man made fissure in the";
					mes "ground splits open, revealing";
					mes "an underground staircase.^000000";
					next;
					if (select("Go downstairs:Cancel") == 1) {
						mes "^3355FFYou walk down";
						mes "the long flight";
						mes "of winding stairs...^000000";
						close2;
						//remove variables that are no longer used.
						set lhz_sincube,0;
						set lhz_secret01,0;
						set lhz_secret02,0;
						set lhz_secret03,0;
						set MISC_QUEST,MISC_QUEST|512;
						warp "lhz_cube",177,13;
						end;
					}
					close;
				}
				mes "^3355FF..............";
				mes "Nothing happened.^000000";
				close;
			}
			mes "^3355FFNothing happened.^000000";
			close;
		}
		mes "^3355FFThis is where you";
		mes "obtained the ^000000Oval^3355FF.";
		mes "As you look around";
		mes "the tube's location,";
		mes "you notice an articial";
		mes "ground fissure which";
		mes "can probably open up...^000000";
		close;
	}
}

lhz_cube,248,193,0	script	Box#cube1	111,{
	if ((lhz_secret01 < 9) && (lhz_secret02 < 4) && (lhz_secret03 < 3)) {
		mes "^3355FFYou find a box with";
		mes "three distinctively";
		mes "shaped holes.^000000";
		next;
		select("Oval Hole:Cubic Hole:Polygon Hole");
		input .@input$;
		mes "^3355FFNothing happened.^000000";
		close;
	}
	else if ((lhz_secret01 != 10) || (lhz_secret02 != 5) || (lhz_secret03 != 4)) {
		mes "^3355FFYou find a box with";
		mes "three distinctively";
		mes "shaped holes.^000000";
		next;
		switch(select("Oval Hole:Cube Hole:Polygon Hole")) {
		case 1:
			if (lhz_secret01 == 9) {
				next;
				input .@input$;
				if (.@input$ == "Oval") {
					mes "^3355FFYou insert the Oval";
					mes "into the Oval shaped";
					mes "hole where it fits perfectly.^000000";
					set lhz_secret01,10;
					close;
				}
				mes "^3355FFNothing happened.^000000";
				close;
			}
			else if (lhz_secret01 == 10) {
				mes "^3355FFThe Oval shaped hole";
				mes "already has an Oval in it.";
				mes "Besides, it's not you have";
				mes "any Ovals to spare, anyway.^000000";
				close;
			}
			input .@input$;
			mes "^3355FFNothing happened.^000000";
			close;
		case 2:
			if (lhz_secret02 == 4) {
				next;
				input .@input$;
				if (.@input$ == "Cube") {
					mes "^3355FFYou insert the Cube";
					mes "into the Cubic hole";
					mes "and it clicks into place.";
					mes "Your formal Kindergarten";
					mes "training is finally justified.^000000";
					set lhz_secret02,5;
					close;
				}
				mes "^3355FFNothing happened.^000000";
				close;
			}
			else if (lhz_secret02 == 5) {
				mes "^3355FFYou already placed";
				mes "a Cube into the hole.";
				mes "You could take it back";
				mes "out and put it in again,";
				mes "but that would just be";
				mes "a total waste of time.^000000";
				close;
			}
			input .@input$;
			mes "^3355FFNothing happened.^000000";
			close;
		case 3:
			if (lhz_secret03 == 3) {
				next;
				input .@input$;
				if (.@input$ == "Polygon") {
					mes "^3355FFFortunately, the";
					mes "nondescript Polygon";
					mes "that you have is exactly";
					mes "the same shape as this";
					mes "nondescript Polygonal hole.";
					mes "The Polygon fits perfectly,";
					mes "almost as if it were destiny.^000000";
					set lhz_secret03,4;
					close;
				}
				mes "^3355FFNothing happened.^000000";
				close;
			}
			else if (lhz_secret03 == 4) {
				mes "^3355FFThe Polygon is already";
				mes "inserted into the hole.";
				mes "Trust that this is as much";
				mes "as this Polygon can do for you.^000000";
				close;
			}
			input .@input$;
			mes "^3355FFNothing happened.^000000";
			close;
		}
	}
	else if (lhz_secret01 == 10 && lhz_secret02 == 5 && lhz_secret03 == 4 && lhz_sincube != 10) {
		mes "^3355FFYou find a box with";
		mes "three distinctively";
		mes "shaped holes that";
		mes "are now filled with the";
		mes "objects you've inserted.^000000";
		next;
		if (select("Open the box.:Cancel") == 1) {
			mes "^3355FFYou open the box";
			mes "and find that there's";
			mes "a small card labeled";
			mes "''Laboratory Permit'' inside.";
			mes "You pocket this ^000000Laboratory";
			mes "Permit^3355FF, knowing that you";
			mes "will be needing it later.";
			set lhz_sincube,10;
			getitem 2657,1; //Lab_Passport
		}
		close;
	}
	mes "^3355FFYou find the open box";
	mes "which used to contain";
	mes "the ^000000Laboratory Permit^3355FF.";
	mes "This box is no longer";
	mes "useful to you now, but";
	mes "once upon a time, its";
	mes "mysteries were a challenge.^000000";
	close;
}

lhz_cube,250,184,0	script	Door#cube	111,{
	mes "^3355FFYou've come upon a";
	mes "door that leads outside.^000000";
	next;
	if (select("Exit:Cancel") == 1) {
		warp "lighthalzen",310,302;
		end;
	}
	close;
}

lhz_dun02,224,6,0	script	Exit1#lt	45,1,1,{
OnTouch_:
	if (MISC_QUEST&512) {
		warp "lhz_cube",231,90;
		end;
	}
	mes "^3355FFYou found a passage that";
	mes "seems to lead somewhere,";
	mes "but you get the feeling that";
	mes "you shouldn't enter it for now.^000000";
	close;
}

// Lighthalzen Pickpocket Mini-Quest
//============================================================
lighthalzen,240,216,4	script	Suspicious Guy#lhz_01	870,2,2,{
	end;

OnTouch_:
	switch(rand(1,3)) {
	case 1:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 100) {
			set Zeny, Zeny-100;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "I sense something...";
		mes "No. It might just";
		mes "be my imagination.";
		next;
		mes "[?????]";
		mes "^333333Heh heh heh heh...^000000";
		close;
	case 2:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 200) {
			set Zeny, Zeny-200;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "I could have sworn";
		mes "that these pockets full";
		mes "of zeny were heavier";
		mes "just a second ago...";
		next;
		mes "[?????]";
		mes "^333333Heh heh heh heh...^000000";
		close;
	case 3:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 10) {
			set Zeny, Zeny-10;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "What the?!";
		mes "That guy, did he just...?";
		mes "He did! Hey! That guy";
		mes "stole some of my money!";
		next;
		mes "[Suspicious Guy]";
		mes "Oh crap!";
		mes "Gotta scram!";
		mes "Eat my dust, good guy!";
		next;
		if (rand(1,4) == 1) {
			enablenpc "Suspicious Guy#lhz_03";
			disablenpc "Suspicious Guy#lhz_01";
		}
		else {
			enablenpc"Suspicious Guy#lhz_02";
			disablenpc "Suspicious Guy#lhz_01";
		}
		close;
	}
}

lighthalzen,220,169,3	script	Suspicious Guy#lhz_02	870,2,2,{
	end;

OnInit:
	disablenpc "Suspicious Guy#lhz_02";
	end;

OnTouch_:
	switch(rand(1,3)) {
	case 1:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 100) {
			set Zeny, Zeny-100;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "I sense something...";
		mes "No. It might just";
		mes "be my imagination.";
		next;
		mes "[?????]";
		mes "^333333Heh heh heh heh...^000000";
		close;
	case 2:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 200) {
			set Zeny, Zeny-200;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "I could have sworn";
		mes "that these pockets full";
		mes "of zeny were heavier";
		mes "just a second ago...";
		next;
		mes "[?????]";
		mes "^333333Heh heh heh heh...^000000";
		close;
	case 3:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 10) {
			set Zeny, Zeny-10;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "What the?!";
		mes "That guy, did he just...?";
		mes "He did! Hey! That guy";
		mes "stole some of my money!";
		next;
		mes "[Suspicious Guy]";
		mes "Oh crap!";
		mes "Gotta scram!";
		mes "Eat my dust, good guy!";
		if (rand(1,4) == 1) {
			enablenpc "Suspicious Guy#lhz_03";
			disablenpc "Suspicious Guy#lhz_02";
		}
		else {
			enablenpc "Suspicious Guy#lhz_01";
			disablenpc "Suspicious Guy#lhz_02";
		}
		close;
	}
}

lighthalzen,164,127,4	script	Suspicious Guy#lhz_03	870,2,2,{
	end;

OnInit:
	disablenpc "Suspicious Guy#lhz_03";
	end;

OnTouch_:
	switch(rand(1,5)) {
	case 1:
	case 2:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 100) {
			set Zeny, Zeny-100;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "I sense something...";
		mes "No. It might just";
		mes "be my imagination.";
		next;
		mes "[?????]";
		mes "^333333Heh heh heh heh...^000000";
		close;
	case 3:
	case 4:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 200) {
			set Zeny, Zeny-200;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "I could have sworn";
		mes "that these pockets full";
		mes "of zeny were heavier";
		mes "just a second ago...";
		next;
		mes "[?????]";
		mes "^333333Heh heh heh heh...^000000";
		close;
	case 5:
		mes "^3355FF*SHHHHHHUK!*^000000";
		specialeffect EF_STEAL;
		if (Zeny >= 10) {
			set Zeny, Zeny-10;
		}
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "What the?!";
		mes "That guy, did he just...?";
		mes "He did! Hey! That guy";
		mes "stole some of my money!";
		next;
		mes "[Suspicious Guy]";
		mes "Oh crap!";
		mes "Gotta scram!";
		mes "Eat my dust, good gu--!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Oh no, you don't!";
		mes "I'm turning you in,";
		mes "you pickpocket!";
		next;
		mes "[Suspicious Guy]";
		mes "No...! I'm sorry!";
		mes "I'll give you back";
		mes "your money, just ";
		mes "let me go! Crap!";
		emotion e_sob;
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Alright, fine,";
		mes "but you better quit";
		mes "this life of crime!";
		next;
		mes "[Suspicious Guy]";
		mes "You're right, that was";
		mes "wrong of me. Thanks";
		mes "for letting me go. Since";
		mes "you did me a favor, I'll";
		mes "sell you some tonic that";
		mes "I use to run really fast.";
		next;
		mes "[Suspicious Guy]";
		mes "I can only sell up to";
		mes "three of my secret tonic";
		mes "to you since that's all";
		mes "I have. Each one will";
		mes "cost 15,000 zeny. So";
		mes "what do you say?";
		next;
		switch(select("Give me 1.:Give me 2.:Give me 3.:No, I'm fine.")) {
		case 1: set .@number,1; set .@price,15000*1; break;
		case 2: set .@number,2; set .@price,15000*2; break;
		case 3: set .@number,3; set .@price,15000*3; break;
		case 4:
			mes "[Suspicious Guy]";
			mes "Well...";
			mes "You're just gonna";
			mes "let me go, then?";
			mes "That's awful generous.";
			mes "Thanks, I appreciate it.";
			next;
			mes "[Suspicious Guy]";
			mes "Anyway, I'm gonna";
			mes "get back to work.";
			mes "Heh heh heh~";
		}
		if (.@number) {
			if (Zeny < .@price) {
				mes "[Suspicious Guy]";
				mes "Er, since I'm quitting";
				mes "pickpocketing, I need";
				mes "to make cash legitimately";
				mes "as a business person. I'm";
				mes "real sorry pal, but I can't just";
				mes "give these tonics away!";
				next;
				mes "[Suspicious Guy]";
				mes "Anyway, I'm gonna";
				mes "get back to work.";
				mes "Heh heh heh~";
			}
			else {
				if ((MaxWeight-Weight) < 400) {
					mes "[Suspicious Guy]";
					mes "Eh, I'm sorry, but you";
					mes "don't have enough room";
					mes "in your inventory to even";
					mes "hold these tonics. Sorry";
					mes "pal, but this deal's off.";
					next;
					mes "[Suspicious Guy]";
					mes "Anyway, I'm gonna";
					mes "get back to work.";
					mes "Heh heh heh~";
				}
				else {
					mes "[Suspicious Guy]";
					if (.@number == 1) {
						mes "Only one? Alright, you";
						mes "might be a cheapskate,";
						mes "but I do owe you. Just";
						mes "take this and I hope we never";
						mes "bump into each other again!";
					}
					else if (.@number == 2) {
						mes "Two, huh? I can dig it.";
						mes "Now take these and I hope";
						mes "we never see each other";
						mes "ever again! Ciao, baby~";
					}
					else {
						mes "You want all three?";
						mes "Heh, you're much smarter";
						mes "than I thought! Alright, take";
						mes "these with my compliments,";
						mes "but I hope we never bump";
						mes "into each other ever again!";
					}
					set Zeny, Zeny-.@price;
					getitem 12016,.@number; //Speed_Up_Potion
				}
			}
		}
		if (rand(1,2) == 1) {
			enablenpc "Suspicious Guy#lhz_01";
			disablenpc "Suspicious Guy#lhz_03";
		}
		else {
			enablenpc "Suspicious Guy#lhz_02";
			disablenpc "Suspicious Guy#lhz_03";
		}
		close;
	}
}

// Friendship Quest
//============================================================
lhz_in02,201,210,5	script	Digotz	869,{
	if (BaseLevel < 50) {
		mes "[Digotz]";
		mes "Oh, an adventurer?";
		mes "Welcome to Uptown";
		mes "Lighthalzen. However,";
		mes "I'm afraid this area won't";
		mes "have much to offer you";
		mes "in the way of excitement.";
		next;
		mes "[Digotz]";
		mes "Not to be rude or";
		mes "anything, but this town";
		mes "should be safe enough for";
		mes "you to explore. I mean, you";
		mes "just seem to be kind of new";
		mes "at this adventurer thing...";
		close;
	}
	if (friendship > 14) {
		mes "^3355FFDigotz has passed";
		mes "away, but the look on";
		mes "his face seems very";
		mes "peaceful and content.^000000";
		close;
	}
	if (friendship == 14) {
		mes "^3355FFDigotz is seriously";
		mes "injured from a wound";
		mes "by a knife that is still";
		mes "embedded in his belly.^000000";
		next;
		mes "["+ strcharinfo(0) +"]";
		mes "Digotz...?";
		mes "Oh no, let me";
		mes "get you some help!";
		next;
		mes "[Digotz]";
		mes "H-hey... It's the";
		mes "adventurer... Man,";
		mes "that Maku. He always";
		mes "did bring me bad luck...";
		mes "It's too late for me and";
		mes "I don't have much time...";
		next;
		mes "[Digotz]";
		mes "Those guards I told you";
		mes "about... The ones who don't";
		mes "want the poor and the rich to";
		mes "mingle? I... Guess they found";
		mes "I was gonna meet my old pal.";
		mes "I just wanted to see him...";
		next;
		mes "[Digotz]";
		mes "This guy... In a black";
		mes "suit... He just... He just";
		mes "stabbed me! I... God. It's";
		mes "been so long since I've talked";
		mes "to him. We'll hang out and have";
		mes "fun, just like the good old days.";
		next;
		mes "[Digotz]";
		mes "I missed my buddies, but now...";
		mes "Now I can hear them calling me.";
		mes "Now we can all be together just";
		mes "like we all promised. Yeah...";
		mes "I was wrong. Life's too short";
		mes "to be angry with your frie--";
		next;
		mes "[Digotz]";
		mes "..............";
		next;
		mes "[Digotz]";
		mes "..............";
		mes ".......................";
		next;
		mes "[Digotz]";
		mes "..............";
		mes ".......................";
		mes "...............................";
		next;
		mes "^3355FFDigotz stopped breathing.";
		mes "You remove the Knife from";
		mes "his lifeless body as a final";
		mes "courtesy to a man who";
		mes "dearly loved his friends.^000000";
		next;
		set friendship,15;
		changequest 12005,12006;
		getitem 1201,1; //Knife
		close;
	}
	if (friendship == 13) {
		mes "[Digotz]";
		mes "Wh-whoa, I need to";
		mes "get ready! That Maku's";
		mes "gonna make fun of me if";
		mes "I look too rich and pampered.";
		mes "Damn! Where did I put all of";
		mes "my fashionable street clothes?";
		close;
	}
	if ((friendship == 12 && countitem(7351) > 0)) {
		mes "[Digotz]";
		mes "Even if Benkaistein";
		mes "did come back, I don't";
		mes "think I could forgive Maku.";
		mes "In fact, you know what?";
		mes "I think I'd even be madder!";
		next;
		if (select("Show Benkaistein's Journal.:Don't show Benkaistein's Journal.") == 1) {
			mes "[Digotz]";
			mes "Why am I so ticked off?";
			mes "^3355FF*Sigh*^000000 You have something";
			mes "to show me? Huh? Benkaistein";
			mes "wanted me to read this diary";
			mes "of his? Sure, why not? I do";
			mes "owe him a lot over the years...";
			next;
			mes "[Benkaistein's Journal]";
			mes "^856363Today, me, Digotz and";
			mes "Maku played this crazy flying";
			mes "game. Basically, we make";
			mes "these wings out of wood and";
			mes "paper, jump off these hills";
			mes "and try to fly. Dumb, I know.^000000";
			next;
			mes "[Benkaistein's Journal]";
			mes "^856363Today it was my turn to";
			mes "jump and flap my arms with";
			mes "these fake, badly made wings.";
			mes "It's not really a fun game when";
			mes "I think about it. Boy, I hope";
			mes "we don't do that again.^000000";
			next;
			mes "[Digotz]";
			mes "Oh yeah, I remember that!";
			mes "Maku wore the wings most";
			mes "of the time, but I still hold";
			mes "the record for staying in the";
			mes "air the longest! Yeah, I was";
			mes "a regular Kid Pegasus~";
			next;
			mes "[Benkaistein's Journal]";
			mes "^856363Maku, Digotz and me went";
			mes "outside of town. Of course,";
			mes "we didn't tell anyone or else";
			mes "we'd get in trouble. It was";
			mes "a really exciting day. But";
			mes "then, we ran into a monster!^000000";
			next;
			mes "[Benkaistein's Journal]";
			mes "^856363I wanted to run away but Maku";
			mes "and Digotz wanted to beat it so";
			mes "that we could become heroes.";
			mes "Of course, we got hurt pretty";
			mes "bad and the monster got away.";
			mes "Boy, mom was not happy...^000000";
			next;
			mes "[Digotz]";
			mes "Huh. I don't remember";
			mes "that so well. But I know that";
			mes "Benkaistein, me and Maku";
			mes "weren't afraid of anything back";
			mes "then. We must have been totally";
			mes "nuts to fight a monster, though.";
			next;
			mes "[Benkaistein's Journal]";
			mes "^856363Digotz's been sick for three";
			mes "days now. It's just a normal";
			mes "cold and Maku keeps saying";
			mes "it's Digotz's fault he got sick.^FFFFFF ^856363 But he's always asking me to";
			mes "go visit him and see if he's okay.^000000";
			next;
			mes "[Digotz]";
			mes "I think I remember being";
			mes "pretty sick. Maku was worried?";
			mes "I... I must have had a horrible";
			mes "life threatening disease like,";
			mes "um, Gonorrhitis. You know.";
			mes "That might have been it.";
			next;
			mes "[Benkaistein's Journal]";
			mes "^856363Mom and dad keep telling";
			mes "me not to hang out with Maku";
			mes "anymore. Their reason is really";
			mes "dumb, and I don't care if he is";
			mes "poor. He's one of the best guys";
			mes "that I'll ever know.^000000";
			next;
			mes "[Benkaistein's Journal]";
			mes "^856363Digotz's family is really";
			mes "rich and they don't want him";
			mes "to see Maku anymore either.";
			mes "But Digotz doesn't care.";
			mes "I know he likes Maku a lot.^000000";
			next;
			mes "[Digotz]";
			mes "Well, we were a lot";
			mes "younger and closer back";
			mes "then, so... ^333333*Ahem!*^000000 Why did";
			mes "Benkaistein even write that?!";
			next;
			mes "[Benkaistein's Journal]";
			mes "^856363Today, the three of us";
			mes "made an oath of brotherhood,";
			mes "just like we read in the comic";
			mes "book. We swore we'd always";
			mes "be friends no matter what.";
			mes "For always and for always.^000000";
			next;
			mes "[Digotz]";
			mes "I... I was forced to make";
			mes "that oath! And people do";
			mes "change, you know! I mean,";
			mes "we were basically just kids,";
			mes "it's not like that oath really";
			mes "means anything now, does it?";
			next;
			set friendship,13;
			mes "[Digotz]";
			mes "That does it. I'm gonna";
			mes "go see that Maku. I don't";
			mes "miss him or anything, but";
			mes "I gotta get him to cancel";
			mes "that oath. And maybe I'll";
			mes "beat up him a little bit.";
			close;
		}
		mes "[Digotz]";
		mes "I don't understand";
		mes "why I'm so angry!";
		mes "I'm starting to act";
		mes "more like Maku, though,";
		mes "don't get me wrong, it's";
		mes "not like I care about the guy.";
		close;
	}
	if (friendship == 7) {
		mes "[Digotz]";
		mes "Even if Benkaistein came";
		mes "back from wherever he was";
		mes "studying, I don't think he'd be";
		mes "able to get Maku to apologize";
		mes "to me. That guy is just way";
		mes "too stubborn for his own good!";
		close;
	}
	if (friendship == 6) {
		mes "[Digotz]";
		mes "Oh, it's been a while.";
		mes "What are you doing back";
		mes "over here? And, um, did";
		mes "you deliver that message";
		mes "to Maku? Now when I think";
		mes "about it, I was kind of--";
		next;
		mes "["+ strcharinfo(0) +"]";
		mes "I delivered your message";
		mes "word for word, and Maku";
		mes "got angry, called you names";
		mes "and has been threatening to";
		mes "beat you up pretty badly.";
		next;
		mes "[Digotz]";
		mes "That no-good, dirty";
		mes "lying rotten scoundrel!";
		mes "If it weren't for those";
		mes "guards, I'd head over to";
		mes "the ghetto and beat Maku";
		mes "up myself! That stupid guy!";
		next;
		mes "[Digotz]";
		mes "During times like this,";
		mes "I really miss ^FF0000Benkaistein^000000.";
		mes "That guy would always have";
		mes "an answer for this kind of";
		mes "situation. Yeah, I think he's";
		mes "in some far off town, studying.";
		next;
		mes "[Digotz]";
		mes "Supposedly he's in that";
		mes "place, whatever it's called,";
		mes "since there's a ton of books";
		mes "there that he can use. But";
		mes "yeah, Benkaistein would";
		mes "always be the mediator...";
		next;
		mes "[Digotz]";
		mes "Even back then, when";
		mes "me, him and Maku used to";
		mes "hang out, Benkaistein would";
		mes "mediate if we got into some";
		mes "argument. Still, he couldn't";
		mes "do anything about Maku now...";
		set friendship,7;
		changequest 12002,12003;
		next;
		mes "[Digotz]";
		mes "I don't know why,";
		mes "but I'm so angry!";
		mes "Why am I stressing";
		mes "out so much over this?!";
		close;
	}
	if ((friendship == 4 || friendship == 5)) {
		mes "[Digotz]";
		mes "Still checking out";
		mes "Uptown Lighthalzen?";
		mes "Not like I'd care, but if you";
		mes "do happen to see Maku,";
		mes "deliver this little message";
		mes "for me, sentence by sentence.";
		next;
		mes "[Digotz]";
		mes "^FF0000Hopeless bastard!";
		mes "^FF0000You're still a stubborn jerk!";
		mes "^FF0000You owe me at least 3 lunches!";
		mes "^FF0000Not to mention an apology!";
		mes "^FF0000But who cares what you think?!";
		mes "I'm so goddamn happy without you!^000000";
		close;
	}
	if (friendship == 3) {
		mes "[Digotz]";
		mes "I know that the";
		mes "opulence of Uptown";
		mes "seems rather attractive,";
		mes "but trust me. This place";
		mes "is colorless. Now, have";
		mes "you visited the poor district?";
		next;
		select("Yes, I did already...");
		mes "["+ strcharinfo(0) +"]";
		mes "Yes, I did already...";
		mes "And I met someone";
		mes "named Maku there.";
		next;
		mes "[Digotz]";
		mes "Maku?! Oh, he must have";
		mes "mentioned something about";
		mes "me. But I don't care what he";
		mes "says, unless it's an apology";
		mes "for being a fully blown jerk.";
		mes "Ever since we were kids...";
		next;
		mes "[Digotz]";
		mes "Anyway, we used to be close,";
		mes "but that guy was never a true";
		mes "friend of mine! Like that one";
		mes "time he cheated to beat me at";
		mes "arm wrestling! Or when he never";
		mes "thanked me for buying us lunch!";
		next;
		mes "[Digotz]";
		mes "Sure, he might have helped";
		mes "me a little in meeting my first";
		mes "girlfriend, but I'll never ever";
		mes "forgive him for fixing me up";
		mes "on the worst blind dates a";
		mes "man can possibly experience!";
		next;
		mes "[Digotz]";
		mes "Maku doesn't know a damn";
		mes "about friendship! Even if I did";
		mes "want to see him, there are these";
		mes "people who don't want the rich";
		mes "to ever meet with the poor.";
		next;
		mes "[Digotz]";
		mes "If Maku's fine, that's";
		mes "good enough to hear for";
		mes "me! There's no need for me";
		mes "to go all the way over there";
		mes "and check up on him! I only";
		mes "have one regret though...";
		next;
		mes "[Digotz]";
		mes "I only wish I had one";
		mes "last chance to see Maku...";
		mes "So that I could kick his sorry";
		mes "ass myself! Yeah, that's right!";
		mes "Arrogant bastard! But still,";
		mes "I'm not able to do that...";
		next;
		mes "[Digotz]";
		mes "The security guards here";
		mes "will never allow the rich and";
		mes "poor to meet, fearing that";
		mes "the poor will disturb the peace";
		mes "and order of the city. It's a dumb rule made for dumb people.";
		next;
		mes "[Digotz]";
		mes "Still, it's pretty scary that";
		mes "someone can get punished";
		mes "for violating such a stupid";
		mes "taboo, actually. Anyway, if";
		mes "you see Maku again, tell";
		mes "him this for me, got it?";
		next;
		mes "[Digotz]";
		mes "^FF0000Hopeless bastard!";
		mes "^FF0000You're still a stubborn jerk!";
		mes "^FF0000You owe me at least 3 lunches!";
		mes "^FF0000Not to mention an apology!";
		mes "^FF0000But who cares what you think?!";
		mes "I'm so goddamn happy without you!^000000";
		set friendship,4;
		close;
	}
	if (friendship == 2) {
		mes "[Digotz]";
		mes "What are you still";
		mes "doing hanging around";
		mes "here? There's nothing";
		mes "interesting in Uptown";
		mes "for you to see, adventurer.";
		next;
		mes "[Digotz]";
		mes "Gosh...!";
		mes "Just hearing about";
		mes "Maku makes me so feel";
		mes "so upset for some reason!";
		close;
	}
	if (friendship == 1) {
		mes "[Digotz]";
		mes "Oh, an adventurer?";
		mes "Welcome to Uptown";
		mes "Lighthalzen. However,";
		mes "I'm afraid this area won't";
		mes "have much to offer you";
		mes "in the way of excitement.";
		next;
		mes "[Digotz]";
		mes "My name is Digotz,";
		mes "just another citizen";
		mes "of Upper Lighthalzen.";
		mes "I hope that you enjoy";
		mes "your stay in my hometown.";
		next;
		select("Do you know someone named Maku?");
		mes "[Digotz]";
		mes "Maku? Maku. Yes, he's my";
		mes "childhood friend. Or he was,";
		mes "anyway. Now he's just a jerk.";
		mes "In any case, we can't hang";
		mes "out, even if we wanted to,";
		mes "for several reasons.";
		next;
		mes "[Digotz]";
		mes "Hey, why am I even";
		mes "talking about this? It's";
		mes "not like I'm bothered by";
		mes "the fact me and Maku aren't";
		mes "pals anymore. You know what?";
		mes "Just forget everything I said.";
		set friendship,2;
		changequest 12000,12001;
		close;
	}
	mes "[Digotz]";
	mes "Oh, an adventurer?";
	mes "Welcome to Uptown";
	mes "Lighthalzen. However,";
	mes "I'm afraid this area won't";
	mes "have much to offer you";
	mes "in the way of excitement.";
	next;
	mes "[Digotz]";
	mes "Feel free to take";
	mes "a look around if you";
	mes "so wish. I'm actually";
	mes "glad to see somebody";
	mes "aside from the stuck up";
	mes "rich people who live here.";
	close;
}

lighthalzen,337,232,3	script	Maku	870,{
	mes "[Maku]";
	if (friendship > 14) {
		cutin "lhz_macu07",2;
		mes "Why is this guy so";
		mes "late? Once he shows";
		mes "up, I swear, I'm gonna...!";
		next;
		mes "[Maku]";
		mes "Eh, he might have";
		mes "some kinda reason for";
		mes "being late, but if he don't,";
		mes "I've been saving a whole";
		mes "six pack of kickass to open,";
		mes "just for him. Heh heh heh~";
	}
	else if (friendship == 14) {
		cutin "lhz_macu05",2;
		mes "Why is Digotz";
		mes "so late? This isn't";
		mes "like him at all. Maybe";
		mes "something's wrong?";
	}
	else if (friendship == 13 && countitem(7351) > 0) {
		cutin "lhz_macu06",2;
		mes "Hey, what is that? You want";
		mes "I should read this journal?";
		mes "Er, okay, but I'm none too";
		mes "comfortable going through";
		mes "somebody's diary. It's just";
		mes "kinda... creepy, you know?";
		next;
		mes "[Maku]";
		mes "Hey, this thing is";
		mes "Benkaistein's. I haven't";
		mes "seen that guy in a long while.";
		mes "Ah, so he gave it to you for me";
		mes "to read? Alright, I owe him a";
		mes "favor or two, so I oughta...";
		next;
		cutin "lhz_macu06",255;
		mes "[Benkaistein's Journal]";
		mes "^856363Today, me, Digotz and";
		mes "Maku played this crazy flying";
		mes "game. Basically, we make";
		mes "these wings out of wood and";
		mes "paper, jump off these hills";
		mes "and try to fly. Dumb, I know.^000000";
		next;
		mes "[Benkaistein's Journal]";
		mes "^856363Today it was my turn to";
		mes "jump and flap my arms with";
		mes "these fake, badly made wings.";
		mes "It's not really a fun game when";
		mes "I think about it. Boy, I hope";
		mes "we don't do that again.^000000";
		next;
		cutin "lhz_macu03",2;
		mes "[Maku]";
		mes "What is he talking about?!";
		mes "That game was real fun!";
		mes "Yeah, I usually wore the";
		mes "wings and Digotz always";
		mes "wanted to wear them too.";
		next;
		cutin "",255;
		mes "[Benkaistein's Journal]";
		mes "^856363Maku, Digotz and me went";
		mes "outside of town. Of course,";
		mes "we didn't tell anyone or else";
		mes "we'd get in trouble. It was";
		mes "a really exciting day. But";
		mes "then, we ran into a monster!^000000";
		next;
		mes "[Benkaistein's Journal]";
		mes "^856363I wanted to run away but Maku";
		mes "and Digotz wanted to beat it so";
		mes "that we could become heroes.";
		mes "Of course, we got hurt pretty";
		mes "bad and the monster got away.";
		mes "Boy, mom was not happy...^000000";
		next;
		cutin "lhz_macu03",2;
		mes "[Maku]";
		mes "That's right! Back then,";
		mes "the three of us weren't";
		mes "afraid of anything! Of course,";
		mes "Digotz got beat up the most.";
		mes "But I gotta say, he was also";
		mes "the most fearless of us.";
		next;
		cutin "",255;
		mes "[Benkaistein's Journal]";
		mes "^856363Digot's been sick for three";
		mes "days now. It's just a normal";
		mes "cold and Maku keeps saying";
		mes "it's Digotz's fault he got sick.^FFFFFF ^856363 But he's always asking me to";
		mes "go visit him and see if he's okay.^000000";
		next;
		cutin "lhz_macu04",2;
		mes "[Maku]";
		mes "Wh-what?! No, I wasn't";
		mes "worried at all! That must";
		mes "have been the time Digot";
		mes "caught Clymonia. You know,";
		mes "that, uh, horrible disease. No";
		mes "one should have that one!";
		next;
		cutin "",255;
		mes "[Benkaistein's Journal]";
		mes "^856363Mom and dad keep telling";
		mes "me not to hang out with Maku";
		mes "anymore. Their reason is really";
		mes "dumb, and I don't care if he is";
		mes "poor. He's one of the best guys";
		mes "that I'll ever know.^000000";
		next;
		cutin "lhz_macu01",2;
		mes "[Benkaistein's Journal]";
		mes "^856363Digotz's family is really";
		mes "rich and they don't want him";
		mes "to see Maku anymore either.";
		mes "But Digotz doesn't care.";
		mes "I know he likes Maku a lot.^000000";
		next;
		mes "[Maku]";
		mes "...";
		mes "......";
		next;
		cutin "",255;
		mes "[Benkaistein's Journal]";
		mes "^856363Today, the three of us";
		mes "made an oath of brotherhood,";
		mes "just like we read in the comic";
		mes "book. We swore we'd always";
		mes "be friends no matter what.";
		mes "For always and for always.^000000";
		next;
		cutin "lhz_macu06",2;
		mes "[Maku]";
		mes "Well, that's true,";
		mes "I guess, but people";
		mes "change! Besides, we got";
		mes "that idea from a comic book!";
		mes "Well, if he apologizes first,";
		mes "I guess I better forgive him.";
		next;
		mes "["+ strcharinfo(0) +"]";
		mes "Good...";
		mes "Because Digotz said";
		mes "that he'll be coming";
		mes "by in a few days.";
		next;
		cutin "lhz_macu07",2;
		mes "[Maku]";
		mes "What?! He's really coming";
		mes "here? What for? It's too late";
		mes "to patch things up! Still, I'd be";
		mes "a real prick if I didn't see him. Alright, fine! I'll teach that guy";
		mes "a lesson once he's here!";
		next;
		mes "[Maku]";
		mes "And, um, gimme that";
		mes "journal! I'm gonna read";
		mes "more of it so I can make";
		mes "fun of Digotz. Bwahahaha!";
		mes "But yeah, um, thanks. Not";
		mes "that I'm grateful or anything.";
		cutin "lhz_macu07",255;
		next;
		delitem 7351,1; //Friend's_Diary
		set friendship,14;
		if (checkre(3)) {
			if (BaseLevel > 90) getexp 70000,0;
			else if (BaseLevel > 75) getexp 40000,0;
			else getexp 20000,0;
		} else {
			if (BaseLevel > 90) getexp 700000,0;
			else if (BaseLevel > 75) getexp 400000,0;
			else getexp 200000,0;
		}
		cutin "lhz_macu04",2;
		mes "[Maku]";
		mes "So, uh, I guess";
		mes "I'll see you later.";
		mes "Um, now I gotta get";
		mes "ready for something.";
		mes "^333333(But not to see Digotz!)^000000";
	}
	else if (friendship > 5 && friendship < 13) {
		cutin "lhz_macu06",2;
		mes "Arrrrgh! Whenever I hear";
		mes "about that Digotz, I get so";
		mes "peeved! Is that guy giving";
		mes "me the brushoff just because";
		mes "I'm not a rich guy like he is?!";
		next;
		mes "[Maku]";
		mes "I can't...";
		mes "I can't even beat him up";
		mes "all properly because of";
		mes "all those freakin' guards!";
		mes "Arrrrrrrgh! Man, where's";
		mes "Benkaistein when I need him?";
	}
	else if (friendship == 5) {
		mes "RrrrRrrrr....";
		mes "RrrrrRRRrrRR....";
		mes "GGGGGRRRRR...";
		next;
		mes "^3355FFUh oh...";
		mes "It looks like Maku";
		mes "is starting to rage";
		mes "just a bit too much.^000000";
		next;
		mes "...";
		mes "......";
		mes ".........";
		next;
		cutin "lhz_macu06",2;
		mes "[Maku]";
		mes "Gggrrrr...";
		next;
		mes "[Maku]";
		mes "GRAAAAAAAAH~!";
		mes "Who the hell does he";
		mes "think he is, telling me";
		mes "all sorts of crap!? Digotz,";
		mes "you're not getting away";
		mes "with this! Gonna wreck you!!";
		next;
		mes "^3355FFMaku's seething quickly";
		mes "explodes into pure, violent";
		mes "rage. You manage to calm";
		mes "him down after a while, but";
		mes "barely keep yourself from";
		mes "getting killed in this outburst.^000000";
		percentheal -50,0;
		next;
		mes "[Maku]";
		mes "^333333*Pant pant* *Whew~*^000000";
		mes "D-don't worry, I've got";
		mes "a grip on myself now.";
		mes "Thanks for not letting me";
		mes "get too crazy. Times like";
		mes "this, I really miss ^FF0000Benkaistein^000000.";
		next;
		mes "[Maku]";
		mes "Benkaistein would always";
		mes "make sure that I'd stay out";
		mes "of fights. I really miss that";
		mes "guy. Still, he ain't around...";
		next;
		set friendship,6;
		mes "[Maku]";
		mes "Damn those guards!";
		mes "If they weren't there,";
		mes "I could just go over and";
		mes "kick Digotz's ass! I swear,";
		mes "if it weren't for them...!";
	}
	else if (friendship == 4) {
		cutin "lhz_macu05",2;
		mes "What the hell are you";
		mes "still doing around here?";
		mes "You must have better things";
		mes "to do than talk to a ruffian";
		mes "like me or that snobby and";
		mes "totally prickish Digotz.";
		next;
		select("Speaking of which...");
		mes "["+ strcharinfo(0) +"]";
		mes "Speaking of which...";
		mes "I spoke to Digotz again.";
		mes "He told me to give you a";
		mes "message, but I'm not sure th--";
		next;
		mes "[Maku]";
		mes "That no-good bastard";
		mes "has a message for me?!";
		mes "Oh, I'm soooo honored~";
		mes "Tell me what that fink";
		mes "has to say, line by line!";
		next;
		input .@input$;
		if (.@input$ == "Hopeless bastard!") {
			mes "[Maku]";
			mes "''Hopeless bastard?!''";
			mes "Well, at least he had";
			mes "the stomach to say that.";
			mes "Through somebody else";
			mes "anyway! What else'd he say?!";
			next;
			input .@input$;
			if (.@input$ == "You're still a stubborn jerk!") {
				mes "[Maku]";
				mes "''Stubborn jerk?!''";
				mes "Takes one to know one,";
				mes "bastard! Why I oughta--";
				mes "Grrr! What'd he say next?!";
				next;
				input .@input$;
				if (.@input$ == "You owe me at least 3 lunches!") {
					mes "[Maku]";
					mes "Three lunches?!";
					mes "I treated that guy to";
					mes "lunch, like, fifteen times!";
					mes "I tell you, the guy does not";
					mes "know the meaning of friendship!";
					mes "What else did that moron say?!";
					next;
					input .@input$;
					if (.@input$ == "Not to mention an apology!") {
						cutin "lhz_macu05",255;
						mes "[Maku]";
						mes "Me, apologize?!";
						mes "He should be on his hands";
						mes "and knees begging for my";
						mes "frickin' forgiveness! That...";
						mes "That selfish no-good stupid...";
						mes "W-what else did he tell you?!";
						next;
						input .@input$;
						if (.@input$ == "But who cares what you think?!") {
							mes "[Maku]";
							mes "''Who cares what I think?!''";
							mes "GRRRAAAH~!! Who cares";
							mes "what he thinks!! ^333333*Pant Pant*^000000";
							mes "I'm gonna murderlize that";
							mes "dumb creep! He can't possibly";
							mes "make me angrier than I am now!";
							next;
							input .@input$;
							if (.@input$ == "I'm so goddamn happy without you!") {
								set friendship,5;
								cutin "lhz_macu06",2;
								mes "[Maku]";
								mes "That's it.";
								mes "It's decided. The";
								mes "next time I see Digotz,";
								mes "I'm gonna plaster his";
								mes "face all over the floor.";
								close2;
								cutin "lhz_macu06",255;
								end;
							}
						}
					}
				}
			}
		}
		mes "[Maku]";
		mes "Wha...? I dunno if Digotz";
		mes "would say something like";
		mes "that. You sure you heard";
		mes "him carefully enough? It's";
		mes "been a while, but I know";
		mes "how Digotz talks, man.";
	}
	else if (friendship == 3) {
		cutin "lhz_macu03",2;
		mes "Man, I need to blow off some";
		mes "steam! Sure, me and Digotz";
		mes "were buds before and maybe";
		mes "we might seem like friends now,";
		mes "but not anymore, though we used";
		mes "to be closer than this. Argh!";
		next;
		mes "[Maku]";
		mes "Don't get me wrong, I don't";
		mes "miss the guy or anything like";
		mes "that and I don't feel sorry about";
		mes "what happened. But if he ever";
		mes "came to apologize to me, I'd";
		mes "probably accept, you know.";
		next;
		mes "[Maku]";
		mes "Well, after thinking";
		mes "about it, of course.";
		mes "I mean, I'm not the one";
		mes "holding a grudge. It's all";
		mes "that guy's fault! Sheeeesh!";
	}
	else if (friendship == 2) {
		mes "Hey, what are you";
		mes "doing back over here?";
		mes "I thought I recommended";
		mes "going over to check out";
		mes "Uptown Lighthalzen. This";
		mes "place is pretty run-down...";
		next;
		select("I actually met Digotz and...");
		cutin "lhz_macu05",2;
		mes "[Maku]";
		mes "You what...?!";
		mes "You saw my old pal,";
		mes "Digotz?! Er, I mean,";
		mes "Mister Alexander Digotz,";
		mes "who usedta be my buddy,";
		mes "but obviously not anymore.";
		next;
		cutin "lhz_macu02",2;
		mes "[Maku]";
		mes "Sure, we were real close";
		mes "at one time, but that was";
		mes "too long ago. It's been a";
		mes "long time since we hung";
		mes "out and he probably hates";
		mes "my penniless guts and...";
		set friendship,3;
		changequest 12001,12002;
		next;
		mes "[Maku]";
		mes "Crud, just listen to";
		mes "me, I sound like a wuss.";
		mes "I don't miss Digotz! In fact,";
		mes "I hate the guy, one hundred";
		mes "percent! The next time I see";
		mes "him, I'll beat him to a pulp!";
	}
	else {
		cutin "lhz_macu01",2;
		mes "Hey, you're one of";
		mes "those adventurers, eh?";
		mes "Welcome to the ghetto.";
		mes "Nothing too adventurous";
		mes "here, but hey, you can";
		mes "explore all you want.";
		next;
		mes "[Maku]";
		mes "I don't know if you know,";
		mes "but actually, the people who";
		mes "live here ain't allowed to";
		mes "explore this whole city. It's";
		mes "kind of taboo to talk about,";
		mes "but what do I care, right?";
		next;
		mes "[Maku]";
		mes "Yeah, basically the rich";
		mes "people here are too afraid";
		mes "of the poor people comin' to";
		mes "see them, so the security in";
		mes "this city is pretty tight! Those";
		mes "upper class guys are trash...";
		next;
		mes "[Maku]";
		mes "I didn't used to think";
		mes "this way. I actually used";
		mes "to have a pretty rich friend";
		mes "till I found out he's not all";
		mes "I thought he was. That";
		mes "moron! Why's he like that?!";
		next;
		mes "[Maku]";
		mes "Eh, forget about it.";
		mes "Why am I even talking";
		mes "about my personal life";
		mes "to someone I just met";
		mes "anyway? Sure, we all";
		mes "do it, but still...";
		set friendship,1;
		if (isbegin_quest(12000) == 0)
			setquest 12000;
		next;
		mes "[Maku]";
		mes "Well, when you get";
		mes "bored of the ghetto,";
		mes "you really oughta check";
		mes "out the rich section of town.";
		mes "I'm bitter, but I'll also admit";
		mes "it's way nicer than this place.";
	}
	close2;
	cutin "",255;
	end;
}


yuno_in04,107,14,5	script	Student	754,{
	if (friendship == 7 || friendship == 8) {
		mes "[Joey Choryee]";
		mes "This is a study area where";
		mes "you're not supposed to speak,";
		mes "walk or even breathe loudly.";
		mes "Still, students like Benkaistein can tune out the whole world";
		mes "when they study hard enough...";
		next;
		set friendship,8;
		mes "[Joey Choryee]";
		mes "Benkaistein...?";
		mes "He's in the north part";
		mes "of this room. He's a real";
		mes "nice guy, but a little anal.";
		mes "Well, he's too organized";
		mes "and he labels everything!";
		close;
	}
	mes "[Joey Choryee]";
	mes "Property damage. Huh.";
	mes "It has to do with lightning";
	mes "and fire and water and stuff";
	mes "like that? Here I thought it";
	mes "meant, I dunno, buildings";
	mes "getting wrecked or something.";
	close;
}

yuno_in04,96,106,5	script	Passionate Student	754,{
	if ((MaxWeight-Weight) < 300 || checkweight(1201,1) == 0) {
		mes "^3355FFWait a second!";
		mes "Right now, you're carrying";
		mes "too many things with you.";
		mes "Please come back after";
		mes "using the Kafra Service";
		mes "to store some of your items.^000000";
		close;
	}
	if (friendship == 15) {
		mes "[Benkaistein]";
		mes "Were you able to bring";
		mes "my journal to Digotz and";
		mes "Maku? I'm pretty sure it'd";
		mes "remind them of all the good";
		mes "times we had. I know they";
		mes "sure can be stubborn...";
		next;
		mes "[Benkaistein]";
		mes "Anyway, I really";
		mes "appreciate all your";
		mes "help. When I go back";
		mes "home, I look forward to";
		mes "seeing the two of them again.";
		next;
		mes "[Benkaistein]";
		mes "Until then, I need to research,";
		mes "finish my thesis and accomplish";
		mes "my academic goals. Oh, please";
		mes "take this pass which will let you";
		mes "go back and forth between the";
		mes "rich and poor areas as my thanks.";
		next;
		set friendship,16;
		completequest 12006;
		if (checkre(3)) {
			if (BaseLevel > 90) getexp 70000,0;
			else if (BaseLevel > 75) getexp 40000,0;
			else getexp 20000,0;
		} else {
			if (BaseLevel > 90) getexp 700000,0;
			else if (BaseLevel > 75) getexp 400000,0;
			else getexp 200000,0;
		}
		getitem 7350,1; //Pass
		mes "[Benkaistein]";
		mes "Anyway, I wish you";
		mes "safety in your travels,";
		mes "adventurer. When the three";
		mes "of us get together, I'll be";
		mes "sure to let you know~";
		close;
	}
	if ((friendship == 11 && countitem(7351) > 0)) {
		mes "[Benkaistein]";
		mes "Aw nuts, this is";
		mes "taking much longer";
		mes "than I had expected.";
		mes "Now where did I put";
		mes "that thing? Hmmmm...";
		next;
		mes "[Benkaistein]";
		mes "Oh, is that it?";
		mes "Did you find my";
		mes "journal? Quick, let";
		mes "me check. Yes, yes...";
		mes "This is it! Thank you";
		mes "for finding this for me!";
		next;
		mes "[Benkaistein]";
		mes "Would you mind doing";
		mes "a favor for me? It'd be";
		mes "better if I talk to them";
		mes "myself, but I'm too busy";
		mes "working on this thesis...";
		next;
		mes "[Benkaistein]";
		mes "Would you please give this";
		mes "journal to Digotz and Maku?";
		mes "I wrote in it when we were";
		mes "really young, so it should";
		mes "remind them of all the good";
		mes "times we used to share.";
		next;
		set friendship,12;
		changequest 12004,12005;
		mes "[Benkaistein]";
		mes "Anyway, this should at";
		mes "least help them realize";
		mes "how stupid they've been";
		mes "acting. Thanks in advance,";
		mes "and please take care of";
		mes "Maku and Digotz for me.";
		close;
	}
	if ((friendship == 10 || friendship == 11)) {
		mes "[Benkaistein]";
		mes "Aw nuts, this is";
		mes "taking much longer";
		mes "than I had expected.";
		mes "Now where did I put";
		mes "that thing? Hmmmm...";
		next;
		mes "^3355FFPerhaps it would";
		mes "be best if you help";
		mes "Benkaistein look for";
		mes "he is searching for.^000000";
		close;
	}
	if (friendship == 9) {
		mes "[Passionate Student]";
		mes "Oh, you startled me!";
		mes "Still, I'm aware that it's";
		mes "hard to get my attention";
		mes "once I immerse myself";
		mes "in a book. So, how can";
		mes "I help you, adventurer?";
		next;
		select("Tell him about Maku and Digotz.");
		mes "[Benkaistein]";
		mes "Oh, how are my friends";
		mes "doing? Oh, what? They're";
		mes "having a huge fight just";
		mes "because one's rich and";
		mes "the other one's poor?";
		mes "That's pretty childish!";
		next;
		mes "[Benkaistein]";
		mes "But then again, that's just";
		mes "like them. *Sigh* I really want";
		mes "to go back home and get those";
		mes "two to make up, but I also need";
		mes "to finish this thesis. Let's see... What can I possibly do from here?";
		next;
		set friendship,10;
		changequest 12003,12004;
		mes "[Benkaistein]";
		mes "Oh, I know what I can do!";
		mes "Wait, but where did I put it?";
		mes "Oh, how could I lose something";
		mes "so important? Wait! Would you";
		mes "please wait a second while";
		mes "I look for something?";
		close;
	}
	if (friendship == 8) {
		mes "[Passionate Student]";
		mes "Let's see, now.";
		mes "Wind Magic, Black Magic,";
		mes "Porings, ah, there it is.";
		mes "Monster race properties.";
		mes "Hopefully this contains";
		mes "the information I need...";
		next;
		mes "^3355FFUpon briefly glancing at";
		mes "this student's belongings,";
		mes "you notice that the name";
		mes "''Benkaistein'' is printed";
		mes "on them. This is the friend";
		mes "mentioned by Maku and Digotz!^000000";
		next;
		select("Excuse me...");
		mes "["+ strcharinfo(0) +"]";
		mes "Excuse me...";
		mes "Benkaistein?";
		next;
		mes "[Passionate Student]";
		mes "...The world of humans";
		mes "and the world of demons,";
		mes "yes, yes... No, what I'm";
		mes "looking for is a reference";
		mes "to the heavens or Asgard.";
		mes "Hmm, this here might help...";
		next;
		select("Hey...");
		mes "["+ strcharinfo(0) +"]";
		mes "Hey...";
		mes "Over here.";
		mes "Benkaistein!";
		next;
		mes "[Passionate Student]";
		mes "...Oh, now that's a very";
		mes "interesting observation.";
		mes "If I can incorporate that";
		mes "into my thesis without too";
		mes "much trouble, my standpoint";
		mes "would look much more solid...";
		next;
		select("HEY YOU...!");
		mes "["+ strcharinfo(0) +"]";
		mes "HEY YOU...!";
		mes "BENKAISTEIN~!";
		next;
		mes "[Passionate Student]";
		mes "Oh, good heavens!";
		mes "C-can't you keep";
		mes "your voice down?";
		mes "I-I'm trying to study!";
		mes "No, wait. Have you been";
		mes "calling me all this time?";
		set friendship,9;
		close;
	}
	mes "[Passionate Student]";
	mes "Let's see, now.";
	mes "Wind Magic, Black Magic,";
	mes "Porings, ah, there it is.";
	mes "Monster race properties.";
	mes "Hopefully this contains";
	mes "the information I need...";
	next;
	mes "^3355FFThis student seems to";
	mes "be dilligently conducting";
	mes "intensive research on some";
	mes "academic subject. For now,";
	mes "it would be best to leave him";
	mes "alone so that he can study.^000000";
	close;
}

yuno_in04,168,117,3	script	Book#lhz	111,{
	if (friendship == 11) {
		mes "^3355FFThere's nothing";
		mes "over here that you";
		mes "really need anymore.^000000";
		close;
	}
	if (friendship == 10) {
		set friendship,11;
		getitem 7351,1; //Friend's_Diary
		mes "^3355FFThis book is labeled,";
		mes "''Benkaistein's Journal";
		mes "Vol. 6.'' This is probably";
		mes "what Benkaistein was trying";
		mes "to find, so it might be best to";
		mes "bring this and show it to him.^000000";
		close;
	}
	mes "^3355FFThere's nothing of";
	mes "any real interest";
	mes "over here for now.^000000";
	close;
}

// Cursed Spirit Quest
//============================================================
lhz_dun01,147,106,0	script	#kiz01-1	-1,3,3,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			soundeffect "loli_ruri_stand.wav",0;
			set lhz_curse,1;
			setquest 2086;
		}
		else if (lhz_curse < 26) {
			set @lhz_ghost,rand(1,5);
			sc_start SC_Curse,1000,0;
			soundeffect "loli_ruri_stand.wav",0;
			if (@lhz_ghost == 1) {
				mes "[??????]";
				mes "...................";
				next;
				soundeffect "loli_ruri_stand.wav",0;
				mes "[??????]";
				mes "...elp....help...";
				close;
			}
			else if (@lhz_ghost == 4) {
				mes "[??????]";
				mes "...................";
				next;
				soundeffect "loli_ruri_stand.wav",0;
				mes "[??????]";
				mes "I...";
				mes "I despise the living.";
				close;
			}
		}
	}
	end;
}

lhz_dun01,239,135,0	duplicate(#kiz01-1)	#kiz01-2	-1,3,3
lhz_dun01,66,213,0	duplicate(#kiz01-1)	#kiz01-3	-1,3,3
lhz_dun01,225,198,0	duplicate(#kiz01-1)	#kiz01-4	-1,3,3

lhz_dun02,244,229,0	script	#kiz02-1	-1,3,3,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			soundeffect "tao_gunka_stand.wav",0;
			set lhz_curse,1;
			setquest 2086;
		}
		else if (lhz_curse < 26) {
			set @lhz_ghost,rand(1,10);
			sc_start SC_Curse,1000,0;
			soundeffect "tao_gunka_stand.wav",0;
			if (@lhz_ghost == 1) {
				mes "[??????]";
				mes "...................";
				next;
				soundeffect "tao_gunka_stand.wav",0;
				mes "[??????]";
				mes "...elp....help...";
				close;
			}
			else if (@lhz_ghost == 4) {
				mes "[??????]";
				mes "...................";
				next;
				soundeffect "tao_gunka_stand.wav",0;
				mes "[??????]";
				mes "I...";
				mes "I despise the living.";
				close;
			}
		}
	}
	end;
}

lhz_dun02,60,293,0	duplicate(#kiz02-1)	#kiz02-2	-1,3,3
lhz_dun02,267,278,0	duplicate(#kiz02-1)	#kiz02-3	-1,3,3
lhz_dun02,94,199,0	duplicate(#kiz02-1)	#kiz02-4	-1,3,3

lhz_dun03,244,51,0	script	#kiz03-1	-1,3,3,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			soundeffect "tao_gunka_stand.wav",0;
			set lhz_curse,1;
			setquest 2086;
		}
		else if (lhz_curse < 26) {
			set @lhz_ghost,rand(1,10);
			sc_start SC_Curse,1000,0;
			soundeffect "tao_gunka_stand.wav",0;
			if (@lhz_ghost == 1) {
				mes "[??????]";
				mes "...................";
				next;
				soundeffect "tao_gunka_stand.wav",0;
				mes "[??????]";
				mes "...elp....help...";
				close;
			}
			else if (@lhz_ghost == 4) {
				mes "[??????]";
				mes "...................";
				next;
				soundeffect "tao_gunka_stand.wav",0;
				mes "[??????]";
				mes "I...";
				mes "I despise the living.";
				close;
			}
		}
	}
	end;
}

lhz_dun03,123,191,0	duplicate(#kiz03-1)	#kiz03-2	-1,3,3
lhz_dun03,74,140,0	duplicate(#kiz03-1)	#kiz03-3	-1,3,3

lighthalzen,344,278,0	script	#kiz03	-1,2,2,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			soundeffect "tao_gunka_stand.wav",0;
			sc_start SC_Curse,1000,0;
		}
		else if ((lhz_curse > 0) && (lhz_curse < 26)) {
			mes "............";
			next;
			soundeffect "tao_gunka_stand.wav",0;
			sc_start SC_Blind,60000,0;
			mes "............";
			next;
			mes "[?????]";
			mes "Honey, I'm sorry,";
			mes "but I... We know how";
			mes "hungry you are, but we";
			mes "have nothing to feed you.";
			next;
			mes "[?????]";
			mes "*Sniff* I know, I know,";
			mes "but somehow, that tragic";
			mes "truth eats away at me just";
			mes "a little bit more everyday...";
			next;
			mes "[?????]";
			mes "D-damn it...!";
			mes "Why do we have";
			mes "to live like this?!";
			mes "It's like we're less";
			mes "than animals. I hate this!";
			next;
			mes "............";
			next;
			mes "............";
			next;
			emotion e_what,1;
			mes "["+strcharinfo(0)+"]";
			mes "Those voices weren't";
			mes "just in my head, were they?";
			mes "Hello...? Anybody there...?";
			close2;
			sc_end SC_Blind;
			sc_start SC_Curse,5000,0;
			if (!lhz_spi01) set lhz_spi01,1;
		}
	}
	end;
}

lhz_in03,178,22,0	script	#kiz04	-1,2,2,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			sc_start SC_Curse,1000,0;
			soundeffect "tao_gunka_stand.wav",0;
		}
		else if ((lhz_curse > 0) && (lhz_curse < 26)) {
			mes "............";
			next;
			soundeffect "tao_gunka_stand.wav",0;
			sc_start SC_Blind,60000,0;
			mes "............";
			next;
			mes "[?????]";
			mes "Hey, you won't";
			mes "believe it! Rekenber";
			mes "decided to hire us!";
			next;
			mes "[???????]";
			mes "You sure that's so great?";
			mes "Those big corporations";
			mes "always take advantage";
			mes "of the little guy. We're";
			mes "probably gonna end up";
			mes "slavin' away for our wages...";
			next;
			mes "[?????]";
			mes "No, that's not the";
			mes "case at all. I mean,";
			mes "sure, we won't start off";
			mes "with much responsibility,";
			mes "but they'll pay us well!";
			next;
			mes "[?????]";
			mes "Well, we do need to eat.";
			mes "If they're true to their word,";
			mes "that'll be even better!";
			next;
			mes "............";
			next;
			mes "............";
			next;
			mes "[???]";
			mes "Waaaah!";
			mes "Waaaaaaah~!";
			next;
			mes "[????]";
			mes "Woman, shut this";
			mes "baby up! Shut up, kid!";
			next;
			mes "[?????]";
			mes "Honey, please...";
			mes "He's just a baby!";
			next;
			mes "[????]";
			mes "I don't care how";
			mes "crummy this house is!";
			mes "It's mine and I want quiet!";
			next;
			mes "............";
			next;
			mes "............";
			next;
			emotion e_what,1;
			mes "["+strcharinfo(0)+"]";
			mes "I'm hearing things";
			mes "again! Where are all of";
			mes "these voices coming from?";
			close2;
			soundeffect "tao_gunka_stand.wav",0;
			sc_end SC_Blind;
			sc_start SC_Curse,5000,0;
			if (!lhz_spi02) set lhz_spi02,1;
		}
	}
	end;
}

lighthalzen,295,227,0	script	#kiz05	-1,2,2,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			sc_start SC_Curse,1000,0;
		}
		else if ((lhz_curse > 0) && (lhz_curse < 26)) {
			mes "............";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			sc_start SC_Blind,60000,0;
			mes "............";
			next;
			mes "[?????]";
			mes "Mommy, why don't those";
			mes "dirty people get new clothes?";
			mes "Don't they know it's gross?";
			mes "They're scaring me...";
			next;
			mes "[???????]";
			mes "Honey, don't look at";
			mes "them and hurry up!";
			next;
			mes "[????]";
			mes "Please, do you have";
			mes "any spare change? I...";
			mes "I need something to eat...";
			next;
			mes "............";
			next;
			mes "............";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "This is...";
			mes "This is insane!";
			mes "I must be hallucinating!";
			close2;
			soundeffect "loli_ruri_stand.wav",0;
			sc_end SC_Blind;
			sc_start SC_Curse,3000,0;
			if (!lhz_spi03) set lhz_spi03,1;
		}
	}
	end;
}

lighthalzen,364,315,0	script	#kiz06	-1,3,3,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			sc_start SC_Curse,1000,0;
		}
		else if ((lhz_curse > 0) && (lhz_curse < 26)) {
			mes "............";
			next;
			soundeffect "tao_gunka_stand.wav",0;
			sc_start SC_Blind,60000,0;
			mes "............";
			next;
			mes "[?????]";
			mes "Listen, I know you're";
			mes "the newest hire, but you've";
			mes "shown us a lot of potential.";
			mes "I think you'd be a perfect";
			mes "fit for this new position.";
			next;
			mes "[???????]";
			mes "Are you really serious?";
			next;
			mes "[?????]";
			mes "I'll tell it to you straight.";
			mes "This new position will require";
			mes "you to be away from home once";
			mes "in a while, but that comes with";
			mes "the new responsibilities.";
			next;
			mes "[?????]";
			mes "But you'll receive";
			mes "many new benefits that";
			mes "I'm sure your family would";
			mes "appreciate and you'll be";
			mes "generously compensated.";
			next;
			mes "[???????]";
			mes ".............";
			next;
			mes "[???????]";
			mes "...Alright, I'm in.";
			next;
			mes "............";
			next;
			mes "............";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "............";
			close2;
			soundeffect "tao_gunka_stand.wav",0;
			sc_end SC_Blind;
			sc_start SC_Curse,5000,0;
			if (!lhz_spi04) set lhz_spi04,1;
		}
	}
	end;
}

lhz_in01,113,150,0	script	#kiz07	-1,3,3,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			sc_start SC_Curse,1000,0;
		}
		else if ((lhz_curse > 0) && (lhz_curse < 26)) {
			mes "............";
			next;
			soundeffect "tao_gunka_stand.wav",0;
			sc_start SC_Blind,60000,0;
			mes "............";
			next;
			mes "[?????]";
			mes "So, what exactly did you";
			mes "want me to do? I'm sorry,";
			mes "I wasn't able to gather my";
			mes "actual job function from";
			mes "the presentation...";
			next;
			mes "[???]";
			mes "Hee hee hee~";
			mes "Don't worry about it.";
			mes "Just relax and stay";
			mes "right where you are.";
			next;
			mes "[?????]";
			mes "Mmm. Alright.";
			mes "I just thought that I was";
			mes "supposed to go somewhere,";
			mes "that's all. Um, shouldn't";
			mes "I be getting ready...?";
			next;
			mes "[???]";
			mes "Oh, don't worry about";
			mes "that, either. All of the";
			mes "arrangements will be";
			mes "taken care of. You'll";
			mes "be taken to that far";
			mes "off place very soon...";
			next;
			mes "............";
			next;
			mes "............";
			close2;
			soundeffect "tao_gunka_stand.wav",0;
			sc_end SC_Blind;
			sc_start SC_Curse,3000,0;
			if (lhz_curse == 6) set lhz_curse,7;
		}
	}
	end;
}

lhz_in01,272,227,0	script	#kiz08	-1,2,2,{
OnTouch_:
	if (countitem(7345) > 0 ) {
		if (lhz_curse == 0) {
			sc_start SC_Curse,1000,0;
		}
		else if ((lhz_curse > 0) && (lhz_curse < 26)) {
			mes "............";
			next;
			soundeffect "tao_gunka_stand.wav",0;
			sc_start SC_Blind,60000,0;
			mes "............";
			next;
			mes "[????]";
			mes "Oh, I'm so sorry to";
			mes "hear that you want to";
			mes "quit. Are you sure there";
			mes "isn't anything we can do";
			mes "to change your mind?";
			next;
			mes "[???]";
			mes "Well, I'm thinking of";
			mes "retiring early and just";
			mes "spending more time";
			mes "with my family. But I won't";
			mes "ever talk about the company";
			mes "or any of its, well, secrets.";
			next;
			mes "[????]";
			mes "I really appreciate";
			mes "your honesty and sincerity.";
			mes "You've really done a great";
			mes "job for us and I can't thank";
			mes "you enough for your years of";
			mes "dedication to this company.";
			next;
			mes "[???]";
			mes "Thank you, sir.";
			next;
			mes "[????]";
			mes "It would be a great loss";
			mes "for this company to let you";
			mes "go now. But I guess we have";
			mes "no choice, since you've had";
			mes "that horrible accident.";
			next;
			mes "[???]";
			mes "Sir...?";
			mes "Accident...?";
			mes "I don't understand";
			mes "what you're talking ab--";
			next;
			mes "[???]";
			mes "N-no! Please...!";
			mes "I didn't, I swear on";
			mes "my life that I won't ever";
			mes "say anything about this";
			mes "place! I'm begging you,";
			mes "for the love of god!";
			next;
			mes "[????]";
			mes "Your life...?";
			mes "Sorry, not good enough.";
			mes "You should have known.";
			next;
			mes "[???]";
			mes "Ssstop! I have chil--";
			mes "MY LEEEEGS!! OH MY GOD";
			mes "WHAT HAVE YOU DONE TO";
			mes "MY LEGS?! HELP ME, OH MY G--";
			next;
			mes "............";
			next;
			mes "............";
			close2;
			soundeffect "tao_gunka_stand.wav",0;
			sc_end SC_Blind;
			sc_start SC_Curse,3000,0;
			if (lhz_curse == 11) set lhz_curse,12;
		}
	}
	end;
}

lhz_in01,206,129,0	script	#kiz09	-1,5,5,{
OnTouch_:
	if (countitem(7345) > 0) {
		if (lhz_curse == 12) {
			mes "............";
			next;
			mes "............";
			soundeffect "loli_ruri_stand.wav",0;
			sc_start SC_Curse,1000,0;
			close2;
			warp "lhz_que01",26,27;
		}
		else if (((lhz_curse > 0) && (lhz_curse < 12)) && ((lhz_curse > 12) && (lhz_curse < 26))) {
			sc_start SC_Curse,1000,0;
		}
	}
	end;
}

lhz_que01,21,31,5	script	#li_Varmunt	755,{
	if (countitem(7345) > 0) {
		if (lhz_curse == 12) {
			mes "[??]";
			mes "Doctor Varmunt,";
			mes "you've finally agreed";
			mes "to join us. Welcome!";
			next;
			emotion e_swt,"#li_Varmunt";
			mes "[Varmunt]";
			mes "Well, I don't know if I agree";
			mes "with this company's policies,";
			mes "but the project you're offering";
			mes "seems to be an opportunity that";
			mes "comes once in a lifetime, so...";
			next;
			emotion e_no1,"#li_researcher";
			mes "[??]";
			mes "To be honest, this project";
			mes "can only be a success with";
			mes "your cooperation. We need";
			mes "your genius and will provide";
			mes "whatever you require.";
			next;
			mes "[Varmunt]";
			mes "I'm flattered.";
			mes "And of course, I'll";
			mes "do my best. It's just";
			mes "that this deal sounds";
			mes "too good to be true...";
			next;
			mes "............";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes ".................";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes "...................";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes ".....................";
			next;
			mes ".......................";
			next;
			mes "[??]";
			mes "Amazing. You've accomplished";
			mes "what most have thought to be";
			mes "impossible ahead of schedule.";
			mes "An imitation of Ymir's Heart!";
			mes "This will surely spur Airship";
			mes "and Guardian development~!";
			next;
			mes "[Varmunt]";
			mes "I still don't believe that";
			mes "were able to do it. This is";
			mes "a huge leap for science, even";
			mes "if this imitation isn't as powerful as the real Ymir's Heart.";
			next;
			mes "[??]";
			mes "Come, we must celebrate!";
			mes "Let's go outside and have";
			mes "a toast in your honor! Ha ha~";
			next;
			mes "............";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes ".................";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes "....................";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes "......................";
			next;
			mes "[??]";
			mes "But why, Doctor Varmunt?";
			mes "If you're unhappy with the";
			mes "Rekenber Corporation for";
			mes "any reason whatsoever...";
			next;
			mes "[Varmunt]";
			mes "Well, I don't really";
			mes "have a reason to remain";
			mes "now that we've accomplished";
			mes "what I've agreed to do. It's time for me to return and work on";
			mes "my personal research.";
			next;
			mes "[??]";
			mes "Please, Doctor Varmunt,";
			mes "reconsider! You may have";
			mes "full use of our facilities to";
			mes "conduct your research. I'm";
			mes "willing to make you an offer.";
			next;
			mes "[Varmunt]";
			mes "No, I can't...";
			mes "If I continue to work";
			mes "here, I'm afraid I might";
			mes "make a lot of people";
			mes "unhappy. But, thank";
			mes "you for everything.";
			next;
			mes "[??]";
			mes "Wait...";
			mes "Doctor Varmunt.";
			mes "You forgot your cane.";
			next;
			mes "[Varmunt]";
			mes "Since when have you";
			mes "seen me use a cane?";
			mes "And even if I did,";
			mes "that one isn't mi--";
			next;
			mes "...";
			next;
			mes "...";
			mes "......";
			next;
			mes "...";
			mes "......";
			mes ".........";
			set lhz_curse,13;
			close2;
			warp "lhz_in01",206,129;
			end;
		}
		else {
			warp "lhz_in01",206,129;
		}
	}
	else {
		warp "lhz_in01",206,129;
	}
	end;
}

lhz_que01,29,24,3	script	#li_researcher	754,{
	if (countitem(7345) > 0) {
		if (lhz_curse == 12) {
			mes "Doctor Varmunt,";
			mes "you've finally agreed";
			mes "to join us. Welcome!";
			next;
			emotion e_swt,"#li_Varmunt";
			mes "[Varmunt]";
			mes "Well, I don't know if I agree";
			mes "with this company's policies,";
			mes "but the project you're offering";
			mes "seems to be an opportunity that";
			mes "comes once in a lifetime, so...";
			next;
			emotion e_no1,"#li_researcher";
			mes "[??]";
			mes "To be honest, this project";
			mes "can only be a success with";
			mes "your cooperation. We need";
			mes "your genius and will provide";
			mes "whatever you require.";
			next;
			mes "[Varmunt]";
			mes "I'm flattered.";
			mes "And of course, I'll";
			mes "do my best. It's just";
			mes "that this deal sounds";
			mes "too good to be true...";
			next;
			mes "............";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes ".................";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes "...................";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes ".....................";
			next;
			mes ".......................";
			next;
			mes "[??]";
			mes "Amazing. You've accomplished";
			mes "what most have thought to be";
			mes "impossible ahead of schedule.";
			mes "An imitation of Ymir's Heart!";
			mes "This will surely spur Airship";
			mes "and Guardian development~!";
			next;
			mes "[Varmunt]";
			mes "I still don't believe that";
			mes "were able to do it. This is";
			mes "a huge leap for science, even";
			mes "if this imitation isn't as powerful as the real Ymir's Heart.";
			next;
			mes "[??]";
			mes "Come, we must celebrate!";
			mes "Let's go outside and have";
			mes "a toast in your honor! Ha ha~";
			next;
			mes "............";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes ".................";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes "....................";
			next;
			soundeffect "loli_ruri_stand.wav",0;
			mes "......................";
			next;
			mes "[??]";
			mes "But why, Doctor Varmunt?";
			mes "If you're unhappy with the";
			mes "Rekenber Corporation for";
			mes "any reason whatsoever...";
			next;
			mes "[Varmunt]";
			mes "Well, I don't really";
			mes "have a reason to remain";
			mes "now that we've accomplished";
			mes "what I've agreed to do. It's time for me to return and work on";
			mes "my personal research.";
			next;
			mes "[??]";
			mes "Please, Doctor Varmunt,";
			mes "reconsider! You may have";
			mes "full use of our facilities to";
			mes "conduct your research. I'm";
			mes "willing to make you an offer.";
			next;
			mes "[Varmunt]";
			mes "No, I can't...";
			mes "If I continue to work";
			mes "here, I'm afraid I might";
			mes "make a lot of people";
			mes "unhappy. But, thank";
			mes "you for everything.";
			next;
			mes "[??]";
			mes "Wait...";
			mes "Doctor Varmunt.";
			mes "You forgot your cane.";
			next;
			mes "[Varmunt]";
			mes "Since when have you";
			mes "seen me use a cane?";
			mes "And even if I did,";
			mes "that one isn't mi--";
			next;
			mes "...";
			next;
			mes "...";
			mes "......";
			next;
			mes "...";
			mes "......";
			mes ".........";
			set lhz_curse,13;
			close2;
			warp "lhz_in01",206,129;
			end;
		}
		else {
			warp "lhz_in01",206,129;
		}
	}
	else {
		warp "lhz_in01",206,129;
	}
	end;
}

lhz_in01,282,166,0	script	#kiz10	-1,3,3,{
OnTouch_:
	if (countitem(7345) > 0) {
		if (lhz_curse == 16) {
			if (checkweight(1201,1) == 0) {
				mes "^3355FFThere's something on";
				mes "the floor, but you can't";
				mes "really take a good look at";
				mes "what it is right now. Perhaps";
				mes "if you freed up more space";
				mes "in your inventory...";
				close;
			}
			mes "...";
			mes "......";
			next;
			mes "...";
			mes "......";
			mes ".........";
			soundeffect "loli_ruri_stand.wav",0;
			sc_start SC_Curse,1000,0;
			close2;
			warp "lhz_que01",98,59;
			end;
		}
		else if (((lhz_curse > 0) && (lhz_curse < 16)) && ((lhz_curse > 16) && (lhz_curse < 26))) {
			sc_start SC_Curse,1000,0;
		}
	}
	end;
}

lhz_que01,99,74,5	script	#li_Man	48,{
	if (lhz_curse == 16) {
		mes "[???]";
		mes "It's over.";
		mes "I really want";
		mes "to quit. This is";
		mes "the end for me.";
		next;
		mes "[Peco Peco]";
		mes "^3131FFThis is the end!";
		mes "This is the end!^000000";
		next;
		mes "[???]";
		mes "He was right to say that";
		mes "we'd be paid well, but going";
		mes "through this much torture isn't";
		mes "worth any sum of money in the";
		mes "world to me. *Sigh* Money...";
		next;
		mes "[???]";
		mes "She must be so worried";
		mes "about me by now. And her";
		mes "health is so bad. I'm such";
		mes "a fool for leaving her behind.";
		next;
		mes "[Peco Peco]";
		mes "Such a fool!";
		mes "Such a fool!";
		mes "*Squaaawk~*";
		next;
		mes "[???]";
		mes "Damn it!";
		mes "Shut up, you stupid bird!";
		mes "Be quiet for just a minute!";
		next;
		mes "[Peco Peco]";
		mes "*Squaaaawk!*";
		mes "Death Penalty!";
		mes "Death Penalty!";
		next;
		mes "[???]";
		mes "Death penalty?";
		mes "Where'd you learn";
		mes "to say something weird";
		mes "like that? Huh. That's...";
		next;
		mes "..............";
		next;
		mes ".................";
		next;
		mes "....................";
		next;
		mes "......................";
		next;
		mes "[???]";
		mes "I'm the only one still";
		mes "in this room. Everyone";
		mes "else left and never came";
		mes "back. If they were... And";
		mes "I were to go out... Then...";
		mes "Maybe I better not leave.";
		next;
		mes "[???]";
		mes "If I could only give";
		mes "this pendant back to";
		mes "her, she wouldn't have";
		mes "to worry about me that";
		mes "much. But I might not";
		mes "be able to get back...";
		next;
		mes "[???]";
		mes "........";
		next;
		mes "[?????]";
		mes "Hey there, been";
		mes "waiting long? It's";
		mes "time for you to finish";
		mes "up your contract.";
		next;
		mes "[???]";
		mes "Finish up my...?";
		mes "N-no! I've decided!";
		mes "I'm not leaving this room!";
		next;
		mes "[?????]";
		mes "Hey hey, what the hell";
		mes "are you talking about?";
		mes "You came here to work,";
		mes "didn't you? And now it's";
		mes "time for you to collect, so...";
		next;
		mes "[???]";
		mes "N-no, l-let go of me!";
		mes "Please let me go!";
		mes "I want to see her again,";
		mes "please let me see her...!";
		next;
		mes "...";
		mes "......";
		next;
		mes "...";
		mes "......";
		mes ".........";
		next;
		mes "^3355FF*Clink*^000000";
		next;
		mes "[??]";
		mes "Hm? Who the hell";
		mes "brought in this cheap";
		mes "jewery? Someone must";
		mes "have forgotten to throw";
		mes "away their trash...";
		next;
		mes "[????]";
		mes "Yeah, it's just a";
		mes "cheap trinket. That";
		mes "pendant isn't even";
		mes "worth picking up.";
		next;
		mes "^3131FFYou pick up an old";
		mes "pendant from the ground.";
		mes "No matter how hard you try,";
		mes "you can't open its clasp to see";
		mes "what this pendant contains.^000000";
		set lhz_curse,17;
		changequest 2090,2091;
		getitem 7341,1; //Worn_Out_Pendant
		close2;
		warp "lhz_in01",278,162;
	}
	else {
		warp "lhz_in01",278,162;
	}
	end;
}

lhz_que01,90,71,5	script	#li_bird	1019,3,3,{
	mes "[Peco Peco]";
	mes "You're a fool!";
	mes "You're a fool!";
	mes "You're a fool!";
	close;

OnTouch_:
	mes "[Peco Peco]";
	mes "You're a fool!";
	mes "You're a fool!";
	mes "You're a fool!";
	close;
}

lighthalzen,346,263,3	script	Elder#lhz	846,{
	if (countitem(7345) > 0) {
		if ((lhz_curse == 1) && (lhz_spi01 == 1) && (lhz_spi02 == 1) && (lhz_spi03 == 1) && (lhz_spi04 == 1)) {
			mes "[Elder]";
			mes "No wonder you look";
			mes "so weary. Come, let";
			mes "me help relieve you";
			mes "of the burden that";
			mes "you are carrying.";
			next;
			switch(select("Um, burden...?:Crazy old woman!")) {
			case 1:
				mes "[Elder]";
				mes "Ah yes, they may not";
				mes "be apparent to you, but";
				mes "my eyes can clearly see";
				mes "them. Yes. You're being";
				mes "followed by those things.";
				next;
				select("Things?");
				mes "[Elder]";
				mes "Yes. The best way I can";
				mes "describe them is as evil";
				mes "thoughts left in the world";
				mes "when someone dies in";
				mes "such a way that his grudge";
				mes "survives to menace the living.";
				next;
				mes "[Elder]";
				mes "Sometimes, these lingering";
				mes "thoughts are created when";
				mes "someone is broken hearted";
				mes "or clings to this plane for the";
				mes "sake of a loved one. Yes, those";
				mes "thoughts are following you.";
				next;
				mes "[Elder]";
				mes "I don't know why they";
				mes "are following you, but I'm";
				mes "certain they're there. Have";
				mes "you been experiencing chills";
				mes "down your spine, cold sweats,";
				mes "maybe even hearing voices?";
				soundeffect "loli_ruri_stand.wav",0;
				sc_start SC_Curse,5000,0;
				next;
				select("Yes! How do I get rid of them?");
				mes "[Elder]";
				mes "Well, usually these lingering";
				mes "thoughts have some sort of";
				mes "physical anchor, an object";
				mes "that has feelings attached";
				mes "to it, something important";
				mes "to its late owner.";
				next;
				mes "[Elder]";
				mes "The rage they're directing";
				mes "at you seems to be growing";
				mes "and I can see the angry spirits";
				mes "pulling at the hems of your";
				mes "clothes. Tell me, have you";
				mes "wronged anyone recently?!";
				next;
				select("I don't... think so.:I can't remember every bad thing I've done!");
				mes "[Elder]";
				mes "Well, you better do";
				mes "something soon, before";
				mes "the evil taints your mind";
				mes "and drives you to insanity!";
				mes "Now, I need to know for sure";
				mes "if you've been hearing voices.";
				next;
				select("Y-yes, I have.");
				mes "[Elder]";
				mes "There's still hope.";
				mes "The spirits are trying";
				mes "to reach you for now, but";
				mes "if you wait too long, you may";
				mes "become a victim of their wrath.";
				mes "Hurry, there is much to do!";
				next;
				mes "[Elder]";
				mes "You must appease these";
				mes "forces by finding out what";
				mes "happened to them in life.";
				mes "Now, I don't possess great";
				mes "power, but I can encourage";
				mes "the spirits to guide you.";
				next;
				mes "[Elder]";
				mes "I can only have the spirits";
				mes "reveal the places they wish";
				mes "for you to search only once.";
				mes "You must remember the";
				mes "locations that I am about";
				mes "to show you. Get ready...";
				specialeffect2 EF_SIGHT;
				next;
				mes "[Elder]";
				mes "Yaaaaappp ---!";
				specialeffect2 EF_SIGHTRASHER;
				specialeffect2 EF_VOLCANO;
				specialeffect2 EF_MAPPILLAR;
				next;
				mes "[Elder]";
				mes "There! The locations";
				mes "you must search should";
				mes "be clear to you now! Don't";
				mes "forget these placemarks!";
				viewpoint 1,104,282,1,0x99FF33;
				viewpoint 1,105,282,2,0x99FF33;
				viewpoint 1,104,281,3,0x99FF33;
				viewpoint 1,105,281,4,0x99FF33;
				next;
				mes "[Elder]";
				mes "Good luck, youngster.";
				mes "I hope you can appease";
				mes "the wrath of these spirits...";
				mes "But as long as you let them guide you, you ought to be safe.";
				set lhz_curse,6;
				changequest 2086,2087;
				close;
			case 2:
				mes "[Elder]";
				mes "Crazy...? Hm, you must";
				mes "not quite understand what's";
				mes "happening to you. Please do";
				mes "not hesitate to come back to";
				mes "me when you realize that you";
				mes "need my help, youngster.";
				close;
			}
		}
		else if ((lhz_curse > 5) && (lhz_curse < 17)) {
			mes "[Elder]";
			mes "I'm sorry, but there's";
			mes "nothing more I can do for";
			mes "you right now. But if you";
			mes "find anything related to the";
			mes "spirits that torment you,";
			mes "please let me know.";
			close;
		}
		else if (lhz_curse == 17) {
			if (countitem(7341) > 0) {
				mes "[Elder]";
				mes "Greetings, adventurer.";
				mes "How goes your search for";
				mes "the remains of the spirits";
				mes "that still cling to this plane?";
				next;
				switch(select("Show him the Pendant.:Cancel")) {
				case 1:
					mes "[Elder]";
					mes "Oh my... There are some";
					mes "incredibly powerful emotions";
					mes "clinging to this pendant. If we";
					mes "don't do anything about this,";
					mes "you'll be cursed very soon.";
					mes "This is what you must do.";
					next;
					mes "[Elder]";
					mes "Hurry and bring";
					mes "^3131FF5 Holy Water^000000 and";
					mes "^3131FF1 Bouquet^000000. The Holy Water";
					mes "will purify this Pendant and";
					mes "the Bouquet will comfort";
					mes "the spirit of its owner.";
					next;
					mes "[Elder]";
					mes "You don't have much";
					mes "time, so return to me";
					mes "as soon as possible!";
					mes "It won't be long until";
					mes "the spirits are consumed";
					mes "by their supernatural rage...";
					set lhz_curse,18;
					changequest 2091,2092;
					close;
				case 2:
					close;
				}
			}
			else {
				mes "[Elder]";
				mes "Greetings, adventurer.";
				mes "How goes your search for";
				mes "the remains of the spirits";
				mes "that still cling to this plane?";
				next;
				mes "[Elder]";
				mes "Wait...";
				mes "Why do I sense";
				mes "that you've found";
				mes "something, but have";
				mes "not brought it with you?";
				mes "You must retrace your steps!";
				close;
			}
		}
		else if (lhz_curse == 18) {
			if ((countitem(523) > 4) && (countitem(744) > 0) && (countitem(7341) > 0)) {
				mes "[Elder]";
				mes "Good, good.";
				mes "All is in readiness.";
				mes "Please be silent as";
				mes "I focus my spirit for the";
				mes "great task before me.";
				next;
				mes "[Elder]";
				mes "...";
				mes "......";
				mes ".........";
				mes "Hooooooo...";
				specialeffect2 EF_BENEDICTIO;
				next;
				mes "[Elder]";
				mes "Yaaaaapp ---!";
				specialeffect2 EF_ASPERSIO;
				next;
				mes "[Elder]";
				mes "Whew! I've managed";
				mes "to nullify this curse for you.";
				mes "That still doesn't change the";
				mes "fact that what happened to this";
				mes "pendant's owner was tragic...";
				next;
				mes "[Elder]";
				mes "Why don't you bring";
				mes "this pendant to the place";
				mes "where it really belongs?";
				mes "I'm sure that would bring";
				mes "great comfort to its owner.";
				next;
				mes "^3355FFSuddenly, the clasp on";
				mes "the pendant pops open,";
				mes "revealing a picture of a happy";
				mes "couple. Somehow, the girl in";
				mes "the picture, sitting uncomfortably^FFFFFF^3355FF in an old chair, looks familiar...^000000";
				set lhz_curse,19;
				changequest 2092,2093;
				delitem 523,5; //Holy_Water
				delitem 744,1; //Bunch_Of_Flowers
				close;
			}
			else {
				mes "[Elder]";
				mes "Hurry and bring";
				mes "^3131FF5 Holy Water^000000 and";
				mes "^3131FF1 Bouquet^000000 in order";
				mes "for me to nullify this";
				mes "curse. Do not forget to";
				mes "bring the Pendant as well.";
				close;
			}
		}
		else {
			mes "[Elder]";
			mes "Predators are always";
			mes "on the lookout for easy";
			mes "prey. Be careful, youngster!";
			mes "You look innocent enough";
			mes "to become a victim in the city.";
			next;
			switch(select("About Lighthalzen:About the Slum:????")) {
			case 1:
				mes "[Elder]";
				mes "Lighthalzen might seem";
				mes "like a splendid city at first,";
				mes "but you'll quickly learn that";
				mes "the poor are segregated from";
				mes "the rich and treated as less";
				mes "than second class citizens.";
				next;
				mes "[Elder]";
				mes "At first, separation between";
				mes "the rich and poor districts was";
				mes "subtly enforced. They built the";
				mes "railroad right between the two";
				mes "districts to make it easier for";
				mes "the rich to ignore the poor.";
				next;
				mes "[Elder]";
				mes "But now they even have";
				mes "guards to make sure that";
				mes "the poor can't bother the";
				mes "rich. I'm pretty sure that";
				mes "this segregation won't be";
				mes "ending anytime soon...";
				next;
				mes "[Elder]";
				mes "Now, I've heard that the";
				mes "Rekenber Corporation is";
				mes "actually providing jobs for";
				mes "people in the slums. Beggars";
				mes "can't be choosers, so I'm sure";
				mes "these jobs aren't that great.";
				close;
			case 2:
				mes "[Elder]";
				mes "To live in the slum is to";
				mes "be familiar with poverty,";
				mes "disease, condemnation";
				mes "and contempt. But we're all";
				mes "still people, you know, so let";
				mes "go of any of your misgivings.";
				next;
				mes "[Elder]";
				mes "We're struggling just";
				mes "to survive here. At the";
				mes "very least, please respect";
				mes "that. It's a fact that the";
				mes "people in the rich district";
				mes "seem to keep forgetting.";
				close;
			case 3:
				mes "[Elder]";
				mes "Well, if you need any";
				mes "help around here or have";
				mes "any questions, come back";
				mes "and ask me. I get the feeling";
				mes "that we'll probably meet again.";
				close;
			}
		}
	}
	else {
		if (lhz_curse < 1) {
			mes "[Elder]";
			mes "Predators are always";
			mes "on the lookout for easy";
			mes "prey. Be careful, youngster!";
			mes "You look innocent enough";
			mes "to become a victim in the city.";
			next;
			switch(select("About Lighthalzen:About the Slum:????")) {
			case 1:
				mes "[Elder]";
				mes "Lighthalzen might seem";
				mes "like a splendid city at first,";
				mes "but you'll quickly learn that";
				mes "the poor are segregated from";
				mes "the rich and treated as less";
				mes "than second class citizens.";
				next;
				mes "[Elder]";
				mes "At first, separation between";
				mes "the rich and poor districts was";
				mes "subtly enforced. They built the";
				mes "railroad right between the two";
				mes "districts to make it easier for";
				mes "the rich to ignore the poor.";
				next;
				mes "[Elder]";
				mes "But now they even have";
				mes "guards to make sure that";
				mes "the poor can't bother the";
				mes "rich. I'm pretty sure that";
				mes "this segregation won't be";
				mes "ending anytime soon...";
				next;
				mes "[Elder]";
				mes "Now, I've heard that the";
				mes "Rekenber Corporation is";
				mes "actually providing jobs for";
				mes "people in the slums. Beggars";
				mes "can't be choosers, so I'm sure";
				mes "these jobs aren't that great.";
				close;
			case 2:
				mes "[Elder]";
				mes "To live in the slum is to";
				mes "be familiar with poverty,";
				mes "disease, condemnation";
				mes "and contempt. But we're all";
				mes "still people, you know, so let";
				mes "go of any of your misgivings.";
				next;
				mes "[Elder]";
				mes "We're struggling just";
				mes "to survive here. At the";
				mes "very least, please respect";
				mes "that. It's a fact that the";
				mes "people in the rich district";
				mes "seem to keep forgetting.";
				close;
			case 3:
				mes "[Elder]";
				mes "Well, if you need any";
				mes "help around here or have";
				mes "any questions, come back";
				mes "and ask me. I get the feeling";
				mes "that we'll probably meet again.";
				close;
			}
		}
		else {
			mes "[Elder]";
			mes "Predators are always";
			mes "on the lookout for easy";
			mes "prey. Be careful, youngster!";
			mes "You look innocent enough";
			mes "to become a victim in the city.";
			next;
			switch(select("About Lighthalzen:About the Slum:????")) {
			case 1:
				mes "[Elder]";
				mes "Lighthalzen might seem";
				mes "like a splendid city at first,";
				mes "but you'll quickly learn that";
				mes "the poor are segregated from";
				mes "the rich and treated as less";
				mes "than second class citizens.";
				next;
				mes "[Elder]";
				mes "At first, separation between";
				mes "the rich and poor districts was";
				mes "subtly enforced. They built the";
				mes "railroad right between the two";
				mes "districts to make it easier for";
				mes "the rich to ignore the poor.";
				next;
				mes "[Elder]";
				mes "But now they even have";
				mes "guards to make sure that";
				mes "the poor can't bother the";
				mes "rich. I'm pretty sure that";
				mes "this segregation won't be";
				mes "ending anytime soon...";
				next;
				mes "[Elder]";
				mes "Now, I've heard that the";
				mes "Rekenber Corporation is";
				mes "actually providing jobs for";
				mes "people in the slums. Beggars";
				mes "can't be choosers, so I'm sure";
				mes "these jobs aren't that great.";
				close;
			case 2:
				mes "[Elder]";
				mes "To live in the slum is to";
				mes "be familiar with poverty,";
				mes "disease, condemnation";
				mes "and contempt. But we're all";
				mes "still people, you know, so let";
				mes "go of any of your misgivings.";
				next;
				mes "[Elder]";
				mes "We're struggling just";
				mes "to survive here. At the";
				mes "very least, please respect";
				mes "that. It's a fact that the";
				mes "people in the rich district";
				mes "seem to keep forgetting.";
				close;
			case 3:
				mes "[Elder]";
				mes "Well, if you need any";
				mes "help around here or have";
				mes "any questions, come back";
				mes "and ask me. I get the feeling";
				mes "that we'll probably meet again.";
				close;
			}
		}
	}
}

lhz_in03,32,162,3	script	Crippled Girl#li_tre	53,{
	if (lhz_curse == 23) {
		if (countitem(7341) > 0) {
			mes "["+strcharinfo(0)+"]";
			mes "Hey there, are";
			mes "you feeling alright?";
			next;
			mes "[Crippled Girl]";
			mes "Oh, thanks,";
			mes "I'm fine. But...";
			mes "Have we met before?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Yeah, we did.";
			mes "You should know who";
			mes "I am by now. Hey, you";
			mes "didn't forget, did you?";
			next;
			mes "[Lady]";
			mes "Oh, how do I put this?";
			mes "The fever she had for the";
			mes "last few days. She's gotten";
			mes "better, but she's forgotten";
			mes "everything that's happened";
			mes "in the past few weeks...";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Oh... Oh. I'm so";
			mes "sorry. But maybe this";
			mes "is for the best? Here,";
			mes "I think you should keep";
			mes "this pendant, though.";
			next;
			mes "^3131ffYou place the";
			mes "old pendant";
			mes "into her hands.^000000";
			next;
			specialeffect2 EF_FORESTLIGHT4;
			mes "...............";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "...";
			mes "......";
			next;
			mes "[Possessed "+strcharinfo(0)+"]";
			mes "^3131FFSetsu, please remember";
			mes "that I'd never do anything";
			mes "to hurt you. Forgive me for";
			mes "leaving you behind. I hope";
			mes "that one day we'll meet";
			mes "again, little princess.^000000";
			next;
			mes "[Possessed "+strcharinfo(0)+"]";
			mes "^3131FFUntil then, I want";
			mes "you to be happy, okay?";
			mes "Your brother's always";
			mes "gonna be looking out for";
			mes "you, one way or another...^000000";
			next;
			mes "[Setsu]";
			mes "My brother's...";
			mes "That's my brother's";
			mes "voice! Brother!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Eh? What? Whoa...";
			mes "What came over me?";
			mes "The last thing I reme--";
			next;
			mes "[Setsu]";
			mes "...";
			mes "......";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Well...";
			mes "This is awkward.";
			delitem 7341,1; //Worn_Out_Pendant
			set lhz_curse,24;
			close;
		}
		else {
			mes "["+strcharinfo(0)+"]";
			mes "Hey there, are";
			mes "you feeling alright?";
			next;
			mes "[Crippled Girl]";
			mes "Oh, thanks,";
			mes "I'm fine. But...";
			mes "Have we met before?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Yeah, we did.";
			mes "You should know who";
			mes "I am by now. Hey, you";
			mes "didn't forget, did you?";
			next;
			mes "[Lady]";
			mes "Oh, how do I put this?";
			mes "The fever she had for the";
			mes "last few days. She's gotten";
			mes "better, but she's forgotten";
			mes "everything that's happened";
			mes "in the past few weeks...";
			next;
			mes "^3131ffThis would be a good";
			mes "opportunity to give her the...^000000";
			close;
		}
	}
	else if (lhz_curse == 24) {
		mes "[Setsu]";
		mes "...";
		mes "......";
		close;
	}
	else if (lhz_curse == 25) {
		mes "[Setsu]";
		mes "Excuse me, I can't still";
		mes "walk but I don't cry";
		mes "anymore. I'm doing my best!";
		close;
	}
	else {
		mes "[Crippled Girl]";
		mes "...";
		mes "......";
		mes "*Sigh...*";
		next;
		select("Hello, how are you?");
		mes "[Crippled Girl]";
		mes "Oh, I'm fine,";
		mes "thanks for asking.";
		mes "I'm just waiting for";
		mes "somebody, that's all.";
		if (lhz_curse == 19) {
			next;
			switch(select("Show her the Pendant.:Okay, have a good day.")) {
			case 1:
				break;
			case 2:
				mes "[Crippled Girl]";
				mes "Okay,";
				mes "bye-bye...";
				close;
			}
			mes "["+strcharinfo(0)+"]";
			mes "Um, would you have";
			mes "any idea who might";
			mes "have owned this pendant?";
			next;
			if (countitem(7341) < 1) {
				mes "[Crippled Girl]";
				mes "What are you talking about?";
				close;
			}
			emotion e_gasp,"Crippled Girl#li_tre";
			mes "[Crippled Girl]";
			mes "Oh, that's mine!";
			mes "I gave it to my big brother";
			mes "before he went away on some";
			mes "sort of business trip. You must";
			mes "be his friend, is that right?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Actually, um,";
			mes "you know what...?";
			next;
			switch(select("Brutal Truth:Break it to her gently")) {
			case 1:
				mes "...";
				mes "......";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "...So basically, your";
				mes "brother's @lhz_ghost, oh right,";
				mes "did I mention he was dead?";
				mes "Anyway, so he's not alive";
				mes "anymore, but his spirit or";
				mes "whatever is still around and--";
				next;
				mes "[Crippled Girl]";
				mes "...";
				mes "......";
				next;
				mes "[Crippled Girl]";
				mes "...Dead?";
				mes "No! I don't believe you!";
				mes "He can't die! He was the";
				mes "bravest and the sweetest";
				mes "and the-- Leave me alone!";
				mes "Oh god, get the hell away!";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "...";
				mes "......";
				mes "Sheesh.";
				mes "Don't kill the";
				mes "messenger.";
				set lhz_curse,20;
				close2;
				warp "lighthalzen",322,323;
				end;
			case 2:
				if (countitem(7341) > 0) {
					mes "[Crippled Girl]";
					mes "Did you meet my";
					mes "big brother...?";
					next;
					mes "[Crippled Girl]";
					mes "My brother is a strong";
					mes "person, and I should be";
					mes "happy of that, because";
					mes "nothing could happen";
					mes "to him.";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "Um... yes. So...";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "Sure, your big brother must be happy.";
					mes "He'll come back sometime.";
					mes "You should sleep to be healthy";
					mes "once your brother returns.";
					next;
					mes "[Crippled Girl]";
					mes "Yes! I must be okay";
					mes "and be able to walk when my";
					mes "brother come.";
					next;
					mes "^3131ffYou place the";
					mes "old pendant";
					mes "into her hands.^000000";
					next;
					specialeffect2 EF_FORESTLIGHT4;
					mes "......";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "...............";
					next;
					mes "[Possessed "+strcharinfo(0)+"]";
					mes "^3131FFSetsu, please remember";
					mes "that I'd never do anything";
					mes "to hurt you. Forgive me for";
					mes "leaving you behind. I hope";
					mes "that one day we'll meet";
					mes "again, little princess.^000000";
					next;
					mes "[Possessed "+strcharinfo(0)+"]";
					mes "^3131FFUntil then, I want";
					mes "you to be happy, okay?";
					mes "Your brother's always";
					mes "gonna be looking out for";
					mes "you, one way or another...^000000";
					next;
					mes "[Setsu]";
					mes "My brother's...";
					mes "That's my brother's";
					mes "voice! Brother!";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "Eh? What? Whoa...";
					mes "What came over me?";
					mes "The last thing I reme--";
					next;
					mes "^FF0000Tears fall from the";
					mes "girl's face, then you...^000000";
					next;
					switch(select("Distract her:Comfort her")) {
					case 1:
						mes "["+strcharinfo(0)+"]";
						mes "Oh, all of this was a play...";
						mes "Y-yes a play, I was practising.";
						mes "Ha ha~ Is it okay, isn't it?";
						next;
						mes "[Setsu]";
						mes "Oh, you surprised me!";
						mes "Even though I didn't think";
						mes "it was really my brother, you know?";
						next;
						mes "["+strcharinfo(0)+"]";
						mes "Excuse me...";
						next;
						mes "[Setsu]";
						mes "I'll do my best!";
						mes "I must be okay when my brother return.";
						mes "He'll be very proud of me.";
						mes "Heh heh~";
						next;
						mes "["+strcharinfo(0)+"]";
						mes "Yes, I'm sure of that.";
						delitem 7341,1; //Worn_Out_Pendant
						set lhz_curse,25;
						close;
					case 2:
						mes "["+strcharinfo(0)+"]";
						mes "Crying have no use!";
						mes "You're a very pretty";
						mes "girl to be ruining your";
						mes "face with useless tears.";
						next;
						mes "[Setsu]";
						mes "............";
						next;
						mes "["+strcharinfo(0)+"]";
						mes "You should do your best";
						mes "to be healthy for the time";
						mes "your big brother return.";
						next;
						mes "[Setsu]";
						mes "Yes...";
						next;
						mes "["+strcharinfo(0)+"]";
						mes "Listen, when your brother";
						mes "return you'll celebrate in";
						mes "a beautiful place.";
						next;
						mes "[Setsu]";
						mes "Really?";
						mes "It's a promise then! Heh heh~";
						next;
						mes "["+strcharinfo(0)+"]";
						mes "I hope it'll be soon!";
						mes "When I return I want you to be";
						mes "able to walk. See you soon, then!";
						next;
						mes "[Setsu]";
						mes "I'll try hard!";
						delitem 7341,1; //Worn_Out_Pendant
						set lhz_curse,25;
						close;
					}
				}
				else {
					mes "[Crippled Girl]";
					mes "Did you meet my";
					mes "big brother...?";
					next;
					mes "[Crippled Girl]";
					mes "My brother is a strong";
					mes "person, and I should be";
					mes "happy of that, because";
					mes "nothing could happen";
					mes "to him.";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "Um... yes. So...";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "Sure, your big brother must be happy.";
					mes "He'll come back sometime.";
					mes "You should sleep to be healthy";
					mes "once your brother returns.";
					next;
					mes "[Crippled Girl]";
					mes "Yes! I must be okay";
					mes "and be able to walk when my";
					mes "brother come.";
					close;
				}
			}
		}
		close;
	}
}

lighthalzen,324,322,0	script	#li_door	45,2,2,{
OnTouch_:
	if ((lhz_curse > 19) && (lhz_curse < 23)) {
		mes "^3355FFThe door is locked.^000000";
		set lhz_curse,lhz_curse+1;
		close;
	}
	else if (lhz_curse > 23) {
		mes "^3355FFThe door is locked.^000000";
		next;
		mes "[Citizen]";
		mes "I'm sorry, but another";
		mes "epidemic is starting to";
		mes "spread around the slums.";
		mes "We're not going outside and we're keeping our children safe!";
		next;
		mes "[Citizen]";
		mes "Not to be unfriendly,";
		mes "but you should be careful";
		mes "too. The living conditions";
		mes "of this area aren't exactly";
		mes "sanitary, you know?";
		close;
	}
	else {
		warp "lhz_in03",15,162;
	}
	end;
}

lhz_in03,12,162,0	warp	#to_lhz		1,1,lighthalzen,321,322

lighthalzen,319,321,0	script	#li_bother	-1,2,2,{ //3,3
OnTouch_:
	if ((lhz_curse == 24 ) || (lhz_curse == 25)) {
		mes ".............";
		next;
		mes "*Shhhzzzzzzz!*";
		specialeffect2 EF_MAPPILLAR;
		next;
		mes "[????]";
		mes "...........";
		next;
		mes "[????]";
		mes "^FF0000...I'm sorry...";
		mes "......I appreciate";
		mes "that you.............^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "H-huh?!";
		mes "What was that?";
		mes "That can't be the";
		mes "wind, I must be";
		mes "hearing things again...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Wait. I thought I was";
		mes "rid of those thoughts";
		mes "or spirits, whatever was";
		mes "haunting me before. Maybe";
		mes "they still want me to do";
		mes "something for them. Hmmm...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I get the feeling that";
		mes "all of their suffering";
		mes "is tied to the ^FF0000Rekenber";
		mes "Corporation^000000 and that";
		mes "^FF0000Regenschirm Laboratory^000000.";
		set lhz_curse,26;
		changequest 2093,2094;
		if (checkre(3)) {
			if (BaseLevel < 70) getexp 30000,30000;
			else if ((BaseLevel > 69) && (BaseLevel < 80)) getexp 40000,70000;
			else if ((BaseLevel > 79) && (BaseLevel < 90)) getexp 70000,90000;
			else getexp 90000,90000;
		} else {
			if (BaseLevel < 70) getexp 800000,300000;
			else if ((BaseLevel > 69) && (BaseLevel < 80)) getexp 1000000,500000;
			else if ((BaseLevel > 79) && (BaseLevel < 90)) getexp 1500000,800000;
			else getexp 2000000,1000000;
		}
		close;
	}
	end;
}

lhz_in01,114,181,5	script	Representative#li_01	71,{
	if (lhz_curse == 7) {
		mes "[Representative]";
		mes "Greetings, and welcome";
		mes "to the Rekenber Corporation.";
		mes "How may I be of service today?";
		next;
		switch(select("Building Information:Corporation History")) {
		case 1:
			mes "[Representative]";
			mes "Please tell me";
			mes "which floor you'd like";
			mes "to know more about.";
			next;
			while (1) {
				switch(select("1F:2F:B1:Cancel")) {
				case 1:
					mes "[Representative]";
					mes "The ^3131FFRekenber Library^000000 can";
					mes "be found at the end of the";
					mes "left hallway. Our library is";
					mes "a great resource of innovative";
					mes "ideas and information for our";
					mes "system development employees.";
					next;
					mes "[Representative]";
					mes "The ^3131FFBall Room^000000, where";
					mes "various official events are";
					mes "usually held, can be accessed";
					mes "through the right hallway.";
					next;
					break;
				case 2:
					mes "[Representative]";
					mes "Please use the stairs";
					mes "located on both sides of";
					mes "the Help Desk to go to the";
					mes "Second Floor. The Second";
					mes "Floor is mostly used for";
					mes "administrative purposes.";
					next;
					mes "[Representative]";
					mes "There, you can find";
					mes "the ^3131FFConference Room^000000,";
					mes "^3131FFSecretary's Office^000000, the";
					mes "^3131FFAuditorium^000000 and the";
					mes "^3131FFChairman's Office^000000.";
					next;
					break;
				case 3:
					mes "[Representative]";
					mes "The first underground floor";
					mes "is used by ^3131FFRegenschirm^000000,";
					mes "our laboratory affiliate. For";
					mes "security reasons, this floor";
					mes "is not accessible to visitors.";
					next;
					break;
				case 4:
					mes "[Representative]";
					mes "We are always doing our";
					mes "best to provide the best";
					mes "services to our customers.";
					mes "Remember that Rekenber";
					mes "is the name you can trust.";
					mes "Thank you and have a nice day.";
					close;
				}
			}
		case 2:
			mes "[Representative]";
			mes "If you're interested in";
			mes "learning the history of";
			mes "our corporation, please";
			mes "speak to the representative";
			mes "inside our Library. Thank you.";
			next;
			mes "[Representative]";
			mes "Please head down";
			mes "the hallway to the left in";
			mes "order to find our Library.";
			mes "Thank you and have a nice day.";
			set lhz_curse,8;
			changequest 2087,2088;
			close;
		}
	}
	else {
		mes "[Representative]";
		mes "Greetings, and welcome";
		mes "to the Rekenber Corporation.";
		mes "How may I be of service today?";
		next;
		switch(select("Building Information.")) {
		case 1:
			mes "[Representative]";
			mes "Please tell me";
			mes "which floor you'd like";
			mes "to know more about.";
			next;
			while (1) {
				switch(select("1F:2F:B1:Cancel")) {
				case 1:
					mes "[Representative]";
					mes "The ^3131FFRekenber Library^000000 can";
					mes "be found at the end of the";
					mes "left hallway. Our library is";
					mes "a great resource of innovative";
					mes "ideas and information for our";
					mes "system development employees.";
					next;
					mes "[Representative]";
					mes "The ^3131FFBall Room^000000, where";
					mes "various official events are";
					mes "usually held, can be accessed";
					mes "through the right hallway.";
					next;
					break;
				case 2:
					mes "[Representative]";
					mes "Please use the stairs";
					mes "located on both sides of";
					mes "the Help Desk to go to the";
					mes "Second Floor. The Second";
					mes "Floor is mostly used for";
					mes "administrative purposes.";
					next;
					mes "[Representative]";
					mes "There, you can find";
					mes "the ^3131FFConference Room^000000,";
					mes "^3131FFSecretary's Office^000000, the";
					mes "^3131FFAuditorium^000000 and the";
					mes "^3131FFChairman's Office^000000.";
					next;
					break;
				case 3:
					mes "[Representative]";
					mes "The first underground floor";
					mes "is used by ^3131FFRegenschirm^000000,";
					mes "our laboratory affiliate. For";
					mes "security reasons, this floor";
					mes "is not accessible to visitors.";
					next;
					break;
				case 4:
					mes "[Representative]";
					mes "We are always doing our";
					mes "best to provide the best";
					mes "services to our customers.";
					mes "Remember that Rekenber";
					mes "is the name you can trust.";
					mes "Thank you and have a nice day.";
					close;
				}
			}
		}
	}
}

lhz_in01,27,247,5	script	Representative#li_02	71,{
	if (lhz_curse > 6) {
		mes "[Representative]";
		mes "Welcome to the";
		mes "Rekenber Corporation.";
		mes "How may I help you?";
		next;
		switch(select("Corporation History:Rekenber's Businesses")) {
		case 1:
			mes "[Representative]";
			mes "Rekenber was established";
			mes "400 years ago, around the";
			mes "same time as the foundation";
			mes "of the Schwaltzvalt Republic.";
			next;
			mes "[Representative]";
			mes "We began as the ''Zent Zerter";
			mes "Lighthal Research Center,''";
			mes "named after our first chairman.";
			mes "In 560 A.W. (After War), our";
			mes "organization was renamed after";
			mes "our new chairman, Mr. Rekenber.";
			next;
			mes "[Representative]";
			mes "Mr. Rekenber expanded the";
			mes "Corporation's purposes, but";
			mes "also founded the Regenschirm";
			mes "Laboratory to continue this";
			mes "company's original goal of";
			mes "scientific research.";
			next;
			mes "[Representative]";
			mes "In the year 700 A.W.,";
			mes "^FF0000Doctor Varmunt^000000 joined";
			mes "Regenschirm. It was his work";
			mes "in science that enabled the";
			mes "Rekenber Corporation to grow into the nation's biggest company.";
			if (lhz_curse == 8) set lhz_curse,9;
			else if (lhz_curse == 9) set lhz_curse,10;
			next;
			break;
		case 2:
			mes "[Representative]";
			mes "In addition to merchandising,";
			mes "freight transport and trading,";
			mes "the Rekenber Corporation is";
			mes "also heavily involved with";
			mes "providing the Airship service,";
			mes "one of our major projects.";
			next;
			mes "[Representative]";
			mes "Rekenber is involved in";
			mes "almost any business that";
			mes "you can imagine. Remember";
			mes "that Rekenber is the name";
			mes "that you can trust.";
			if (lhz_curse == 8) set lhz_curse,9;
			else if (lhz_curse == 9) set lhz_curse,10;
			next;
			break;
		}
		mes "[Representative]";
		mes "If you'd like to know more";
		mes "about our mission statement,";
		mes "please refer to the Rekenber";
		mes "Guidebook located to my side.";
		mes "Thank you and have a nice day.";
		if (isbegin_quest(2088))
			changequest 2088,2089;
		close;
	}
	else {
		mes "[Representative]";
		mes "Welcome to the";
		mes "Rekenber Corporation.";
		mes "How may I help you?";
		next;
		switch(select("Building Information.")) {
		case 1:
			mes "[Representative]";
			mes "Please tell me";
			mes "which floor you'd like";
			mes "to know more about.";
			next;
			while (1) {
				switch(select("1F:2F:B1:Cancel")) {
				case 1:
					mes "[Representative]";
					mes "The ^3131FFRekenber Library^000000 can";
					mes "be found at the end of the";
					mes "left hallway. Our library is";
					mes "a great resource of innovative";
					mes "ideas and information for our";
					mes "system development employees.";
					next;
					mes "[Representative]";
					mes "The ^3131FFBall Room^000000, where";
					mes "various official events are";
					mes "usually held, can be accessed";
					mes "through the right hallway.";
					next;
					break;
				case 2:
					mes "[Representative]";
					mes "Please use the stairs";
					mes "located on both sides of";
					mes "the Help Desk to go to the";
					mes "Second Floor. The Second";
					mes "Floor is mostly used for";
					mes "administrative purposes.";
					next;
					mes "[Representative]";
					mes "There, you can find";
					mes "the ^3131FFConference Room^000000,";
					mes "^3131FFSecretary's Office^000000, the";
					mes "^3131FFAuditorium^000000 and the";
					mes "^3131FFChairman's Office^000000.";
					next;
					break;
				case 3:
					mes "[Representative]";
					mes "The first underground floor";
					mes "is used by ^3131FFRegenschirm^000000,";
					mes "our laboratory affiliate. For";
					mes "security reasons, this floor";
					mes "is not accessible to visitors.";
					next;
					break;
				case 4:
					mes "[Representative]";
					mes "We are always doing our";
					mes "best to provide the best";
					mes "services to our customers.";
					mes "Remember that Rekenber";
					mes "is the name you can trust.";
					mes "Thank you and have a nice day.";
					close;
				}
			}
		}
	}
}

lhz_in01,25,251,3	script	Rekenber Guidebook#li	111,{
	mes "..............";
	next;
	mes "^3131FF#The Vision^000000";
	mes "In the pursuit of knowledge,";
	mes "Rekenber will search the";
	mes "Rune-Midgart continent for";
	mes "ancient relics. We hope to make";
	mes "significant scientific progress by learning the secrets of the past.";
	next;
	mes "By making scientific";
	mes "headway, we hope we can";
	mes "improve current technologies";
	mes "to provide more convenient";
	mes "and affordable services in";
	mes "the Schwaltzvalt Republic.";
	next;
	mes "^3131FF#The Commitment^000000";
	mes "Although magic and the";
	mes "power of the gods has always";
	mes "maintained an aura of mystery";
	mes "and superstition, Rekenber hopes^FFFFFF ^3131FF to understand these forces from";
	mes "a more logical standpoint.";
	next;
	mes "^FF0000Our goal is to make";
	mes "the lives of our customers";
	mes "easier and more enjoyable";
	mes "by making the ancient power";
	mes "of the gods more accessible";
	mes "by means of new technologies.";
	if (lhz_curse == 10) set lhz_curse,11;
	next;
	mes "..............";
	close;
}

lhz_in01,273,121,1	script	Mad Scientist#li	865,{
	if (lhz_curse == 13) {
		mes "[Wolfchev]";
		mes "No one shall";
		mes "interrupt my";
		mes "research! If you";
		mes "dare, I'll simply...";
		mes "Eat you. Eat you alive.";
		next;
		switch(select("No... N-no!:Do you need any help?")) {
		case 1:
			mes "[Wolfchev]";
			mes "Out of my sight,";
			mes "microcephalic fool!";
			close;
		case 2:
			mes "[Wolfchev]";
			mes "Huh? You think I have";
			mes "the luxury of remembering";
			mes "the face of every part-timer";
			mes "I've fired? Get lost, or I'll";
			mes "treat you to the pain of";
			mes "being eaten alive!";
			set lhz_curse,14;
			close;
		}
	}
	else if (lhz_curse == 14) {
		mes "[Wolfchev]";
		mes "You again?!";
		mes "What the hell do";
		mes "you want from me?!";
		emotion e_ag,"Mad Scientist#li";
		next;
		switch(select("Let me speak with you.:Sorry for bothering you.")) {
		case 1:
			mes "[Wolfchev]";
			mes "I don't have time to";
			mes "waste with drivel! I'm";
			mes "too busy with my research!";
			next;
			mes "[Wolfchev]";
			mes "...........!";
			emotion e_gasp,"Mad Scientist#li";
			next;
			mes "[Wolfchev]";
			mes "Ah, but wait! I am collecting";
			mes "something. Yes, bring me the";
			mes "thing I must collect. Yes, yes.";
			mes "Here's a hint... It's round...";
			mes "Shiny... Kids love playing games with them! Oh, I said too much!";
			set lhz_curse,15;
			changequest 2089,2090;
			close;
		case 2:
			emotion e_an,"Mad Scientist#li";
			mes "[Wolfchev]";
			mes "''Sorry?!'' Do you";
			mes "think ''sorry'' will";
			mes "get back that precious";
			mes "minute I've lost yelling";
			mes "at you?! Get the hell out!";
			close;
		}
	}
	else if (lhz_curse == 15) {
		if (countitem(746) > 0) {
			delitem 746,1; //Glass_Bead
			mes "[Wolfchev]";
			mes "Yes...! Beads!";
			mes "You brought them!";
			mes "You're not as dumb";
			mes "as I thought you'd be!";
			next;
			switch(select("Why do you want Glass Beads?")) {
			case 1:
				mes "[Wolfchev]";
				mes "..................";
				mes "I take that back!";
				mes "You should know by";
				mes "now that I would never";
				mes "tell you why I neeeeed";
				mes "these Beads. Bweh-heh!";
				emotion e_gg,"Mad Scientist#li";
				next;
				break;
			}
			mes "[Wolfchev]";
			mes "This favor you've done";
			mes "is worth a small chat and";
			mes "I can spare a minute or two";
			mes "for you inane questions. So";
			mes "what is it you want to know?!";
			next;
			while (1) {
				switch(select("Ask about hobbies:Ask about work")) {
				case 1:
					if (Sex == SEX_MALE) {
						mes "[Wolfchev]";
						mes "Hyuu~ I think you're";
						mes "just a little too innocent";
						mes "to know about my secret";
						mes "hobby. Yes, yes, I couldn't";
						mes "tell you possibly, it'd be";
						mes "so weird, so strange...";
						next;
					}
					else {
						mes "[Wolfchev]";
						mes "Oh. Oh no, oh no,";
						mes "I couldn't possibly...";
						mes "It's a-- I-It's a secret.";
						mes "You wouldn't want to know";
						mes "anyway. Bweh-heh-heh-heh!";
						next;
					}
					break;
				case 2:
					mes "[Wolfchev]";
					mes "Oh, I don't know if you";
					mes "can call it work. After all,";
					mes "I do research whatever it is";
					mes "I want. And they pay me to";
					mes "do it! This is the best place";
					mes "for a scientist like me, yes.";
					next;
					mes "[Wolfchev]";
					mes "Now, in a perfect world,";
					mes "my test subjects would be";
					mes "much more cooperative, but";
					mes "I suppose I cannot blame";
					mes "them. Not that I cause them";
					mes "undue suffering or anything...";
					next;
					set .@exit,1;
					break;
				}
				if (.@exit) break;
			}
			switch(select("What kind of research?")) {
			case 1:
				mes "[Wolfchev]";
				mes "Well, I couldn't tell you";
				mes "exactly. But don't you";
				mes "worry, the discovery I'm";
				mes "working on will benefit the";
				mes "entire world, you'll see.";
				next;
				mes "[Wolfchev]";
				mes "Let's just say that once";
				mes "I'm successful, I'll satisfy";
				mes "one of mankind's most primal";
				mes "instincts, the desire to become";
				mes "powerful and gain dominance";
				mes "over those that are weaker.";
				next;
				mes "[Wolfchev]";
				mes "I haven't made as much";
				mes "progress as I'd like, but";
				mes "no matter. It's only a matter";
				mes "of experimentation! Yes, to";
				mes "make mankind stronger and";
				mes "better and more powerful and--";
				next;
				break;
			}
			select("Um, what are you testing on?");
			mes "[Wolfchev]";
			mes "What do you know?";
			mes "I better get back to";
			mes "work if I wish to keep";
			mes "on schedule. I can't afford";
			mes "the leisure of speaking with";
			mes "you any longer. Bweh heh heh!";
			set lhz_curse,16;
			close;
		}
		else {
			mes "[Wolfchev]";
			mes "I don't have time to";
			mes "waste with drivel! I'm";
			mes "too busy with my research!";
			next;
			mes "[Wolfchev]";
			mes "...........!";
			emotion e_gasp,"Mad Scientist#li";
			next;
			emotion e_gg,"Mad Scientist#li";
			mes "[Wolfchev]";
			mes "Ah, but wait! I am collecting";
			mes "something. Yes, bring me the";
			mes "thing I must collect. Yes, yes.";
			mes "Here's a hint... It's round...";
			mes "Shiny... Kids love playing games with them! Oh, I said too much!";
			close;
		}
	}
}

lhz_in01,286,226,3	script	Secretary Slierre#li	831,{
	if (lhz_curse == 26) {
		mes "[Sueii Slierre]";
		mes "Excuse me, but you are";
		mes "not allowed to be in here.";
		mes "If you have questions regarding";
		mes "the Rekenber Corporation, I can";
		mes "direct you to someone qualified";
		mes "to give you an answer.";
		next;
		switch(select("About the Slums:About Secretary Slierre")) {
		case 1:
			mes "[Sueii Slierre]";
			mes "The slums? All I know";
			mes "is that this corporation";
			mes "specifically targeted that";
			mes "area in order to provide ample";
			mes "opportunity for employment.";
			set lhz_curse,27;
			close;
		case 2:
			mes "[Sueii Slierre]";
			mes "I'm Sueii Slierre,";
			mes "the personal secretary";
			mes "for the chairman of the";
			mes "Rekenber Corporation.";
			close;
		}
	}
	else if (lhz_curse == 27) {
		mes "[Sueii Slierre]";
		mes "Did you have something";
		mes "else to ask? I can only";
		mes "divulge information that is";
		mes "public knowledge, but I can";
		mes "tell you who to contact for";
		mes "more specific inquiries.";
		next;
		switch(select("About the Laboratory:About the Corporation")) {
		case 1:
			mes "[Sueii Slierre]";
			mes "Rekenber is perhaps the";
			mes "biggest contributer of the";
			mes "Regenschirm Laboratory.";
			mes "Their work will benefit the";
			mes "entire Rune-Midgard continent, hence our highly involved support.";
			next;
			mes "[Sueii Slierre]";
			mes "A representative at the";
			mes "Help Desk will be happy";
			mes "to assist you if you have";
			mes "more inquiries regarding";
			mes "the Regenschirm Laboratory.";
			set lhz_curse,28;
			close;
		case 2:
			mes "[Sueii Slierre]";
			mes "I'm sorry, but I don't have";
			mes "any special information";
			mes "regarding our corporation.";
			mes "Why don't you ask one of";
			mes "our representatives at the";
			mes "Help Desk to learn more?";
			close;
		}
	}
	else if (lhz_curse == 28) {
		mes "[Sueii Slierre]";
		mes "You're back? I really";
		mes "doubt that I can be of";
		mes "any assistance to you.";
		next;
		switch(select("Wolfchev's Research")) {
		case 1:
			mes "[Sueii Slierre]";
			mes ".............!";
			emotion e_gasp,"Secretary Slierre#li";
			next;
			mes "[Sueii Slierre]";
			mes "How do you know";
			mes "Wolfchev? Are you an";
			mes "acquaintance of his or...?";
			next;
			switch(select("I'm a friend of his.:Oh, we're family, you know...:I've heard about him before, so...")) {
			case 1:
				mes "[Sueii Slierre]";
				mes "Well, Wolfchev is not";
				mes "only brilliant, he's also";
				mes "a respected professional.";
				mes "He should be doing just fine.";
				next;
				break;
			case 2:
				mes "[Sueii Slierre]";
				mes "Ah, you should be";
				mes "very proud of Wolfchev.";
				mes "In addition to being a";
				mes "genius, Wolfchev is also";
				mes "quite the professional,";
				mes "truly a model scientist.";
				next;
				break;
			case 3:
				mes "[Sueii Slierre]";
				mes "Ah yes, Wolfchev has";
				mes "quite the reputation. In";
				mes "fact, he's in such high";
				mes "demand that Regenschirm";
				mes "wants him on their staff.";
				close;
			}
			mes "[Sueii Slierre]";
			mes "Now if you'll excuse me,";
			mes "I have many task to perform,";
			mes "so please visit our Help Desk";
			mes "if you have further inquiries.";
			next;
			switch(select("W-Wait!:Alright, I understand.")) {
			case 1:
				mes "[Sueii Slierre]";
				mes "...";
				mes "......";
				next;
				break;
			case 2:
				mes "[Sueii Slierre]";
				mes "Thank you for your";
				mes "cooperation. As you well";
				mes "know, the Help Desk is there";
				mes "to answer any of your questions regarding the Rekenber Corporation.";
				close;
			}
			mes "[Sueii Slierre]";
			mes "I'm sorry, but please";
			mes "understand that my office";
			mes "isn't the place for visitors to";
			mes "submit their general inquiries.";
			mes "Please visit the Help Desk if";
			mes "you have any more questions.";
			next;
			select("About Wolfchev's Research");
			emotion e_dots,"Secretary Slierre#li";
			mes "[Sueii Slierre]";
			mes "I couldn't tell you any";
			mes "more about Wolfchev.";
			mes "But is there anything you";
			mes "need to tell me about him?";
			mes "Well, if you have something";
			mes "to ask, be quick about it.";
			next;
			switch(select("Wolfchev's Past:Wolfchev's Test Subjects")) {
			case 1:
				mes "[Sueii Slierre]";
				mes "I remember hearing that he";
				mes "received a high recommendation";
				mes "to work here, but specifics elude me since I don't work in Human";
				mes "Resources. There's a rumor that";
				mes "he had a troubled love life...";
				next;
				mes "[Sueii Slierre]";
				mes "But aside from a few";
				mes "rumors, we really don't";
				mes "know much about Wolfchev's";
				mes "personal life. But then again,";
				mes "it may be unethical to pry too";
				mes "much into our employee's lives.";
				close;
			case 2:
				break;
			}
			mes "[Sueii Slierre]";
			mes "Wolfchev's test subjects?";
			mes "Well, I know we have a policy";
			mes "of using the most humane";
			mes "methods depending on the";
			mes "experiment. And of course, he should only be testing on animals.";
			next;
			switch(select("Wolfchev's research is great!:His experiments are suspicious...")) {
			case 1:
				mes "[Sueii Slierre]";
				mes "Yes, yes, I'd agree if";
				mes "I understood science a";
				mes "little bit better. Now, you'll";
				mes "have to excuse me. I've been distracted long enough as it is...";
				close2;
				warp "lhz_in01",228,226;
				end;
			case 2:
				mes "[Sueii Slierre]";
				mes "What exactly do you mean?";
				mes "Are you sure that you haven't";
				mes "misunderstood anything about";
				mes "Wolfchev's work? You'll need";
				mes "to illustrate your claim for us";
				mes "to be on the same page...";
				next;
				switch(select("Show Evidence:Cancel")) {
				case 1:
					if (countitem(7345) > 0) {
						mes "^3355FFYou reveal the Handcuffs";
						mes "you found in the laboratory,";
						mes "and Secretary Slierre's face";
						mes "is instantly shadowed by a";
						mes "deeply troubled look.^000000";
						next;
						mes "[Sueii Slierre]";
						mes "...";
						mes "......";
						next;
						select("What's Regenschirm up to?:What's Wolfchev up to?");
						mes "[Sueii Slierre]";
						mes "...";
						mes "......";
						emotion e_ic,"Secretary Slierre#li";
						next;
						mes "[Sueii Slierre]";
						mes "So... You're";
						mes "suspicious about";
						mes "Wolfchev's research in";
						mes "the Regenschirm Laboratory?";
						next;
						switch(select("Yes:No")) {
						case 1:
							break;
						case 2:
							mes "[Sueii Slierre]";
							mes "Wait, what exactly";
							mes "do you feel suspicious";
							mes "about? Basically, which";
							mes "party do you feel is most";
							mes "at fault in this situation?";
							next;
							switch(select("Regenschirm:Mr. Wolfchev")) {
							case 1:
								mes "[Sueii Slierre]";
								mes "Let me assure you that";
								mes "Regenschirm has a strict set";
								mes "of protocals and procedures";
								mes "to ensure safety and the";
								mes "prevention of unnecessary";
								mes "cruelty in experimentation.";
								next;
								switch(select("What about the creatures in Regenschirm?")) {
								case 1:
									mes "[Sueii Slierre]";
									mes "Creatures? I would";
									mes "guess that they're the";
									mes "result of experimentation.";
									mes "But I wouldn't know for sure.";
									next;
									break;
								}
								break;
							case 2:
								break;
							}
							break;
						}
						mes "[Sueii Slierre]";
						mes "I can't be sure right";
						mes "now, but this looks like";
						mes "fairly concrete evidence.";
						mes "We'll send some people over";
						mes "to Regenschirm right away!";
						next;
						mes "[Sueii Slierre]";
						mes "For now, your claim";
						mes "merits an investigation.";
						mes "I'll let you know if we";
						mes "find anything significant...";
						set lhz_curse,30;
						close;
					}
					else {
						mes "[Sueii Slierre]";
						mes "Evidence...?";
						mes "I'm sorry, but you don't";
						mes "seem to be carrying anything";
						mes "that can be construed as proof.";
						mes "I suggest you bring something that actually supports your claim.";
						set lhz_curse,29;
						close;
					}
					break;
				case 2:
					mes "[Sueii Slierre]";
					mes "If you're finished,";
					mes "I'd like to get back on";
					mes "task. Please excuse me.";
					close2;
					set lhz_curse,30;
					end;
				}
				break;
			}
			break;
		}
	}
	else if (lhz_curse == 29) {
		mes "[Sueii Slierre]";
		mes "Hmm, have you come back";
		mes "to address your claim about";
		mes "Wolfchev's work? If you don't";
		mes "have any evidence, then you";
		mes "shouldn't be making rumors...";
		next;
		if (countitem(7345) > 0) {
			mes "^3355FFYou reveal the Handcuffs";
			mes "you found in the laboratory,";
			mes "and Secretary Slierre's face";
			mes "is instantly shadowed by a";
			mes "deeply troubled look.^000000";
			next;
			mes "[Sueii Slierre]";
			mes "...";
			mes "......";
			next;
			select("What's Regenschirm up to?:What's Wolfchev up to?");
			mes "[Sueii Slierre]";
			mes "...";
			mes "......";
			emotion e_ic,"Secretary Slierre#li";
			next;
			mes "[Sueii Slierre]";
			mes "So... You're";
			mes "suspicious about";
			mes "Wolfchev's research in";
			mes "the Regenschirm Laboratory?";
			next;
			switch(select("Yes:No")) {
			case 1:
				break;
			case 2:
				mes "[Sueii Slierre]";
				mes "Wait, what exactly";
				mes "do you feel suspicious";
				mes "about? Basically, which";
				mes "party do you feel is most";
				mes "at fault in this situation?";
				next;
				switch(select("Regenschirm:Mr. Wolfchev")) {
				case 1:
					mes "[Sueii Slierre]";
					mes "Let me assure you that";
					mes "Regenschirm has a strict set";
					mes "of protocals and procedures";
					mes "to ensure safety and the";
					mes "prevention of unnecessary";
					mes "cruelty in experimentation.";
					next;
					switch(select("What about the creatures in Regenschirm?")) {
					case 1:
						mes "[Sueii Slierre]";
						mes "Creatures? I would";
						mes "guess that they're the";
						mes "result of experimentation.";
						mes "But I wouldn't know for sure.";
						next;
						break;
					}
					break;
				case 2:
					break;
				}
				break;
			}
			mes "[Sueii Slierre]";
			mes "I can't be sure right";
			mes "now, but this looks like";
			mes "fairly concrete evidence.";
			mes "We'll send some people over";
			mes "to Regenschirm right away!";
			next;
			mes "[Sueii Slierre]";
			mes "For now, your claim";
			mes "merits an investigation.";
			mes "I'll let you know if we";
			mes "find anything significant...";
			set lhz_curse,30;
			close;
		}
		else {
			mes "[Sueii Slierre]";
			mes "Hmm. I can't consider";
			mes "whatever you brought this";
			mes "time as evidence that would";
			mes "allay my doubts about your";
			mes "claim. Now, if you'll excuse";
			mes "me, I need to get back on task.";
			set lhz_curse,29;
			close2;
			warp "lhz_in01",228,226;
			end;
		}
	}
	else if (lhz_curse == 30) {
		set .@li_keka,rand(1,10);
		if (.@li_keka > 7) {
			if (checkweight(1201,1) == 0) {
				mes "[Sueii Slierre]";
				mes "Oh, I'd like to have";
				mes "a word with you. Would";
				mes "you please come back after";
				mes "reducing the weight of the";
				mes "items you are carrying please?";
				close;
			}
			mes "[Sueii Slierre]";
			mes "Oh good, you're here.";
			mes "You were right all along.";
			mes "In our investigation, we found";
			mes "that Wolfchev was conducting";
			mes "unauthorized and very dangerous";
			mes "research. I owe you our thanks.";
			next;
			select("What was he doing...?");
			mes "[Sueii Slierre]";
			mes "It turns out that Wolfchev";
			mes "was kidnapping weak and sick";
			mes "people from the slums and";
			mes "using them as his guinea pigs.";
			mes "Rest assured, he'll be punished";
			mes "for his behavior, if not fired.";
			next;
			mes "[Sueii Slierre]";
			mes "I think you deserve an";
			mes "apology. Without your";
			mes "report, our corporation's";
			mes "reputation could have been";
			mes "potentially damaged. Thank you.";
			next;
			mes "[Sueii Slierre]";
			mes "Yes, there's nothing so";
			mes "taboo as trying to perform";
			mes "Homunculus experiments";
			mes "on people! Anyway, please";
			mes "accept this as a token of";
			mes "our gratitude, adventurer.";
			set lhz_curse,31;
			changequest 2094,2095;
			getitem 603,1; //Old_Blue_Box
			getitem 12016,10; //Speed_Up_Potion
			next;
			mes "[Sueii Slierre]";
			mes "Let me promise you";
			mes "that Rekenber will ensure";
			mes "that this kind of incident";
			mes "will not be repeated and";
			mes "we'll do everything in our";
			mes "power to compensate for this...";
			close;
		}
		else {
			mes "[Sueii Slierre]";
			mes "Oh, our investigation";
			mes "of your claim is still in";
			mes "progress. However, we";
			mes "will let you know when any";
			mes "new developments arise.";
			close;
		}
	}
	else if (lhz_curse > 30) {
		mes "[Sueii Slierre]";
		mes "I'm glad to know that";
		mes "we have such proactive";
		mes "and concerned customers";
		mes "such as yourself to support";
		mes "the Rekenber Corporation.";
		close;
	}
	else {
		mes "[Sueii Slierre]";
		mes "Excuse me, but you are";
		mes "not allowed to be in here.";
		mes "Please visit the Help Desk";
		mes "if you have any questions about";
		mes "the Rekenber Corporation.";
		mes "Thank you for cooperating.";
		close;
	}
}

lhz_que01,94,24,0	script	#li_end	-1,2,2,{
OnTouch_:
	if (lhz_curse > 30) {
		mes "^3131FFThere's no trace of";
		mes "that mad scientist. Only";
		mes "his stacks of well organized";
		mes "files remain here in the lab.^000000";
		if (lhz_curse == 31) {
			set lhz_curse,32;
			completequest 2095;
		}
		close;
	}
	end;
}

lhz_in01,43,114,0	script	#li_toend	45,1,1,{
OnTouch_:
	if (lhz_curse > 30) {
		warp "lhz_que01",97,30;
	}
	else {
		warp "lhz_in01",277,130;
	}
	end;
}

lhz_que01,97,33,0	warp	#li_toin01	1,1,lhz_in01,43,120
lhz_in01,278,132,0	warp	#li_toin02	1,1,lhz_in01,43,120

lhz_que01,89,15,3	script	File#li	111,{
	mes "Name: Engeod";
	mes "Age: XX";
	mes "Height: XXX";
	mes "Weight: XX";
	next;
	mes "Name: Kashutii";
	mes "Age: XX";
	mes "Height: XXX";
	mes "Weight: XX";
	next;
	mes "Name: Prufoz";
	mes "Age: XX";
	mes "Height: XXX";
	mes "Weight: XX";
	close;
}

lhz_in01,269,114,3	script	A File#li-1	111,{
	mes "Name: Engeod";
	mes "Age: XX";
	mes "Height: XXX";
	mes "Weight: XX";
	next;
	mes "Name: Kashutii";
	mes "Age: XX";
	mes "Height: XXX";
	mes "Weight: XX";
	next;
	mes "Name: Prufoz";
	mes "Age: XX";
	mes "Height: XXX";
	mes "Weight: XX";
	close;
}

// President Quest, a.k.a. Schwartzvalt Triology Quest
//============================================================
lighthalzen,179,170,4	script	Ordinary Man	98,{

	if(!lhz_boss)
	{
		mes "[Ghalstein]";
		mes "Hello there~";
		mes "Isn't Lighthalzen such";
		mes "a wonder to behold with";
		mes "all of its splendor and";
		mes "magnificent beauty?";
		next;
		switch( select( "I guess.","Yes, it is.","Well, I don't know." ) )
		{
			case 1:
				mes "[Ghalstein]";
				mes "Oh, and the weather is";
				mes "so nice today, perfect";
				mes "for a stroll in the park";
				mes "or a lovely picnic. Ah~";
				break;

			case 2:
				mes "[Ghalstein]";
				mes "Oh, I'm so glad you";
				mes "agree. The people who";
				mes "live here are so kind and";
				mes "so happy, you can literally";
				mes "feel everyone's gentle warmth.";
				break;

			case 3:
				mes "[Ghalstein]";
				mes "Well, maybe if you";
				mes "don't see it right this";
				mes "moment, I'm sure you'll";
				mes "discover something to";
				mes "love about this city soon.";
				break;
		}
		next;
		if(BaseLevel < 60)
		{
			mes "[Ghalstein]";
			mes "Ha ha ha!";
			mes "Anyway, I hope you";
			mes "have a good day today~";
			close;
		}
		mes "[Ghalstein]";
		mes "Yes, Lighthalzen";
		mes "couldn't be perfecter.";
		mes "Ahahahaha... But still...";
		mes "Hm. Um. Oh, never mind.";
		next;
		mes "[Ghalstein]";
		mes "Ha ha ha!";
		mes "Anyway, I hope you";
		mes "have a good day today~";
		set lhz_boss,1;
		close;
	}
	else if(lhz_boss == 1)
	{
		if(rand(1,5) == 4)
		{
			mes "[Ghalstein]";
			mes "Hm? It's a little";
			mes "cloudy today, isn't it?";
			mes "It would be nice to stay";
			mes "inside, listening to some";
			mes "nice music while enjoying";
			mes "a hot cup of tea, wouldn't it?";
			close;
		}
		mes "[Ghalstein]";
		mes "Ahhh!";
		mes "Such pleasant weather~";
		mes "I'm so glad I'm outside";
		mes "and enjoying the sunlight.";
		mes "Feel it. It's so warm and";
		mes "nice on your face, isn't it?";
		close;
	}
	else if(lhz_boss == 2)
	{
		mes "[Ghalstein]";
		mes "The sun is gently";
		mes "shining, the breeze is";
		mes "gently blowing. Oh, this";
		mes "weather could not be better!";
		next;
		switch( select( "Yes, you're right.","Uh, what were you doing just now?" ) )
		{
			case 1:
				mes "[Ghalstein]";
				mes "Yes, right now is the";
				mes "best time to be outside";
				mes "and to enjoy all of this";
				mes "fresh, wonderful air. Come,";
				mes "take a deep breath with me.";
				mes "Ooooh. Ahhhhhh~ Excellent!";
				close;

			case 2:
				mes "[Ghalstein]";
				mes "...";
				mes "......";
				mes "I don't quite follow what";
				mes "you're saying. I was merely";
				mes "enjoying the sunny perfection";
				mes "of Lighthalzen as usual...";
				next;
				switch( select( "But I heard you talking about something..." ) )
				{
					case 1:
						break;
				}
				mes "[Ghalstein]";
				mes "No! You must";
				mes "have mistaken me";
				mes "for somebody else!";
				mes "Now, if you'll excuse me...";
				set lhz_boss,3;
				next;
				mes "^3355FFEven if it wasn't";
				mes "Ghalstein that you";
				mes "just heard, he reacted";
				mes "pretty strongly to what";
				mes "you said to to him. Almost";
				mes "as if he had something to hide... ^000000";
				close;
		}
	}
	else if(lhz_boss == 3)
	{
		mes "[Ghalstein]";
		mes "Hm? Judging from the";
		mes "look on your face, you";
		mes "apparently still believe";
		mes "that I was involved in some";
		mes "kind of clandestine meeting.";
		next;
		switch( select( "Yes, I'm sure of it!","Well..." ) )
		{
			case 1:
				mes "["+strcharinfo(0)+"]";
				mes "Yes, I'm sure of it!";
				mes "That was definitely you!";
				mes "Your voice, your way of";
				mes "speaking is unmistakable!";
				next;
				mes "[Ghalstein]";
				mes "......";
				mes "..........";
				mes "...............";
				next;
				mes "[Ghalstein]";
				mes "Alright. Yes, it's";
				mes "true that I did meet";
				mes "someone in secret. But";
				mes "what gives you the right";
				mes "to interrogate me in this";
				mes "rather aggressive fashion?";
				next;
				switch( select( "I'm not interrogating...","Sorry about that." ) )
				{
					case 1:
						mes "["+strcharinfo(0)+"]";
						mes "I'm not interrogating";
						mes "you. No, not at all.";
						mes "It's, um, it's just...";
						next;
						switch( select( "Who are you dealing with?","I was just curious." ) )
						{
							case 1:
								mes "["+strcharinfo(0)+"]";
								mes "Who are you dealing";
								mes "with? I heard something";
								mes "about some organization";
								mes "that's supposedly very";
								mes "powerful and I'm starting";
								mes "to get really concerned.";
								next;
								mes "["+strcharinfo(0)+"]";
								mes "I don't think I can";
								mes "ignore hearing about";
								mes "any kind of dangerous";
								mes "corporation, even if";
								mes "I wanted to. Turning my";
								mes "back to this seems wrong...";
								next;
								mes "[Ghalstein]";
								mes "Hm...";
								mes "You really";
								mes "feel that way?";
								next;
								mes "[Ghalstein]";
								mes "Please give me";
								mes "a moment. I need";
								mes "some time to think";
								mes "about how I can best";
								mes "handle this situation.";
								set lhz_boss,4;
								close;

							case 2:
								mes "[Ghalstein]";
								mes "Just curious...?";
								mes "Well, I hope that";
								mes "you don't interfere";
								mes "too much with other";
								mes "people's lives just";
								mes "out of curiosity.";
								next;
								mes "[Ghalstein]";
								mes "You really shouldn't";
								mes "make something your";
								mes "business if you're not";
								mes "interested or willing";
								mes "to commit. Now, if you";
								mes "would excuse me...";
								close;
						}
					case 2:
						mes "["+strcharinfo(0)+"]";
						mes "Sorry about that.";
						mes "I didn't mean to";
						mes "stick my nose into";
						mes "your personal business.";
						next;
						mes "[Ghalstein]";
						mes "Well, that's quite";
						mes "alright. I accept";
						mes "your apology, but";
						mes "I must warn you";
						mes "not to pry into my";
						mes "personal affairs.";
						close;
				}

			case 2:
				mes "["+strcharinfo(0)+"]";
				mes "Well...";
				mes "Now I don't know.";
				mes "I suppose I could";
				mes "be wrong, I guess.";
				next;
				mes "[Ghalstein]";
				mes ".......";
				mes "Yes, I wouldn't";
				mes "recommend running";
				mes "around, indiscriminately";
				mes "accusing random people";
				mes "of doing strange things.";
				close;
		}
	}
	else if(lhz_boss == 4)
	{
		mes "[Ghalstein]";
		mes "I've come into a";
		mes "decision and found";
		mes "a way that I can let";
		mes "you into my confidence";
		mes "without putting the efforts";
		mes "of my organization at risk.";
		next;
		mes "[Ghalstein]";
		mes "As you may have already";
		mes "guessed, I'm a member of an";
		mes "organization whose ultimate";
		mes "goal is to put an end to the";
		mes "Rekenber Corporation.";
		next;
		mes "[Ghalstein]";
		mes "However, before I relate";
		mes "more information regarding";
		mes "my organization and its work, I shall require your cooperation.";
		next;
		switch( select( "How can I cooperate?" ) )
		{
			case 1:
				break;
		}
		mes "["+strcharinfo(0)+"]";
		mes "How can I cooperate?";
		mes "Um, what exactly is it";
		mes "that you want me to do?";
		next;
		mes "[Ghalstein]";
		mes "You do seem interested";
		mes "in knowing more about us,";
		mes "and we can also use your";
		mes "expertise as an adventurer.";
		mes "But first you must decide if";
		mes "you will commit to cooperation.";
		next;
		switch( select( "I still don't get it...","Sure, I'll cooperate.","No, thanks." ) )
		{
			case 1:
				mes "[Ghalstein]";
				mes "Alright, let me make this ";
				mes "clearer for you. You have";
				mes "two choices.";
				next;
				switch( select( "Two choices?" ) )
				{
					case 1:
						break;
				}
				mes "[Ghalstein]";
				mes " If you choose";
				mes "to cooperate with us, you'll";
				mes "need to periodically drink";
				mes "this red magic tonic.";
				next;
				mes "[Ghalstein]";
				mes "The red tonic will allow";
				mes "us to monitor your every";
				mes "move so that we know you";
				mes "won't betray us. You'll have to";
				mes "continue cooperating or else";
				mes "we won't give you the cure.";
				next;
				mes "[Ghalstein]";
				mes "Throughout our mission,";
				mes "you'll need to take a red";
				mes "tonic every so often to avoid";
				mes "suffering fron unpleasant";
				mes "consequences. When we";
				mes "finish, you get the antidote.";
				next;
				switch( select( "........." ) )
				{
					case 1:
						break;
				}
				mes "[Ghalstein]";
				mes "If you choose not to";
				mes "cooperate, simply drink";
				mes "this blue tonic, which will";
				mes "erase every fragment of your";
				mes "memory regarding our meeting.";
				next;
				mes "[Ghalstein]";
				mes "So, what have";
				mes "you decided to do?";
				next;
				switch( select( "Don't cooperate","Cooperate" ) )
				{
					case 1:
						break;

					case 2:
						mes "[Ghalstein]";
						mes "Ah, good choice.";
						mes "So will you take";
						mes "this red tonic?";
						next;
						switch( select( "Do not take it.","Take it." ) )
						{
							case 1:
								break;

							case 2:
								mes "[Ghalstein]";
								mes "Very good.";
								mes "Then please,";
								mes "drink this right away.";
								next;
								mes "^3355FFYou drink the red tonic.";
								mes "It doesn't feel any different";
								mes "from a Red Potion, but it";
								mes "would be wise to cooperate";
								mes "with Ghalstein until this";
								mes "mission is accomplished.^000000";
								next;
								mes "[Ghalstein]";
								mes "You may feel a little";
								mes "disoriented after drinking";
								mes "this tonic for the first time.";
								mes "I'll give you a moment to";
								mes "steady yourself before we";
								mes "talk about our mission.";
								set lhz_boss,5;
								close;
						}
						break;
				}
				break;

			case 2:
				mes "[Ghalstein]";
				mes "Ah, good choice.";
				mes "So will you take";
				mes "this red tonic?";
				next;
				switch( select( "Do not take it.","Take it." ) )
				{
					case 1:
						break;

					case 2:
						mes "[Ghalstein]";
						mes "Very good.";
						mes "Then please,";
						mes "drink this right away.";
						next;
						mes "^3355FFYou drink the red tonic.";
						mes "It doesn't feel any different";
						mes "from a Red Potion, but it";
						mes "would be wise to cooperate";
						mes "with Ghalstein until this";
						mes "mission is accomplished.^000000";
						next;
						mes "[Ghalstein]";
						mes "You may feel a little";
						mes "disoriented after drinking";
						mes "this tonic for the first time.";
						mes "I'll give you a moment to";
						mes "steady yourself before we";
						mes "talk about our mission.";
						set lhz_boss,5;
						close;
				}

			case 3:
				break;
		}
		mes "[Ghalstein]";
		mes "You really feel";
		mes "that way? Well, that's";
		mes "a shame. Pity, really...";
		next;
		mes "^3355FFYou suddenly get the";
		mes "weird feeling that someone";
		mes "has been behind you this";
		mes "entire time. As you slowly";
		mes "turn around to look, you";
		mes "were knocked unconscious...^000000";
		percentheal 100,0;
		percentheal -50,0;
		next;
		mes "..........";
		mes "........";
		mes ".....";
		mes "..";
		next;
		mes "[??????]";
		mes "^666666Now...^000000";
		if(Sex == SEX_MALE) mes "^666666Make him^000000";
		else mes "^666666Make her^000000";
		mes "^666666swallow this pill.^000000";
		next;
		mes "^3355FFYou're forced to swallow";
		mes "some strange pill which";
		mes "immediately makes all your";
		mes "thoughts hazier until it begins";
		mes "to feel like your entire mind";
		mes "is getting bleached somehow.^000000";
		set lhz_boss,0;
		close2;
		warp "lighthalzen",217,313;
		end;
	}
	else if(lhz_boss == 5)
	{
		mes "[Ghalstein]";
		mes "So how are you feeling?";
		mes "Any nausea that you may";
		mes "be experiencing should";
		mes "be going away very soon.";
		mes "Anyway, let's get started.";
		next;
		mes "[Ghalstein]";
		mes "Rekenber Corporation";
		mes "is closely affiliated with";
		mes "Regenschirm, an underground";
		mes "laboratory inhabited by strange";
		mes "and suspicious creatures.";
		next;
		mes "[Ghalstein]";
		mes "Your mission will be to";
		mes "infiltrate this underground lab";
		mes "and bring back evidence which";
		mes "proves the existence of these";
		mes "creatures. You must gather";
		mes "various kinds of proof.";
		next;
		mes "[Ghalstein]";
		mes "But more importantly,";
		mes "there is ^FF0000something there";
		mes "that you have to bring";
		mes "back to me^000000. I can't tell";
		mes "you exactly what it is,";
		mes "but trust me. You'll know.";
		next;
		mes "[Ghalstein]";
		mes "If you search the";
		mes "Laboratory enough,";
		mes "you'll find what I'm";
		mes "talking about. In any";
		mes "case, you'll need to find";
		mes "a way to get inside the lab.";
		next;
		mes "[Ghalstein]";
		mes "It might be helpful to";
		mes "know that we've received";
		mes "reports about disappearances";
		mes "of people from the ^FF0000eastside";
		mes "slums^000000. We believe they are";
		mes "perhaps traveling illegally...";
		next;
		mes "[Ghalstein]";
		mes "If someone there is";
		mes "transporting people";
		mes "without authorization,";
		mes "maybe you can find a";
		mes "contact who can sneak";
		mes "you inside the Laboratory.";
		set lhz_boss,6;
		changequest 12015,12016;
		close;
	}
	else if(lhz_boss == 6)
	{
		mes "[Ghalstein]";
		mes "For now, it may be best";
		mes "to start investigating the";
		mes "eastside slums to see if you";
		mes "can find somebody who can";
		mes "get you inside the Laboratory.";
		close;
	}
	else if(lhz_boss == 7)
	{
		if(!(MISC_QUEST&512))
		{
			mes "[Ghalstein]";
			mes "An error occurred.";
			close;
		}
		if ((countitem(7346)) && (countitem(7347) > 9) && (countitem(7345) > 9))
		{
			mes "[Ghalstein]";
			mes "Ah, this looks like a";
			mes "sufficient amount of";
			mes "evidence for us to be";
			mes "able to effectively attack";
			mes "our enemy. I believe you're";
			mes "ready for the next mission.";
			next;
			mes "[Ghalstein]";
			mes "But first, I believe it's";
			mes "time for another red tonic";
			mes "dose so that we can keep";
			mes "monitoring you. Oh, and";
			mes "don't worry, it's not addictive";
			mes "or anything strange like that.";
			next;
			mes "[Ghalstein]";
			mes "Now, find ^FF0000Gusharr^000000, one of";
			mes "our members, ^FF0000near Juno^000000.";
			mes "He will tell you about your";
			mes "next mission. Show this to";
			mes "him to prove that you are";
			mes "working with us. Don't forget.";
			delitem 7346,1; //Pile_Of_Ymir_Heart
			delitem 7347,10; //Lab_Staff_Record
			delitem 7345,10; //Armlet_Of_Prisoner
			set lhz_boss,8;
			getitem 7348,1; //Indication_Of_Member01
			changequest 12016,12017;
			close;
		}
		else if((!countitem(7346)) && (!countitem(7347)) && (!countitem(7345)))
		{
			mes "[Ghalstein]";
			mes "When you get inside the";
			mes "Laboratory, make sure that";
			mes "you search around for any";
			mes "records and get any sort of";
			mes "concrete evidence we can";
			mes "use. I'll be counting on you.";
			close;
		}
		else
		{
			mes "[Ghalstein]";
			mes "We'll need more evidence";
			mes "than this from the Laboratory";
			mes "to make any impact against our";
			mes "enemy. I know what we need is";
			mes "difficult to find, but I'm sure";
			mes "that you can pull this off.";
			close;
		}
	}
	else if(lhz_boss == 8)
	{
		mes "[Ghalstein]";
		mes "Please find Gushaar";
		mes "in the vicinity of Juno.";
		mes "He will give you all the";
		mes "details for your next mission.";
		close;
	}
	else if(lhz_boss < 25)
	{
		mes "[Ghalstein]";
		mes "You've made the decision";
		mes "to help us in order to learn";
		mes "more about our organzation.";
		mes "We appreciate all the help we";
		mes "can get, but I hope you don't";
		mes "regret getting in this deep.";
		next;
		mes "[Ghalstein]";
		mes "There's a certain price";
		mes "for knowledge. I believe";
		mes "you're capable of paying it,";
		mes "but whether or not this ordeal";
		mes "will be worthwhile to you is";
		mes "difficult to determine.";
		close;
	}
	else if(lhz_boss < 43)
	{
		mes "[Ghalstein]";
		mes "You're so close to";
		mes "accomplishing your";
		mes "mission. If all goes as";
		mes "planned, we can do some";
		mes "real damage to our enemy.";
		mes "And you'll finally be free.";
		close;
	}
	else if(lhz_boss == 43)
	{
		mes "[Ghalstein]";
		mes "I can't believe what";
		mes "happened. I just heard";
		mes "that the president was";
		mes "betrayed! This is horrible!";
		mes "We'll have to start all over.";
		mes "Was it all for nothing?!";
		next;
		mes "[Ghalstein]";
		mes "No. No, Jargeah would be";
		mes "so disappointed in me if";
		mes "I just gave up. I'll have to";
		mes "follow our dream, no matter";
		mes "what the obstacles are.";
		mes "Jargeah, give me strength!";
		next;
		mes "[Ghalstein]";
		mes "Also, you've done a great";
		mes "service for us. Although we";
		mes "failed, you carried out your";
		mes "missions perfectly. Here,";
		mes "take this antidote so that";
		mes "you'll finally be free of us.";
		next;
		mes "[Ghalstein]";
		mes "I'd like you to take";
		mes "this small gift, as way";
		mes "of apology. We asked you";
		mes "to do so much, but ultimately,";
		mes "we weren't able to accomplish";
		mes "what we set out to do. Still...";
		set lhz_boss,44;
		getitem 617,1; //Old_Violet_Box
		getexp (checkre(3))?180000:1800000,0;
		completequest 12028;
		next;
		mes "[Ghalstein]";
		mes "I'd like to thank you";
		mes "for everything. Hopefully,";
		mes "you found the answers";
		mes "that you were looking for";
		mes "when you decided to help";
		mes "us. Farewell, faithful friend.";
		close;
	}
	else
	{
		mes "[Ghalstein]";
		mes "I hate being patient,";
		mes "but the old adage is";
		mes "true. He who runs away,";
		mes "lives to fight another day.";
		mes "But that day seems so";
		mes "far off into the future...";
		close;
	}
}

lighthalzen,173,167,1	script	Switch	-1,2,4,{

OnTouch_:
	if(lhz_boss == 1)
	{
		mes "[??????]";
		mes "^666666Come on.";
		mes "This way.^000000";
		next;
		mes "[??????]";
		mes "^333333Hurry up, before";
		mes "the others see you...^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "(Wait a second...";
		mes "That voice is";
		mes "awfully familiar.)";
		next;
		switch( select( "Ignore it.","Keep listening." ) )
		{
			case 1:
				mes "["+strcharinfo(0)+"]";
				mes "(That voice is";
				mes "awfully familiar...";
				mes "But what do I care?)";
				close;

			case 2:
				mes "["+strcharinfo(0)+"]";
				mes "(This is too weird.";
				mes "I guess I better keep";
				mes "listening to see what";
				mes "I can learn about this...)";
				next;
				mes "[??????]";
				mes "^333333So why did you tell";
				mes "me to come to such";
				mes "a dangerous place...?^000000";
				next;
				mes "^3355FFThat's...^000000";
				mes "That's ^660000Ghalstein's^3355FF voice!^000000";
				next;
				mes "[????]";
				mes "^666666Something unexpected";
				mes "came up. Hence the sudden";
				mes "change in plans. Now listen...^000000";
				next;
				mes "^3355FFSuddenly, both of the";
				mes "voices grew much quieter";
				mes "as the two men spoke to each";
				mes "other in low, hoarse whispers";
				mes "that are almost inaudible.^000000";
				next;
				mes "[????]";
				mes "^666666....";
				mes "...Relate.....";
				mes "...Business.....Kafr...^000000";
				next;
				mes "[Ghalstein]";
				mes "^333333Oh. That does";
				mes "sound very urgent.";
				mes "But it's not safe to";
				mes "talk about this here.";
				mes "Let's move somewhere";
				mes "a little more secure.^000000";
				next;
				mes "[????]";
				mes "^666666No problem.";
				mes "........................^000000";
				next;
				mes "........................";
				mes ".....................";
				mes "..................";
				next;
				mes "^3355FFThat other voice...";
				mes "Whoever it belonged";
				mes "to is gone! What's";
				mes "going on here?^000000";
				set lhz_boss,2;
				setquest 12015;
				close;
		}
	}
}

yuno_fild04,165,245,4	script	Dismal Guy	89,{

	if(lhz_boss < 8)
	{
		mes "[Gushaar]";
		mes "Decisions, decisions.";
		mes "Sometimes it's hard to";
		mes "make a choice when it";
		mes "isn't clear which one will";
		mes "give you the most benefit.";
		next;
		mes "[Gushaar]";
		mes "I think most of the good";
		mes "things in life have some";
		mes "kind of cost, but they're";
		mes "usually worth it. I mean,";
		mes "nothing would have any";
		mes "worth without any cost, right?";
		close;
	}
	else if(lhz_boss == 8)
	{
		mes "[Gushaar]";
		mes "Alright. Choose";
		mes "your poison. I got";
		mes "two different kinds of";
		mes "tonics for you, red and blue.";
		mes "So which one will you drink?";
		next;
		switch( select( "????","Red Tonic","Blue Tonic" ) )
		{
			case 1:
				mes "[Gushaar]";
				mes "Well, when you don't";
				mes "make a decision, you";
				mes "don't take action. And";
				mes "when you don't take any";
				mes "action, nothing happens.";
				mes "Come on, don't be boring~";
				close;

			case 2:
				mes "[Gushaar]";
				mes "Red, huh? I like";
				mes "your style. But, eh,";
				mes "isn't there something";
				mes "you want to show me first?";
				next;
				switch( select( "Oh, right!","What are you talking about?" ) )
				{
					case 1:
						if(!countitem(7348))
						{
							mes "[Gushaar]";
							mes "Hey... Umm...";
							mes "Aren't you supposed";
							mes "to be carrying some";
							mes "sort of secret something?";
							mes "I'd tell you want it was if we";
							mes "weren't so, well, secretive.";
							close;
						}
						mes "^3355FFYou suavely flash";
						mes "your Membership Card";
						mes "to Gushaar, who gives";
						mes "you an approving nod.^000000";
						next;
						mes "[Gushaar]";
						mes "Yeah, that's what";
						mes "I wanted to see. Good,";
						mes "you're the one I've been";
						mes "waiting here for. Alright,";
						mes "just give me a second...";
						set lhz_boss,9;
						close;

					case 2:
						mes "[Gushaar]";
						mes "Huh?! Oh geez, I almost";
						mes "never make this mistake.";
						mes "I'm sorry, I thought you might";
						mes "have been someone else.";
						close;
				}

			case 3:
				mes "[Gushaar]";
				mes "Blue...? Huh.";
				mes "That shouldn't be";
				mes "the one you want.";
				mes "Well, if you're who";
				mes "I think you are... Are you?";
				close;
		}
	}
	else if(lhz_boss == 9)
	{
		mes "[Gushaar]";
		mes "Alright, first of all,";
		mes "you should know why the";
		mes "Rekenber Corporation is";
		mes "our sworn enemy. Did you";
		mes "know that it basically controls";
		mes "the Schwaltzvalt Republic?";
		next;
		mes "[Gushaar]";
		mes "They're so powerful, they";
		mes "manipulate everything in the";
		mes "economy, media and even the";
		mes "politics of this nation. There are other corporations, sure, but";
		mes "they're nothing in comparsion.";
		next;
		mes "[Gushaar]";
		mes "Rekenber Corporation...";
		mes "They've even got a hold on";
		mes "all the other companies, simply";
		mes "by bribing politicians to pass";
		mes "the bills they want passed.";
		mes "This isn't a real republic...";
		next;
		mes "[Gushaar]";
		mes "The ultimate goal of our";
		mes "group, ''Secret Wing,'' is to";
		mes "establish true independence";
		mes "in the Schwaltzvalt Republic";
		mes "by destroying Rekenber Corporation.";
		next;
		mes "[Gushaar]";
		mes "Fortunately, the new president";
		mes "of the Schwaltzvalt Republic,";
		mes "Mr. Weierstrass, is sympathetic";
		mes "to our cause. He is working with us to bring about a revolution and";
		mes "overthrow Rekenber Corporation.";
		next;
		mes "[Gushaar]";
		mes "Your mission will be to";
		mes "visit with the president and";
		mes "bring back any information";
		mes "he may have for us. Remember,";
		mes "because of his position, you can only see him during certain hours.";
		set lhz_boss,10;
		close;
	}
	else if(lhz_boss == 10)
	{
		mes "[Gushaar]";
		mes "I hope you understand";
		mes "''Secret Wing's'' ultimate";
		mes "goal now. In any case, you've";
		mes "got to meet our president,";
		mes "Karl Theodor Weierstrass.";
		next;
		mes "[Gushaar]";
		mes "It won't be easy to see";
		mes "such an important man,";
		mes "so show your Secret Wing";
		mes "Membership Card to his";
		mes "secretary and there should";
		mes "be very little hassle.";
		next;
		mes "[Gushaar]";
		mes "Because of his schedule,";
		mes "you'll only be allowed to see";
		mes "him from ^FF00008:00 PM to 11:00 PM^000000,";
		mes "and from ^FF000011:00 AM to 2:00PM PST^000000.Good luck on this mission, friend.";
		set lhz_boss,11;
		changequest 12017,12018;
		close;
	}
	else
	{
		mes "[Gushaar]";
		mes "Rekenber...";
		mes "I shall see your";
		mes "destruction if it's the";
		mes "very last thing I do!";
		close;
	}
}

yuno_pre,69,20,4	script	Secretary#1	862,{

	if(lhz_boss < 11)
	{
		mes "[Hes O'Neil]";
		mes "Good day, how";
		mes "may I help you?";
		next;
		switch( select( "Oh. I'm fine, thanks.","I want to meet the president~","W-who are you...?" ) )
		{
			case 1:
				mes "[Hes O'Neil]";
				mes "Since this is an";
				mes "important government";
				mes "building, please keep";
				mes "in mind that certain areas,";
				mes "monitored by guards, are";
				mes "off limits to visitors.";
				close;

			case 2:
				mes "[Hes O'Neil]";
				mes "President Weierstrass?";
				mes "Do you have an appointment";
				mes "to meet with him today?";
				next;
				switch( select( "Yes","No" ) )
				{
					case 1:
						mes "[Hes O'Neil]";
						mes "Alright, let me see.";
						mes "May I please have your";
						mes "name so that I can look";
						mes "it up in today's schedule?";
						next;
						switch( select( ""+strcharinfo(0)+"" ) )
						{
							case 1:
								break;
						}
						mes "[Hes O'Neil]";
						mes ""+strcharinfo(0)+"?";
						mes "I'm sorry, but I can't find";
						mes "your name on the list. You";
						mes "can only visit the president";
						mes "if you have an appointment.";
						mes "Thank you for your cooperation.";
						close;

					case 2:
						mes "[Hes O'Neil]";
						mes "I'm so sorry, but because";
						mes "the president is an incredibly" ;
						mes "busy man, he can only make";
						mes "time to see the people who";
						mes "have an appointment.";
						close;
				}

			case 3:
				mes "[Hes O'Neil]";
				mes "Hmm...?";
				mes "I'm the personal";
				mes "secretary to the";
				mes "president of the";
				mes "Schwartzvalt Republic,";
				mes "if that's what you mean.";
				close;
		}
	}
	else if(lhz_boss < 16)
	{
		mes "[Hes O'Neil]";
		mes "Good day, how";
		mes "may I help you?";
		next;
		switch( select( "Show Secret Wing Card.","I'm here to see the president.","Nothing." ) )
		{
			case 1:
				if(!countitem(7348))
				{
					mes "^3355FFWait a second...";
					mes "You don't seem to";
					mes "be carrying your";
					mes "''Secret Wing''";
					mes "Membership Card.^000000";
					close;
				}
				if(((gettime(DT_HOUR) > 10) && (gettime(DT_HOUR) < 15)) || ((gettime(DT_HOUR) > 19) && (gettime(DT_HOUR) <= 23)))
				{
					mes "^3355FFYou suavely flash";
					mes "your ''Secret Wing''";
					mes "Membership Card.^000000";
					next;
					mes "[Hes O'Neil]";
					mes "Oh... I see.";
					mes "The president has";
					mes "been expecting you.";
					mes "Please, right this way.";
					close2;
					warp "yuno_pre",113,53;
					end;
				}
				mes "[Hes O'Neil]";
				mes "Oh... I see.";
				mes "I'm sorry, but you've";
				mes "come too early for your";
				mes "appointment. Would you";
				mes "come back to see the";
				mes "president later?";
				close;

			case 2:
				mes "[Hes O'Neil]";
				mes "President Weierstrass?";
				mes "Do you have an appointment";
				mes "to meet with him today?";
				next;
				switch( select( "Yes","No" ) )
				{
					case 1:
						mes "[Hes O'Neil]";
						mes "Alright, let me see.";
						mes "May I please have your";
						mes "name so that I can look";
						mes "it up in today's schedule?";
						next;
						switch( select( ""+strcharinfo(0)+"" ) )
						{
							case 1:
								break;
						}
						mes "[Hes O'Neil]";
						mes ""+strcharinfo(0)+"?";
						mes "I'm sorry, but I can't find";
						mes "your name on the list. You";
						mes "can only visit the president";
						mes "if you have an appointment.";
						mes "Thank you for your cooperation.";
						close;

					case 2:
						mes "[Hes O'Neil]";
						mes "I'm so sorry, but because";
						mes "the president is an incredibly" ;
						mes "busy man, he can only make";
						mes "time to see the people who";
						mes "have an appointment.";
						close;
				}

			case 3:
				mes "[Hes O'Neil]";
				mes "Since this is an";
				mes "important government";
				mes "building, please keep";
				mes "in mind that certain areas,";
				mes "monitored by guards, are";
				mes "off limits to visitors.";
				close;
		}
	}
	else if(lhz_boss == 16)
	{
		if(!countitem(7342))
		{
			mes "[Hes O'Neil]";
			mes "Hm? I thought the";
			mes "president was supposed";
			mes "to give you some kind of";
			mes "file, but perhaps I was";
			mes "mistaken? Let me think...";
			close;
		}
		mes "[Hes O'Neil]";
		mes "Hello, may I be";
		mes "of any assistance?";
		next;
		switch( select( "I brought this." ) )
		{
			case 1:
				break;
		}
		mes "[Hes O'Neil]";
		mes "Ah, the file folder";
		mes "I needed. I'm so sorry";
		mes "to trouble you. Thank";
		mes "you so much for your help.";
		delitem 7342,1;
		set lhz_boss,17;
		close;
	}
	else if(lhz_boss < 21)
	{
		mes "[Hes O'Neil]";
		mes "I'm sorry, but the";
		mes "president is currently";
		mes "outside on business.";
		mes "Please come back to";
		mes "visit him another time.";
		close;
	}
	else if(lhz_boss < 43)
	{
		mes "[Hes O'Neil]";
		mes "Oh, the president";
		mes "is expecting you.";
		mes "Please, go right";
		if(Sex == SEX_MALE) mes "on ahead, sir.";
		else mes "on ahead, ma'am.";
		close2;
		warp "yuno_pre",113,53;
		end;
	}
	else if(hg_tre == 56)
	{
		mes "[Hes O'Neil]";
	        mes "The President has given the order that ";
        	mes "nobody is allowed to enter this place.";
	        next;
        	mes "["+strcharinfo(0)+"]";
	        mes "However, you will change your mind after listening to my explanation.";
        	next;
	        mes "[Hes O'Neil]";
        	mes "...............";
	        mes "Is it something very important?";
        	next;
	        mes "["+strcharinfo(0)+"]";
        	mes "It is the most important thing.";
	        next;
        	mes "[Hes O'Neil]";
	        mes "Alright then, there you go.";
        	mes "(Whisper) I hope you will become his source of strength.";
	        close2;
        	warp "yuno_pre",113,53;
        	end;
        }
        else if(hg_tre > 56)
        {
		mes "[Hes O'Neil]";
		mes "The president said that you're welcome to visit him anytime.";
		close2;
        	warp "yuno_pre",113,53;
        	end;
        }
	else
	{
		mes "[Hes O'Neil]";
		mes "I'm sorry...";
		mes "It seems that the";
		mes "president would like";
		mes "to have some privacy now.";
		close;
	}
}

yuno_pre,95,71,5	script	Guard	852,{

	if(lhz_boss < 11)
	{
		mes "[Guard]";
		mes "You are in the";
		mes "President's House.";
		mes "Arms are prohibited";
		mes "without authorization in";
		mes "this government building.";
		mes "Thank you for your cooperation.";
		close2;
		nude;
		warp "yuno_pre",83,22;
		end;
	}
	else if(lhz_boss == 11 || lhz_boss == 12)
	{
		if(lhz_boss == 12) set @visit_pre,rand(1,10);
		if(@visit_pre == 7)
		{
			mes "[?????]";
			mes "I see.";
			mes "Then...";
			next;
			mes "[????????]";
			mes "Ummm....";
			mes "Understood...";
			mes "......";
			next;
			enablenpc "A Fine Gentleman";
			next;
			mes "[?????]";
			mes "..........";
			next;
			mes "[Guard]";
			mes "Ah, Mr. Keshnaar.";
			mes "Are you leaving?";
			next;
			mes "[Keshnaar]";
			mes "Yes, it's about time";
			mes "for me to depart. Ah,";
			mes "and may I ask who this";
			if(Sex == SEX_MALE) mes "young gentleman here is?";
			else mes "lovely young lady is?";
			next;
			mes "[Guard]";
			mes "Mr. Keshnaar,";
			mes "I present "+strcharinfo(0)+".";
			mes ""+strcharinfo(0)+", allow me";
			mes "to introduce Eridan Keshnaar.";
			next;
			mes "[Keshnaar]";
			mes "A pleasure to meet you.";
			mes "Now, if you would excuse";
			mes "me, I have some business";
			mes "to attend to. Good day~";
			next;
			mes "[Guard]";
			mes "Take care,";
			mes "Mr. Keshnaar.";
			set lhz_boss,13;
			disablenpc "A Fine Gentleman";
			close;

		}
		mes "[Guard]";
		mes "Please wait a moment.";
		mes "Currently, the president";
		mes "is seeing another guest.";
		mes "Thank you for your patience.";
		if(lhz_boss == 11) set lhz_boss,12;
		close;
	}
	else if(lhz_boss == 13)
	{
		mes "[Guard]";
		mes "Now you may enter";
		mes "and speak with the";
		mes "president. Thank you";
		mes "for waiting all this time.";
		next;
		switch( select( "Thank you.","Who was that gentleman...?" ) )
		{
			case 1:
				if(Sex == SEX_MALE) mes "A Mister "+strcharinfo(0)+"";
				else
				{
					if(getpartnerid()) mes "A Missis "+strcharinfo(0)+"";
					else mes "A Miss "+strcharinfo(0)+"";
				}
				mes "has arrived to see you now.";
				next;
				mes ".....";
				next;
				mes "[Mr. President]";
				mes "Oh, you're early!";
				mes "I'm sorry, but would you";
				mes "please wait one minute?";
				next;
				mes "[Guard]";
				mes "Yes, sir.";
				mes "My apologies, but would";
				mes "you please wait until the";
				mes "president is ready?";
				close;

			case 2:
				mes "[Guard]";
				mes "Oh, Mr. Keshnaar is the";
				mes "government negotiator from";
				mes "the Rekenber Corporation.";
				mes "He often visits the president";
				mes "to discuss various issues.";
				set lhz_boss,14;
				close;
		}
	}
	else
	{
		mes "[Guard]";
		mes "Greetings.";
		mes "You may enter to";
		mes "see the president.";
		close2;
		warp "yuno_pre",78,69;
		end;
	}
}

yuno_pre,96,69,2	script	A Fine Gentleman	754,{

OnInit:
	disablenpc "A Fine Gentleman";
	end;
}

yuno_pre,69,79,4	script	Mr. President	872,{

	if(checkweight(7342,1) != 1)
	{
		mes "- Wait a moment! -";
		mes "- Currently you're carrying -";
		mes "- too many items with you. -";
		mes "- Please enlighten your weight -";
		mes "- and try again. -";
		close;
	}
	cutin "lhz_karl.bmp",2;
	if(lhz_boss < 11)
	{
		mes "[Karl]";
		mes "How did you get in here?";
		mes "Please leave this place";
		mes "immediately! Security...!";
		close2;
		cutin "",255;
		warp "yuno_pre",83,22;
	}
	else if(lhz_boss == 14)
	{
		mes "[Karl]";
		mes "Ah, welcome~";
		mes "I understand that you";
		mes "must have had a lot of";
		mes "trouble coming here.";
		mes "It's a pleasure to";
		mes "finally meet you.";
		next;
		mes "[Karl]";
		mes "As I'm sure Ghalstein";
		mes "has told you, ''Secret Wing''";
		mes "was formed to overthrow the";
		mes "evil Rekenber Corporation.";
		mes "Now, I'm sure that you must";
		mes "have some questions for me...";
		next;
L_Mission:
		switch( select( "Secret Wing's Background","Rekenber's Purpose","Secret Wing's Goal","Details about my mission","I'm ready for my mission." ) )
		{
			case 1:
				mes "[Karl]";
				mes "Rekenber has been";
				mes "unopposed for a very long";
				mes "time. Our nation is unhappy";
				mes "with their rule, but since our";
				mes "country lacks solidarity, the";
				mes "people can do nothing.";
				next;
				mes "[Karl]";
				mes "But one day, I was contacted";
				mes "by some people who claimed to";
				mes "share my sentiments against";
				mes "the Rekenber Corporation.";
				mes "Later, I learned that they were";
				mes "from the Kafra Corporation.";
				next;
				mes "[Karl]";
				mes "Apparently, they were";
				mes "facing some aggressive";
				mes "competition from Cool";
				mes "Event Corp, which is";
				mes "actually backed by the";
				mes "Rekenber Corporation.";
				next;
				mes "[Karl]";
				mes "We decided to pool our";
				mes "resources to deal with what";
				mes "we perceived as a common";
				mes "enemy. Before long, we gathered";
				mes "more devotees to our cause and";
				mes "formed the ''Secret Wing.''";
				next;
				mes "[Karl]";
				mes "It may be helpful for";
				mes "you to know that our";
				mes "direct contact to the";
				mes "Kafra Corporation is the";
				mes "^FF00003rd Security Team^000000. Oh, did";
				mes "you have any other questions?";
				next;
				goto L_Mission;

			case 2:
				mes "[Karl]";
				mes "It's true that companies";
				mes "exist to create money, but";
				mes "the Rekenber Corporation";
				mes "is much more nefarious.";
				mes "They actually want to dominate the entire Rune-Midgard continent.";
				next;
				mes "[Karl]";
				mes "In fact, the chairman of";
				mes "that company is shrouded";
				mes "in mystery. Although I'm";
				mes "the president, I go through";
				mes "many difficulties just to";
				mes "send a message to him.";
				next;
				mes "[Karl]";
				mes "It's disheartening,";
				mes "but we really have no";
				mes "idea what their true goals";
				mes "and plans might be. Now, did";
				mes "you have any other questions?";
				next;
				goto L_Mission;

			case 3:
				mes "[Karl]";
				mes "''Secret Wing's'' only";
				mes "goal is to destroy the";
				mes "Rekenber Corporation in";
				mes "order to break the Schwaltzvalt Republic free from its oppression.";
				next;
				mes "[Karl]";
				mes "Of course, we realize";
				mes "that it will take time and";
				mes "a lot of sacrifice to make";
				mes "this a reality. Now, do you";
				mes "have anything else to ask?";
				next;
				goto L_Mission;

			case 4:
				mes "[Karl]";
				mes "Ah, your next mission.";
				mes "I'm ready to give you";
				mes "some of the details if";
				mes "you no longer have any";
				mes "questions to ask. Let me";
				mes "know when you are ready.";
				next;
				goto L_Mission;

			case 5:
				mes "[Karl]";
				mes "Very well, then.";
				mes "Your mission will not";
				mes "be too difficult, but it does";
				mes "have great urgency so you";
				mes "must accomplish it as soon";
				mes "as you can. Understood?";
				next;
				switch( select( "Wait, I have one more question!","Yes sir, Mr. President." ) )
				{
					case 1:
						mes "[Karl]";
						mes "Hm? I thought you";
						mes "didn't have any more";
						mes "questions. However, I still";
						mes "have the luxury to give you";
						mes "any answers that I can provide.";
						next;
						goto L_Mission;

					case 2:
						mes "[Karl]";
						mes "I'm glad to hear that.";
						mes "Alright, give me a second";
						mes "to search for this file before";
						mes "I explain the mission.";
						set lhz_boss,15;
						close2;
						cutin "",255;
						end;
				}
		}
	}
	else if(lhz_boss == 15)
	{
		mes "[Karl]";
		mes "Now, you must first visit";
		mes "the Kafra Headquarters in";
		mes "Al De Baran and meet someone";
		mes "named ^FF0000Benith^000000. She will tell you";
		mes "all about your next mission.";
		next;
		mes "[Karl]";
		mes "Be careful and do not";
		mes "freely mention anything";
		mes "about ''Secret Wing'' or";
		mes "your cooperation with us as";
		mes "it may jeopardize our goals.";
		mes "Hurry, time is of the essence.";
		next;
		mes "[Karl]";
		mes "Ah, before I forget,";
		mes "please bring this file";
		mes "folder to ^FF0000Ms. Hes O'Neil^000000";
		mes "for me before you leave.";
		mes "Thank you very much.";
		set lhz_boss,16;
		getitem 7342,1; //File01
		changequest 12018,12019;
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss < 21)
	{
		mes "[Karl]";
		mes "Hurry and complete";
		mes "the mission given to";
		mes "you by Benith, who is";
		mes "in the Kafra Headquarters";
		mes "in Al De Baran. It is a very";
		mes "urgent, high priority task...";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 21)
	{
		if(!countitem(7343))
		{
			mes "[Karl]";
			mes "Hm? I was expecting";
			mes "for you to bring me";
			mes "back an important file.";
			mes "Please hurry, our entire";
			mes "organization is at stake!";
			close2;
			cutin "",255;
			end;
		}
		mes "[Karl]";
		mes "Ah, you're here.";
		mes "Good work, I hear that";
		mes "the mission was a success.";
		mes "An official success anyway.";
		mes "...............................";
		next;
		mes "[Karl]";
		mes "Poor, dear sweet";
		mes "Jargeah. Why him?";
		mes "Must fate be so cruel";
		mes "and harsh? I still can't";
		mes "believe he's gone. Just";
		mes "last week, we were...";
		next;
		mes "[Karl]";
		mes "I'm sorry. You didn't";
		mes "know him that well, but";
		mes "all those who did know";
		mes "him, loved him. And I can";
		mes "say that with pride. L-let";
		mes "me check the files a minute...";
		delitem 7343,1;
		set lhz_boss,22;
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 22)
	{
		if(rand(1,5) == 3)
		{
			mes "[Karl]";
			mes "Hm. After completely";
			mes "reviewing this file, I've";
			mes "found that it offers some";
			mes "great leads, but it's still not";
			mes "enough hard evidence to";
			mes "really hurt Rekenber.";
			next;
			mes "[Karl]";
			mes "However, according to";
			mes "this, there's a researcher";
			mes "from Rekenber named";
			mes "Shinokas who vanished all";
			mes "of a sudden. Apparently, he";
			mes "knew some kind of secret.";
			next;
			mes "[Karl]";
			mes "Luckily, my men have";
			mes "reported sightings of";
			mes "Shinokas somewhere in";
			mes "Einbroch. He's certainly";
			mes "out there. But what does";
			mes "he have to hide?";
			next;
			mes "[Karl]";
			mes "We must learn his";
			mes "secret if we hope to";
			mes "do any lasting damage to";
			mes "the Rekenber Corporation.";
			mes "Your next mission is to";
			mes "find Shinokas. Good luck.";
			next;
			mes "[Karl]";
			mes "And please hurry.";
			mes "I don't want our enemies";
			mes "to discover Shinokas before";
			mes "we can get him to talk.";
			changequest 12022,12023;
			if(Shinokas_Quest == 11) set lhz_boss,24;
			else set lhz_boss,23;
			close2;
			cutin "",255;
			end;
		}
		mes "[Karl]";
		mes "I'm sorry, but it's";
		mes "taking me a long time";
		mes "to analyze the information";
		mes "in this file. A-and Jargeah";
		mes "sacrificed himself to get";
		mes "it for us. ^333333*Sigh*^000000 Jargeah...";
		next;
		mes "[Karl]";
		mes "Why don't you relax";
		mes "while I peruse this";
		mes "file? I should be done";
		mes "with this soon, hopefully...";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 23)
	{
		if(Shinokas_Quest == 11)
		{
			mes "[Karl]";
			mes "Ymir's Heart Pieces?";
			mes "Is that what they're";
			mes "trying to collect?";
			mes "What are they going";
			mes "to do with something";
			mes "so incredibly dangerous?!";
			next;
			mes "[Karl]";
			mes "Huh. This new information";
			mes "raises some new questions.";
			mes "Fortunately, we have a new";
			mes "lead from the spy who got";
			mes "us the info on Shinokas.";
			next;
			mes "[Karl]";
			mes "We've recently learned that";
			mes "Shinokas managed to access";
			mes "the Regenschirm Secret Archive, a lab affiliated with Rekenber.";
			mes "That's how Shinokas was able";
			mes "to learn so much about them.";
			next;
			mes "[Karl]";
			mes "It will be difficult";
			mes "and very dangerous to";
			mes "access this archive, so";
			mes "I want you to meet with";
			mes "someone from the Kafra";
			mes "Corporation near Lighthalzen.";
			next;
			mes "[Karl]";
			mes "And don't worry...";
			mes "She'll know exactly";
			mes "who you are and";
			mes "how to help you.";
			set lhz_boss,26;
			completequest 12023;
			setquest 12024;
			close2;
			cutin "",255;
			end;
		}
		mes "[Karl]";
		mes "We don't know how";
		mes "helpful Shinokas's";
		mes "information may be for";
		mes "us, but we must learn";
		mes "anything we can about";
		mes "the Rekenber Corporation.";
		next;
		mes "[Karl]";
		mes "There is so much we";
		mes "don't know about them.";
		mes "Their motives, their methods,";
		mes "almost all of the important";
		mes "details are still in the dark.";
		next;
		mes "[Karl]";
		mes "By all means, you";
		mes "must find Shinokas and";
		mes "see what you can learn!";
		mes "Your efforts will not go";
		mes "unrecognized, "+strcharinfo(0)+".";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 24)
	{
		mes "[Karl]";
		mes "Hm? What's wrong?";
		mes "Now that I think about";
		mes "it, you reacted as if you";
		mes "recognized his name back";
		mes "when I mentioned Shinokas.";
		next;
		switch( select( "Oh, no. Not really.","Actually, Shinokas is..." ) )
		{
			case 1:
				mes "[Karl]";
				mes "Then it must be";
				mes "my imagination.";
				mes "Okay then, go and";
				mes "find Shinokas, he";
				mes "may be in grave";
				mes "danger as we speak!";
				close2;
				cutin "",255;
				end;

			case 2:
				mes "[Karl]";
				mes "Oh...";
				mes "You've already met";
				mes "Shinokas, did you?";
				mes "You witnessed his ";
				mes "death?! This is a very";
				mes "strange coincidence.";
				next;
				mes "[Karl]";
				mes "I see, there must be";
				mes "no need to investigate";
				mes "Shinokas now. And you";
				mes "did learn the secret for";
				mes "which he was hunted...";
				next;
				mes "[Guard]";
				mes "Mr. President,";
				mes "Ms. Hes O' Neil has an";
				mes "urgent message for you.";
				next;
				mes "[Karl]";
				mes "Hmm...";
				mes "Then please,";
				mes "let her in.";
				next;
				enablenpc "Secretary#2";
				next;
				mes "[Hes O'Neil]";
				mes "Sir, I'm sorry";
				mes "for interrupting";
				mes "you, but there's";
				mes "something I need to";
				mes "show you immediately!";
				next;
				mes "[Karl]";
				mes "Alright, let's";
				mes "have it. Let me";
				mes "see those new files.";
				mes "Oh, these are--! Thank";
				mes "you, Ms. O' Neil, you";
				mes "may leave now.";
				next;
				mes "[Hes O'Neil]";
				mes "Thank you sir.";
				mes "Once again, let me";
				mes "apologize for disturbing";
				mes "your private conference.";
				next;
				disablenpc "Secretary#2";
				next;
				mes "[Karl]";
				mes "Alright. Please let me";
				mes "review these documents";
				mes "to see if there are any";
				mes "new developments in the";
				mes "investigation involving";
				mes "Shinokas and his secret...";
				set lhz_boss,25;
				close2;
				cutin "",255;
				end;
		}
	}
	else if(lhz_boss == 25)
	{
		if(rand(1,10) == 8)
		{
			mes "[Karl]";
			mes "Alright, I just";
			mes "completed reading";
			mes "all of these new reports";
			mes "from our field agents.";
			mes "Thank you for waiting.";
			next;
			mes "[Karl]";
			mes "We've recently learned that";
			mes "Shinokas managed to access";
			mes "the Regenschirm  Secret Archive,a lab affiliated with Rekenber.";
			mes "That's how Shinokas was able";
			mes "to learn so much about them.";
			next;
			mes "[Karl]";
			mes "It will be difficult";
			mes "and very dangerous to";
			mes "access this archive, so";
			mes "I want you to meet with";
			mes "someone from the Kafra";
			mes "Corporation near Lighthalzen.";
			next;
			mes "[Karl]";
			mes "If you keep looking around";
			mes "the ^3355FFfields just outside of";
			mes "Lighthalzen^000000, you'll certainly";
			mes "find her. I'm sorry that I can't";
			mes "tell you more, but we've got";
			mes "to protect our security...";
			next;
			mes "[Karl]";
			mes "And don't worry...";
			mes "She'll know exactly";
			mes "who you are and";
			mes "how to help you.";
			set lhz_boss,26;
			completequest 12023;
			setquest 12024;
			close2;
			cutin "",255;
			end;
		}
		mes "[Karl]";
		mes "I apologize, but it's";
		mes "taking me a long time";
		mes "to go through all of the";
		mes "reports in these files.";
		mes "Please give me a little more";
		mes "time to make sense of them.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss < 37)
	{
		mes "[Karl]";
		mes "I hope you continue";
		mes "to keep up the good";
		mes "work, not only for the";
		mes "sake of the Schwaltzvalt";
		mes "Republic, but for peace";
		mes "on all of Rune-Midgard.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 37)
	{
		if(!countitem(7344))
		{
			mes "[Karl]";
			mes "Did you find any";
			mes "of that evidence in";
			mes "the Secret Archive yet?";
			mes "Hurry! The movements in";
			mes "Rekenber Corporation are";
			mes "making me feel really uneasy.";
			close2;
			cutin "",255;
			end;
		}
		mes "[Karl]";
		mes "Ah, you're here.";
		mes "I've already received a";
		mes "message from Esuna";
		mes "about your success.";
		mes "If you would, please";
		mes "let me read the file...";
		next;
		mes "[Karl]";
		mes "Ah, now everything is";
		mes "clearer. Shinokas and his";
		mes "friends were killed over";
		mes "that piece of Ymir's Heart.";
		mes "That's what the Rekenber";
		mes "Corporation ultimately wants.";
		next;
		mes "[Karl]";
		mes "But this raises some";
		mes "new questions. What";
		mes "are they planning to";
		mes "do with Ymir's Heart?";
		mes "It must be more powerful";
		mes "than we had thought...";
		next;
		mes "[Karl]";
		mes "We'll need even more";
		mes "information. For now,";
		mes "please go back to Esuna.";
		mes "It seems that she just";
		mes "received some critically";
		mes "important intel to give you.";
		delitem 7344,1;
		set lhz_boss,38;
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 38)
	{
		mes "[Karl]";
		mes "Please hurry and meet";
		mes "Esuna just outside of";
		mes "Lighthalzen. Perhaps I am";
		mes "getting paranoid, but I keep";
		mes "getting the feeling that";
		mes "Rekenber is on to us...";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 39)
	{
		if(!countitem(7343))
		{
			mes "[Karl]";
			mes "You don't have the";
			mes "file? Retrieve it for";
			mes "me as soon as you can.";
			mes "It's imperative that I read";
			mes "what Esuna has to report!";
			close2;
			cutin "",255;
			end;
		}
		mes "[Karl]";
		mes "Ah, good to see you";
		mes "again. I hear you have";
		mes "some important news for";
		mes "me, something of the utmost";
		mes "urgency. But I fear the worst.";
		next;
		switch( select( "Give the file from Esuna." ) )
		{
			case 1:
				break;
		}
		mes "[Karl]";
		mes "What...?";
		mes "I can't believe this!";
		mes "How can our security";
		mes "be breached like this?!";
		mes "Only someone from";
		mes "really deep inside could...";
		next;
		mes "[Karl]";
		mes "Please...";
		mes "Would you go and";
		mes "speak to Esuna one";
		mes "more time? I need to";
		mes "know more about how";
		mes "all of this happened...";
		delitem 7343,1;
		set lhz_boss,40;
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 41)
	{
		mes "[Karl]";
		mes "No...";
		mes "I can't...";
		mes "Kurelle? We've";
		mes "worked together,";
		mes "trusted each other";
		mes "for years. No, it's not....";
		next;
		mes "[Karl]";
		mes "If it's true, then";
		mes "that means I've been";
		mes "playing into the enemy's";
		mes "hands this whole time.";
		mes "I've... I've got to know";
		mes "and ask Kurelle myself.";
		next;
		mes "[Karl]";
		mes "O'Neil!";
		mes "Bring Kurelle in";
		mes "here, right now!";
		next;
		mes "[Hes O'Neil]";
		mes "...Yes, sir.";
		mes "Right away.";
		next;
		set lhz_boss,42;
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_boss == 42)
	{
		mes "[Guard]";
		mes "Advisor Kurelle";
		mes "is here now.";
		next;
		mes "[Karl]";
		mes "Let him in!";
		mes "...................";
		next;
		mes "[Guard]";
		mes "...............?";
		mes "Yes, sir...";
		next;
		enablenpc "A Neat Gentleman";
		next;
		mes "[Kurelle]";
		mes "Hello, Mr. President.";
		mes "What exactly did you";
		mes "need from me today?";
		next;
		mes "[Karl]";
		mes "...........";
		mes ".......";
		mes "...";
		next;
		mes "[Kurelle]";
		mes "???";
		mes ".......";
		next;
		mes "[Karl]";
		mes "Did you...";
		mes "Why did you betray us?!";
		mes "After all this time, why now?";
		next;
		mes "[Kurelle]";
		mes "...";
		mes "......";
		mes "So you know.";
		mes "Well, you're smarter";
		mes "than I gave you credit for.";
		next;
		mes "[Kurelle]";
		mes "Ha ha ha~";
		mes "Right, it was me.";
		mes "Your right hand man.";
		mes "I reported everything";
		mes "you were doing to the";
		mes "Rekenber Corporation.";
		next;
		mes "[Karl]";
		mes "But why...?";
		mes "I thought we were";
		mes "working together for";
		mes "the greater good, to";
		mes "do the right thing?";
		next;
		mes "[Kurelle]";
		mes "Forget that! I'm sick";
		mes "of being second place";
		mes "to you. All our lives, you've";
		mes "always been on top. School,";
		mes "athletics, politics. Well, here's my chance to finally beat you!";
		next;
		mes "[Karl]";
		mes "I can't believe this. All";
		mes "those years of friendship";
		mes "were all a lie? We even";
		mes "joined Secret Wing together.";
		mes "This whole time, you were";
		mes "harboring a silly grudge...";
		next;
		mes "[Kurelle]";
		mes "Shut up! It's not a";
		mes "silly grudge! ...You there.";
		mes "Adventurer. Can't you see";
		mes "this man is finished?! But";
		mes "it's not too late. Join us.";
		mes "Rekenber could use you.";
		next;
		mes "[Kurelle]";
		mes "Now that I've helped";
		mes "the Rekenber Corporation,";
		mes "I'll get their support in the";
		mes "next presidential election.";
		mes "I'll beat you for sure, Karl!";
		mes "Bwahahahahahaahahahhaah~!";
		next;
		disablenpc "A Neat Gentleman";
		mes ".......";
		mes ".........";
		mes "...........";
		next;
		mes "[Karl]";
		mes "It's all over for";
		mes "now. This isn't good";
		mes "at all. You're finished";
		mes "here too. Go and talk to";
		mes "^3355FFGhalstein^000000 again. It's time";
		mes "we let you loose, adventurer.";
		set lhz_boss,43;
		// completequest 12028;
		close2;
		cutin "",255;
		end;
	}
	else if(lght_boss == 43)
	{
		mes "[Karl]";
		mes ".........";
		mes "............";
		for(set .@i,12015; .@i < 12028; set .@i,.@i+1) {
			if (checkquest(.@i) >= 0 && checkquest(.@i) < 2)
				completequest .@i;
		}
		close;
	}
	else if(hg_tre == 56)
	{
		if(!countitem(7342))
		{
			mes "["+strcharinfo(0)+"]";
			mes "Ah, where did I put the record?";
			close;
		}
		mes "[Karl]";
		mes "It's you.....!";
		mes "It's really been a long time.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "So, are you still having the idea to go against Rekenber?";
		next;
		mes "[Karl]";
		mes "...................";
		next;
		mes "[Karl]";
		mes "I'm not sure.";
		mes "The Secret Wing has been disbanded and I am just another puppet they have, just like the previous presidents.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Not long ago, the scientists of Regenschrim have stolen the research record and destroyed the machines that they used for research purposes.";
		next;
		emotion e_gasp,0;
		mes "[Karl]";
		mes "...!";
		mes "Did you do that? ";
		mes "I still fail to move on after the incident of my friends' betrayal and the disband of the Secret Wing...";
		mes "You are really a great friend.";
		next;
		mes "[Karl]";
		mes "Didn't you speak about the research record just now?";
		mes "Oh! Can you give me the record?";
		mes "It will be a big trouble to them.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "If you insist to go against them, I will give you the record.";
		next;
		mes "[Karl]";
		mes "I am the president of this country.";
		mes "I have failed before but I won't stop trying when there is still an opportunity.";
		next;
		mes "[Karl]";
		mes "You remind me of the day I made up my mind to rebuild this country.";
		mes "How could I forgot such important responsibilities of mine.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "That's great.";
		mes "Here's the record.";
		mes "I hope you will make good use of it. ";
		next;
		mes "[Karl]";
		mes "Let's see...";
		next;
		mes "[Karl]";
		mes "Oh! That's some interesting information.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I have another good news. The Secret Wing has not given up yet. They are still working on the project and I hope that you won't be giving up on it too.";
		next;
		mes "[Karl]";
		mes ".....I feel so sorry for what I did.";
		next;
		mes "[Karl]";
		mes "Thank you for bringing this great gift. I will stay strong and work hard to achieve my target.";
		next;
		mes "[Karl]";
		mes "I will recruit the new batch of members and use them to let the world know about what the corporation had really done.";
		next;
		mes "[Karl]";
		mes "Thank you so much. ";
		mes "You can count on me to right what was wrong.";
		set hg_tre,57;
		delitem 7342,1; //File01
		getexp (checkre(3))?200000:2000000,0;
		getitem 617,1;
		close2;
		cutin "",255;
		end;
	}
	else if(hg_tre == 57)
	{
		mes "[Karl]";
		mes "I am trying to recruit capable people who can help me to bring down Rekenber Corporation.";
		mes "Thanks to you, I have enough information as a good beginning to nail them now down.";
		next;
		mes "[Karl]";
		mes "I have had my men to gather some information and learned that Regenschrim had stopped operating now.";
		mes "You have done well for the Schwaltzvalt Republic.";
		close2;
		cutin "",255;
		end;
	}
	else
	{
		mes "[Karl]";
		mes ".........";
		mes "............";
		close2;
		cutin "",255;
		end;
	}
}

yuno_pre,77,68,0	script	Secretary#2	862,{

OnInit:
	disablenpc "Secretary#2";
	end;
}

yuno_pre,75,73,0	script	A Neat Gentleman	109,{

OnInit:
	disablenpc "A Neat Gentleman";
	end;
}

yuno_pre,117,60,0	script	Eavesdrop	-1,10,5,{

OnTouch_:
	if(lhz_boss == 16)
	{
		mes "^3355FFWhat the...?";
		mes "You can hear";
		mes "whispers coming";
		mes "from the window.^000000";
		next;
		mes "[????]";
		mes "^333333That's expected...";
		mes "But... Why did...";
		mes "... the president...^000000";
		next;
		mes "[?????]";
		mes "^666666.......So...................";
		mes "...their investigation...";
		mes "............of course.........";
		mes "...just bait...................^000000";
		next;
		mes "[????]";
		mes "^333333...Next election.....";
		mes "..............................";
		mes "....you'll be................";
		mes "...............Can't stop us.^000000";
		next;
		mes "^3355FFThe whispers grow";
		mes "lower and lower until";
		mes "you can no longer hear";
		mes "anything. One of those";
		mes "voices seemed so familiar...^000000";
		close;
	}
}

aldebaran,58,225,4	script	Kafra Employee#l1	116,{

	if(lhz_boss != 17)
	{
		mes "[Kafra Employee]";
		mes "Welcome to the";
		mes "Kafra Headquarters.";
		mes "Here in the heart of";
		mes "Kafra's operations, you";
		mes "can be provided with special";
		mes "services offered nowhere else!";
		next;
		mes "[Kafra Employee]";
		mes "If you need anything,";
		mes "please inquire the Kafra";
		mes "Employees inside the building.";
		mes "Thank you and have a good day~";
		close;
	}
	mes "[Kafra Employee]";
	mes "Good day~";
	mes "The Kafra Corporation is";
	mes "always working to ensure";
	mes "our customers' satisfaction.";
	mes "How may I help you today?";
	next;
	switch( select( "I have a question.","I'm fine, thanks." ) )
	{
		case 1:
			mes "[Kafra Employee]";
			mes "Sure, I'll answer your";
			mes "question to the best of";
			mes "my ability. However, I may";
			mes "need to reference you to";
			mes "another employee for";
			mes "specialized information.";
			next;
			switch( select( "Do you know where I can find Benith?" ) )
			{
				case 1:
					break;
			}
			mes "[Kafra Employee]";
			mes "Oh, Benith? Sure, you";
			mes "can find her here inside";
			mes "Kafra Headquarters to the";
			mes "right somewhere. She wears";
			mes "a special uniform, so you";
			mes "can spot her easily.";
			next;
			mes "[Kafra Employee]";
			mes "Okay then,";
			mes "have a good day!";
			mes "Always remember";
			mes "that the Kafra Service";
			mes "will be on your side~";
			close;

		case 2:
			mes "[Kafra Employee]";
			mes "Feel free to ask any";
			mes "one of our conveniently";
			mes "located employees if you";
			mes "ever have need of Kafra's";
			mes "special services. Thank";
			mes "you and have a nice day~";
			close;
	}
}

aldeba_in,155,240,5	script	Kafra Employee#l2	859,{

	if(checkweight(7343,1) != 1)
	{
		mes "^3355FFWait a second!";
		mes "Right now, you're carrying";
		mes "too many things with you.";
		mes "Please come back after";
		mes "using the Kafra Service";
		mes "to store some of your items.^000000";
		close;
	}
	if(lhz_boss < 17)
	{
		mes "[Kafra Employee]";
		mes "Welcome to";
		mes "Kafra Headquarters.";
		mes "What's new with Kafra?";
		mes "Glad you asked. Right now,";
		mes "we're developing a brand new";
		mes "program with Cool Event Corp.";
		next;
		mes "[Kafra Employee]";
		mes "This new program will";
		mes "provide a direct teleport";
		mes "service to dungeons for";
		mes "the convenience of our";
		mes "valued customers. Is";
		mes "that not... exciting?";
		next;
		mes "[Kafra Employee]";
		mes "Due to technical issues,";
		mes "Kafra Corp and Cool Event";
		mes "Corp cannot provide teleport";
		mes "services to the same dungeon,";
		mes "so one common teleport service";
		mes "provider will be selected.";
		next;
		mes "[Kafra Employee]";
		mes "Therefore, elections will";
		mes "be held to determine which";
		mes "company will provide this";
		mes "Dungeon Teleport Service.";
		mes "Please check the eligibility";
		mes "requirements before voting.";
		close;
	}
	else if(lhz_boss == 17)
	{
		mes "[Kafra Employee]";
		mes "Welcome to";
		mes "Kafra Headquarters.";
		mes "What's new with Kafra?";
		mes "Glad you asked. Right now,";
		mes "we're developing a brand new";
		mes "program with Cool Event Corp.";
		next;
		mes "[Kafra Employee]";
		mes "This new program will";
		mes "provide a direct teleport";
		mes "service to dungeons for";
		mes "the convenience of our";
		mes "valued customers. Is";
		mes "that not... exciting?";
		next;
		mes "[Kafra Employee]";
		mes "Due to technical issues,";
		mes "Kafra Corp and Cool Event";
		mes "Corp cannot provide teleport";
		mes "services to the same dungeon,";
		mes "so one common teleport service";
		mes "provider will be selected.";
		next;
		mes "[Kafra Employee]";
		mes "We'd like to inform";
		mes "you that the customers";
		mes "will decide the teleport";
		mes "service provider through";
		mes "an election. Your vote will";
		mes "be much appreciated.";
		next;
		mes "[Kafra Employee]";
		mes "Remember to take part";
		mes "in the polls that will be";
		mes "taking place in the cities";
		mes "of Prontera and Juno.";
		mes "Happy voting.";
		next;
		switch( select( "Okay.","I can't wait!" ) )
		{
			case 1:
				mes "[Kafra Employee]";
				mes "Uh oh...";
				mes "Did you have a question?";
				mes "In all honesty, I don't know";
				mes "very much about the services";
				mes "Kafra offers. My work is...";
				mes "I'm in a different department.";
				next;
				switch( select( "Oh, that's okay then.","Are you Benith..?" ) )
				{
					case 1:
						mes "[Kafra Employee]";
						mes "*Whew!*";
						mes "Oh good. Well, if you";
						mes "do have any questions";
						mes "about the Kafra Services,";
						mes "please ask one of the regular";
						mes "Kafra Employees. Thank you.";
						close;

					case 2:
						mes "[Benith]";
						mes "Yes, that's me.";
						mes "Is there anything";
						mes "that I can do for you?";
						next;
						switch( select( "No, not really.","Show Membership Card." ) )
						{
							case 1:
								mes "[Benith]";
								mes "Really?";
								mes "Okay, then.";
								close;

							case 2:
								if(!countitem(7348))
								{
									mes "^3355FFWait...";
									mes "You can't show";
									mes "your ''Secret Wing''";
									mes "Membership Card";
									mes "if you don't have it!^000000";
									close;
								}
								mes "[Benith]";
								mes "Oh, I've been waiting";
								mes "for you. Finally, I can";
								mes "drop this promotional";
								mes "pretense and get down";
								mes "to business and tell you";
								mes "about your mission.";
								next;
								mes "[Benith]";
								mes "As an experienced";
								mes "adventurer, your specialty";
								mes "is in retrieving items and";
								mes "fighting against monsters.";
								mes "We have a rescue mission";
								mes "that suits your expertise.";
								next;
								mes "[Benith]";
								mes "One of our special";
								mes "agents got into an";
								mes "accident and is stuck";
								mes "in ^FF0000Grim Reaper's Valley^000000,";
								mes "located somewhere between";
								mes "Einbroch and Lighthalzen.";
								next;
								mes "[Benith]";
								mes "Our agent, Jargeah,";
								mes "is reported to be hiding";
								mes "near a broken bridge there.";
								mes "All of our other agents are";
								mes "assigned on other missions,";
								mes "so you're all he has right now.";
								next;
								mes "[Benith]";
								mes "He's seriously wounded,";
								mes "so please hurry before";
								mes "the enemy can get to him...";
								set lhz_boss,18;
								changequest 12019,12020;
								close;
						}
				}

			case 2:
				mes "[Kafra Employee]";
				mes "That makes one of u--";
				mes "I mean, your participation";
				mes "is very much appreciated.";
				mes "Remember that Kafra is";
				mes "always on your side.";
				close;
		}
	}
	else if(lhz_boss == 18)
	{
		mes "[Benith]";
		mes "Please hurry and save";
		mes "Jargeah. If the enemy";
		mes "gets to him before we";
		mes "do, all his efforts, as well";
		mes "as his life, may be forfeit.";
		next;
		mes "[Benith]";
		mes "You should be able to";
		mes "find him near a broken";
		mes "bridge in Grim Reaper's";
		mes "Valley, which is located";
		mes "somewhere between";
		mes "Einbroch and Lighthalzen.";
		close;
	}
	else if(lhz_boss == 19)
	{
		if(!countitem(7343))
		{
			mes "[Benith]";
			mes "Please hurry!";
			mes "I don't want the enemy";
			mes "to find Jargeah before";
			mes "we do! His life and the";
			mes "Secret Wing are at stake!";
			close;
		}
		mes "[Benith]";
		mes "Great, you're back,";
		mes "and you even have the";
		mes "information that Jargeah";
		mes "managed to obtain. But...";
		mes "Where's Jargeah? Is he...?";
		next;
		switch( select( "He's in a better place." ) )
		{
			case 1:
				break;
		}
		mes "[Benith]";
		mes "...";
		mes "......";
		next;
		mes "[Benith]";
		mes "What...?! Noooo!";
		mes "Comrade Jargeah!";
		mes "I swear to you your";
		mes "death won't be in vain!";
		mes "Why did another good man";
		mes "have to die? Answer me!!";
		next;
		mes "[Benith]";
		mes "I can't... No. We must";
		mes "first honor Jargeah's noble";
		mes "sacrifice before we can allow ourselves the luxury of mourning";
		mes "our loss. Let me read these files first before you deliver them...";
		delitem 7343,1;
		set lhz_boss,20;
		close;
	}
	else if(lhz_boss == 20)
	{
		mes "[Benith]";
		mes "Alright. Please take";
		mes "this file to ^FF0000him^000000 now.";
		mes "I believe you know";
		mes "whom I am talking about.";
		mes "The Secret Wing is counting";
		mes "on you, brave adventurer.";
		set lhz_boss,21;
		getitem 7343,1; //File02
		changequest 12021,12022;
		next;
		mes "[Benith]";
		mes "I swear by my father's";
		mes "grave that the tears I shed";
		mes "for Jargeah will only be";
		mes "matched by the blood I will";
		mes "spill in holy retribution.";
		mes "Jargeah, watch over me!";
		close;
	}
	else
	{
		mes "[Benith]";
		mes "W-welcome to the";
		mes "Kafra Headquarters.";
		mes "What's new with Kafra?";
		mes "^333333Glad... You... Asked...^000000";
		close;
	}
}

lhz_fild02,228,214,0	script	Wounded Man	849,{

	if(checkweight(7343,1) != 1)
	{
		mes "^3355FFWait a second!";
		mes "Right now, you're carrying";
		mes "too many things with you.";
		mes "Please come back after";
		mes "using the Kafra Service";
		mes "to store some of your items.^000000";
		close;
	}
	if(lhz_boss < 18)
	{
		mes "[?????]";
		mes "^333333*Cough cough*^000000";
		mes "Can't hold out...";
		mes "Much longer. They...";
		mes "They better send";
		mes "someone soon...";
		next;
		mes "^3355FFIt's a wounded man...!^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "H-hey...!";
		mes "Are you hurt?";
		mes "Do you need any he--";
		next;
		mes "[?????]";
		mes "N-no..!";
		mes "Get away, do-gooder!";
		mes "Don't attract attention,";
		mes "they're gonna find me!";
		mes "Don't worry, don't ask,";
		mes "j-just get the hell away!";
		close;
	}
	else if(lhz_boss == 18)
	{
		mes "[?????]";
		mes "^333333*Cough cough*^000000";
		mes "Can't hold out...";
		mes "Much longer. They...";
		mes "They better send";
		mes "someone soon...";
		next;
		switch( select( "Jargeah?","Ignore him." ) )
		{
			case 1:
				mes "[Jargeah]";
				mes "^333333*Cough Gasp*^000000";
				mes "H-how do you know my...";
				mes "Never mind that. Who...";
				mes "What... What organization";
				mes "are you working for...?";
				next;
				input @jargeah$;
				if((@jargeah$ == "Kafra Corporation") || (@jargeah$ == "Secret Wing"))
				{
					mes "[Jargeah]";
					mes "Th-thank goodness!";
					mes "You finally came for me.";
					mes "If you came a little later,";
					mes "I'd be a goner. H-here,";
					mes "t-take this with you...";
					set lhz_boss,19;
					getitem 7343,1; //File02
					changequest 12020,12021;
					next;
					mes "[Jargeah]";
					mes "Oh... Oh no.";
					mes "*Cough cough*";
					mes "I think... It might";
					mes "T-tell Cilantro that...";
					mes "Tell her I still lov-- ^333333*Huk*^000000";
					close2;
					disablenpc "Wounded Man";
					end;
				}
				mes "[Jargeah]";
				mes "No... No, you're";
				mes "not the one who's";
				mes "supposed to come";
				mes "for m-me... ^333333*Huk*^000000";
				next;
				mes "^3355FFThis isn't good.";
				mes "Jargeah just passed";
				mes "out in a very ugly way.";
				close;

			case 2:
				mes "^3355FFAnd so you left the";
				mes "wounded man alone. Not";
				mes "exactly the best moral choice.^000000";
				close;
		}
	}
OnInit:
	disablenpc "Wounded Man";
	end;
}

lhz_fild02,224,220,0	script	Wounded Man Switch	-1,3,3,{

OnTouch_:
	if(lhz_boss == 18)
	{
		mes "[?????]";
		mes "^333333*Cough cough*^000000";
		mes "Everything's getting";
		mes "darker. So c-cold...";
		enablenpc "Wounded Man";
		close;
	}
}

lhz_fild01,76,214,0	script	Esuna Trigger	-1,5,5,{

OnTouch_:
	if((lhz_boss == 26) || (lhz_boss == 36) || (lhz_boss == 38) || (lhz_boss == 40))
	{
		mes "[????]";
		mes "Here,";
		mes "Come this way.";
		close2;
		enablenpc "Mysterious Woman";
		warp "lhz_fild01",64,223;
		end;
	}
}

lhz_fild01,66,219,4	script	Mysterious Woman	859,{

	if(lhz_boss == 26)
	{
		if(checkweight(7343,1) != 1)
		{
			mes "^3355FFWait a second!";
			mes "Right now, you're carrying";
			mes "too many things with you.";
			mes "Please come back after";
			mes "using the Kafra Service";
			mes "to store some of your items.^000000";
			close;
		}
		mes "[Esuna]";
		mes "I've been waiting for you.";
		mes "We don't have much time,";
		mes "so I'll explain quickly. Your";
		mes "mission is to sneak into the";
		mes "Rekenber Corporation and";
		mes "steal incriminating evidence.";
		next;
		mes "[Esuna]";
		mes "However, this place won't";
		mes "be easy to infiltrate and";
		mes "there'll be more security";
		mes "because they learned about";
		mes "what happened with Shinokas";
		mes "and... and Jargeah. Jargeah...";
		next;
		mes "[Esuna]";
		mes "You'll need to acquire";
		mes "identification through one";
		mes "of our agents who's managed";
		mes "to get in really deep without";
		mes "arousing any suspicion.";
		next;
		mes "[Esuna]";
		mes "Afterwards, find the";
		mes "^FF0000Secret Archive^000000, disable the";
		mes "security system and steal";
		mes "that evidence as quickly as";
		mes "possible. Understood?";
		next;
		mes "[Esuna]";
		mes "For now, use the pass you";
		mes "have for the Rekenber buildings";
		mes "and meet up with Agent ^FF0000Lestin^000000.";
		mes "He'll explain everything else,";
		mes "so be careful and don't let";
		mes "them get suspicious of you!";
		set lhz_boss,27;
		changequest 12024,12025;
		close2;
		disablenpc "Mysterious Woman";
		end;
	}
	else if(lhz_boss == 27)
	{
		mes "[Esuna]";
		mes "Use the pass that you";
		mes "have to enter the Rekenber";
		mes "buildings and find Secret";
		mes "Agent Lestin. Remember";
		mes "that he's undercover...";
		close;
	}
	else if(lhz_boss < 36)
	{
		mes "[Esuna]";
		mes ".........";
		close;
	}
	else if(lhz_boss == 36)
	{
		mes "[Esuna]";
		mes "Good work.";
		mes "Please bring this file";
		mes "to President Weierstrass";
		mes "right away. We'll also be";
		mes "directly sending information";
		mes "as a safeguard measure.";
		next;
		mes "[Esuna]";
		mes "I know it's sudden, but";
		mes "there's a new development.";
		mes "I can't explain it now, but you";
		mes "have to check on the president";
		mes "for me first. Plus, this new";
		mes "intel needs to be confirmed...";
		set lhz_boss,37;
		close2;
		disablenpc "Mysterious Woman";
		end;
	}
	else if(lhz_boss < 38)
	{
		mes "[Esuna]";
		mes "........";
		mes ".....";
		close;
	}
	else if(lhz_boss == 38)
	{
		mes "[Esuna]";
		mes "You're back. Listen,";
		mes "you could not have helped";
		mes "us out at a worse time. We";
		mes "just learned that something";
		mes "horrible has happened...";
		next;
		mes "[Esuna]";
		mes "I can't give you all";
		mes "the details now, but";
		mes "you've got to give this";
		mes "file to the president as";
		mes "quickly as you can. Hurry!";
		set lhz_boss,39;
		getitem 7343,1;
		close2;
		disablenpc "Mysterious Woman";
		end;
	}
	else if(lhz_boss == 39)
	{
		mes "[Esuna]";
		mes "What are you waiting";
		mes "for?! It's important that";
		mes "you give that file to the";
		mes "president as soon as";
		mes "possible! It's bad news,";
		mes "but he deserves to know...";
		close;
	}
	else if(lhz_boss == 40)
	{
		mes "[Esuna]";
		mes "Good, you're back.";
		mes "Listen, all members of";
		mes "Secret Wing need to leave";
		mes "the Schwaltzvalt Republic";
		mes "immediately! We've been";
		mes "severely compromised...";
		next;
		switch( select( "What happened?" ) )
		{
			case 1:
				break;
		}
		mes "[Esuna]";
		mes "We've been tremendously";
		mes "damaged. A lot of agents";
		mes "died to give us this intel,";
		mes "but we've been betrayed.";
		mes "The president's closest";
		mes "aide totally sold us out...";
		next;
		switch( select( "Who could have done such....?" ) )
		{
			case 1:
				break;
		}
		mes "[Esuna]";
		mes "I can't believe Kurelle";
		mes "did this to us. And there's no";
		mes "way we can save the president.";
		mes "Even if we wanted to, we need";
		mes "to stick with our contigency";
		mes "plan. We all knew the risks...";
		next;
		mes "[Esuna]";
		mes "Kurelle has been secretly";
		mes "meeting with directors from";
		mes "Rekenber Corporation and";
		mes "his mansion is littered with";
		mes "incriminating evidence...";
		next;
		mes "[Esuna]";
		mes "Damn it! We have no";
		mes "choice but to abandon";
		mes "the president now! But";
		mes "this won't mean that his";
		mes "sacrifice, and Jargeah's";
		mes "death, will be vain!";
		next;
		mes "[Esuna]";
		mes "Still, aside from a few";
		mes "agents, almost all of Secret";
		mes "Wing must pull out of the";
		mes "Schwaltzvalt Republic for";
		mes "now so that we can live to";
		mes "fight another day.";
		next;
		mes "[Esuna]";
		mes "For now, this is";
		mes "goodbye. Take care...";
		set lhz_boss,41;
		changequest 12027,12028;
		close2;
		disablenpc "Mysterious Woman";
		end;
	}
	else
	{
		mes "[Esuna]";
		mes "..........";
		mes "......";
		mes "....";
		close;
	}

OnInit:
	disablenpc "Mysterious Woman";
	end;
}

lhz_in01,93,45,4	script	Researcher#1	865,{

	if(lhz_boss < 28)
	{
		mes "[Researcher]";
		mes "You know what's weird?";
		mes "Why do they use blue and";
		mes "red wires when they make";
		mes "bombs? There's so many";
		mes "others you could use, like";
		mes "pink or yellow or or green...";
		if(lhz_boss == 27)
		{
			next;
			mes "[Researcher]";
			mes "Hey, here's a completely";
			mes "hypothetical question. Let's";
			mes "say you find a bomb and it's";
			mes "about to go off. You better";
			mes "cut a wire! So which one are";
			mes "you gonna cut? Red or blue?";
			next;
			switch( select( "Red","Blue" ) )
			{
				case 1:
					mes "[Researcher]";
					mes "Red, eh...?";
					mes "...................";
					mes "Heh, yeah, just like";
					mes "in the movies. I like";
					mes "the way you think~";
					if(!countitem(7348)) close;
					next;
					mes "^3355FFYou surrepticiously";
					mes "check the researcher's";
					mes "ID badge and see that the name ''Lestin'' is written on it.^000000";
					next;
					mes "[Lestin]";
					mes "So...";
					mes "Is there anything";
					mes "I can help you with?";
					next;
					switch( select( "No","Yes" ) )
					{
						case 1:
							mes "[Lestin]";
							mes "Alright then.";
							mes "Just be quiet when";
							mes "you're in the Laboratory.";
							mes "The people here work";
							mes "pretty feverishly and get";
							mes "irritated pretty easily, okay?";
							close;

						case 2:
							mes "[Lestin]";
							mes "So what exactly did";
							mes "you need? I'm just an";
							mes "ordinary researcher,";
							mes "so I don't know how";
							mes "much help I could be...";
							next;
							switch( select( "Show Secret Wing Card." ) )
							{
								case 1:
									break;
							}
							mes "[Lestin]";
							mes "Whoa, whoa~!";
							mes "Careful where you";
							mes "flash that! Okay, I know";
							mes "who you are. But we better";
							mes "continue this someplace";
							mes "a bit more private...";
							close2;
							warp "lhz_in01",283,166;
							end;
					}

				case 2:
					mes "[Researcher]";
					mes "Blue, huh? Yeah,";
					mes "that's what everyone";
					mes "else here picks. Now";
					mes "what color would I pick?";
					mes "Well, that's a secret~";
					close;
			}
		}
		close;
	}
	else
	{
		mes "[Lestin]";
		mes "Geez, I've been so";
		mes "tired lately. Work?";
		mes "Forget it, I'm gonna";
		mes "just kick back today~";
		close;
	}
}

lhz_in01,285,169,3	script	Researcher#2	865,{

	if(checkweight(7349,1) != 1)
	{
		mes "^3355FFWait a second!";
		mes "Right now, you're carrying";
		mes "too many things with you.";
		mes "Please come back after";
		mes "using the Kafra Service";
		mes "to store some of your items.^000000";
		close;
	}
	if(lhz_boss < 27)
	{
		mes "[Researcher]";
		mes "This is a restricted";
		mes "area. Please leave";
		mes "immediately.";
		close;
	}
	else if(lhz_boss == 27)
	{
		mes "[Lestin]";
		mes "This place should be";
		mes "safe enough for us to talk";
		mes "for now, so please listen";
		mes "carefully. Esuna must have";
		mes "told you that they beefed";
		mes "up security lately, right?";
		next;
		mes "[Lestin]";
		mes "Anyway, since my location";
		mes "is being monitored, I can't";
		mes "risk going inside there. You";
		mes "need to sneak in on your own";
		mes "when the guards change shifts. It's an old trick, but it works.";
		next;
		mes "[Lestin]";
		mes "My pass will get you inside,";
		mes "but you'll only be able to";
		mes "stick around for 3 minutes";
		mes "at a time. The Secret Archive is to the right of this laboratory.";
		set lhz_boss,28;
		getitem 7349,1; //Indication_Of_Member02
		changequest 12025,12026;
		next;
		mes "[Lestin]";
		mes "When you're finished,";
		mes "come back and give me";
		mes "the pass since it'll be real";
		mes "suspicious if I don't have it.";
		mes "Good luck to you. This job";
		mes "is risky, but not impossible.";
		close;
	}
	else if(lhz_boss < 35)
	{
		mes "[Lestin]";
		mes "Remember, you gotta";
		mes "sneak past that set of";
		mes "two guards while they're";
		mes "changing shifts. If you hide";
		mes "behind a corner and wait for";
		mes "a bit, you should get lucky.";
		next;
		mes "[Lestin]";
		mes "Once you sneak into the";
		mes "Secret Archive, look for";
		mes "the File Search Engine that";
		mes "should be right next to the";
		mes "door. You gotta use to find";
		mes "specific information, okay?";
		next;
		mes "[Lestin]";
		mes "My suggestion? You really";
		mes "ought to look for any files";
		mes "containing any information";
		mes "regarding ^3355FFRekenber's secret";
		mes "that Shinokas discovered^000000.";
		next;
		mes "[Lestin]";
		mes "Remember that this pass";
		mes "will get you into the Secret";
		mes "Archive for only 3 minutes";
		mes "at a time. Be really careful";
		mes "and don't get caught!";
		close;
	}
	else if(lhz_boss == 35)
	{
		if((!countitem(7349)) || (!countitem(7344)))
		{
			mes "[Lestin]";
			mes "My pass will get you inside,";
			mes "but you'll only be able to";
			mes "stick around for 3 minutes";
			mes "at a time. The Secret Archive is to the right of this laboratory.";
			next;
			mes "[Lestin]";
			mes "When you're finished,";
			mes "come back and give me";
			mes "the pass since it'll be real";
			mes "suspicious if I don't have it.";
			mes "Good luck to you. This job";
			mes "is risky, but not impossible.";
			close;
		}
		mes "[Lestin]";
		mes "You found what you were";
		mes "looking for? That must have";
		mes "been like looking for a needle";
		mes "in a haystick, but you managed";
		mes "to do it. Great work, guy~";
		next;
		mes "[Lestin]";
		mes "It's a good thing you";
		mes "found that when you did.";
		mes "Although it'd help to steal";
		mes "even more intel, sticking";
		mes "around even longer makes";
		mes "it easier for us to get caught.";
		next;
		mes "[Lestin]";
		mes "Alright, you better get";
		mes "out of here and find Esuna";
		mes "now. Watch your back and";
		mes "be careful. We're not all";
		mes "clear until this is all over.";
		next;
		mes "[Lestin]";
		mes "Esuna should be right";
		mes "outside of the city of";
		mes "Lighthalzen where you";
		mes "found her last time. She'll";
		mes "know that you're coming.";
		delitem 7349,1; //Indication_Of_Member02
		set lhz_boss,36;
		changequest 12026,12027;
		close;
	}
	else
	{
		mes "[Lestin]";
		mes "Oh man...";
		mes "Everyone here is";
		mes "getting too paranoid";
		mes "for their own good!";
		mes "You better steer clear";
		mes "from this place for now.";
		close;
	}
}

lhz_in01,187,31,0	script	#Sneak	111,4,3,{

	end;

OnTouch_:
	if((lhz_boss > 27) && (lhz_boss < 35))
	{
		set @sneaktime,gettimetick(0) % 100;
		if((@sneaktime > 10 && @sneaktime < 59) || (@sneaktime < -10 && @sneaktime > -59))
		{
			mes "^3355FFAs you approach";
			mes "the corner, you can";
			mes "hear hushed whispers";
			mes "just over the wall.^000000";
			next;
			mes "[Senior Guard]";
			mes "Hey, my shift is over.";
			mes "Hurry and get the next";
			mes "guy to relieve me, will you?";
			next;
			mes "[Rookie Guard]";
			mes "Already?";
			mes "Wow, time sure";
			mes "flies fast. Fine,";
			mes "wait here a bit.";
			next;
			mes "^3355FFOne of the guards left";
			mes "his post, and now there";
			mes "is only one remaining";
			mes "guard monitoring this area.^000000";
			next;
			mes "[Senior Guard]";
			mes "Criminy...";
			mes "I need to go to";
			mes "the bathroom. Well,";
			mes "I'm sure nothing will";
			mes "happen while I'm gone.";
			next;
			mes "^3355FFYou listen to the";
			mes "guard's footsteps as";
			mes "they grow fainter and";
			mes "fainter into the distance.^000000";
			next;
			switch( select( "Sneak in now.","Wait for another chance." ) )
			{
				case 1:
					mes "^3355FFThis is the perfect";
					mes "opportunity to infiltrate";
					mes "the Secret Archive! You";
					mes "approach the door and";
					mes "find a device where you";
					mes "can insert Lestin's card pass.^000000";
					next;
					switch( select( "Insert Card","Retreat" ) )
					{
						case 1:
							if(!countitem(7349))
							{
								mes "^3355FFYou forgot to bring";
								mes "the card pass that";
								mes "you got from Lestin.";
								mes "You need it in order";
								mes "to open this door.^000000";
								close;
							}
							mes "^3355FFAfter inserting the";
							mes "pass, a panel within";
							mes "the door slides open,";
							mes "revealing a numeric keypad.";
							mes "You need to input the correct";
							mes "password to open the door.^000000";
							next;
L_Enter:
							input @sneakpass;
							if(@sneakpass == 738495)
							{
								mes "^3355FF*Beep~*";
								mes "You hear a pleasant";
								mes "sounding electronic chirp,";
								mes "signaling that you have input";
								mes "the correct password. The door";
								mes "automatically slides open.";
								next;
								switch( select( "Enter","Retreat" ) )
								{
									case 1:
										mes "[Security System]";
										mes "You have 3 minutes to";
										mes "search the Information Archive.";
										mes "When this time elapses, you";
										mes "will be automatically sent";
										mes "outside for security reasons.";
										close2;
										set lhz_boss,29;
										donpcevent "Timer_Sneak::OnEnter";
										warp "lhz_in01",177,35;
										end;

									case 2:
										mes "^3355FFPerhaps now would";
										mes "not be the best time to";
										mes "enter the Secret Archive.";
										mes "Or at least, that's what";
										mes "you've decided for yourself.^000000";
										close;
								}
							}
							mes "^3355FF*Eeeeeee*";
							mes "The door emits an";
							mes "unnerving, high pitched";
							mes "screech after you input";
							mes "the password. You really";
							mes "should try to input it again.^000000";
							set @sneakerror,@sneakerror +1;
							next;
							if(@sneakerror > 2)
							{
									mes "[Security System]";
									mes "*Gzzzzz*";
									mes "You have entered the";
									mes "password incorrectly";
									mes "3 times. Please stand by";
									mes "for managerial assistance.";
									next;
									mes "^3355FFUh oh!";
									mes "You better get";
									mes "out of here before";
									mes "you get caught!^000000";
									close2;
									warp "lhz_in01",191,49;
									end;
							}

							goto L_Enter;

						case 2:
							mes "^3355FFPerhaps now would";
							mes "not be the best time to";
							mes "enter the Secret Archive.";
							mes "Or at least, that's what";
							mes "you've decided for yourself.^000000";
							close;
					}
				case 2:
					mes "^3355FFPerhaps now would";
					mes "not be the best time to";
					mes "enter the Secret Archive.";
					mes "Or at least, that's what";
					mes "you've decided for yourself.^000000";
					close;
			}
			donpcevent "Door#sneak::OnSneak";
			end;
		}
	}
}

lhz_in01,177,44,0	script	Timer_Sneak	-1,8,12,{

OnTouch_:
	warp "lhz_in01",191,49;
	end;

OnInit:
	disablenpc "Timer_Sneak";
	end;

OnEnter:
	stopnpctimer;
	initnpctimer;
	end;

OnTimer180000:
	enablenpc "Timer_Sneak";
	end;

OnTimer190000:
	stopnpctimer;
	disablenpc "Timer_Sneak";
	end;
}



lhz_in01,182,35,0	script	File Search Engine	111,{

	if((lhz_boss > 28) && (lhz_boss < 35))
	{
		mes "^3355FFThis machine can be";
		mes "used to locate specific";
		mes "documents within the";
		mes "Secret Archive. However,";
		mes "you must enter the correct";
		mes "keywords to in order to find";
		mes "specific file locations.";
		next;
L_Search:
		switch( select( "Search Engine.","Cancel." ) )
		{
			case 1:
				mes "^663300- Search Engine Initiated -";
				mes "- Please enter a keyword -";
				mes " ";
				mes "*Search Engine";
				mes "is case sensitve.";
				mes "Please do not use";
				mes "capital letters.^000000";
				next;
				input @sneaksearch$;
				if((@sneaksearch$ == "kafra") || (@sneaksearch$ == "cool event"))
				{
					mes "^663300[Search Result]";
					mes "Documents regarding";
					mes "Kafra Corporation and";
					mes "Cool Event Corp are";
					mes "located in Arena 3-2.^000000";
					set lhz_boss,30;
					close;
				}
				else if(@sneaksearch$ == "shinokas")
				{
					mes "^663300[Search Result]";
					mes "Documents regarding";
					mes "Shinokas are located";
					mes "in Arena 1-5.^000000";
					set lhz_boss,31;
					close;
				}
				else if((@sneaksearch$ == "stein") || (@sneaksearch$ == "STEIN") || (@sneaksearch$ == "S.T.E.I.N"))
				{
					mes "^663300[Search Result]";
					mes "Documents regarding";
					mes "S.T.E.I.N are considered";
					mes "highly classified and";
					mes "cannot be accessed";
					mes "through this system.^000000";
					close;
				}
				else if(@sneaksearch$ == "ymir")
				{
					mes "^663300[Search Result]";
					mes "Documents regarding";
					mes "Ymir's Heart are ranked";
					mes "as highly classified and";
					mes "cannot be accessed";
					mes "through this system.^000000";
					close;
				}
				else if((@sneaksearch$ == "president") || (@sneaksearch$ == "karl") || (@sneaksearch$ == "weierstrass"))
				{
					mes "^663300[Search Result]";
					mes "2nd Class documents on";
					mes "President Karl Weierstrass";
					mes "are located in Area 1-7. For";
					mes "more highly classified files";
					mes "on Weierstrass, please use";
					mes "a higher security archive.^000000";
					set lhz_boss,32;
					close;
				}
				else if(@sneaksearch$ == "einbroch")
				{
					mes "^663300[Search Result]";
					mes "Documents regarding";
					mes "Einbroch are stored";
					mes "in Area 6-1.^000000";
					set lhz_boss,33;
					close;
				}
				else if(@sneaksearch$ == "lighthalzen")
				{
					mes "^663300[Search Result]" ;
					mes "Documents regarding";
					mes "Lighthalzen are stored";
					mes "in Area 3-3.^000000";
					set lhz_boss,34;
					close;
				}
				else if(@sneaksearch$ == "rekenber")
				{
					mes "^663300[Search Result]";
					mes "Documents regarding";
					mes "Rekenber are highly classified and cannot be accessed by this system.^000000";
					next;
					goto L_Search;
				}
				else
				{
					mes "^663300[Search Result]";
					mes "Keyword not found.";
					mes "Please search another";
					mes "archive or increase";
					mes "access permissions.^000000";
					close;
				}

			case 2:
				mes "^663300[Search Engine Close]";
				mes "File search has been";
				mes "canceled. Please be aware";
				mes "that sudden shutdown may";
				mes "cause system errors.^000000";
				close;
		}
	}
	mes "^3355FFThis machine can be";
	mes "used to locate specific";
	mes "documents within the";
	mes "Secret Archive, However,";
	mes "you no longer need to";
	mes "search through the files.^000000";
	close;
}

lhz_in01,177,31,0	script	Door#sneak	111,{

	if(lhz_boss < 29)
	{
		mes "[Guard]";
		mes "This is a";
		mes "restricted area.";
		mes "Please keep clear";
		mes "if you do not have";
		mes "special authorization.";
		mes "Thank you for cooperating.";
		close;
	}
	else if(lhz_boss < 36)
	{
		mes "^3355FFThe door is shut, but";
		mes "there is a device that";
		mes "looks sort of like the";
		mes "entry keypad that was on";
		mes "the other side of this door.^000000";
		next;
		switch( select( "Manipulate device.","Investigate further." ) )
		{
			case 1:
				mes "^3355FFOnce you touch the";
				mes "device, it automatically";
				mes "responds and the door";
				mes "quickly slides open.^000000";
				close2;
				warp "lhz_in01",177,26;
				end;

			case 2:
				close;
		}
	}
}

lhz_in01,184,40,0	script	Area 1-5	111,{

	if(checkweight(7344,1) != 1)
	{
		mes "^3355FFWait a second!";
		mes "Right now, you're carrying";
		mes "too many things with you.";
		mes "Please come back after";
		mes "using the Kafra Service";
		mes "to store some of your items.^000000";
		close;
	}
	if((lhz_boss > 28) && (lhz_boss < 31))
	{
		mes "^3355FFThere's literally thousands";
		mes "of documents to sort through.";
		mes "There's no way you can find";
		mes "something of value here in";
		mes "just three minutes...^000000";
		close;
	}
	else if(lhz_boss == 31)
	{
		mes "^3355FFWait, one of these files";
		mes "looks pretty incriminating.";
		mes "It seems to contain the";
		mes "kind of information that";
		mes "you've been looking for.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717A piece of Ymir's Heart";
		mes "was uncovered in one of";
		mes "the mines in Einbech and";
		mes "immediately transported to";
		mes "the Laboratory for research.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717However, something";
		mes "happened to the miners";
		mes "who discovered the piece";
		mes "of Ymir's Heart. Apparently,";
		mes "a beast from Einbroch folk";
		mes "lore inhabited the area...^000000";
		set lhz_boss,35;
		getitem 7344,1;
		close;
	}
}

lhz_in01,184,52,0	script	Area 1-7	111,{

	if((lhz_boss > 28) && (lhz_boss < 32))
	{
		mes "^3355FFThere's literally thousands";
		mes "of documents to sort through.";
		mes "There's no way you can find";
		mes "something of value here in";
		mes "just three minutes...^000000";
		close;
	}
	else if(lhz_boss == 32)
	{
		mes "^3355FFThis looks like a file";
		mes "containing information";
		mes "on President Weierstrauss.";
		mes "Perhaps there's something";
		mes "in here that might be helpful.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717Karl Weierstrass has";
		mes "been a long distinguished";
		mes "politician in the Schwaltzvalt";
		mes "Republic and was elected as";
		mes "its president in the year 984.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717Although he has enjoyed";
		mes "high popularity ratings and";
		mes "success in his endorsing his";
		mes "policies, Wierstrass is rumored";
		mes "to be have some sort of feud";
		mes "against Rekenber.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717Although there is no";
		mes "need to bring this to the";
		mes "attention of the media, it";
		mes "is highly recommended";
		mes "to monitor his activities";
		mes "throughout his term...^000000";
		next;
		mes "^3355FFThere's a great amount";
		mes "of information in this file,";
		mes "but it doesn't look like any";
		mes "of it will be of help to you.";
		mes "You should continue with";
		mes "your search for evidence.^000000";
		close;
	}
	else
	{
		mes "^3355FFThis file doesn't";
		mes "look like it contains";
		mes "any evidence that will";
		mes "help you. You should";
		mes "continue your search";
		mes "through the rest of the files.^000000";
		close;
	}
}

lhz_in01,184,46,0	script	Area 3-2	111,{

	if((lhz_boss > 28) && (lhz_boss < 30))
	{
		mes "^3355FFThere's literally thousands";
		mes "of documents to sort through.";
		mes "There's no way you can find";
		mes "something of value here in";
		mes "just three minutes...^000000";
		close;
	}
	else if(lhz_boss == 30)
	{
		mes "^3355FFYou've found a file";
		mes "containing information";
		mes "on the Kafra Corporation";
		mes "and Cool Event Corp.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717Rekenber Corporation.";
		mes "in an effort to expand its";
		mes "power into the Rune-Midgarts";
		mes "Kingdom, will cooperate with";
		mes "and support Cool Event Corp.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717Although this partnership";
		mes "has been greatly successful,";
		mes "Kafra Corporation has been";
		mes "working to check Cool Event";
		mes "Corp's explosive growth.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717More than Kafra Corporation's";
		mes "lobbying, Kafra's 3rd Security";
		mes "Team stands as a formidable";
		mes "threat to our success. One of";
		mes "our highest priorities is to";
		mes "investigate their activities.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717It is believed that Kafra's";
		mes "3rd Security Team has alrady";
		mes "placed secret agents in key";
		mes "strategic locations within";
		mes "the Schwaltzvalt Republic.^000000";
		next;
		mes "^3355FFThis file is very intriguing,";
		mes "but it doesn't really cover";
		mes "any information that can be";
		mes "considered incriminating.^000000";
		close;
	}
	else
	{
		mes "^3355FFThis file doesn't";
		mes "look like it contains";
		mes "any evidence that will";
		mes "help you. You should";
		mes "continue your search";
		mes "through the rest of the files.^000000";
		close;
	}
}

lhz_in01,184,48,0	script	Area 3-3	111,{

	if((lhz_boss > 28) && (lhz_boss < 34))
	{
		mes "^3355FFThere's literally thousands";
		mes "of documents to sort through.";
		mes "There's no way you can find";
		mes "something of value here in";
		mes "just three minutes...^000000";
		close;
	}
	else if(lhz_boss == 34)
	{
		mes "[Classified Info]";
		mes "^8C1717...After negotiating with";
		mes "the existing residents, all of";
		mes "the property rights were sold";
		mes "and the city was renamed";
		mes "''Lighthalzen'' in 865.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717The city was then separated";
		mes "into three districts. These are";
		mes "the common trade district, the";
		mes "old residential district and";
		mes "the Rekenber Headquarters.";
		mes ".................^000000";
		next;
		mes "^3355FFThis file covers";
		mes "Lighthalzen's history.";
		mes "However, the founding of";
		mes "the city is common knowlege,";
		mes "so this document probably won't";
		mes "have any significant evidence.^000000";
		close;
	}
	else
	{
		mes "^3355FFThis file doesn't";
		mes "look like it contains";
		mes "any evidence that will";
		mes "help you. You should";
		mes "continue your search";
		mes "through the rest of the files.^000000";
		close;
	}
}

lhz_in01,177,56,0	script	Area 6-1	111,{

	if((lhz_boss > 28) && (lhz_boss < 33))
	{
		mes "^3355FFThere's literally thousands";
		mes "of documents to sort through.";
		mes "There's no way you can find";
		mes "something of value here in";
		mes "just three minutes...^000000";
		close;
	}
	else if(lhz_boss == 33)
	{
		mes "[Classified Info]";
		mes "^8C1717........";
		mes "Our organization purchased";
		mes "all of western Einbech and";
		mes "began construction of Einbroch";
		mes "in 927 in order to obtain more";
		mes "pieces of Ymir's Heart.^000000";
		next;
		mes "[Classified Info]";
		mes "^8C1717Unofficially, each and";
		mes "every single factory belongs";
		mes "to the Rekenber Corporation.";
		mes "Their highest priority is";
		mes "to uncover Ymir Heart Pieces...^000000";
		next;
		mes "^3355FFAlthough this file contains";
		mes "surprising information about";
		mes "Einbroch, none of it can be";
		mes "considered to be incriminating";
		mes "evidence against Rekenber.";
		close;
	}
	else
	{
		mes "^3355FFThis file doesn't";
		mes "look like it contains";
		mes "any evidence that will";
		mes "help you. You should";
		mes "continue your search";
		mes "through the rest of the files.^000000";
		close;
	}
}

lhz_dun02,282,278,0	script	Broken Machine	111,{

	if(checkweight(7346,1) != 1)
	{
		mes "^3355FFWait a second!";
		mes "Right now, you're carrying";
		mes "too many things with you.";
		mes "Please come back after";
		mes "using the Kafra Service";
		mes "to store some of your items.^000000";
		close;
	}
	if(lhz_boss < 6)
	{
		mes "^3355FFThere are several";
		mes "broken machines lying";
		mes "around that pretty much";
		mes "seem completely useless.^000000";
		close;
	}
	else if(lhz_boss == 6)
	{
		mes "^3355FFThere are several";
		mes "broken machines lying";
		mes "around that pretty much";
		mes "seem completely useless.";
		mes "However, you catch the";
		mes "glimmer of a dim light";
		mes "amongst the scrap metal.^000000";
		next;
		switch( select( "Investigate it.","Ignore it." ) )
		{
			case 1:
				mes "^3355FFAfter digging through";
				mes "the discarded machinery,";
				mes "you find a strange rock that";
				mes "is about as large as your fist";
				mes "and shimmers with a faint glow.^000000";
				next;
				switch( select( "This might be important.","This doesn't seem useful." ) )
				{
					case 1:
						mes "^3355FFThis weird rock";
						mes "might be just the";
						mes "thing that ^000000Ghalstein^3355FF";
						mes "sent you here to find.";
						mes "He was probably right";
						mes "not to describe it to you.";
						mes "Words alone aren't enough...^000000";
						set lhz_boss,7;
						getitem 7346,1;
						close;

					case 2:
						mes "^3355FFJust because this rock";
						mes "looks funny doesn't make";
						mes "it any more special than";
						mes "the countless number of";
						mes "rocks you've seen in";
						mes "your entire lifetime.^000000";
						close;
				}

			case 2:
				mes "^3355FFWhat can possibly";
				mes "be of value in this";
				mes "pile of useless junk?^000000";
				close;
		}
	}
	else
	{
		mes "^3355FFThere are several";
		mes "broken machines lying";
		mes "around that pretty much";
		mes "seem completely useless.^000000";
		close;
	}
}

sec_in02,17,170,4	script	boss::lght_boss_admin	809,{
	callfunc "F_GM_NPC";
	mes "[Patch]";
	mes "Tell me what you want.";
	next;
	switch(select("Current Variables:How Many:Shinokas - Quest Complete")) {
	case 1:
		break;
	case 2:
		input .@input,0,1000;
		set lght_boss,.@input;
		break;
	case 3:
		set Shinokas_Quest,11;
		close;
	}
	mes " ";
	mes ""+lght_boss;
	close;
}

lhz_in02,19,274,2	script	Maintenance Guy	851,{

	mes "[Kudiuu]";
	mes "Holy...!";
	mes "Will this place";
	mes "ever get cleaned up?!";
	mes "^333333*Cough cough*^000000 There's";
	mes "so much dust here, it's";
	mes "almost a health hazard!";
	close;
}

// Rekenber Job Quest
//============================================================
lhz_in01,174,258,3	script	Young Man#reken	868,{

	if(lhz_rekenber > 21)
	{
		cutin "lhz_kaz10",2;
		mes "[Kazien]";
		mes "Just...";
		mes "Leave me alone.";
		mes "I feel nothing but";
		mes "guilt when I see you.";
		next;
		mes "[Kazien]";
		mes "Don't take it the wrong";
		mes "way. I mean, it's not like";
		mes "you did nothing wrong. I'm";
		mes "the one who's... Geez. I wish";
		mes "I could live the way you do.";
		mes "Someday I'll be strong enough...";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 21)
	{
		cutin "lhz_kaz03",2;
		mes "[Kazien]";
		mes "Hey, you're back. As usual,";
		mes "you've done a good job. You";
		mes "look exhausted: did you run";
		mes "into those thugs again?";
		mes "Why don't you take a rest?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Kazien...";
		mes "While I was fighting";
		mes "those thugs, one of the";
		mes "packages was accidentally";
		mes "opened, and I saw what was";
		mes "inside of those packages.";
		next;
		cutin "lhz_kaz06",2;
		next;
		mes "[Kazien]";
		mes "......";
		mes ".........";
		mes "............";
		cutin "lhz_kaz08",2;
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Wh-why are you supplying";
		mes "those things? If we let those";
		mes "packages get imported by";
		mes "other countries, it can";
		mes "cause a lot of trouble...!";
		next;
		cutin "lhz_kaz10",2;
		mes "[Kazien]";
		mes "Stop. Please.";
		mes "J-just stop it.";
		mes "I don't want to";
		mes "hear anymore.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Hold it, I deserve an";
		mes "answer! How can you turn";
		mes "a blind eye and provide just";
		mes "anyone with ^FF0000hi-tech weapons";
		mes "and guardians^000000? It's like you're";
		mes "promoting war and violence!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "And what about your little";
		mes "brother Lyozien? He has";
		mes "no idea what he's doing!";
		mes "Don't we have a responsibility";
		mes "to the world to make sure these";
		mes "weapons aren't distributed?";
		next;
		cutin "lhz_kaz11",2;
		mes "[Kazien]";
		mes "Shut up! You don't";
		mes "know anything! Just";
		mes "shut up! I'm doing this";
		mes "for the sake of my family!";
		mes "You don't know what it's like";
		mes "to live in Lighthalzen's slums!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes ".................";
		next;
		cutin "lhz_kaz04",2;
		mes "[Kazien]";
		mes "There'd be days when my";
		mes "brother and I'd have nothing";
		mes "to eat. So when I heard about";
		mes "this job, I took it. What good";
		mes "is world peace if I'm not even";
		mes "alive to enjoy it, huh?";
		next;
		cutin "lhz_kaz11",2;
		mes "[Kazien]";
		mes "Now, my brother Lyozien is";
		mes "a gentle soul, has nothing";
		mes "but love for everybody. So, of";
		mes "course I can't tell him what";
		mes "I'm really doing--he'd never";
		mes "agree to it, believe me.";
		next;
		cutin "lhz_kaz10",2;
		mes "[Kazien]";
		mes "I hate this job and what";
		mes "I'm doing and I want to quit.";
		mes "But then what? Go back to the";
		mes "slums? Forget it. As long as";
		mes "Lyozien is happy, I don't mind if I have to do the devil's work.";
		next;
		cutin "lhz_kaz11",2;
		mes "[Kazien]";
		mes "At least this way, keeping";
		mes "it all secret, I can protect";
		mes "Lyozien from the ugly nature";
		mes "of this job, even if I'm dirtying my hands, making money";
		mes "off of other people's deaths.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "But that still isn't right.";
		mes "You're selling weapons so";
		mes "that people can kill each other! Even if it's for the sake of";
		mes "providing for your family...";
		next;
		cutin "lhz_kaz05",2;
		mes "[Kazien]";
		mes "Look man, this is what";
		mes "I decided. I don't care";
		mes "what other people'll think.";
		mes "I might go to hell when";
		mes "I die, but that's my problem.";
		next;
		mes "[Kazien]";
		mes "Besides, you adventurers";
		mes "are always running around";
		mes "with your swords and magic spells... Isn't that just as bad?";
		mes "It's not the weapons or the power that's bad: it's how they're used.";
		next;
		cutin "lhz_kaz11",2;
		mes "[Kazien]";
		mes "Granted, most of my clients";
		mes "are pretty questionable, and";
		mes "you adventurers usually use";
		mes "your powers for good, but...";
		mes "Damn it! Just... Don't come";
		mes "back. I can't work like this...";
		next;
		set lhz_rekenber,22;
		getexp (checkre(3))?55000:550000,0;
		completequest 12014;
		cutin "lhz_kaz01",2;
		mes "[Kazien]";
		mes "Look, I can't have";
		mes "you working with me";
		mes "and Lyozien anymore.";
		mes "Sorry, but it's for Lyozien's";
		mes "own good. That, and you";
		mes "make me feel guilty...";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber > 16)
	{
		cutin "lhz_kaz02",2;
		mes "[Kazien]";
		mes "Hey now, you better";
		mes "get a move on. You gotta";
		mes "assist another delivery to";
		mes "the Rune-Midgarts Kingdom.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 16)
	{
		cutin "lhz_kaz03",2;
		mes "[Kazien]";
		mes "Ah, I heard from Lyozien";
		mes "that you guys finished your";
		mes "delivery. You're probably";
		mes "the best part-timer that I've";
		mes "had in a long, long while.";
		next;
		cutin "lhz_kaz10",2;
		mes "[Kazien]";
		mes "Anyway, we've got yet";
		mes "another delivery for the";
		mes "Rune-Midgarts Kingdom. It's";
		mes "weird that we're getting more";
		mes "orders from there, but orders from other countries are decreasing.";
		next;
		cutin "lhz_kaz07",2;
		mes "[Kazien]";
		mes "Eh, I don't have the time";
		mes "to wonder about stuff like";
		mes "that. Lyozien's waiting for";
		mes "you, so get to it, okay?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "W-wait! During the last";
		mes "delivery, I was attacked";
		mes "by a group of thugs that";
		mes "wanted to destroy the";
		mes "packages? Why would";
		mes "they want to do that?";
		next;
		cutin "lhz_kaz02",2;
		mes "[Kazien]";
		mes "Look... You're better";
		mes "off not knowing. Or are";
		mes "you asking me to pay you";
		mes "more for this job since";
		mes "you're risking your life?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I understand that the";
		mes "customer's confidentiality";
		mes "is important, but I'd feel a";
		mes "lot better if I knew what was";
		mes "in those packages, and why me";
		mes "and Lyozien are being attacked.";
		next;
		cutin "lhz_kaz08",2;
		mes "[Kazien]";
		mes "Listen, I'm not obligated--";
		mes "I can't tell you. Heck, I can't";
		mes "even tell my own brother what's";
		mes "in those packages. You can see";
		mes "that, can't you? Anyway, you";
		mes "can handle those thugs, right?";
		next;
		set lhz_rekenber,17;
		getexp (checkre(3))?45000:450000,0;
		cutin "lhz_kaz10",2;
		mes "[Kazien]";
		mes "Right. Now get back to";
		mes "the Airship and talk to";
		mes "Lyozien again. Don't give";
		mes "him any trouble and make";
		mes "sure you protect him.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber > 11)
	{
		cutin "lhz_kaz08",2;
		mes "[Kazien]";
		mes "What are you doing";
		mes "waiting around here";
		mes "for? You've got a job to";
		mes "do, so hurry up and do it~";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 11)
	{
		cutin "lhz_kaz05",2;
		mes "[Kazien]";
		mes "Hey, you're back. I got a";
		mes "message from Rune-Midgarts,";
		mes "telling us they received their";
		mes "order. Good work! So how do";
		mes "you like working with Lyozien?";
		mes "He's one of my best men.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Wait, aren't you and";
		mes "Lyozien supposed";
		mes "to be brothers?";
		next;
		cutin "lhz_kaz03",2;
		mes "[Kazien]";
		mes "Whoa, he told you that?";
		mes "I guess he feels that he";
		mes "can trust you enough with";
		mes "that kind of personal talk...";
		mes "Yeah, he's my little brother.";
		mes "And a better man than me...";
		next;
		mes "[Kazien]";
		mes "I've gotten my hands";
		mes "pretty dirty doing this...";
		mes "Oh, forget it. You came ";
		mes "here for a job, right?";
		mes "Luckily, I got another";
		mes "delivery for you to work on...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Actually, Kazien...";
		mes "I was curious. What";
		mes "exactly are we delivering?";
		mes "I mean, not even Lyozien";
		mes "doesn't know exactly what";
		mes "is in those packages.";
		next;
		cutin "lhz_kaz06",2;
		mes "[Kazien]";
		mes "Huh... Does that mean";
		mes "you can't work with us if";
		mes "you don't know exactly what";
		mes "you're doing?";
		next;
		mes "[Kazien]";
		mes " Come on, I told";
		mes "you before--absolute secrecy.";
		mes "It goes both ways, you know.";
		next;
		mes "[Kazien]";
		mes "Look, for your own good,";
		mes "quit asking. Knowing what";
		mes "you're delivering wouldn't";
		mes "change a thing. Trust me.";
		next;
		mes "[Kazien]";
		mes "Anyway, this next job is";
		mes "more of the same. Meet";
		mes "Lyozien in the international";
		mes "flight Airship and protect";
		mes "another package destined";
		mes "for the Rune-Midgarts Kingdom.";
		next;
		set lhz_rekenber,12;
		// changequest 5005,5006;
		getexp (checkre(3))?40000:400000,0;
		cutin "lhz_kaz03",2;
		mes "[Kazien]";
		mes "Alright, I'll see you";
		mes "later. The important";
		mes "thing is that you do the";
		mes "best job that you can.";
		mes "And don't give Lyozien";
		mes "any trouble: that's my job!";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber > 7)
	{
		cutin "lhz_kaz08",2;
		mes "[Kazien]";
		mes "Lyozien is waiting for";
		mes "you on the international";
		mes "flight Airship, so go and";
		mes "meet him there as soon";
		mes "as you can. Alright then,";
		mes "I'll see you later.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 7)
	{
		cutin "lhz_kaz05",2;
		mes "[Kazien]";
		mes "Hey, you're back~";
		mes "Great, I guess that means";
		mes "that you've decided to work";
		mes "for us! Alright, let me tell you about your first real job. As";
		mes "always: ^FF0000keep it on the down-low^000000.";
		next;
		mes "[Kazien]";
		mes "Go to the Airship for the";
		mes "international flights, not";
		mes "the domestic ones, and meet";
		mes "a man named ^FF0000Lyozien^000000 inside.";
		mes "He's our courier that'll provide you with further instructions.";
		next;
		cutin "lhz_kaz06",2;
		mes "[Kazien]";
		mes "Oh. You can talk to Lyozien";
		mes "about the job, but definitely";
		mes "not to anybody else. Anyway,";
		mes "when you're done with what";
		mes "he asks you to do, come back";
		mes "to me for another job, okay?";
		next;
		set lhz_rekenber,8;
		changequest 12010,12011;
		cutin "lhz_kaz01",2;
		mes "[Kazien]";
		mes "Don't forget...";
		mes "Talk to ^FF0000Lyozien^000000, our";
		mes "courier, on the Airship";
		mes "for the international flights.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 6)
	{
		if(rand(1,15) == 7)
		{
			cutin "lhz_kaz04",2;
			mes "[Kazien]";
			mes "Oh, hey, it's you again.";
			mes "Wait. No. You only remind";
			mes "me of someone I've met. Um,";
			mes "have we met before? I don't";
			mes "remember at all. Oooh, I hate";
			mes "being this busy, I can't focus!";
			next;
			set lhz_rekenber,0;
			erasequest 12009;
			mes "[Kazien]";
			mes "Arrgh, this is not good.";
			mes "We are this busy but we don't have enough people,";
			mes "yet it is not that extrememly bad";
			mes "to a point that we need to hire more people.";
			next;
			cutin "lhz_kaz01",2;
			mes "[Kazien]";
			mes "Will you step back? You are hindering my vision.";
			close2;
		}
		else
		{
			cutin "lhz_kaz10",2;
			mes "[Kazien]";
			mes "Oh, hey, it's you again.";
			mes "Listen, you didn't come here";
			mes "looking for a part time job,";
			mes "did you? I already told you";
			mes "that I can't bring myself";
			mes "to trust you, you know?";
			next;
			mes "[Kazien]";
			mes "Look, you're not a bad guy,";
			mes "so I'm sure you'd be perfect";
			mes "for some other employer.";
			mes "Don't feel bad... Um, what";
			mes "was your name again? Wait,";
			mes "did you even give it to me...?";
			close2;
		}
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 5)
	{
		cutin "lhz_kaz04",2;
		mes "[Kazien]";
		mes "So, were you able to";
		mes "contact Garins? Or did";
		mes "you encounter any problems?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well, I came back to";
		mes "let you know that I haven't";
		mes "been able to find a way inside";
		mes "the Einbroch Laboratory. There";
		mes "was the guard, but I couldn't";
		mes "really tell him anything.";
		next;
		cutin "lhz_kaz10",2;
		mes "[Kazien]";
		mes "Whaaaat~?";
		mes "I'm sure he would";
		mes "have let you in if you";
		mes "told him that you had";
		mes "to talk to Garins, right?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "But...";
		mes "I thought you said";
		mes "I'm not supposed to";
		mes "tell anyone the details";
		mes "of my assignment?";
		next;
		cutin "lhz_kaz06",2;
		mes "[Kazien]";
		mes "Heh... Yeah.";
		mes "Yeah, that's right.";
		mes "Heh heh heh! Hahahaha!";
		mes "Great! I'm happy to say,";
		mes "buddy, you passed the test!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "H-huh? But I never";
		mes "even got to see Garins...";
		mes "I didn't finish the task";
		mes "that you assigned to me.";
		next;
		cutin "lhz_kaz09",2;
		mes "[Kazien]";
		mes "Garins is just some";
		mes "cool name I made up.";
		mes "He doesn't really exist.";
		mes "I just wanted to test your";
		mes "trustworthiness, is all.";
		mes "Now do you understand?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I... I guess.";
		mes "Still, you just tricked";
		mes "me! How am I supposed";
		mes "to trust you now?";
		next;
		set lhz_rekenber,7;
		cutin "lhz_kaz06",2;
		mes "[Kazien]";
		mes "Oh... You...";
		mes "You got a point, there.";
		mes "Huh, now isn't that ironic? I'm sorry, pal, let me apologize.";
		mes "Take some time, consider working for me, and then come back, okay?";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 4)
	{
		cutin "lhz_kaz04",2;
		mes "[Kazien]";
		mes "So, were you able to";
		mes "contact Garins? Or did";
		mes "you encounter any problems?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well, I wasn't able to";
		mes "find him. In fact, I don't";
		mes "think that Garins even works";
		mes "at the Einbroch Laboratory.";
		next;
		cutin "lhz_kaz08",2;
		mes "[Kazien]";
		mes "Whaaaat~?";
		mes "That can't be true.";
		mes "Well, how'd you";
		mes "find that out?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I happened to ask the";
		mes "Laboratory Guard, but";
		mes "he wouldn't even let me in.";
		next;
		set lhz_rekenber,6;
		changequest 12008,12009;
		cutin "lhz_kaz10",2;
		mes "[Kazien]";
		mes "Uh oh...";
		mes "I thought so.";
		mes "I'm sorry, pal, but";
		mes "you failed the test.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "H-huh? What?";
		mes "What do you mean?";
		next;
		mes "[Kazien]";
		mes "You told that to the guard,";
		mes "but you weren't supposed";
		mes "to let anyone know any detail";
		mes "about your assignment. Yeah...";
		mes "Garins is just a name I made";
		mes "up. He doesn't really exist.";
		next;
		mes "[Kazien]";
		mes "I know you meant well,";
		mes "you know, doing whatever";
		mes "you can to finish whatever";
		mes "goal you have, but you can't";
		mes "forget the details. Anyway,";
		mes "sorry, but we can't use you...";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 3)
	{
		cutin "lhz_kaz01",2;
		mes "[Kazien]";
		mes "Remember, visit ^FF0000Garins^000000";
		mes "in the ^FF0000Einbroch Laboratory^000000";
		mes "and ^FF0000confirm that he received";
		mes "his order^000000. We pride ourselves";
		mes "in our clients' confidentiality,^FFFFFF  ^000000 so keep it secret, got it?";
		next;
		mes "[Kazien]";
		mes "I'll just be waiting";
		mes "around over here, so";
		mes "once you're done with";
		mes "that, come back to me.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 2)
	{
		cutin "lhz_kaz04",2;
		mes "[Kazien]";
		mes "Okay, I got it! Your first";
		mes "assignment for us is pretty";
		mes "simple, but think of it as";
		mes "something of a trial run.";
		mes "You know, for us to see";
		mes "how reliable you are.";
		next;
		mes "[Kazien]";
		mes "All you gotta do is head";
		mes "to Einbroch, find the Lab";
		mes "there, and find a researcher";
		mes "named Garins. You need to";
		mes "confirm whether he safely";
		mes "received his order from us.";
		next;
		mes "[Kazien]";
		mes "Simple stuff, yeah?";
		mes "Now, you can't let anyone";
		mes "know about your assignment.";
		mes "Otherwise, we can't trust you";
		mes "for more important stuff. And";
		mes "I really wanna trust you.";
		next;
		cutin "lhz_kaz05",2;
		mes "[Kazien]";
		mes "Remember, visit ^FF0000Garins^000000";
		mes "in the ^FF0000Einbroch Laboratory^000000";
		mes "and ^FF0000confirm that he received";
		mes "his order^000000. We pride ourselves";
		mes "in our clients' confidentiality, so keep it secret, got it?";
		next;
		set lhz_rekenber,3;
		changequest 12007,12008;
		mes "[Kazien]";
		mes "I'll just be waiting";
		mes "around over here, so";
		mes "once you're done with";
		mes "that, come back to me.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 1)
	{
		cutin "lhz_kaz01",2;
		mes "[Kazien]";
		mes "We're so busy, we barely";
		mes "have enough people to cover";
		mes "our workload right now. Still,";
		mes "it's not so bad that we gotta";
		mes "invest in some new hires.";
		next;
		mes "[Kazien]";
		mes "Oh hey, sorry buddy,";
		mes "but you mind stepping";
		mes "back? It's just that you're";
		mes "blocking my view is all.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Wait, did you just say";
		mes "that you need help?";
		mes "I'd like to help solve";
		mes "your problem, er, for";
		mes "a nominal fee or some";
		mes "kind of reward. You know...";
		next;
		cutin "lhz_kaz10",2;
		mes "[Kazien]";
		mes "Hey, alright~";
		mes "I could use an extra";
		mes "hand if you're willing";
		mes "to work part time. Plus,";
		mes "you're a straight shooter.";
		mes "I like that. Let's see now...";
		next;
		if(BaseLevel < 70)
		{
			mes "[Kazien]";
			mes "Awww, I'm sorry, pal.";
			mes "I know you mean well, but";
			mes "to put it bluntly, you're not";
			mes "not strong enough for this";
			mes "kinda work. Hey, but if you put on";
			mes "some muscle, ask me again, okay?";
			close2;
			cutin "",255;
			end;
		}
		mes "[Kazien]";
		mes "Yeah, okay. You look like";
		mes "you can handle this. But";
		mes "are you the type of person";
		mes "I can trust? Hey, you can";
		mes "keep confidential information";
		mes "without telling anyone, right?";
		next;
		switch( select( "Yes, of course.","Nope, I love giving away secrets." ) )
		{
			case 1:
				set lhz_rekenber,2;
				mes "[Kazien]";
				mes "Great, great.";
				mes "I guess we can just";
				mes "get down to business,";
				mes "then. Let me think. First,";
				mes "I should give you something";
				mes "easy to do to test you out...";
				close2;
				cutin "",255;
				end;

			case 2:
				cutin "lhz_kaz04",2;
				mes "[Kazien]";
				mes "Awww, man.";
				mes "I can't hire you";
				mes "if you're gonna blab";
				mes "your mouth. Sorry buddy,";
				mes "but I can't afford to take";
				mes "any risks. You understand...";
				close2;
				cutin "",255;
				end;
		}
	}
	cutin "lhz_kaz01",2;
	mes "[Kazien]";
	mes "We're so busy, we barely";
	mes "have enough people to cover";
	mes "our workload right now. Still,";
	mes "it's not so bad that we gotta";
	mes "invest in some new hires.";
	next;
	cutin "lhz_kaz04",2;
	mes "[Kazien]";
	mes "Oh hey, sorry buddy,";
	mes "but you mind stepping";
	mes "back? It's just that you're";
	mes "blocking my view is all.";
	close2;
	cutin "",255;
	end;
}

lighthalzen,141,162,3	script	Old Man#reken	85,{

	mes "[Old Man]";
	mes "Lately, Kazien seems";
	mes "to be having a hard time";
	mes "managing his business.";
	mes "Always complaining that";
	mes "he lacks the manpower...";
	next;
	mes "[Old Man]";
	mes "I don't know what kind of";
	mes "business he's conducting,";
	mes "but why don't you help him";
	mes "out? I don't believe that any";
	mes "particularly special skills are";
	mes "required for some positions.";
	next;
	if(!lhz_rekenber) {
		set lhz_rekenber,1;
		setquest 12007;
	}
	mes "[Old Man]";
	mes "Well, if you're interested,";
	mes "you can find Kazien inside";
	mes "the corporation building.";
	mes "Young people like him should";
	mes "never be too proud to ask for help. He still needs to learn...";
	close;
}

einbroch,55,52,3	script	Laboratory Guard#reken	 852,{

	if(lhz_rekenber == 3)
	{
		mes "[Laboratory Guard]";
		mes "Hold it! This is";
		mes "a restricted area to";
		mes "the public! Unless you";
		mes "have some special business,";
		mes "you'll have to leave right now.";
		next;
		switch( select( "Actually, I do have business here.","Whoa, I'm leaving!" ) )
		{
			case 1:
				mes "[Laboratory Guard]";
				mes "Yes? State the nature";
				mes "of your business here,";
				mes "as well as any person that";
				mes "you wish to contact inside";
				mes "of this laboratory facility.";
				next;
				switch( select( "I need to see Mr. Garins...","I'll... come back later." ) )
				{
					case 1:
						mes "[" + strcharinfo(0) + "]";
						mes "I need to see Mr. Garins";
						mes "and confirm that he received";
						mes "a package that was sent to him.";
						next;
						mes "[Laboratory Guard]";
						mes "Garins, eh?";
						mes "Alright, let me check";
						mes "the employee list. Hmm...";
						mes "Garins... Garins... Eh?";
						mes "He's not here. Maybe you";
						mes "came to the wrong place?";
						next;
						mes "[Laboratory Guard]";
						mes "Sorry, but it looks like";
						mes "you've wasted your time.";
						mes "We don't have a Garins";
						mes "working here. Anyway,";
						mes "I still can't allow you to";
						mes "enter the laboratory.";
						set lhz_rekenber,4;
						// changequest 12008,12010;
						close;

					case 2:
						mes "[" + strcharinfo(0) + "]";
						mes "I'll... come back later.";
						mes "(^333333I better speak to Kazien";
						mes "and let him know I'm having";
						mes "trouble getting past this";
						mes "guard. Otherwise, I might";
						mes "never finish this job!^000000)";
						set lhz_rekenber,5;
						changequest 12008,12010;
						close;
				}

			case 2:
				mes "[" + strcharinfo(0) + "]";
				mes "Whoa, I'm leaving!";
				mes "(^333333I better speak to Kazien";
				mes "and let him know I'm having";
				mes "trouble getting past this";
				mes "guard. Otherwise, I might";
				mes "never finish this job!^000000)";
				set lhz_rekenber,5;
				changequest 12008,12010;
				close;
		}
	}
	mes "[Laboratory Guard]";
	mes "This area is restricted";
	mes "to the public. Unless you";
	mes "have some kind of special";
	mes "authorization, I'm going";
	mes "to have to ask you to leave.";
	close;
}

airplane_01,96,48,3	script	Man#Lyozien	868,{

	if(lhz_rekenber > 21)
	{
		cutin "lhz_ryo11",2;
		mes "[Lyozien]";
		mes "Hey, I hear from my";
		mes "brother that you can't work";
		mes "with us anymore because";
		mes "of some scheduling conflict.";
		mes "I'm sorry to hear that: it was";
		mes "really good working with you...";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 21)
	{
		cutin "lhz_ryo03",2;
		mes "[Lyozien]";
		mes "Oh good, you're back.";
		mes "Mr. Ahman just left and";
		mes "picked up his goods. We're";
		mes "done here, so you have to";
		mes "do now is report to my";
		mes "brother in Lighthalzen.";
		next;
		mes "[Lyozien]";
		mes "You sure you're alright?";
		mes "You seem kind of upset.";
		mes "Do you need to take a";
		mes "break or something?";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 20)
	{
		cutin "lhz_ryo09",2;
		mes "[Lyozien]";
		mes "Heya, keep up the";
		mes "good work. Once you";
		mes "talk to Mr. Ahman inside";
		mes "Izlude Airport, we'll be";
		mes "done with this delivery.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 19)
	{
		cutin "lhz_ryo06",2;
		mes "[Lyozien]";
		mes "Whoa, you were great!";
		mes "There were more of them";
		mes "this time, but you easily";
		mes "dispatched them. Great job!";
		next;
		cutin "lhz_ryo01",2;
		mes "[" + strcharinfo(0) + "]";
		mes "Thanks, but...";
		mes "Now I'm really worried";
		mes "about what could be in";
		mes "those packages. Are you";
		mes "sure you don't know, Lyozien?";
		next;
		cutin "lhz_ryo02",2;
		mes "[Lyozien]";
		mes "You don't know when to";
		mes "stop, do you? Nah, I don't";
		mes "know at all. Besides, so long";
		mes "as my brother says it's a bad";
		mes "idea, then I don't wanna find";
		mes "out for myself. Oh, hey...";
		next;
		set lhz_rekenber,20;
		getitem 504,1; //White_Potion
		cutin "lhz_ryo12",2;
		mes "[Lyozien]";
		mes "Here's a little";
		mes "something to refresh";
		mes "yourself after that fight.";
		mes "Keep up the good work, okay?";
		mes "Then, we'll be done once you";
		mes "contact Mr. Ahman in Izlude.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 18)
	{
		cutin "lhz_ryo06",2;
		mes "[Lyozien]";
		mes "Okay, just like before, we";
		mes "gotta get these packages to";
		mes "Mr. Ahmam. When we arrive";
		mes "in Izlude, find Mr. Ahman in";
		mes "the Airport and tell him that";
		mes "his packages have arrived.";
		next;
		cutin "lhz_ryo08",2;
		mes "[Lyozien]";
		mes "W-wait...";
		mes "Did you hear that?";
		mes "I heard--I think it's them.";
		mes "Those thugs are back! Don't";
		mes "let them damage the packages!";
		close2;
		cutin "",255;
		set lhz_rekenber,19;
		donpcevent "#bully2::OnEnter";
		donpcevent "Man#Lyozien::OnStop";
		end;
	}
	else if(lhz_rekenber == 17)
	{
		cutin "lhz_ryo14",2;
		mes "[Lyozien]";
		mes "I heard that you upset";
		mes "Kyozien a little bit with";
		mes "your questions. I mean,";
		mes "I totally understand, but";
		mes "you gotta remember that";
		mes "we've got obligations.";
		next;
		cutin "lhz_ryo12",2;
		mes "[Lyozien]";
		mes "I know that these packages";
		mes "might be putting us in danger,";
		mes "but I trust my brother. If he says those thugs are bad guys, then";
		mes "they're definitely bad guys.";
		next;
		cutin "lhz_ryo13",2;
		mes "[Lyozien]";
		mes "Yeah, ever since we were";
		mes "kids, Kyozien has always";
		mes "been right. Even though";
		mes "I'd like to know what's in the";
		mes "boxes, I don't ever wanna";
		mes "disappoint him, you know?";
		next;
		set lhz_rekenber,18;
		cutin "lhz_ryo10",2;
		mes "[Lyozien]";
		mes "Anyway, that's";
		mes "enough chit-chat";
		mes "for now. Let's get";
		mes "back to work, shall we?";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 16)
	{
		cutin "lhz_ryo12",2;
		mes "[Lyozien]";
		mes "I'm lucky that you're";
		mes "around to keep those";
		mes "thugs off our backs, eh?";
		mes "Hey, when you're ready for";
		mes "another job, just talk to";
		mes "my brother Kazien, okay?";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 15)
	{
		cutin "lhz_ryo05",2;
		mes "[Lyozien]";
		mes "So you spoke to";
		mes "Mr. Ahman already?";
		mes "Good, good. Now we can";
		mes "go back to the Schwaltzvalt";
		mes "Republic for our next job.";
		next;
		mes "[Lyozien]";
		mes "Just talk to my brother";
		mes "Kazien and he should give";
		mes "you any details you need";
		mes "to know. Man, it's good";
		mes "that you're working for us.";
		mes "Those thugs frighten me...";
		set lhz_rekenber,16;
		cutin "lhz_ryo01",2;
		mes "[Lyozien]";
		mes "Now I feeel much more secure.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 14)
	{
		cutin "lhz_ryo13",2;
		mes "[Lyozien]";
		mes "Now that those thugs are";
		mes "gone, let's concentrate on";
		mes "our task. Like before, just";
		mes "get off at Izlude and then tell";
		mes "Mr. Ahman that his packages";
		mes "have arrived. See you later~";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 13)
	{
		cutin "lhz_ryo13",2;
		mes "[Lyozien]";
		mes "Oh, thank you!";
		mes "You saved my life!";
		mes "As you can tell, I'm";
		mes "not much of a fighter...";
		mes "I just ran and hid when";
		mes "those thugs appeared.";
		next;
		cutin "lhz_ryo04",2;
		mes "[Lyozien]";
		mes "That's one reason why" ;
		mes "my brother has been hiring";
		mes "you adventurers-- we need";
		mes "packages from those hoodlums.";
		mes "They're always after us...";
		next;
		cutin "lhz_ryo07",2;
		mes "[Lyozien]";
		mes "Every time I see them,";
		mes "they're yelling things like";
		mes "we're the servants of evil,";
		mes "or that the packages must";
		mes "be destroyed. Boy, I sure";
		mes "am glad that you're here!";
		set lhz_rekenber,14;
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 12)
	{
		cutin "lhz_ryo11",2;
		mes "[Lyozien]";
		mes "Hey, we already have another";
		mes "package to deliver all the way";
		mes "to the Rune-Midgarts Kingdom";
		mes "again. Can you believe it? We";
		mes "seem to be doing a lot of";
		mes "business around there lately.";
		next;
		cutin "lhz_ryo12",2;
		mes "[Lyozien]";
		mes "It's so far away from";
		mes "home, but a job's a job.";
		mes "We're obliged to do what";
		mes "we're been assigned to do";
		mes "until we qui--whoa. You";
		mes "hear that? Wh-what was...?";
		next;
		cutin "lhz_ryo03",2;
		mes "[Lyozien]";
		mes "Awwww, nuts!";
		mes "It's those thugs!";
		mes "I'll explain later, but";
		mes "for now, please protect";
		mes "the packages and make";
		mes "sure they don't get them!";
		close2;
		cutin "",255;
		set lhz_rekenber,13;
		donpcevent "Man#Lyozien::OnStop";
		donpcevent "#bully1::OnEnter";
		end;
	}
	if(lhz_rekenber == 11)
	{
		cutin "lhz_ryo12",2;
		mes "[Lyozien]";
		mes "Hey, would you go see";
		mes "my brother Kazien to see";
		mes "if he's got another job for";
		mes "us to do? I'll just be over";
		mes "here waiting when you need";
		mes "to find me. See you later~";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 10)
	{
		cutin "lhz_ryo14",2;
		mes "[Lyozien]";
		mes "Good work, Mr. Ahman just";
		mes "arrived and picked up his";
		mes "packages. It looks like we're";
		mes "done for today. When you're";
		mes "ready for another job, just";
		mes "ask to my brother Kazien, okay?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Lyozien, do you know";
		mes "what kinds of things";
		mes "we're delivering?";
		next;
		cutin "lhz_ryo10",2;
		mes "[Lyozien]";
		mes "No clue. I've been";
		mes "a little curious myself,";
		mes "but my brother warned me";
		mes "not to ask. Besides, I don't";
		mes "think it makes a difference";
		mes "to what we gotta do, right?";
		next;
		cutin "lhz_ryo13",2;
		mes "[Lyozien]";
		mes "Anyway, it oughta be";
		mes "fine. I mean, our clients";
		mes "are entitled to their privacy";
		mes "anyway. You've been in that";
		mes "sort of situation, right? You";
		mes "know, embarassing orders...";
		next;
		set lhz_rekenber,11;
		changequest 12013,12014;
		cutin "lhz_ryo01",2;
		mes "[Lyozien]";
		mes "No? Eh, just meet up with";
		mes "my brother to see if he's";
		mes "got another job for us, okay?";
		mes "If you wanna find me again,";
		mes "I'll be waiting right here.";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 9)
	{
		cutin "lhz_ryo05",2;
		mes "[Lyozien]";
		mes "Alright, when this Airship";
		mes "arrives in Izlude, get off and";
		mes "enter the Airport to meet with";
		mes "a man named Mr. Ahman.";
		mes "Let him know his order has";
		mes "already arrived, okay?";
		close2;
		cutin "",255;
		end;
	}
	else if(lhz_rekenber == 8)
	{
		cutin "lhz_ryo02",2;
		mes "[Lyozien]";
		mes "Um, would you mind";
		mes "treading lightly around";
		mes "this area, and kind of go";
		mes "around the piles? Yeah,";
		mes "these are all pretty fragile.";
		mes "Thanks, I appreciate it.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Excuse me, but";
		mes "are you Lyozien?";
		next;
		cutin "lhz_ryo07",2;
		mes "[Lyozien]";
		mes "Hey, are you the one that";
		mes "my brother Kazien sent?";
		mes "Nice, I've been waiting";
		mes "for you. As you can see,";
		mes "I'm having trouble handling";
		mes "all of these packages here.";
		next;
		cutin "lhz_ryo14",2;
		mes "[" + strcharinfo(0) + "]";
		mes "Wait, Kazien is";
		mes "your brother? That's";
		mes "weird, you figure he";
		mes "would mention that.";
		next;
		mes "[Lyozien]";
		mes "Oh, yeah, he's been like";
		mes "that ever since we lived";
		mes "in Lighthalzen's slums.";
		mes "Luckily, he joined the";
		mes "corporation and helped";
		mes "us improve our lots in life...";
		next;
		cutin "lhz_ryo13",2;
		mes "[Lyozien]";
		mes "That's why I appreciate the";
		mes "fact that he lets me work for";
		mes "him. I can't let him down.";
		mes "Anyway, back to business: we";
		mes "gotta deliver these goods to";
		mes "the Rune-Midgarts Kingdom.";
		next;
		cutin "lhz_ryo12",2;
		mes "[Lyozien]";
		mes "I have to ensure that these";
		mes "packages aren't damaged or";
		mes "stolen by thieves. Your job is";
		mes "to go to Izlude, find Mr. Ahman";
		mes "at the Airport, and tell him that his orders have safely arrived.";
		next;
		set lhz_rekenber,9;
		changequest 12011,12012;
		cutin "lhz_ryo11",2;
		mes "[Lyozien]";
		mes "Once you tell Mr. Ahman";
		mes "that message, he'll take";
		mes "care of picking up his own";
		mes "packages. But yeah, I need";
		mes "to stay behind to guard these";
		mes "products in the meantime.";
		close2;
		cutin "",255;
		end;
	}
	cutin "lhz_ryo12",2;
	mes "[Lyozien]";
	mes "Um, would you mind";
	mes "treading lightly around";
	mes "this area, and kind of go";
	mes "around the piles? Yeah,";
	mes "these are all pretty fragile.";
	mes "Thanks, I appreciate it.";
	close2;
	cutin "",255;
	end;

OnEnter:
	enablenpc "Man#Lyozien";
	end;

OnStop:
	disablenpc "Man#Lyozien";
	end;
}

-	script	::Scamp	-1,{

	if(lhz_rekenber > 21)
	{
		mes "[Ahman]";
		mes "Oh, hello. I've heard";
		mes "that you had to quit.";
		mes "It's quite a pity, really.";
		mes "If it weren't for you, some";
		mes "of my packages would have";
		mes "been destroyed by those thugs.";
		close;
	}
	else if(lhz_rekenber == 21)
	{
		mes "[Ahman]";
		mes "Shouldn't you be";
		mes "taking a break? Besides,";
		mes "Lyozien is still waiting for";
		mes "you the Airship, isn't he?";
		close;
	}
	else if(lhz_rekenber == 20)
	{
		mes "[Ahman]";
		mes "Oh, have my packages";
		mes "arrived? Good, good.";
		mes "I appreciate all of your";
		mes "hard work. I'm surprised";
		mes "they haven't hired you";
		mes "full time by now.";
		next;
		mes "[Ahman]";
		mes "Is something the matter?";
		mes "You seem really pale. Oh";
		mes "well, you'll have plenty of";
		mes "time to relax on the Airship.";
		mes "Oh, and don't worry, I'll";
		mes "take care of the packages.";
		set lhz_rekenber,21;
		close;
	}
	else if (lhz_rekenber > 15 && lhz_rekenber < 20)
	{
		mes "[Ahman]";
		mes "Oh, hello. I'm not";
		mes "expecting any packages";
		mes "at this moment, although";
		mes "I'm aware that there are a";
		mes "few deliveries in queue, but shouldn't you be in Lighthalzen?";
		close;
	}
	else if(lhz_rekenber == 15)
	{
		mes "[Ahman]";
		mes "Shouldn't you be on";
		mes "your way and report to";
		mes "Lyozien? You should hurry";
		mes "before the Airship takes off.";
		close;
	}
	else if(lhz_rekenber == 14)
	{
		mes "[Ahman]";
		mes "Ah, it's you again.";
		mes "I assume that means that";
		mes "my packages have arrived";
		mes "safely. Is that right?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, that's right.";
		mes "Actually, this time we ";
		mes "were attacked by a group";
		mes "of thugs, so I was wondering";
		mes "if you knew anything about it... ";
		next;
		mes "[Ahman]";
		mes "They attacked again?";
		mes "Oh, that isn't good.";
		mes "Well, I have no idea";
		mes "what's going on. I wish";
		mes "I had some idea of what";
		mes "they were up to, really.";
		next;
		set lhz_rekenber,15;
		mes "[Ahman]";
		mes "For now, you should";
		mes "go and report to Lyozien.";
		mes "I assume that you protected";
		mes "my packages, so thank you";
		mes "for your diligent work. Now, I shall pick up what I ordered...";
		close;
	}
	else if (lhz_rekenber > 10 && lhz_rekenber < 14)
	{
		mes "[Ahman]";
		mes "Oh, it's you again.";
		mes "Shouldn't you be getting";
		mes "on the Airship and heading";
		mes "back to the Schwaltzvalt";
		mes "Republic? There are more";
		mes "deliveries in queue, you know.";
		close;
	}
	else if(lhz_rekenber == 10)
	{
		mes "[Ahman]";
		mes "Thank you for letting me";
		mes "know that my order has arrived.";
		mes "You should go back to Lyozien";
		mes "now so you can finish your job.";
		mes "Perhaps I'll see you again";
		mes "sometime, adventurer.";
		close;
	}
	else if(lhz_rekenber == 9)
	{
		mes "[Man]";
		mes "Hmm, can you really";
		mes "call this place an Airport?";
		mes "It's far too small, wouldn't";
		mes "you agree? Still, I kind of";
		mes "enjoy sitting around here.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Excuse me, but do";
		mes "you know where I can";
		mes "find a man named Ahman?";
		mes "I have a message for him.";
		next;
		mes "[Ahman]";
		mes "I'm Ahman, how can--";
		mes "Oh! You must be here to";
		mes "tell me that my packages";
		mes "have arrived. Am I correct?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Y-yes. That's right.";
		mes "Your packages have";
		mes "arrived and they're";
		mes "being guarded until";
		mes "you come to pick them up.";
		next;
		mes "[Ahman]";
		mes "Ah, that's very good to";
		mes "know. Say, are you a new";
		mes "worker for Lyozien and Kazien?";
		mes "I don't believe I've seen you";
		mes "around before. Have they finally started hiring part timers?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Yes, that's right.";
		mes "Actually, I'm working for";
		mes "them part time. I heard";
		mes "they were really busy, so";
		mes "I sort of volunteered my time.";
		next;
		mes "[Ahman]";
		mes "Alright, alright.";
		mes "I suppose that you";
		mes "also don't know what's";
		mes "being delivered in these";
		mes "packages, just like Lyozien.";
		next;
		mes "[Ahman]";
		mes "Well, it's all confidential";
		mes "information anyway, so don't";
		mes "worry about it. Thank you for";
		mes "notifying me about the delivery.^FFFFFF  ^000000 Now, you should go back and ";
		mes "tell Lyozien. Take care now~";
		set lhz_rekenber,10;
		changequest 12012,12013;
		close;
	}
	mes "[Man]";
	mes "Hmm, can you really";
	mes "call this place an Airport?";
	mes "It's far too small, wouldn't";
	mes "you agree? Still, I kind of";
	mes "enjoy sitting around here.";
	close;
}

airplane_01,1,1,1	script	#bully1	-1,{

OnInit:
	disablenpc "#bully1";
	end;

OnEnter:
	enablenpc "#bully1";
	initnpctimer;
	monster "airplane_01",96,53,"Thug",1592,1,"#bully1::OnMyMobDead";
	monster "airplane_01",87,47,"Thug",1592,1,"#bully1::OnMyMobDead";
	set .bullymobs,2;
	end;

OnReset:
	killmonster "airplane_01","#bully1::OnMyMobDead";
	end;

OnMyMobDead:
	set .bullymobs,.bullymobs -1;
	if(.bullymobs < 1)
	{
		mes "[Bully]";
		mes "Damn it! N-next time...";
		mes "Next time we'll g-get rid";
		mes "of those damned packages!";
		mes "^333333*Cough cough*^000000 For now, we";
		mes "retreat and fight another day!";
		close2;
		donpcevent "#bully1::OnInit";
		donpcevent "Man#Lyozien::OnEnter";
		stopnpctimer;
	}
	end;

OnTimer120000:
	donpcevent "#bully1::OnReset";
	donpcevent "#bully1::OnInit";
	donpcevent "Man#Lyozien::OnEnter";
	stopnpctimer;
	end;
}

airplane_01,2,2,1	script	#bully2	-1,{

OnInit:
	disablenpc "#bully2";
	end;

OnEnter:
	enablenpc "#bully2";
	initnpctimer;
	monster "airplane_01",96,53,"Thug",1592,1,"#bully2::OnMyMobDead";
	monster "airplane_01",87,47,"Thug",1592,1,"#bully2::OnMyMobDead";
	monster "airplane_01",97,43,"Thug",1592,1,"#bully2::OnMyMobDead";
	set .bullymobs,3;
	end;

OnReset:
	killmonster "airplane_01","#bully2::OnMyMobDead";
	end;

OnMyMobDead:
	set .bullymobs,.bullymobs -1;
	if(.bullymobs < 1)
	{
		mes "^3355FFHey-- there's a slit";
		mes "in the wrapping on one";
		mes "of the packages. It was";
		mes "probably ripped a little";
		mes "while you were fighting.^000000";
		close2;
		donpcevent "#bully2::OnInit";
		donpcevent "#packidentity::OnEnter";
		stopnpctimer;
	}
	end;

OnTimer120000:
	donpcevent "#bully2::OnReset";
	donpcevent "#bully2::OnInit";
	donpcevent "#packidentity::OnEnter";
	stopnpctimer;
	end;
}

airplane_01,99,47,3	script	#packidentity	139,2,2,{
	end;

OnInit:
	disablenpc "#packidentity";
	end;

OnEnter:
	initnpctimer;
	enablenpc "#packidentity";
	end;

OnTouch_:
	if(lhz_rekenber == 19)
	{
		mes "^3355FFYou peek through the";
		mes "slit in the wrapping";
		mes "that is covering one";
		mes "of the packages.^000000";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Oh... my God!";
		mes "These are... These are";
		mes "weapons of mass destruction.";
		mes "There's even parts for assembling guardians, the kinds that usually";
		mes "defend those Guild Castles...";
		close2;
		donpcevent "Man#Lyozien::OnEnter";
		donpcevent "#packidentity::OnInit";
		stopnpctimer;
		end;
	}

OnTimer120000:
	donpcevent "Man#Lyozien::OnEnter";
	donpcevent "#packidentity::OnInit";
	stopnpctimer;
	end;
}

lhz_in01,187,247,3	script	#flashback1	139,2,2,{

OnTouch_:
	if(lhz_rekenber == 22)
	{
		cutin "lhz_kaz11",2;
		mes "[Kazien]";
		mes "-Don't you have anything to protect, huh?- ";
		mes "-Are you sure that you're always doing the right thing?-";
		next;
		mes "[Kazien]";
		mes "Answer me! Answer me! Answer meee!";
		next;
		set lhz_rekenber,23;
		cutin "",255;
		mes "[" + strcharinfo(0) + "]";
		mes ".............Damn it.";
		close;
	}
	end;
}

lhz_in01,75,248,3	script	#flashback2	139,2,2,{

OnTouch_:
	if(lhz_rekenber == 22)
	{
		cutin "lhz_kaz11",2;
		mes "[Kazien]";
		mes "Look man, this is what";
		mes "I decided. I don't care";
		mes "what other people'll think.";
		mes "I might go to hell when";
		mes "I die, but that's my problem.";
		next;
		mes "[Kazien]";
		mes "Besides, you adventurers";
		mes "are always running around";
		mes "with your swords and magic spells... Isn't that just as bad?";
		mes "It's not the weapons or the power that's bad: it's how they're used.";
		next;
		mes "[Kazien]";
		mes "There'd be days when my";
		mes "brother and I'd have nothing";
		mes "to eat. So when I heard about";
		mes "this job, I took it. What good";
		mes "is world peace if I'm not even";
		mes "alive to enjoy it, huh?";
		next;
		set lhz_rekenber,23;
		cutin "",255;
		mes "[" + strcharinfo(0) + "]";
		mes "......";
		mes ".........";
		mes "Damn it!";
		close;
	}
	end;
}

airplane_01,10,10,3	script	#LyozienSwitch	111,{
	callfunc "F_GM_NPC";
	mes "[Lyozien Switch]";
	mes "Input password.";
	mes "Enter 0 to cancel.";
	next;
	set .@i, callfunc("F_GM_NPC",1028,0,0,4000);
	if (.@i == -2) {
		mes "[Lyozien Switch]";
		mes "Incorrect.";
		close;
	} else if (.@i == -1) {
		mes "[Lyozien Switch]";
		mes "Canceled.";
		close;
	} else if (.@i == 0) {
		close;
	} else {
		mes "[Lyozien Switch]";
		mes "Do you want to";
		mes "turn the Lyozien";
		mes "NPC ON or OFF?";
		next;
		switch(select("On:OFF")) {
		case 1:
			set .@str$,"activated";
			donpcevent "Man#Lyozien::OnEnable";
			break;
		case 2:
			set .@str$,"deactivated";
			donpcevent "Man#Lyozien::OnDisable";
			break;
		}
		mes "[Lyozien Switch]";
		mes "Lyozien NPC is";
		mes "now "+.@str$+".";
		mes " ";
		mes "/mm airplane_01.gat 96 48";
		close;
	}
}

//============================================================
// Old changelog
//============================================================
//= Grammar/script check please. This was a quick job.
//= Things to add: Look at the thread "Lighthalzen Guard" in SVN script
//= 0.3 Initial Release. [Persian] [Vicious_Pucca] [aoa00] [Evera] [MasterOfMupppets] [Lupus] [Lord Gywall]
//= 0.5 Added mobsters spawn and Einbroch pollution. Alert lasts either 10 minutes or all mob killed.
//= 0.6-0.9 fix small bug. Added Bio-lab entrance Quest. Added Getting security-card Quest.
//= 1.0 Patched "mobsters spawn & Alert" like Real-RO.
//= 1.0a fixed rand(1,10) + comparision. There just can't be 'X < 1' [Lupus]
//= 1.1 Changed the mobster spawn to g_mobster to prevent exploits [MasterOfMuppets]
//= 1.2 Added the cube room quest by DeNy, translated by vicious_pucca. [MasterOfMuppets]
//=     Thanks to Linuxwolf for a grammar check as well =).
//= 1.2a Moved Biolab entrance to lhz_dun warps. [Vicious]
//= 1.3 Fixed password bug, fixed endless item exploit, some typos [Lupus]
//= 1.4 Fixed password abuse. When people don't read the password under the picture
//=     and enter Zero shit 8) (TODO: I saw some "Sticks" abuses, too.. where you could skip a part of quest...)
//= 1.5 Fixed Mobster's OnDead event(it has to start with "On"!) [Playtester]
//= 1.5a Fixed "free stick" bug, thx 2 Neouni [Lupus]
//= 1.6 Added Gywall's Pickpocket Quest
//= 1.7 Implemented the Friendship quest [MasterOfMuppets]
//= 1.8 Changed the name of the mobsters to Gangster, as it should be. [MasterOfMuppets]
//= 1.9 Added extra input check on Biolab so that the first letter of the word could be capitalized or undercase. [Evera]
//= 2.0 Removed Duplicates [Silent]
//= 2.1 Added first part of Bio Ethics Quest [Evera]
//= 2.2 Added bit to say Bio Ethics is unfinished, and if a player attempts, it warps them
//=     out after finished part... Don't want players getting stuck ;_; [Evera]
//= 2.3 Finished Bio Ethics Quest. Need bug testers before moving to trunk, my
//=     mind was somewhere else when writing @_@ [Evera]
//= 2.4 Fixed the bug where a str&int debug was shown in the console for
//=     test tube in bio labs quest. [Evera]
//= 2.5 Fixed Kellasus giving you extra skills in Bio Ethics quest [Evera]
//= 2.6 Fixed exploit letting any class get homunculus from Bio Ethics Quest [Evera]
//= 2.6a Moved Bio Ethics Quest to Alchemist SKILL QUESTS [Lupus]
//= 2.7 fixed bugs that let people bypass some quest parts V_V [Lupus]
//=     reused cubekey var for 4 Cube Room key vars
//= 2.8 More optimization. Also fixed bug with "2x short sticks -> long" [Lupus]
//=     Now uses MISC_QUEST&512 instead of 'hzdun'. WIP
//= 2.9 Fixed Friendship Quest levelup exploit (u could get EXP twice) [Lupus]
//= 3.0 Added Cursed Spirit Quest. [SinSloth]
//=     Moved a book non-related to Lighthalzen quests.
//= 3.1 Added Schwartzvalt Trilogy Quest. [SinSloth]
//= 3.2 Updated some NPCs regarding Hugel Rebellion Quest. [SinSloth]
//= 3.2 Removed the NPC "#kiz03-4" as I couldn't find any [L0ne_W0lf]
//=     reference to it in the Aegis script.
//= 3.3 Fixed a wrong negative value checking in Schwartzvalt Trilogy quest. [SinSloth]
//= 3.4 Fixed experience gains to match upcoming rate adjustments. [SinSloth]
//= 3.5 Touch-ups to the Friendship quest. Added EXP reward. [L0ne_W0lf]
//=     Added cutins for "Maku" npc, and changed "set HP" to percentheal.
//= 3.5a Adjusted EXP given by "Benkasttein" to be the same as that given by Maku. [L0ne_W0lf]
//= 3.6 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
//= 3.7 Counter-fixed negative value checking to now look for both positive and negative values
//=     since its symbol depends on the time. [SinSloth]
//= 3.8 Removed bio ethic quest definition from header. [L0ne_W0lf]
//= 3.9 Added Rekenber Job quest. Don't know why it hasn't been there before though. [SinSloth]
//============================================================
