//===== rAthena Script ======================================= 
//= Veins Quests
//===== By: ================================================== 
//= L0ne_W0lf
//===== Current Version: ===================================== 
//= 2.5
//===== Compatible With: ===================================== 
//= rAthena Project
//===== Description: ========================================= 
//= [Official Conversion]
//= Collection of Veins Quests 
//= Stone Quest:
//= - Help an Old Man with his job.
//= - Dialog obtained from iRO.
//= - Variable in use: veins_stone (max 8)
//= Spy Quest:
//= - Help prove (or disprove) a bard's innocence.
//= - Dialog obtained from iRO.
//= - Variable in use: que_sch (max 26)
//= Siblings Quest:
//= - Help a boy save his little sister.
//= - Dialog partially obtained from iRO.
//= - Variable in use: rachel_camel (max 25)
//= Thor Volcano Base Quest:
//= - Missing addition to High Priest Zhed to start quest.
//= - Infiltrate Thor Volcano Base. What is Arunafeltz up to?
//= - Variable in use: rachel_camel (max 27)
//===== Additional Comments: ================================= 
//= 1.0 First version, Added Veins Stone quest. [L0ne_W0lf]
//= 1.1 Added Veins Spy Quest. [L0ne_W0lf]
//= 1.2 Added Veins Siblings Quest. [L0ne_W0lf]
//=     Added Veins Thor Volcano Base Quest NPC. [L0ne_W0lf]
//=     Start NPC is missing, but will be added when I get it.
//= 1.3 Fixed two typos small in Asbar. [L0ne_W0lf]
//= 1.3a More fixes to some of the Base quest NPCs. [L0ne_W0lf]
//= 1.4 Added missing checkweights. [L0ne_W0lf]
//= 1.4a Corrected a typo error ";;". [Toms]
//= 1.5 Added Nameless Island quest addition. [L0ne_W0lf]
//= 1.5a Corrected a couple typos in Nameless Addition. [L0ne_W0lf]
//= 1.6 Replaced effect numerics with constants. [L0ne_W0lf]
//= 1.7 Moved a couple NPCs related to the Spy quest. [L0ne_W0lf]
//= 1.8 Fixed some typos and confusing condition checks. [L0ne_W0lf]
//= 1.9 Added quest log entries for:
//=     - Siblings Quest
//=     - Thor Volcano Base Quest
//= 2.0 Removed level requirement. (bugreport:4678) [L0ne_W0lf]
//= 2.1 Added missing changequest (3071-3076). [Joseph]
//= 2.2 Moved "Wincing Old Man" to pre-re/re coordinates. [Euphy]
//= 2.3 Fixed incorrect use of 'close'. [Joseph]
//= 2.4 Updated RE/Pre-RE EXP. [Euphy]
//= 2.5 Added GM management NPC. [Euphy]
//============================================================ 

// Stone Quest :: veins_stone
//============================================================ 
-	script	::WincingOldMan_veins	-1,{
	if ((MaxWeight - Weight) < 2000 || checkweight(1201,1) == 0) {
		mes "- Wait a moment! -";
		mes "- Currently you are carrying -";
		mes "- too many items with you. -";
		mes "- Please come back after -";
		mes "- you put some items into Kafra Storage. -";
		close;
	}
	if (veins_stone == 0) {
		mes "[Zabaroo]";
		mes "My back is killing me";
		mes "after stooping over to";
		mes "pick up stones all day long...";
		mes "The pain... It's unbearable!";
		next;
		switch(select("Bend with your knees, yo.:Gosh, how bad is it?")) {
		case 1:
			mes "[Zabaroo]";
			mes "Whippersnapper!";
			mes "I didn't ask you for";
			mes "your advice! Don't";
			mes "patronize an old man!";
			close;
		case 2:
			mes "[Zabaroo]";
			mes "Oh, it hurts so much, it's";
			mes "almost crippling. But I don't";
			mes "have any choice. I need to";
			mes "get enough stops to fill";
			mes "this gap if I want to get";
			mes "paid. Arrrrgh, damn it!";
			next;
			mes "[Zabaroo]";
			mes "If I don't get enough";
			mes "money to pay for my";
			mes "granddaughter's medicine,";
			mes "I won't be able to buy any";
			mes "medicine for my granddaughter!";
			mes "And that will be horrible! Ag!";
			next;
			select("Can I help?");
			mes "[Zabaroo]";
			mes "I appreciate your kindness,";
			mes "stranger, but no. I have";
			mes "to do this on my own.";
			mes "A man must have his pride....";
			next;
			mes "^333333*Snap*^000000";
			next;
			mes "[Zabaroo]";
			mes "Argh! My back...!";
			mes "This was totally";
			mes "unforeseeable!";
			mes "Please! Please,";
			mes "for the love of Freya,";
			mes "please help me!";
			next;
			select("I will help you.");
			mes "[Zabaroo]";
			mes "Thank you!";
			mes "Thanks so much!";
			next;
			select("What do you want me to do?");
			mes "[Zabaroo]";
			mes "Ow-ow-ow! Oh... Okay...";
			mes "You see those all dark";
			mes "stones stuck in the ground?";
			mes "Those are what I need to";
			mes "pick up. Now don't go";
			mes "lifting rocks just yet...";
			next;
			mes "[Zabaroo]";
			mes "I asked some other old";
			mes "man in town, Absar, to";
			mes "make me something to help";
			mes "with my back. He was going";
			mes "to help me if I gave hi--";
			mes "ARGH! My back! It hurts!";
			next;
			mes "[Zabaroo]";
			mes "It hurts so bad! But it's";
			mes "especially painful right";
			mes "when I'm about to finish";
			mes "sentences in which I intend to";
			mes "tell you important informat--";
			mes "ARRRGH! Find Absar! Quickly!";
			next;
			while(1) {
				mes "[Zabaroo]";
				mes "Wait, wait...";
				mes "Maybe I can answer";
				mes "a few of your questions";
				mes "before my body is wracked";
				mes "with throbbing pain. Let's...";
				mes "Let's at least give it a try.";
				next;
				switch(select("What's with these stones?:Where's the old man?:Nothing.")) {
					case 1:
						mes "[Zabaroo]";
						mes "Well, we use these dark";
						mes "stones because they're";
						mes "pretty and easy to process.";
						mes "They're sort of a specialty";
						mes "of this town. I get paid to";
						mes "harvest these handy rocks.";
						next;
						mes "[Zabaroo]";
						mes "We can sell these to tourists,";
						mes "and we even have a factory";
						mes "that uses these stones.";
						mes "Still, it's not like the";
						mes "townspeople are getting";
						mes "rich off these stones.";
						next;
						mes "[Zabaroo]";
						mes "All of us are still";
						mes "barely making a living...";
						next;
						break;
					case 2:
						mes "[Zabaroo]";
						mes "Absar? He's inside";
						mes "the Tool Shop. You";
						mes "can't miss him... Just";
						mes "look for the man with";
						mes "the crazy eyes!";
						next;
						break;
					case 3:
						mes "[Zabaroo]";
						mes "Thanks for your help.";
						mes "If you can't find Absar";
						mes "in the Tool Shop, then";
						mes "you might want to stop";
						mes "by the Tavern. A-auuugh!";
						set veins_stone,1;
						close;
				}
			}
		}
	}
	else if (veins_stone == 1) {
		mes "[Zabaroo]";
		mes "Thanks for your help.";
		mes "If you can't find Absar";
		mes "in the Tool Shop, then";
		mes "you might want to stop";
		mes "by the Tavern. A-auuugh!";
		close;
	}
	else if ((veins_stone > 1) && (veins_stone < 4)) {
		mes "[Zabaroo]";
		mes "Geez, Absar sure can";
		mes "be fussy. Still, do your";
		mes "best to get what he wants.";
		mes "He won't help me otherwise!";
		mes "Other than that, he's not";
		mes "really that bad a guy...";
		close;
	}
	else if (veins_stone == 4) {
		mes "[Zabaroo]";
		mes "Oh good, you're back!";
		mes "Did you bring what";
		mes "Absar made for me?";
		next;
		select("Yes, here...");
		mes "[Zabaroo]";
		mes "So this is what he";
		mes "was talking about?";
		mes "How does it... Ah!";
		mes "Here we go! If I pull";
		mes "the handle, that end of";
		mes "the stick will pick stuff up!";
		next;
		mes "[Zabaroo]";
		mes "This is great! I won't";
		mes "have to bend over to pick";
		mes "up stones anymore! Heh,";
		mes "he must be awfully proud";
		mes "of this useful invention~";
		mes "I can imagine him strutting.";
		next;
		mes "[Zabaroo]";
		mes "Um, did he have anything";
		mes "to say after he gave this";
		mes "to you? I'm just curious.";
		next;
		select("This message...");
		mes "[Zabaroo]";
		mes "Oh... I thought he";
		mes "would forget all about";
		mes "that. Well, it's a relief";
		mes "to know that now. That's";
		mes "really very nice of him.";
		next;
		mes "[Zabaroo]";
		mes "I hate to ask you...";
		mes "But would you mind";
		mes "helping me out one";
		mes "more time?";
		next;
		select("Huh? What is it?");
		mes "[Zabaroo]";
		mes "Don't worry, it's not";
		mes "too hard. Would you just";
		mes "deliver the stones I gathered";
		mes "to the factory in town? It's";
		mes "near the airport or airship or";
		mes "something. It won't take long.";
		set veins_stone,5;
		close;
	}
	else if (veins_stone > 4 && veins_stone < 7) {
		mes "[Zabaroo]";
		mes "Thanks again for your help!";
		mes "What did Absar call this";
		mes "thing again? A Tactile...";
		mes "Extendable... Damn it...";
		mes "Why's the name so long?";
		mes "Anyway, it's usefull~";
		close;
	}
	else if (veins_stone == 7) {
		mes "[Zabaroo]";
		mes "Oh, you're back!";
		mes "I really appreciate all";
		mes "of your help. I don't have";
		mes "much, and I know you weren't";
		mes "expecting a reward, but I'd";
		mes "like to give you something.";
		next;
		mes "[Zabaroo]";
		mes "Ah, here we are. I found";
		mes "these while harvesting stones";
		mes "I was told that adventurers";
		mes "find these useful. Anyway,";
		mes "I hope you like these rocks...";
		set veins_stone,8;
		getexp (checkre(3))?30000:300000,0;
		getitem 985,3; //Elunium
		close;
	}
	else if (veins_stone > 7) {
		mes "[Zabaroo]";
		mes "Thanks to you and Absar,";
		mes "my poor back hasn't been";
		mes "bothering me at all lately.";
		mes "I should be taking better";
		mes "care of myself at my age...";
		close;
	}
}

ve_in,169,310,6	script	Strange Old Man#ve	121,{
	if (veins_stone == 0) {
		mes "[Absar]";
		mes "Bwahahaha!";
		mes "Once... Once this is completed, I'll...";
		mes "Mwahahahahahahahah!";
		close;
	}
	else if (veins_stone == 1) {
		mes "[Absar]";
		mes "I'm so close to";
		mes "completion. Now, if";
		mes "I just turn this here...";
		next;
		if (select("Excuse me...:........") == 1) {
			mes "[Absar]";
			mes "What?! Who dares";
			mes "disturb me?! N-no!";
			mes "Look! Look what you did!";
			mes "You made me screw up!";
			next;
			specialeffect EF_LORD;
			percentheal -30,0;
			next;
			mes "[Absar]";
			mes "!@#$%#@#$!*~";
			mes "F$#@#%^^^&&!";
			close2;
			warp "ve_in",262,309;
			end;
		}
		mes "[Absar]";
		mes "Oh, no...";
		next;
		specialeffect EF_ASPERSIO;
		next;
		mes "[Absar]";
		mes "How...?!";
		mes "No! I failed again!";
		mes "D-DAAAAAAAAAAAMN IIIII--";
		next;
		mes "[Absar]";
		mes "Huh? What are you...";
		mes "What do you want?";
		next;
		select("Oh, I-I'm...");
		mes "[Absar]";
		mes "Spit it out. Tell me";
		mes "what you want, not your";
		mes "name. Hurry, can't you";
		mes "see that I'm busy?";
		next;
		if (select("I... I'm sorry.:I'm here for Mr. Zabaroo...") == 1) {
			mes "[Absar]";
			mes "If only you didn't";
			mes "interrupt me! Then";
			mes "I'd already have...";
			mes "Ugh! Back to work!";
			close;
		}
		mes "[Absar]";
		mes "Zabaroo? What does...";
		mes "Oh. Never mind. I think";
		mes "I remember what he asked";
		mes "me to make him. So did";
		mes "you bring all the materials?";
		next;
		if (select("Yes:What materials...?") == 1) {
			mes "[Absar]";
			mes "Great, we can get";
			mes "started and m--";
			mes "Liar. You don't even know";
			mes "what you're supposed to";
			mes "bring me, do you?!";
			mes "Get out of here!";
			close2;
			warp "ve_in",262,309;
			end;
		}
		mes "[Absar]";
		mes "Of course. I didn't tell him";
		mes "what materials I needed";
		mes "anyway. Heh heh! Now, this";
		mes "is what I need you to bring.";
		mes "Listen up, okay? And hurry.";
		next;
		mes "[Absar]";
		mes "^4D4DFF5 Maneater Roots^000000,";
		mes "^4D4DFF2 Glacial Hearts^000000, and";
		mes "^4D4DFF5 Steel^000000. If you don't";
		mes "come back soon, then";
		mes "I won't help you. I've got";
		mes "projects I'm working on!";
		set veins_stone,2;
		close;
	}
	else if (veins_stone == 2) {
		if (countitem(999) > 4 && countitem(1033) > 4 && countitem(7561) > 1) {
			mes "[Absar]";
			mes "Good, you finally";
			mes "brought everthing.";
			mes "I was just about to";
			mes "give up on you, so";
			mes "consider yourself lucky!";
			next;
			mes "[Absar]";
			mes "Give me a second.";
			mes "You won't have to";
			mes "wait long to see";
			mes "my great invention!";
			delitem 999,5; //Steel
			delitem 1033,5; //Root_Of_Maneater
			delitem 7561,2; //Ice_Heart
			set veins_stone,3;
			close2;
			specialeffect EF_FIRESPLASHHIT;
			end;
		}
		mes "[Absar]";
		mes "What the hell?";
		mes "Hurry and bring";
		mes "^4D4DFF5 Maneater Roots^000000,";
		mes "^4D4DFF2 Glacial Hearts^000000, and";
		mes "^4D4DFF5 Steel^000000! Do you think";
		mes "I'm doing this for fun?!";
		close;
	}
	else if (veins_stone == 3) {
		mes "[Absar]";
		mes "Here you are...";
		mes "Well, I don't know";
		mes "if you appreciate";
		mes "inventions, but this";
		mes "is a Tactile Extendable";
		mes "Clamp-Release Mechanism!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Tack... What...?";
		next;
		mes "[Absar]";
		mes "...............................";
		mes "You can use this to pick";
		mes "things up. From a distance.";
		next;
		mes "[Absar]";
		mes "Anyway, when you get back";
		mes "to Zabaroo, let me him know";
		mes "that he doesn't owe me";
		mes "anything anymore. He'll...";
		mes "He'll know what I mean...";
		set veins_stone,4;
		close;
	}
	mes "[Absar]";
	mes "It's a ''Tactile Extendable";
	mes "Clamp-Release Mechanism.''";
	mes "What's so hard to understand";
	mes "about that? Hmpf! I know!";
	mes "It must be the educational";
	mes "system! They're to blame!";
	close;
}

ve_in02,37,28,4	script	Factory Manager	898,{
	if (veins_stone && veins_stone < 5) {
		mes "[Mirhen]";
		mes "Hey, employees only beyond this point!";
		mes "Geez, don't we have a sigh that says that?";
		mes "We should get one...";
		mes "Anyway, get out of here.";
		close2;
		warp "veins",269,221;
		end;
	}
	else if (veins_stone == 5) {
		mes "[Mirhen]";
		mes "Hey, employees only";
		mes "beyond this point!";
		mes "Geez, don't we have";
		mes "a sign that says that?";
		mes "We should get one...";
		mes "Anyway, get out of here.";
		next;
		if (select("I'm sorry.:I've brought these...") == 1) {
			mes "[Mirhen]";
			mes "You're sorry,";
			mes "I get it. Ummm...";
			mes "Aren't you leaving?";
			close;
		}
		mes "[Mirhen]";
		mes "Huh? What's this name";
		mes "tag? Zabaroo? Wait a sec...";
		mes "You're definitely not him!";
		next;
		select("I'm here on his behalf.");
		mes "[Mirhen]";
		mes "Ah, I get it. Zabaroo's";
		mes "back has really been";
		mes "bothering him lately.";
		mes "Okay, we can bend the";
		mes "rules a bit in this situation.";
		next;
		mes "[Mirhen]";
		mes "Bring those rocks over";
		mes "to Bahed over there.";
		mes "He'll take care of them.";
		set veins_stone,6;
		close;
	}
	mes "[Mirhen]";
	mes "Hetarium ...";
	mes "What's so special about";
	mes "it? I mean, it looks just like";
	mes "Iron Ore. Why the hell is";
	mes "it like classified info?";
	next;
	mes "[Mirhen]";
	mes "I wish I could return to";
	mes "Rekenber Headquarters...";
	mes "I hate being stuck here";
	mes "gathering silly rocks in";
	mes "the middle of nowhere.";
	close;
}

ve_in02,54,49,2	script	Factory Worker#ve1	943,{
	if (veins_stone < 6) {
		mes "[Bahed]";
		mes "lately, I've been feeling so weak...";
		mes "I heard the guy before me had to quit because he also started feeling weak.";
		next;
		mes "[Bahed]";
		mes "It couldn't be...";
		mes "It couldn't be because of this 'Hetarium'...";
		mes "That's just plain crazy...";
		close;
	}
	else if (veins_stone == 6) {
		mes "[Bahed]";
		mes "Oh, you got the rocks?";
		mes "You brought them for Zabaroo?";
		mes "Oh, how is he doing? I hear";
		mes "he threw out his back.";
		next;
		select("He still hurts.");
		mes "[Bahed]";
		mes "Oh no... I'm so sorry";
		mes "to hear that. I hope he";
		mes "feels better soon. Anyway,";
		mes "why don't you bring the";
		mes "rocks over here?";
		next;
		mes "[Bahed]";
		mes "Let me confirm Zabaroo's";
		mes "quota for today. Ah, and";
		mes "don't worry, we pay him";
		mes "for his quotas regularly.";
		next;
		select("I have a question...");
		mes "[Bahed]";
		mes "Hm? What'd you want";
		mes "to know? I can't say that";
		mes "I know everything, but";
		mes "I'll try my best to tell you";
		mes "what I know. I mean,";
		mes "you helped Zabaroo, so...";
		next;
		select("What's this Hetarium??");
		mes "[Bahed]";
		mes "Well, it hasn't been that";
		mes "long since these rocks";
		mes "attracted attention outside";
		mes "of town. Before all this,";
		mes "the townspeople just";
		mes "made carvings out of them.";
		next;
		mes "[Bahed]";
		mes "Then, all of a sudden,";
		mes "these people from--I guess";
		mes "it was Schwarzwald--came";
		mes "and bought a lot of these";
		mes "stones. Later, they even built";
		mes "this factory to process them!";
		next;
		mes "[Bahed]";
		mes "Oh, they tried using machines";
		mes "to harvest these stones, but";
		mes "they all broke down too soon.";
		mes "That's why they hired people";
		mes "in Veins to collect them.";
		next;
		mes "[Bahed]";
		mes "I'm not sure many people";
		mes "know who owns this factory.";
		mes "Maybe it's Rekenber? Yes,";
		mes "I saw one of their corporate";
		mes "airships come to town, so";
		mes "I think it might be them.";
		next;
		select("How do they use Hetarium??");
		mes "[Bahed]";
		mes "I'm not really sure. I just";
		mes "happened to overhear some";
		mes "of the higher ups mention";
		mes "something about hearts?";
		mes "Pieces of hearts? Doesn't";
		mes "make any sense to me.";
		next;
		mes "[Bahed]";
		mes "All I gathered was that";
		mes "they were using the stones";
		mes "to build a machine related";
		mes "to those hearts. That's";
		mes "all I know. Anyway, please";
		mes "leave the stones over there~";
		set veins_stone,7;
		close;
	}
	mes "[Bahed]";
	mes "Everyday I feel";
	mes "weaker and weaker...";
	mes "Could this be chronic";
	mes "fatigue syndrome? Ugh...";
	close;
}

ve_in02,68,39,7	script	Factory Worker#ve2	943,{
	mes "[Worker]";
	mes "What the heck are these rocks?";
	mes "They're ordinary stones, aren't they?";
	mes "They don't pay me enough here...";
	close;
}

// Spy Quest :: veins_secret
//============================================================ 
prontera,202,122,0	script	Kid#sch	703,{
	if (que_sch == 0) {
		mes "[Rooney]";
		mes "Where the heck";
		mes "is it? I don't... Where...?";
		mes "He's got to be around here";
		mes "somewhere, I think...";
		next;
		select("What's wrong?:...");
		mes "[Rooney]";
		mes "Oh, it's just...";
		mes "Some guy sent me on a";
		mes "delivery errand, but I can't";
		mes "find the recipient. He said";
		mes "that I can't miss him, but";
		mes "I still can't figure it out.";
		next;
		mes "[Rooney]";
		mes "I should have asked for";
		mes "the exact location. I mean,";
		mes "if I don't find him, then I'll";
		mes "never get paid for doing";
		mes "this delivery. ^333333*Sigh*^000000";
		next;
		if (select("Sounds tough. Good luck!:Do you need any help?") == 1) {
			mes "[Rooney]";
			mes "Thanks. I think";
			mes "I just might need it.";
			mes "Where could this guy";
			mes "be? If he's expecting";
			mes "a delivery, he should";
			mes "make himself easy to find...";
			close;
		}
		mes "[Rooney]";
		mes "Yeah, sure, it'd be great";
		mes "if you could help me. Let's";
		mes "see, I need to deliver this";
		mes "letter to a bard named...";
		mes "It was... Ah, ^FF0000Lasda Midar^000000!";
		next;
		mes "[Rooney]";
		mes "I've looked everywhere";
		mes "in town for someone that";
		mes "looks like a Bard, but I'm";
		mes "not having any luck. If you";
		mes "find him, would you tell me?";
		set que_sch,1;
		close;
	}
	else if (que_sch == 1) {
		mes "[Rooney]";
		mes "I still haven't";
		mes "found Lasda Midar.";
		mes "Would you let me know";
		mes "if you find him so that";
		mes "I can deliver his letter?";
		close;
	}
	else if (que_sch == 2) {
		if (Zeny < 100) {
			mes "[Rooney]";
			mes "Lasda Midar...";
			mes "Where the heck";
			mes "could that guy be?";
			close;
		}
		mes "[Rooney]";
		mes "Wow, did you really";
		mes "find Lasda Midar?";
		mes "Why couldn't I find him?";
		mes "Anyway, thank you so much";
		mes "for your help. I thought I was";
		mes "going to fail my delivery!";
		next;
		select("He asked me to give you this.");
		mes "[Rooney]";
		mes "Hey, alright! Thanks";
		mes "for the cash! Heh heh~";
		set Zeny, Zeny-100;
		set que_sch,3;
		close;
	}
	mes "[Rooney]";
	mes "Nice day out, isn't it?";
	close;
}

prt_church,89,108,6	script	Bard#sch	741,{
	if ((MaxWeight-Weight) < 2000 || 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 (que_sch < 1) {
		mes "[Lasda]";
		mes "Hello there, isn't today";
		mes "such a wonderful day?";
		mes "Nice weather always";
		mes "inspires the poet in me,";
		mes "and I can't seem to stop";
		mes "singing my heart out~";
		close;
	}
	else if (que_sch == 1) {
		mes "[Lasda]";
		mes "Why, what a glorious";
		mes "day! I should sing a song";
		mes "in praise of its wonder!";
		mes "Ooooh... La la la-la~";
		mes "Girls, girls, giiiirls...";
		next;
		if(select("Excuse me...:......") == 1) {
			mes "[Lasda]";
			mes "Why, what a glorious";
			mes "day! I should sing a song";
			mes "in praise of its wonder!";
			mes "Ooooh... La la la-la~";
			mes "Girls, girls, giiiirls...";
			close;
		}
		mes "[Lasda]";
		mes "Girls, girls, giiiirls...";
		mes "Making my heart";
		mes "beat like... Like it's";
		mes "going too fast. My heart's";
		mes "racing... And you're at the";
		mes "finish line--Love Champion!";
		next;
		mes "[Lasda]";
		mes "Oh? Don't stare at me";
		mes "like that, you're making";
		mes "me blush. Did you need to";
		mes "talk to me or something?.";
		next;
		if(select("I'm sorry.:Are you ^ff0000Lasda Midar^000000?") == 1) {
			mes "[Lasda]";
			mes "Oh, that's alright.";
			mes "...............................";
			mes "Girl, I'll laugh at all your";
			mes "jokes, and agree with yourv";
			mes "politics~ You're hot! But";
			mes "baby, you're dumb as bricks~";
			close;
		}
		mes "[Lasda]";
		mes "Oh? Oh, yes, that's me.";
		mes "How can I help you?";
		next;
		select("I'm here to deliver this to you.");
		mes "[Lasda]";
		mes "Ah! He must have finally";
		mes "sent it. Would you please";
		mes "give me a second? Let's see...";
		next;
		mes "^3355FFLasda opened the letter";
		mes "and started reading it.^000000";
		next;
		mes "[Lasda]";
		mes "Umm...";
		mes "Oh, no...";
		next;
		mes "[Lasda]";
		mes "Ah, I'm sorry for";
		mes "making you wait.";
		mes "Here, please give";
		mes "this money to that";
		mes "kid that was supposed";
		mes "to come find me here.";
		set que_sch,2;
		set Zeny, Zeny+100;
		next;
		mes "[Lasda]";
		mes "I'd like you to come";
		mes "talk to me again later";
		mes "if you have the time";
		mes "See you around~";
		close;
	}
	else if (que_sch == 2) {
		mes "^3355FFLasda seems to be";
		mes "lost in deep thought.^000000";
		close;
	}
	else if (que_sch == 3) {
		mes "[Lasda]";
		mes "Oh good, you came back!";
		mes "Thanks for delivering that";
		mes "letter for me. Listen, you";
		mes "mind listening to me for";
		mes "a bit? I want to ask you";
		mes "for your help with something.";
		next;
		if (select("Sure.:No.") == 1) {
			mes "[Lasda]";
			mes "You see, the letter you";
			mes "brought me was from my old";
			mes "best friend. I haven't heard";
			mes "from him for a while, so";
			mes "I was pretty worried...";
			next;
			mes "[Lasda]";
			mes "Vitre said in his letter";
			mes "that he's in jail under";
			mes "false charges so he wants";
			mes "me to help him out. However,";
			mes "there isn't much I can do.";
			mes "Do you think you can help him?";
			next;
			if (select("Sure.:No.") == 1) {
				mes "[Lasda]";
				mes "Thank you so much!";
				mes "I guess the best thing";
				mes "to do for now is to find";
				mes "my friend in a prison in";
				mes "^FF0000Morocc^000000, and see what";
				mes "you can do to help him..";
				set que_sch,4;
				close;
			}
			mes "[Lasda]";
			mes "I... I guess...";
			mes "You must not be";
			mes "able to help him too...";
			close;
		}
		mes "[Lasda]";
		mes "I suppose that you";
		mes "must already be busy";
		mes "doing something else.";
		mes "Well, I understand...";
		close;
	}
	else if (que_sch < 8) {
		mes "[Lasda]";
		mes "I still can't believe";
		mes "Vitre is being held";
		mes "in prison in Morocc. I mean,";
		mes "what could have happened?";
		mes "I hope you can help him...";
		close;
	}
	else if (que_sch == 8) {
		mes "[Lasda]";
		mes "He was arrested because";
		mes "he's suspected of espionage?";
		mes "That doesn't make any sense.";
		mes "What could be going on?";
		next;
		select("^ff0000Krieg^000000 told me that.");
		mes "[Lasda]";
		mes "Krieg? Do you mean Krieg";
		mes "Laje Mandi? I know him quite";
		mes "well, actually. Let me write";
		mes "you a letter or recommendation.";
		mes "Hopefully, it'll be enough to";
		mes "let you enter the prison.";
		set que_sch,9;
		close;
	}
	else if (que_sch == 9) {
		mes "[Lasda]";
		mes "Hurry and go bring";
		mes "my letter to Krieg.";
		mes "I wonder what happened...";
		mes "There must be some kind";
		mes "of weird misunderstanding.";
		close;
	}
	else if (que_sch < 19) {
		mes "[Lasda]";
		mes "He really asked you";
		mes "to break him out of jail?";
		mes "Well, I know that's a morally";
		mes "hazy area, but I hope that";
		mes "you do your best to help Vitre.";
		close;
	}
	else if (que_sch < 25) {
		mes "[Lasda]";
		mes "Thanks for offering";
		mes "to help me out. I still";
		mes "can't believe Vitre had";
		mes "the gall to just break";
		mes "out of prison, though...";
		next;
		mes "[Lasda]";
		mes "I still can't do";
		mes "anything to help him,";
		mes "so please do what you";
		mes "can to take care of him";
		mes "for me. I really appreciate it.";
		close;
	}
	else if (que_sch == 25) {
		mes "[Lasda]";
		mes "Ah, you're back. I'm sure";
		mes "you have a lot to ask me";
		mes "right now. You deserve to";
		mes "know that everything I asked";
		mes "you to do was part of a plan";
		mes "to confirm Vitre's guilt.";
		next;
		mes "[Lasda]";
		mes "We arrested him once";
		mes "we learned that he was";
		mes "an Arunafeltz spy, but we";
		mes "couldn't punish him since";
		mes "we lacked concrete proof.";
		next;
		mes "[Lasda]";
		mes "That's why we allowed";
		mes "him to escape: we planned";
		mes "on following him to get the";
		mes "proof that we needed. Our";
		mes "sting was even able to round";
		mes "up all of his compatriots!";
		next;
		mes "[Lasda]";
		mes "I'm sorry for keeping";
		mes "you in the dark, but it was";
		mes "essential to the plan. We";
		mes "couldn't have done it without";
		mes "your help. Please take this";
		mes "reward with our sincere thanks.";
		set que_sch,26;
		getitem 12106,1; //Accessory_Box
		getexp (checkre(3))?60000:600000,0;
		close;
	}
	else {
		mes "[Lasda]";
		mes "We're having too many";
		mes "cases involving spies";
		mes "like Vitre lately. This";
		mes "might be a sign that";
		mes "Arunafeltz is planning";
		mes "to move against us...";
		close;
	}
}

morocc,53,87,7	script	Prison Ward#sch	707,{
	if (que_sch < 4) {
		mes "[Jesse]";
		mes "Only authorized";
		mes "personnel can enter";
		mes "this prison. You need";
		mes "a permit if you want";
		mes "to be able to enter.";
		close;
	}
	else if (que_sch == 4) {
		mes "[Jesse]";
		mes "What? You want to meet";
		mes "the prisoner? I'm sorry,";
		mes "but he's not allowed to";
		mes "see anyone since he was";
		mes "arrested on suspicion";
		mes "of espionage.";
		set que_sch,5;
		close;
	}
	else if (que_sch == 5) {
		mes "[Jesse]";
		mes "Huh. You're awfully";
		mes "persistent. Alright,";
		mes "if you can do me a favor,";
		mes "I'll let you in. Bring me";
		mes "1 dish of ^FF0000Fried Monkey Tails^000000";
		next;
		mes "[Jesse]";
		mes "Of course, I can only let";
		mes "you inside. Whether they'll";
		mes "actually let you meet the";
		mes "prisoner is another matter.";
		mes "So do we have a deal?";
		set que_sch,6;
		close;
	}
	else if (que_sch == 6) {
		if (countitem(12066) > 0) {
			mes "[Jesse]";
			mes "Ah, that's the stuff!";
			mes "Thanks for the Fried";
			mes "Monkey Tails~ Alright,";
			mes "go talk to ^FF0000Sir Krieg^000000 in";
			mes "Morocc Castle. Get his";
			mes "approval, and I'll let you in.";
			delitem 12066,1; //Luk_Dish01
			set que_sch,7;
			close;
		}
		mes "[Jesse]";
		mes "Bring me a plate of";
		mes "^FF0000Fried Monkey Tails^000000.";
		mes "Do it, or I won't help";
		mes "you out. I mean, I know";
		mes "you mean well, but I'm";
		mes "risking my job here...";
		close;
	}
	else if (que_sch < 10) {
		mes "[Jesse]";
		mes "You didn't get approval";
		mes "from Sir Krieg yet? You'd";
		mes "better do it, or there's no";
		mes "point in entering this prison.";
		mes "You can't just sneak around";
		mes "inside this place, you know?";
		close;
	}
	else if (que_sch == 10) {
		mes "[Jesse]";
		mes "Did you really get";
		mes "Sir Krieg's approval?";
		mes "Alright, you may enter now.";
		close2;
		warp "ra_in01",48,355;
		end;
	}
	else if (que_sch < 19) {
		mes "[Jesse]";
		mes "Do you want to enter?";
		next;
		if (select("Yes.:No") == 1) {
			mes "[Jesse]";
			mes "Be careful when you talk";
			mes "to that guy: he's a smooth";
			mes "talker, and almost charmed";
			mes "a lot of the guards into";
			mes "letting him go free.";
			close2;
			warp "ra_in01",48,355;
			end;
		}
		mes "[Jesse]";
		mes "Take your time.";
		mes "If you're not mentally";
		mes "prepared, then it's not";
		mes "a good idea to talk";
		mes "to the prisoner.";
		close;
	}
	else if (que_sch < 19) {
		mes "[Jesse]";
		mes "Argh, I'm in trouble.";
		mes "The prisoner escaped.";
		mes "How could I let this...";
		mes "happen?! Damn, I need to";
		mes "report this to Mr. Krieg";
		close;
	}
	mes "[Jesse]";
	mes "What a relief! They";
	mes "really set it up so that";
	mes "the prisoner could escape?";
	mes "Well, I thought I was going";
	mes "to get fired for all that.";
	close;
}

morocc_in,79,163,0	script	Public Security Officer	748,{
	if (que_sch < 7) {
		mes "[Krieg]";
		mes "I'm in charge of public";
		mes "security here in Morocc.";
		mes "Lately, there have been";
		mes "more incidents disturbing";
		mes "the public peace and";
		mes "many unsettling rumors...";
		close;
	}
	else if (que_sch == 7) {
		mes "[Krieg]";
		mes "Hello, adventurer.";
		mes "How may I help you?";
		next;
		select("I'd like to see a prisoner, Mr. Vitre.");
		mes "[Krieg]";
		mes "Vitre? I'm sorry, but";
		mes "I can't approve of that.";
		mes "I'd allow visitors for normal";
		mes "prisoners, but not for people";
		mes "suspected of espionage.";
		mes "That's why he's in jail.";
		next;
		mes "[Krieg]";
		mes "If I knew you personally,";
		mes "or if someone I trust can";
		mes "vouch for you, then I'd";
		mes "reconsider letting you";
		mes "meet Vitre. Otherwise,";
		mes "I just can't do it.";
		set que_sch,8;
		close;
	}
	else if (que_sch == 8) {
		mes "[Krieg]";
		mes "I can't let you meet";
		mes "Vitre until I'm absolutely";
		mes "sure that you're not involved";
		mes "with any espionage activities.";
		close;
	}
	else if (que_sch == 9) {
		mes "[Krieg]";
		mes "I can't let you meet";
		mes "Vitre until I'm absolutely";
		mes "sure that you're not involved";
		mes "with any espionage activities.";
		next;
		select("Here's a letter from Lasda.");
		mes "[Krieg]";
		mes "Lasda? Now there's a";
		mes "man I hold in high regard.";
		mes "Please let me read what";
		mes "he has to say. Hmmm...";
		next;
		mes "[Krieg]";
		mes "Alright, I'll let you visit";
		mes "Vitre. I'll send a message";
		mes "to the prison ward so that";
		mes "he'll let you talk to him.";
		set que_sch,10;
		close;
	}
	else if (que_sch < 26) {
		mes "[Krieg]";
		mes "Hmm... This is almost too";
		mes "difficult for me to handle.";
		mes "What should I do?";
		close;
	}
	mes "[Krieg]";
	mes "I understand that you were";
	mes "instrumental in solving a";
	mes "problem regarding public";
	mes "safety. I'd just like to thank";
	mes "you, and apologize for any";
	mes "trouble I might have caused.";
	close;
}

ra_in01,48,352,0	warp	que_sch_jail	1,1,morocc,56,89

ra_in01,50,387,4	script	Upset Looking Bard#sch	51,{
	if (que_sch < 10) {
		mes "[Vitre]";
		mes ".............";
		close;
	}
	else if (que_sch == 10) {
		mes "[Vitre]";
		mes "...............................";
		mes "...............................";
		mes "...............................";
		mes "Damn, what should I do?";
		next;
		select("Excuse me...");
		mes "[Vitre]";
		mes "Hm? I'm Vitre Bizlita.";
		mes "As you can see, I'm not in";
		mes "any real position to help";
		mes "you. Still, did you want";
		mes "to ask me something?";
		next;
		switch(select("Nothing.:I'm here on behalf of Mr. Lasda.")) {
		case 1:
			mes "[Vitre]";
			mes "Well...";
			mes "It's nice to";
			mes "receive visitors.";
			mes "Jail can be lonely....";
			close;
		case 2:
			mes "[Vitre]";
			mes "Oh, good. Lasda finally";
			mes "got my letter, eh? I don't";
			mes "know what the hell's going";
			mes "on. I mean, all I remember";
			mes "is that these strange men";
			mes "came and brought me here.";
			next;
			mes "[Vitre]";
			mes "I... I don't think";
			mes "they'll let me out";
			mes "of here. I mean, they";
			mes "jailed me and there's no";
			mes "proof I did anything wrong.";
			next;
			mes "[Vitre]";
			mes "My life is in danger as";
			mes "long as I'm here, so I have";
			mes "to get out as soon as I can.";
			mes "Luckily, I figured out that";
			mes "I can open these doors if";
			mes "I just had 2 things.";
			next;
			mes "[Vitre]";
			mes "I just need a ^FF0000Megaphone^000000";
			mes "and a ^FF0000Violin^000000. Luckily, they're";
			mes "pretty mundane objects, so no";
			mes "one would suspect anything if";
			mes "you brought them here. Um...";
			mes "You will help me, won't you?";
			next;
			mes "[Vitre]";
			mes "I understand if you have any";
			mes "doubts about my innocence.";
			mes "But think about it: wouldn't";
			mes "you want to see what I do";
			mes "with a Megaphone and Violin?";
			mes "Sounds pretty cool, huh?";
			next;
			mes "^3355FFYou can hear someone";
			mes "mumbling from the cell";
			mes "next to Vitre's.^000000";
			next;
			mes "[????]";
			mes "I wonder how the lady";
			mes "in the Dancer Job Change";
			mes "place is doing by now...";
			set que_sch,11;
			close;
		}
	}
	else if (que_sch < 18) {
		mes "[Vitre]";
		mes "Didn't you bring the";
		mes "Megaphone and Violin?";
		mes "The longer I sit here,";
		mes "the more likely it is";
		mes "that they'll kill me!";
		close;
	}
	else if (que_sch == 18) {
		if (countitem(7040) > 0 && countitem(1901) > 0) {
			mes "[Vitre]";
			mes "You brought me a";
			mes "Megaphone and Violin?";
			mes "Perfect! Now, step aside";
			mes "Can't have you getting hurt.";
			next;
			mes "...............................";
			mes "...............................";
			mes "...............................";
			next;
			mes "^3355FFVitre drew in a deep";
			mes "breath, and then smashed";
			mes "the steel bars of his cell";
			mes "with the Violin. Surprisingly,";
			mes "the door swings open with";
			mes "a very loud noise.^000000";
			next;
			mes "[Vitre]";
			mes "Heh! That was a little";
			mes "harder than I thought,";
			mes "but it looks like I'm free~";
			mes "Alright, let's get a move on.";
			next;
			mes "[Jesse]";
			mes "What?! What's this noise?!";
			next;
			enablenpc "Jesse#sch";
			mes "[Jesse]";
			mes "Hey! How did you";
			mes "get out of your cell?!";
			mes "Get back in there, NOW!";
			next;
			mes "[Vitre]";
			mes "If you were me, would";
			mes "you go back in your cell";
			mes "just because someone's";
			mes "yelling at you? Forget it~";
			next;
			mes "^3355FFVitre raised the Megaphone";
			mes "to his mouth, and drew in";
			mes "another deep breath.^000000";
			next;
			mes "[Vitre]";
			mes "Wah!";
			next;
			mes "[Jesse]";
			mes "Arg...";
			mes "Oh Lord...!";
			mes "M-my ears...";
			next;
			mes "[Vitre]";
			mes "Heh! I love it when";
			mes "a plan comes together~";
			mes "Let's get out of here!";
			next;
			delitem 1901,1; //Violin
			delitem 7040,1; //Megaphone
			set que_sch,19;
			close2;
			disablenpc "Jesse#sch";
			warp "morocc",294,153;
			end;
		}
		mes "[Vitre]";
		mes "Didn't you bring";
		mes "a Megaphone and";
		mes "a Violin? Please";
		mes "hurry, I don't have";
		mes "much time left!";
		close;
	}
	else {
		mes "[Vitre]";
		mes "Heh! I love it when";
		mes "a plan comes together~";
		mes "Let's get out of here!";
		close2;
		warp "morocc",294,153;
		end;
	}
}

ra_in01,58,389,0	script	Jesse#sch	707,{
	end;

OnInit:
	disablenpc "Jesse#sch";
	end;
}

ra_in01,58,389,0	script	Guant Prisoner#sch	929,{
	if (que_sch < 11) {
		mes "[Ruan]";
		mes "This stinks. Why am";
		mes "I locked up in here?";
		mes "I didn't do anything";
		mes "to deserve this!";
		next;
		mes "[Ruan]";
		mes "It's getting to be so";
		mes "bad that I even miss the";
		mes "sound of Hianna's voice.";
		mes "It's freakishly loud.";
		mes "You couldn't outyell her";
		mes "even with a Megaphone.";
		close;
	}
	else if (que_sch == 11) {
		mes "[Ruan]";
		mes "This stinks. Why am";
		mes "I locked up in here?";
		mes "I didn't do anything";
		mes "to deserve this!";
		next;
		mes "[Ruan]";
		mes "It's getting to be so";
		mes "bad that I even miss the";
		mes "sound of Hianna's voice.";
		mes "It's freakishly loud.";
		mes "You couldn't outyell her";
		mes "even with a Megaphone.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What...?!";
		next;
		select("Where I can find that Megaphone?");
		mes "[Ruan]";
		mes "Huh? Why would you";
		mes "want to know that?";
		next;
		select("I really need one!");
		mes "[Ruan]";
		mes "Uh, you can get one from";
		mes "that Dancer Job Change";
		mes "place in Comodo. They're";
		mes "really hard to get, though,";
		mes "if not impossible. Knock";
		mes "yourself out, buddy.";
		close;
	}
	else if (que_sch < 20) {
		mes "[Ruan]";
		mes "Nobody knows what";
		mes "will happen tomorrow.";
		mes "I mean, this is a world of";
		mes "miracles and tragedies.";
		mes "Death, or real love...";
		mes "You will never know what will happen.";
		close;
	}
	mes "[Ruan]";
	mes "........";
	close;
}

// Escort Dancers to Schwarzwald Republic
job_duncer,93,106,6	script	Dance Instructor#sch	892,{
	if ((MaxWeight-Weight) < 2000 || 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 (que_sch < 11) {
		mes "[Hianna]";
		mes "Keep up the good work,";
		mes "everyone! There's only";
		mes "a few days left until the";
		mes "big performance! Hey...";
		mes "You! Can't you do it right?";
		mes "Turn your waist quicker!";
		close;
	}
	else if (que_sch == 11) {
		mes "[Hianna]";
		mes "Hey, who are you?";
		mes "We already have enough";
		mes "problems with too many";
		mes "pervs ogling the Dancers.";
		mes "I'd prefer it if you didn't";
		mes "come to watch us practice.";
		next;
		if (select("I want a Megaphone.:Eeek...") == 2) {
			mes "[Hianna]";
			mes "If you really want to";
			mes "watch us dance, come to";
			mes "the show and buy a ticket.";
			mes "Watching for free isn't";
			mes "exactly supporting the arts.";
			close;
		}
		mes "[Hianna]";
		mes "You want a Megaphone?";
		mes "Well, I'm sorry, but it's";
		mes "not just something I can";
		mes "lend to anybody. Then again";
		mes "it's not like you can find one";
		mes "anywhere else, either.";
		next;
		if (select("Please! I'll do anything!:Later.") == 2) {
			mes "[Hianna]";
			mes "Alright, then.";
			mes "I'm sorry that";
			mes "I can't help you.";
			close;
		}
		mes "[Hianna]";
		mes "Anything, huh?";
		mes "Well, you just said";
		mes "the magic word. Listen";
		mes "carefully to what I want";
		mes "you to do for me.";
		next;
		if (select("Listen:Reconsider") == 1) {
			mes "[Hianna]";
			mes "First, I want a little";
			mes "cash. Consider it a rental";
			mes "fee. 500,000 zeny should be";
			mes "just about enough. Then,";
			mes "I want you to do me a favor.";
			next;
			mes "[Hianna]";
			mes "The Schwarzwald Republic";
			mes "requested me to send some";
			mes "Dancers for some party, but";
			mes "I don't have enough guards";
			mes "to protect them on their";
			mes "way over there.";
			next;
			mes "[Hianna]";
			mes "If you act as bodyguard";
			mes "to my Dancers on the way";
			mes "to the Schwarzwald Republic,";
			mes "I'll lend you my Megaphone";
			mes "once you come back. So...";
			mes "How does that sound?";
			next;
			if (select("Sounds good.:Like a ripoff.") == 1) {
				mes "[Hianna]";
				mes "I'm glad you agree~";
				mes "Okay, the Dancers are";
				mes "waiting are the entrance,";
				mes "so bring them over to the";
				mes "Schwarzwald Republic as";
				mes "soon as you're ready.";
				set que_sch,12;
				close;
			}
			mes "[Hianna]";
			mes "So... I guess you";
			mes "didn't need that";
			mes "Megaphone as";
			mes "badly as I thought.";
			close;
		}
		mes "[Hianna]";
		mes "Alright, take your";
		mes "time. I'm in no rush.";
		close;
	}
	else if (que_sch < 17) {
		mes "[Hianna]";
		mes "What are you still doing";
		mes "here? Shouldn't you be";
		mes "escorting the Dancers to";
		mes "the Schwaltvalt Republic";
		mes "already? Get a move on~";
		close;
	}
	else if (que_sch == 17) {
		mes "[Hianna]";
		mes "Thanks for all your";
		mes "hard work. The Dancers";
		mes "told me that you did a good";
		mes "job escorting them. Now...";
		mes "Do you have the money?";
		next;
		if (select("Yes:No") == 1) {
			if (Zeny < 500000) {
				mes "[Hianna]";
				mes "What's this? Hmm...";
				mes "I think you made a mistake.";
				mes "This isn't enough money.";
				mes "Remember, 500,000 zeny~";
				close;
			}
			mes "[Hianna]";
			mes "Perfect. Well, here's";
			mes "your Megaphone. Thanks";
			mes "for everything, and I'll see";
			mes "you around, adventurer~";
			set Zeny, Zeny-500000;
			set que_sch,18;
			getitem 7040,1; //Megaphone
			close;
		}
		mes "[Hianna]";
		mes "I can't have you breaking";
		mes "your promises, so I won't";
		mes "give you the Megaphone";
		mes "until you pay me the";
		mes "500,000 zeny that you";
		mes "said that you would.";
		close;
	}
	else if (que_sch == 18) {
		mes "[Hianna]";
		mes "Thanks for escorting";
		mes "my Dancers over to the";
		mes "Schwarzwald Republic.";
		mes "Anything I can help";
		mes "you with today?";
		next;
		if (select("I'd like another Megaphone.:No thanks.") == 1) {
			mes "[Hianna]";
			mes "Well, I guess I can let";
			mes "you have another one if";
			mes "you pay me 500,000 zeny.";
			mes "You sure you want to pay";
			mes "the money for a Megaphone?";
			next;
			if (select("Yes:No") == 1) {
				if (Zeny < 500000) {
					mes "[Hianna]";
					mes "I'm sorry, but this";
					mes "isn't enough money for";
					mes "a Megaphone. Be sure";
					mes "to bring me 500,000 zeny.";
					close;
				}
				mes "[Hianna]";
				mes "Here you are. The fact is...";
				mes "These Megaphones are";
				mes "considered guild property,";
				mes "so I'm not supposed to let";
				mes "you have this. Don't let";
				mes "anyone know I gave you this!";
				set Zeny, Zeny-500000;
				getitem 7040,1; //Megaphone
				close;
			}
			mes "[Hianna]";
			mes "Alright~";
			mes "Take care, and";
			mes "travel safely~";
			close;
		}
		mes "[Hianna]";
		mes "Alright~";
		mes "Take care, and";
		mes "travel safely~";
		close;
	}
	mes "[Hianna]";
	mes "Trust me, we've made";
	mes "good use of the money";
	mes "that you've ''donated.''";
	mes "Thanks for taking good";
	mes "care of my Dancers~";
	close;
}

job_duncer,85,49,0	script	Young Dancer#sch1	724,{
	if (que_sch < 12) {
		mes "[Dancer]";
		mes "Hi there~";
		mes "Are you enjoying";
		mes "yourself? I hope so!";
		close;
	}
	else if (que_sch == 12) {
		mes "[Dancer]";
		mes "Ah, you must be the";
		mes "bodyguard. So are you";
		mes "ready to go now?";
		next;
		if (select("Yes:No") == 1) {
			mes "[Dancer]";
			mes "Alright, then.";
			mes "Here we go~";
			set que_sch,13;
			close2;
			warp "airplane",75,55;
			end;
		}
		mes "[Dancer]";
		mes "We need to depart soon,";
		mes "so please hurry. I'll be";
		mes "waiting for you here~";
		close;
	}
	mes "[Dancer]";
	mes "Oh, that was such a fun";
	mes "performance. I can still";
	mes "see the dazzling decorations";
	mes "in the ballroom where we got";
	mes "to dance. It was so wonderful!";
	close;
}

job_duncer,83,52,6	script	Cheerful Dancer#sch1	724,{
	if (que_sch < 12) {
		mes "[Dancer]";
		mes "Hi there~";
		mes "Are you enjoying";
		mes "yourself? I hope so!";
		close;
	}
	else if (que_sch == 12) {
		mes "[Dancer]";
		mes "Ah, you must be the";
		mes "bodyguard. So are you";
		mes "ready to go now?";
		next;
		if (select("Yes:No") == 1) {
			mes "[Dancer]";
			mes "Alright, then.";
			mes "Here we go~";
			set que_sch,13;
			close2;
			warp "airplane",75,55;
			end;
		}
		mes "[Dancer]";
		mes "We need to depart soon,";
		mes "so please hurry. I'll be";
		mes "waiting for you here~";
		close;
	}
	mes "[Dancer]";
	mes "I guess it's pretty";
	mes "fun to perform on stage~";
	mes "But I still need to practice";
	mes "more for the next performance.";
	close;
}

job_duncer,87,50,2	script	Mature Looking Dancer#s1	724,{
	if (que_sch < 12) {
		mes "[Dancer]";
		mes "Hi there~";
		mes "Are you enjoying";
		mes "yourself? I hope so!";
		close;
	}
	else if (que_sch == 12) {
		mes "[Dancer]";
		mes "Ah, you must be the";
		mes "bodyguard. So are you";
		mes "ready to go now?";
		next;
		if (select("Yes:No") == 1) {
			mes "[Dancer]";
			mes "Alright, then.";
			mes "Here we go~";
			set que_sch,13;
			close2;
			warp "airplane",75,55;
			end;
		}
		mes "[Dancer]";
		mes "We need to depart soon,";
		mes "so please hurry. I'll be";
		mes "waiting for you here~";
		close;
	}
	mes "[Dancer]";
	mes "I sure learned a lot from";
	mes "that trip. I hope that the new";
	mes "girls also gained something";
	mes "from their experiences.";
	close;
}

airplane,76,56,4	script	Young Dancer#sch2	724,{
	if (que_sch < 13) {
		mes "[Dancer]";
		mes "Hi there~";
		mes "Are you enjoying";
		mes "yourself? I hope so!";
		close;
	}
	else if (que_sch == 13) {
		mes "[Dancer]";
		mes "This will be my";
		mes "first performance...";
		mes "I guess that's why";
		mes "I have butterflies";
		mes "in my stomach...";
		close;
	}
	mes "[Dancer]";
	mes "I wonder which beautiful";
	mes "place we'll get to perform in";
	mes "next time! Ooh, I can't wait!";
	close;
}

airplane,75,53,0	script	Cheerful Dancer#sch2	724,{
	if (que_sch < 13) {
		mes "[Dancer]";
		mes "Hi there~";
		mes "Are you enjoying";
		mes "yourself? I hope so!";
		close;
	}
	else if (que_sch == 13) {
		mes "[Dancer]";
		mes "I've performed at many";
		mes "venues, but this is the";
		mes "frist time I'll be dancing";
		mes "in the Schwarzwald Republic.";
		mes "This is also my first time on";
		mes "an airship. How exciting!";
		close;
	}
	mes "[Dancer]";
	mes "Traveling is really";
	mes "thrilling... It's almost as";
	mes "fun as dancing on stage~";
	close;
}

airplane,79,55,2	script	Mature Looking Dancer#s2	724,{
	if (que_sch < 13) {
		mes "[Dancer]";
		mes "Hi there~";
		mes "Are you enjoying";
		mes "yourself? I hope so!";
		close;
	}
	else if (que_sch == 13) {
		mes "[Dancer]";
		mes "This is the first time that";
		mes "the Schwarzwald Republic";
		mes "requested a performance";
		mes "from us. Isn't that amazing?";
		mes "I guess we earned a reputation";
		mes "overseas. I'll do my best!";
		next;
		mes "[Airship Announcement]";
		mes "We will be arriving";
		mes "in Einbroch shortly.";
		mes "Passengers to Einbroch,";
		mes "please get ready to land.";
		next;
		mes "[Dancer]";
		mes "Oh! We're finally here!";
		mes "Alright, I'll give this next";
		mes "performance my all!";
		close2;
		set que_sch,14;
		warp "ein_in01",278,223;
		end;
	}
	mes "[Dancer]";
	mes "I've been dancing on";
	mes "stage for a long time, but";
	mes "I always feel so nervous";
	mes "right beforehand. I wonder";
	mes "why that happens to me.";
	close;
}

ein_in01,174,266,0	script	Young Dancer#sch3	724,{
	if (que_sch < 17) {
		mes "[Dancer]";
		mes "Oh, the dinner";
		mes "party isn't finished yet.";
		mes "It'll be over before";
		mes "you even know it~";
		close;
	}
	else if (que_sch == 17) {
		mes "[Dancer]";
		mes "Hooray! My first";
		mes "onstage performance";
		mes "was a success! Oh";
		mes "I was so nervous...";
		mes "But I'm so proud";
		mes "of myself now!";
		close;
	}
	mes "[Dancer]";
	mes "Without dance,";
	mes "my life has no";
	mes "meaning at all.";
	close;
}

ein_in01,172,266,0	script	Cheerful Dancer#sch3	724,{
	if (que_sch < 17) {
		mes "[Dancer]";
		mes "The dinner party isn't";
		mes "even finished yet, but";
		mes "I'm already exhausted~";
		close;
	}
	else if (que_sch == 17) {
		mes "[Dancer]";
		mes "^333333*Whew*^000000 We gave a good";
		mes "performance this time.";
		mes "I was worried since that";
		mes "airship trip really drained me.";
		close;
	}
	mes "[Dancer]";
	mes "Dancing is really";
	mes "hard work, and all that";
	mes "practicing wears you out,";
	mes "but it's worth it once you";
	mes "get up on that stage.";
	close;
}

ein_in01,170,266,0	script	Mature Looking Dancer#s3	724,{
	if (que_sch < 17) {
		mes "[Dancer]";
		mes "Oh, the dinner";
		mes "party isn't finished yet.";
		mes "It'll be over before";
		mes "you even know it~";
		close;
	}
	else if (que_sch == 17) {
		mes "[Dancer]";
		mes "Well well, it looks like our";
		mes "performance was a success.";
		mes "The new girls did a really";
		mes "great job. So let's head";
		mes "back home, shall we?";
		close2;
		warp "comodo",191,146;
		end;
	}
	mes "[Dancer]";
	mes "Dancing is so fun, but";
	mes "sometimes it's hard to";
	mes "keep up with the audience's";
	mes "expectations, you know?";
	close;
}

ein_in01,279,221,0	script	Hotel Manager#sch	903,5,5,{
	if (que_sch < 15) {
		mes "[Manager]";
		mes "It'd be a really great";
		mes "party if our customers";
		mes "were a little less rowdy";
		mes "Recently, they've been";
		mes "more than a handful...";
		close;
	}
	else if (que_sch == 15) {
		mes "[Manager]";
		mes "I'm glad our customers";
		mes "enjoyed the performance";
		mes "I was a little worried about";
		mes "what they were going to think,";
		mes "but I guess I was just being";
		mes "overly anxious about it all.";
		close;
	}
	else if (que_sch == 16) {
		mes "[Manager]";
		mes "Thank you so much for";
		mes "your services. I'll be sure to";
		mes "have one of my employees";
		mes "send you your payment";
		mes "Have a safe trip back~";
		set que_sch,17;
		close;
	}
	end;

OnTouch:
	if (que_sch == 14) {
		mes "[Manager]";
		mes "Oh, did you enjoy";
		mes "your trip? I'm glad to";
		mes "see that everyone arrived";
		mes "safely. The dinner party";
		mes "will start shortly, so";
		mes "please get ready~";
		set que_sch,15;
		close;
	}
	end;
}

ein_in01,166,282,4	script	Employee#sch	904,{
	if (que_sch < 15) {
		mes "[Employee]";
		mes "We've been so busy lately!";
		mes "It's just one party reservation";
		mes "after another! When will I be";
		mes "able to just take a break?";
		close;
	}
	else if (que_sch < 17) {
		if (rand(1,3) == 2) {
			mes "[Employee]";
			mes "Hi, how may I help you?";
			mes "Tonight, most of customers";
			mes "are high ranking government";
			mes "officials or public figures.";
			mes "That man over there is the";
			mes "Rekenber P.R. executive.";
			next;
			mes "[Employee]";
			mes "That priest over there is";
			mes "actually a diplomat from";
			mes "Arunafeltz on business.";
			mes "These are some very";
			mes "important people!";
			close;
		}
		mes "[Employee]";
		mes "How can I help you?";
		mes "Oh, would you like another";
		mes "drink? There you go! Please";
		mes "enjoy the dinner party~";
		close;
	}
	mes "[Employee]";
	mes "Oh, the mess left after";
	mes "a banquet is the biggest";
	mes "part of my job. It's tough";
	mes "work, but it needs to get done.";
	close;
}

ein_in01,176,285,0	script	Bard Trigger#sch	-1,1,1,{
OnTouch:
	if (que_sch == 15) {
		disablenpc "Corporate Figure#sch";
		disablenpc "Arunafeltz Figure#sch";
		enablenpc "Corporate Figure";
		enablenpc "Arunafeltz Figure";
		mes "[????]";
		mes "I guess the party";
		mes "will soon be over.";
		mes "Did you enjoy yourself?";
		next;
		mes "[??????]";
		mes "Yes, thank you, I had";
		mes "a great time. I'm sorry";
		mes "I gave you such short";
		mes "notice of my arrival, but";
		mes "you held this party anyway.";
		next;
		mes "[????]";
		mes "Don't mention it.";
		mes "You're a valued guest.";
		mes "It would shame me if I'd";
		mes "failed to entertain you.";
		next;
		mes "[??????]";
		mes "Ho ho, you certainly know";
		mes "how to be a good host~";
		next;
		mes "[????]";
		mes "Your words honor me.";
		next;
		mes "^3355FFThe man took a quick";
		mes "look around the room.^000000";
		next;
		mes "[????]";
		mes "No one's around.";
		mes "I have something to";
		mes "discuss with you before";
		mes "we get down to business.";
		next;
		mes "[??????]";
		mes "What kind of...?";
		next;
		mes "[????]";
		mes "I'll explain in detail";
		mes "someplace safer. The gist";
		mes "is that some rogues over in";
		mes "Arunafeltz are plotting to harm";
		mes "relations between Arunafeltz";
		mes "and the Rekenber Corporation.";
		next;
		mes "[??????]";
		mes "Oh... I see. Yes,";
		mes "we can't talk about";
		mes "that here. To tell the";
		mes "truth, I've suspected that";
		mes "something like that was";
		mes "going on... Yes, makes sense.";
		next;
		mes "[????]";
		mes "We should relocate";
		mes "so that we can talk";
		mes "a bit more freely.";
		mes "Please follow me,";
		mes "I already have";
		mes "a place prepared.";
		set que_sch,16;
		close2;
		disablenpc "Corporate Figure";
		disablenpc "Arunafeltz Figure";
		enablenpc "Corporate Figure#sch";
		enablenpc "Arunafeltz Figure#sch";
	}
	end;
}

ein_in01,181,284,0	script	Corporate Figure	109,{
	end;

OnInit:
	disablenpc "Corporate Figure";
	end;
}

ein_in01,181,285,0	script	Arunafeltz Figure	920,{
	end;

OnInit:
	disablenpc "Arunafeltz Figure";
	end;
}

ein_in01,168,274,0	script	Corporate Figure#sch	109,{
	mes "[????]";
	mes "Hmm... Good.";
	mes "Everything looks";
	mes "ready to me.";
	close;
}

ein_in01,170,284,4	script	Arunafeltz Figure#sch	920,{
	mes "[??????]";
	mes "I've got to say, only";
	mes "Rekenber can host such";
	mes "a magnificent party in";
	mes "a city this polluted.";
	mes "What's going on...?";
	close;
}

morocc,297,154,0	script	Thin-Faced Bard#sch	51,{
	if ((MaxWeight-Weight) < 2000 || 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 (que_sch < 19) {
		mes "[????]";
		mes "............";
		close;
	}
	else if (que_sch == 19) {
		mes "[Vitre]";
		mes "Thanks for your help.";
		mes "This country's government";
		mes "should know better than to";
		mes "put a good man like me in jail.";
		mes "Listen, I'm a fugitive now.";
		mes "Do you think you can help me?";
		next;
		select("Sure.:I may as well...");
		mes "[Vitre]";
		mes "I just need you to talk";
		mes "to a few people, and let";
		mes "me know what they said.";
		mes "I'd do it myself, but you";
		mes "understand that I've got";
		mes "to keep a low profile.";
		next;
		mes "[Vitre]";
		mes "Please meet these people";
		mes "in the order that I tell you.";
		mes "I've sent messengers to let";
		mes "them know of your arrival,";
		mes "but I had to send them out";
		mes "at different times... Anyway...";
		next;
		mes "[Vitre]";
		mes "First, go to Prontera";
		mes "and talk to Chada. Second,";
		mes "go to Geffen and speak to";
		mes "Ghez. Lastly, please go to";
		mes "Comodo and meet Nosdan.";
		next;
		mes "[Vitre]";
		mes "Each one of them will";
		mes "sing you a song. Listen";
		mes "carefully, and sing me their";
		mes "songs when you come back.";
		mes "Thanks, you have no idea how";
		mes "much I appreciate your help.";
		set que_sch,20;
		close;
	}
	else if (que_sch == 20) {
		mes "[Vitre]";
		mes "Chada is probably near";
		mes "the middle of Prontera.";
		mes "The messenger I sent to";
		mes "him should have reached";
		mes "him by now, so he should";
		mes "be expecting your arrival.";
		close;
	}
	else if (que_sch == 21) {
		mes "[Vitre]";
		mes "Ah, now you've got to";
		mes "talk to Ghez. He should";
		mes "be in Northeast Geffen";
		mes "somewhere. Hopefully";
		mes "you won't have too much";
		mes "trouble finding him.";
		close;
	}
	else if (que_sch == 22) {
		mes "[Vitre]";
		mes "Trying to find Nosdan?";
		mes "I think he's probably in the";
		mes "Northern Cave in Comodo.";
		mes "Please talk to him, and let";
		mes "me know about his song.";
		close;
	}
	else if (que_sch == 23) {
		mes "[Vitre]";
		mes "Welcome back.";
		mes "So did you listen";
		mes "to all of their songs?";
		next;
		if (select("Yes:No") == 1) {
			mes "[Vitre]";
			mes "Perfect~ Here's a little";
			mes "something to show my";
			mes "gratitude. Hope you like it.";
			set que_sch,24;
			getitem 603,1; //Old_Blue_Box
			next;
			mes "[Vitre]";
			mes "Now, tell me, what";
			mes "exactly did they si--";
			next;
			mes "[????]";
			mes "Hold it!";
			next;
			enablenpc "????#sch1";
			enablenpc "????#sch2";
			enablenpc "????#sch3";
			mes "[Vitre]";
			mes "What? Wh-who the";
			mes "hell are you guys?!";
			next;
			mes "[????]";
			mes "Rune-Midgarts";
			mes "Secret Service!";
			mes "Vitre Bizlleta--";
			mes "you're under arrest";
			mes "for espionage!";
			next;
			mes "[Vitre]";
			mes "Again? Didn't you just";
			mes "arrest me just for being";
			mes "suspected of espionage?";
			mes "I think it's a little unfair";
			mes "to just capture me when";
			mes "you don't have any proof.";
			next;
			mes "[????]";
			mes "We just seized concrete";
			mes "evidence of your illegal";
			mes "activities. It's probably";
			mes "enough to imprison you";
			mes "for life. Happy now?";
			next;
			mes "[Vitre]";
			mes "You're bluffing.";
			next;
			mes "[????]";
			mes "You shouldn't have sent";
			mes "that unsuspecting adventurer";
			mes "to your news sources. We've";
			mes "taken them into custody";
			mes "Chada, Ghez, Nosdan.";
			mes "That's them, right?";
			next;
			mes "[Vitre]";
			mes "Nooooooooo!";
			next;
			mes "[Suden]";
			mes "Adventurer, thank you for";
			mes "your cooperation. I am";
			mes "Suden Griea, Secret Service";
			mes "agent. I'm sure you have";
			mes "a lot of questions, but ^FF0000Lasda";
			mes "Midar^000000 will answer them.";
			next;
			mes "[Suden]";
			mes "I'd explain here and now,";
			mes "but I better dispose of";
			mes "this trash with the rest of";
			mes "his scum buddies... in jail!";
			set que_sch,25;
			close2;
			disablenpc "????#sch1";
			disablenpc "????#sch2";
			disablenpc "????#sch3";
			end;
		}
		mes "[Vitre]";
		mes "Would you please hurry?";
		mes "Staying in one place like";
		mes "this makes me nervous...";
		mes "I should be on the move...";
		close;
	}
	else if (que_sch == 24) {
		mes "[Vitre]";
		mes "Now, tell me, what";
		mes "exactly did they si--";
		next;
		mes "[????]";
		mes "Hold it!";
		next;
		enablenpc "????#sch1";
		enablenpc "????#sch2";
		enablenpc "????#sch3";
		mes "[Vitre]";
		mes "What? Wh-who the";
		mes "hell are you guys?!";
		next;
		mes "[????]";
		mes "Rune-Midgarts";
		mes "Secret Service!";
		mes "Vitre Bizlleta--";
		mes "you're under arrest";
		mes "for espionage!";
		next;
		mes "[Vitre]";
		mes "Again? Didn't you just";
		mes "arrest me just for being";
		mes "suspected of espionage?";
		mes "I think it's a little unfair";
		mes "to just capture me when";
		mes "you don't have any proof.";
		next;
		mes "[????]";
		mes "We just seized concrete";
		mes "evidence of your illegal";
		mes "activities. It's probably";
		mes "enough to imprison you";
		mes "for life. Happy now?";
		next;
		mes "[Vitre]";
		mes "You're bluffing.";
		next;
		mes "[????]";
		mes "You shouldn't have sent";
		mes "that unsuspecting adventurer";
		mes "to your news sources. We've";
		mes "taken them into custody";
		mes "Chada, Ghez, Nosdan.";
		mes "That's them, right?";
		next;
		mes "[Vitre]";
		mes "Nooooooooo!";
		next;
		mes "[Suden]";
		mes "Adventurer, thank you for";
		mes "your cooperation. I am";
		mes "Suden Griea, Secret Service";
		mes "agent. I'm sure you have";
		mes "a lot of questions, but ^FF0000Lasda";
		mes "Midar^000000 will answer them.";
		next;
		mes "[Suden]";
		mes "I'd explain here and now,";
		mes "but I better dispose of";
		mes "this trash with the rest of";
		mes "his scum buddies... in jail!";
		set que_sch,25;
		close2;
		disablenpc "????#sch1";
		disablenpc "????#sch2";
		disablenpc "????#sch3";
		end;
	}
	mes "[Bard]";
	mes "Oh, uh...";
	mes "I'm not really Vitre.";
	mes "I'm just a lookalike that's";
	mes "been planted here in case";
	mes "his hoodlum buddies come";
	mes "here to find him. You know?";
	next;
	mes "[Bard]";
	mes "Yeah... This is a pretty";
	mes "dumb job. I mean, all I do";
	mes "is stand here, waiting for";
	mes "his spy friends. What are";
	mes "the odds of that happening?";
	close;
}

morocc,294,152,0	script	????#sch1	899,{
	end;

OnInit:
	disablenpc "????#sch1";
	end;
}

morocc,293,155,6	script	????#sch2	899,{
	end;

OnInit:
	disablenpc "????#sch2";
	end;
}

morocc,298,150,1	script	????#sch3	899,{
	end;

OnInit:
	disablenpc "????#sch3";
	end;
}

prontera,109,161,6	script	Young Man#sch	83,{
	if (que_sch < 20) {
		mes "[Chada]";
		mes "What a boring day...";
		mes "Perhaps I'll stave the";
		mes "dreariness with song~";
		close;
	}
	else if (que_sch == 20) {
		mes "[Chada]";
		mes "Are you the one that";
		mes "Vitre sent? Good, good.";
		mes "Let me treat you to my";
		mes "wonderful song. Listen...";
		mes "And learn... And love...";
		next;
		mes "[Chada]";
		mes "La la la la la la la la~";
		mes "A curse plagues the";
		mes "royal family, and it's";
		mes "been passed down to their";
		mes "second child... la la la...";
		mes "No one can cure it... Oooh~";
		next;
		mes "[Chada]";
		mes "Hahaha! Isn't that";
		mes "such a wonderful song?";
		mes "Let Vitre know each and";
		mes "every word to it, okay?";
		set que_sch,21;
		close;
	}
	else if (que_sch < 30) {
		mes "[Chada]";
		mes "Did you need to hear";
		mes "the song again? Alright,";
		mes "listen carefully this time~";
		next;
		mes "[Chada]";
		mes "La la la la la la la la~";
		mes "A curse plagues the";
		mes "royal family, and it's";
		mes "been passed down to their";
		mes "second child... la la la...";
		mes "No one can cure it... Oooh~";
		next;
		mes "[Chada]";
		mes "Hahaha! Isn't that";
		mes "such a wonderful song?";
		mes "Let Vitre know each and";
		mes "every word to it, okay?";
		close;
	}
	else {
		mes "[Chada]";
		mes "...........";
		mes "I have nothing to say to you.";
		close;
	}
}

geffen,196,167,4	script	Young Woman#sch	101,{
	if (que_sch < 21) {
		mes "[Ghez]";
		mes "When is he going";
		mes "to send someone to";
		mes "listen to my song?";
		close;
	}
	else if (que_sch == 21) {
		mes "[Ghez]";
		mes "Oh, Vitre send you?";
		mes "Great, I've been waiting";
		mes "for you. Check out this";
		mes "new song I wrote. It's great.";
		next;
		mes "[Ghez]";
		mes "Sha la la la la la";
		mes "Prontera Knights gotta";
		mes "protect the palace~";
		mes "Sha hoo hoo haaaaa";
		mes "Geffen Knights gotta";
		mes "protect the magic tower~";
		next;
		mes "[Ghez]";
		mes "Na na na nan nan naaa";
		mes "Prontera! Geffen! Knights";
		mes "together! Protect the palace!";
		mes "Ooooooooooooh yeah!";
		mes "And crush their foes to the west!";
		mes "That's the secret plan! La la la~";
		next;
		mes "[Ghez]";
		mes "Wasn't that poetic?";
		mes "Now sing that song exactly";
		mes "as you heard it to Vitre.";
		set que_sch,22;
		close;
	}
	else if (que_sch < 30) {
		mes "[Ghez]";
		mes "You want to hear my song";
		mes "again? Fine, but make sure";
		mes "to memorize it all this time.";
		next;
		mes "[Ghez]";
		mes "Sha la la la la la";
		mes "Prontera Knights gotta";
		mes "protect the palace~";
		mes "Sha hoo hoo haaaaa";
		mes "Geffen Knights gotta";
		mes "protect the magic tower~";
		next;
		mes "[Ghez]";
		mes "Na na na nan nan naaa";
		mes "Prontera! Geffen! Knights";
		mes "together! Protect the palace!";
		mes "Ooooooooooooh yeah!";
		mes "And crush their foes to the west!";
		mes "That's the secret plan! La la la~";
		next;
		mes "[Ghez]";
		mes "Wasn't that poetic?";
		mes "Now sing that song exactly";
		mes "as you heard it to Vitre.";
		close;
	}
	else {
		mes "[Ghez]";
		mes "I'm doomed...";
		mes ".......";
		close;
	}
}

comodo,135,299,0	script	Young Man#sch2	809,{
	if (que_sch < 22) {
		mes "[Nosdan]";
		mes "Have you come to hear";
		mes "my song? Ah, it's good";
		mes "that you've come to enjoy";
		mes "my melodious vo--wait,";
		mes "wait, where are you going?";
		close;
	}
	else if (que_sch == 22) {
		mes "[Nosdan]";
		mes "Ah, are you the one";
		mes "that Vitre mentioned";
		mes "in his message? Okay,";
		mes "please give me a moment.";
		next;
		mes "[Nosdan]";
		mes "^333333*Ahem ahem*^000000";
		mes "I'm ready. Now";
		mes "please listen..";
		next;
		mes "[Nosdan]";
		mes "Who dares stop the fearless";
		mes "warrior? Baphomet? Drake?";
		mes "No, they're too weak! His";
		mes "steps now head to the group";
		mes "of evil men trying to revive";
		mes "Satan Morocc. I mean, come on!";
		next;
		mes "[Nosdan]";
		mes "Sad news from an old comrade,";
		mes "the evil group discovered...";
		mes "Time to stop Satan Morocc's";
		mes "revival~ La la la la la la la";
		mes "la la la la la la la la la la";
		mes "la la la la la la la la la la";
		next;
		mes "[Nosdan]";
		mes "What'd you think?";
		mes "Um, don't ask me about";
		mes "the lyrics. Just a weird";
		mes "artistic quirk I guess.";
		mes "Oh, please sing that song";
		mes "to Vitre for me, okay?";
		set que_sch,23;
		close;
	}
	else if (que_sch < 30) {
		mes "[Nosdan]";
		mes "Oh, you need to";
		mes "hear my song again?";
		mes "No problem! I guess";
		mes "you really like it~";
		next;
		mes "[Nosdan]";
		mes "Who dares stop the fearless";
		mes "warrior? Baphomet? Drake?";
		mes "No, they're too weak! His";
		mes "steps now head to the group";
		mes "of evil men trying to revive";
		mes "Satan Morocc. I mean, come on!";
		next;
		mes "[Nosdan]";
		mes "Sad news from an old comrade,";
		mes "the evil group discovered...";
		mes "Time to stop Satan Morocc's";
		mes "revival~ La la la la la la la";
		mes "la la la la la la la la la la";
		mes "la la la la la la la la la la";
		next;
		mes "[Nosdan]";
		mes "What'd you think?";
		mes "Um, don't ask me about";
		mes "the lyrics. Just a weird";
		mes "artistic quirk I guess.";
		mes "Oh, please sing that song";
		mes "to Vitre for me, okay?";
		close;
	}
	else {
		mes "[Nosdan]";
		mes "Oh, no! I didn't!";
		mes "do anything wrong.";
		mes "I swear!";
		close;
	}
}

sec_in02,10,43,4	script	Extra Story Patch	809,{
	callfunc "F_GM_NPC";
	mes "[Patch]";
	mes "Yeah, you can try.";
	next;
	if(select("Now:How many?") == 2) {
		input .@input,0,1000;
		set que_sch, .@input;
	}
	mes " ";
	mes ""+que_sch;
	close;
}

// Siblings Quest :: veins_camel
//============================================================ 
veins,327,185,3	script	Kid#camelcamel	944,{
	if (MISC_QUEST & 8192) {
		if (rachel_camel == 0) {
			mes "[Kid Karyn]";
			mes "*Sob*";
			next;
			mes "^3355FFThis sobbing child";
			mes "looks really upset...^000000";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Hey, why are you";
			mes "crying? Are you lost?";
			mes "Where's your mommy?";
			next;
			mes "[Kid Karyn]";
			mes "My... Mom's";
			mes "at home...";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "......";
			mes ".........";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "I see. So...";
			mes "Are you having";
			mes "trouble finding";
			mes "your way back home?";
			next;
			mes "[Kid Karyn]";
			mes "No! I'm ten years old!";
			mes "I can find my way home,";
			mes "even with my eyes closed!";
			mes "^333333*Sniff sniff*^000000 Uuuuuuweeeh~";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Well...";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Can you tell me";
			mes "why you're crying?";
			next;
			mes "[Kid Karyn]";
			mes "I... ^333333*Sniff*^000000";
			mes "I-I went to... Th-...";
			mes "Volcan.... w-w-with";
			mes "my sist-- Waaaaaaah!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Poor kid... Come on,";
			mes "take a deep breath so";
			mes "you can tell me about what";
			mes "happened a little more slowly.";
			next;
			mes "[Kid Karyn]";
			mes "*^333333Sob*^000000 ...It's just...";
			mes "I went to Thor Volcano";
			mes "with my little sister to see";
			mes "which one of us was braver...";
			mes "But then, we met some...";
			mes "Scary people there... and...";
			next;
			mes "[Kid Karyn]";
			mes "I got scared, so... So...";
			mes "My sister... Wah~! *Sob*";
			next;
			mes "[Kid Karyn]";
			mes "*Sob*";
			next;
			mes "[Kid Karyn]";
			mes "I-I ran away from them...";
			mes "But I left my sister over";
			mes "there with those weird men...";
			next;
			mes "[Kid Karyn]";
			mes "Mom's sick, and dad's";
			mes "always at work... He's";
			mes "the captain of a ship, so...";
			mes "I don't think they can help.";
			next;
			mes "[Kid Karyn]";
			mes "Can you help me please,";
			mes "and bring my sister back?";
			mes "*Sniff* Please? I promise";
			mes "that I can pay you as soon";
			mes "as my dad comes back!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Wait... I have a question.";
			mes "You said that someone took";
			mes "away your sister at Thor";
			mes "Volcano? What did they look";
			mes "like? Are you sure that there";
			mes "were people there?";
			next;
			mes "[Kid Karyn]";
			mes "I... I don't know!";
			mes "I got so scared, I just";
			mes "ran away! I... I didn't";
			mes "mean to leave my sister!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Hmmm...";
			mes "Maybe your sister was";
			mes "kidnapped by bandits...";
			next;
			switch(select("Decline Request:Accept Request")) {
			case 1:
				mes "["+strcharinfo(0)+"]";
				mes "Sorry kid, but I've got";
				mes "things to do. I'm sure";
				mes "someone else will come";
				mes "along to save your sister.";
				next;
				mes "[Kid Karyn]";
				mes "Wah~";
				close;
			case 2:
				mes "["+strcharinfo(0)+"]";
				mes "Okay, I'll see what";
				mes "I can do. I'll try my best";
				mes "to find your sister.";
				next;
				mes "[Kid Karyn]";
				mes "Thank you so much!";
				mes "Please find my sister";
				mes "Curdie soon! Oh, I hope";
				mes "she's okay! If she's not...";
				mes "^333333*Sob*^000000 I don't know what";
				mes "I'll do! Waaaaaaaah~";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "Alright...";
				mes "Wish me luck.";
				mes "I'll go search Thor";
				mes "Volcano to find your";
				mes "little sister Curdie.";
				setquest 3060;
				set rachel_camel,1;
				close;
			}
		}
		else if (rachel_camel == 1) {
			mes "["+strcharinfo(0)+"]";
			mes "I'd better search";
			mes "Thor Volcano for Curdie,";
			mes "Karyn's little sister.";
			close;
		}
		else if (rachel_camel == 2) {
			mes "[Kid Karyn]";
			mes "W-were you able";
			mes "to find my sister?";
			mes "Is she alright?";
			mes "What happened?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "I found her,";
			mes "she's alright but...";
			next;
			mes "[Kid Karyn]";
			mes "What? Why isn't";
			mes "she with you?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Curdie is... Well, she's";
			mes "been shackled down. We";
			mes "need to find a way to free her.";
			mes "Do you know where there's";
			mes "a forge or a locksmith that";
			mes "might be able to help her?";
			next;
			mes "[Kid Karyn]";
			mes "Oh! Oh, there's a";
			mes "locksmith in the market";
			mes "street! You can ask him";
			mes "to help free Curdie!";
			changequest 3061,3062;
			set rachel_camel,3;
			close;
		}
		else if (rachel_camel == 3) {
			mes "[Kid Karyn]";
			mes "Let's see...";
			mes "I'd better find the";
			mes "locksmith in the market";
			mes "street, and ask him to help";
			mes "me unlock Curdie's shackles.";
			close;
		}
		else if (rachel_camel == 4) {
			mes "[Kid Karyn]";
			mes "Huh... I'd better talk";
			mes "to Mr. Lockenlock first, the";
			mes "locksmith in the market street.";
			close;
		}
		else if (rachel_camel == 5) {
			mes "["+strcharinfo(0)+"]";
			mes "Hmm... I'd better talk";
			mes "to Ms. Ivory, the organic";
			mes "soap maker if I want to help";
			mes "Karyn free his sister Curdie.";
			close;
		}
		else if (rachel_camel == 6) {
			mes "["+strcharinfo(0)+"]";
			mes "Wait... I should be";
			mes "bringing Ms. Ivory all";
			mes "of the soap ingredients.";
			mes "What were they again...?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "^4D4DFF10 Milk^000000,";
			mes "^4D4DFF100 Green Herbs^000000,";
			mes "^4D4DFF50 Jellopies^000000, and";
			mes "^4D4DFF5 Empty Bottles^000000.";
			mes "I better get those...";
			close;
		}
		else if (rachel_camel == 7) {
			mes "["+strcharinfo(0)+"]";
			mes "I need to talk to";
			mes "someone named Saraman";
			mes "to get the soap ingredients...";
			close;
		}
		else if (rachel_camel == 8) {
			mes "["+strcharinfo(0)+"]";
			mes "Let's see...";
			mes "I need to bring";
			mes "Mr. Saruman all the";
			mes "things he needs to";
			mes "stimulate a camel's ";
			mes "appetite. I need to get...";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "^4D4DFF1 Unripe Apple^000000,";
			mes "^4D4DFF5 Monster's Feed^000000,";
			mes "^4D4DFF1 Empty Bottle^000000, and";
			mes "^4D4DFF1 Yellow Potion^000000.";
			close;
		}
		else if (rachel_camel == 9) {
			mes "["+strcharinfo(0)+"]";
			mes "I have everything I need";
			mes "to stimulate a camel's";
			mes "appetite. Now I need to";
			mes "feed the camel so that I can";
			mes "get the soap ingredients and";
			mes "5 lumps of camel dung.";
			close;
		}
		else if (rachel_camel == 10) {
			mes "["+strcharinfo(0)+"]";
			mes "Right now, my time";
			mes "would be better spent";
			mes "looking for the Silk Sand";
			mes "Camel for the ingredients.";
			close;
		}
		else if (rachel_camel == 11) {
			mes "["+strcharinfo(0)+"]";
			mes "I'd better find Mr. Saraman's";
			mes "lost camel, feed it camel";
			mes "appetite stimulants, and";
			mes "then get the soap ingredient";
			mes "and 5 lumps of camel dung";
			mes "if I want to free Curdie.";
			close;
		}
		else if (rachel_camel > 11 && rachel_camel < 17) {
			mes "["+strcharinfo(0)+"]";
			mes "Well... I found the";
			mes "camel. Now I need to get";
			mes "all the soap ingredients.";
			mes "The sooner I do that, the";
			mes "sooner I can help Curdie.";
			close;
		}
		else if (rachel_camel == 17) {
			mes "["+strcharinfo(0)+"]";
			mes "I managed to get the soap";
			mes "ingredient and 5 of those";
			mes "camel dung lumps. I should";
			mes "head back to Mr. Saraman to";
			mes "tell him where his camel is,";
			mes "and then go to Ms. Ivory.";
			close;
		}
		else if (rachel_camel == 18) {
			mes "["+strcharinfo(0)+"]";
			mes "Let's see...";
			mes "Shouldn't I be going";
			mes "to see Ms. Ivory now?";
			close;
		}
		else if (rachel_camel == 19) {
			mes "["+strcharinfo(0)+"]";
			mes "I have the Silk Sand Camel";
			mes "Soap now, so I should go";
			mes "bring it to Mr. Lockenlock.";
			close;
		}
		else if (rachel_camel == 20) {
			mes "["+strcharinfo(0)+"]";
			mes "I'd better use the soap to";
			mes "make a key mold that I can";
			mes "bring over to Mr. Lockenlock.";
			close;
		}
		else if (rachel_camel == 21) {
			mes "["+strcharinfo(0)+"]";
			mes "Making the key is more";
			mes "important that telling Karyn";
			mes "about what's happened.";
			close;
		}
		else if (rachel_camel == 22) {
			mes "["+strcharinfo(0)+"]";
			mes "I need to bring";
			mes "1 Steel to Mr. Lockenlock";
			mes "so that he can make a key";
			mes "that will finally free Curdie.";
			close;
		}
		else if (rachel_camel == 23) {
			mes "["+strcharinfo(0)+"]";
			mes "I finally got the";
			mes "key that I can use";
			mes "to free Curdie. I'm";
			mes "gonna go save her now.";
			next;
			mes "[Kid Karyn]";
			mes "Thank you so much!";
			mes "Please bring back Curdie";
			mes "as soon as you can! ^333333*Sob*^000000";
			close;
		}
		else if (rachel_camel == 24) {
			mes "["+strcharinfo(0)+"]";
			mes "Hey, Karyn! I sent";
			mes "your sister back to town";
			mes "with a Butterfly Wing.";
			mes "Did she come back safe?";
			next;
			mes "[Kid Karyn]";
			mes "Yes, Curdie's back";
			mes "and she's resting in";
			mes "the hospital right now.";
			mes "Thank you so much for";
			mes "all of your help!";
			next;
			mes "[Kid Karyn]";
			mes "I'm not sure what's wrong";
			mes "with Curdie, though. Ever";
			mes "since she got back, she gets";
			mes "frightened whenever she";
			mes "sees the soldiers in town.";
			next;
			mes "[Kid Karyn]";
			mes "I promise to tell my dad";
			mes "about what you did after he";
			mes "comes back from overseas.";
			mes "Thank you for everything";
			mes "that you did for us!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Umm... I see...";
			mes "I'll come by later";
			mes "when Curdie's released";
			mes "from the hospital.";
			next;
			mes "[Kid Karyn]";
			mes "Yes, please do.";
			mes "I promise to help you";
			mes "whenever you need me!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Hahahaha!";
			mes "Well... I guess that's";
			mes "pretty reassuring. Until then,";
			mes "take good care of your mother";
			mes "and sister. You got that?";
			next;
			mes "[Kid Karyn]";
			mes "Got it!";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Good, good...";
			mes "It's a promise, then.";
			mes "I'll see you later~";
			completequest 3083;
			set rachel_camel,25;
			specialeffect2 EF_ABSORBSPIRITS;
			if (checkre(3))
				getexp 100000,50000;
			else
				getexp 1000000,700000;
			close;
		}
		else {
// Start Nameless Island Access Quest Addition
			if (aru_monas < 15) {
				mes "[Kid Karyn]";
				mes "Oh, hello! Thank you";
				mes "so much for helping me";
				mes "last time! When I get";
				mes "older, I'm gonna do my";
				mes "best to help you the same";
				mes "way that you helped me!";
				close;
			}
			else if (aru_monas == 15) {
				mes "[Kid Karyn]";
				mes "Hi! It's good to see";
				mes "you again! Kurdi just came";
				mes "back home from the hospital,";
				mes "and is getting better everyday!";
				mes "Ah, and I've been taking care";
				mes "of her, just like I promised~";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "Really? That's good";
				mes "You should be proud~";
				next;
				mes "[Kid Karyn]";
				mes "^666666*Blush*^000000 Heh heh!";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "Anyway, I was wondering";
				mes "if you could help me.";
				mes "Your dad's a fisherman,";
				mes "right? Would you mind";
				mes "asking him if I could";
				mes "borrow his boat?";
				next;
				mes "[Kid Karyn]";
				mes "Well... Actually...";
				mes "The pope said that my";
				mes "dad isn't allowed to use";
				mes "his boat for a while...";
				mes "I'm not sure why...";
				next;
				mes "[Kid Karyn]";
				mes "So yeah. Dad's not allowed";
				mes "to go out to sea right now.";
				mes "But it should be okay if it's";
				mes "you, right? Hey, you helped";
				mes "me, so I hafta help you, right?";
				next;
				mes "[Kid Karyn]";
				mes "My dad is really mad that";
				mes "he can't use his boat so";
				mes "maybe we better not tell";
				mes "him you want to use it. Let's";
				mes "keep it our secret, okay?";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "S-sure thing!";
				next;
				mes "[Kid Karyn]";
				mes "Anyway, his boat is the";
				mes "only one on the south beach";
				mes "since all the other fishermen";
				mes "dock theirs boats in other";
				mes "places. Also, my dad's boat";
				mes "will rust if no one uses it.";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "Great! Thanks so much";
				mes "for your help, Karyn~";
				mes "I'll be sure to take";
				mes "good care of your dad's";
				mes "boat. I only need it for";
				mes "a little while, anyway.";
				next;
				mes "[Kid Karyn]";
				mes "Heh heh! Thanks!";
				mes "I'm happy that";
				mes "I can help you too!";
				set aru_monas,16;
				changequest 17011,17012;
				close;
			}
			else if (aru_monas < 26) {
				mes "[Kid Karyn]";
				mes "Hi! How do you like";
				mes "fishing on my dad's boat?";
				mes "Oh, and Kurdi says hi!";
				close;
			}
			else {
				mes "[Kid Karyn]";
				mes "Dad says that he'll";
				mes "be able to go fishing";
				mes "again soon! I hope that";
				mes "he'll catch a lot of fish!";
				close;
			}
// End Nameless Island Access Quest Addition.
		}
	}
	else {
		mes "[Kid Karyn]";
		mes "^333333*Sob*^000000...";
		mes "^333333*Sob*^000000...";
		close;
	}
}

que_thor,36,66,5	script	Little Curdie	941,{
	if (rachel_camel == 1) {
		mes "^3355FFYou come across";
		mes "a little girl lying on the";
		mes "ground unconscious.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Hey, kid! Wake up!";
		mes "Can you hear me?";
		next;
		mes "^3355FFShe has a pulse, but";
		mes "despite your verbal";
		mes "entreaties, she won't";
		mes "open her eyes. You";
		mes "lightly slap her cheek";
		mes "to wake her up.^000000";
		next;
		mes "[Little Curdie]";
		mes "Huh?!";
		mes "...Ah, owwww~";
		mes "W-waaaaaaaah!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Sorry! I didn't mean";
		mes "to make you cry! Are...";
		mes "Are you alright?";
		next;
		mes "[Little Curdie]";
		mes "Huh? Wh-who are you?";
		mes "Oh no, you have to get";
		mes "out of here! You'll be in";
		mes "trouble if they catch you!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Are you Curdie?";
		mes "Your brother Karyn";
		mes "asked me to rescue you.";
		mes "Come on, we've got to";
		mes "get you out of here.";
		next;
		mes "[Little Curdie]";
		mes "Karyn...?";
		mes "Oh, oh no! I... They";
		mes "locked me in these";
		mes "shackles and I can't move!";
		mes "You have to leave before";
		mes "those scary men come back!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What...?!";
		mes "Those bastards!";
		mes "Tying up a little";
		mes "girl like this...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Argh! And I can't just";
		mes "use brute force to shatter";
		mes "these shackles! I might";
		mes "end up hurting you...!";
		next;
		mes "[Little Curdie]";
		mes "Don't worry about me...";
		mes "Just hurry and leave!";
		mes "I... I'll be alright! Now";
		mes "hurry! Someone's coming!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Okay, I'll go...";
		mes "But sit tight, and";
		mes "wait for me to come";
		mes "back. I'll figure out";
		mes "some way to free you.";
		next;
		mes "[Little Curdie]";
		mes "^333333*Sob*^000000 R-really...?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I promise.";
		mes "I'm sure that someone";
		mes "in town will know of a way";
		mes "to unlock your shackles.";
		mes "I'll be back as soon as I can!";
		changequest 3060,3061;
		set rachel_camel,2;
		close;
	}
	else if (rachel_camel == 2) {
		mes "^3355FFSomeone in town";
		mes "must have the";
		mes "expertise to unlock";
		mes "these shackles. It's your";
		mes "only hope to free Curdie";
		mes "from these chains.^000000";
		close;
	}
	else if (rachel_camel == 3 || rachel_camel == 6 || rachel_camel == 8 || rachel_camel == 22) {
		mes "^3355FFCurdie is lying";
		mes "feebly on the ground.^000000";
		close;
	}
	else if (rachel_camel == 4) {
		mes "[Little Curdie]";
		mes "I hate the metal";
		mes "clanging sounds...";
		mes "Th-the sparks,";
		mes "they're... They're...";
		next;
		mes "^3355FFCurdie is curled up on";
		mes "the ground, eyes tightly";
		mes "shut, her entire body";
		mes "trembling with fear.^000000";
		close;
	}
	else if (rachel_camel == 5) {
		mes "^3355FFOn the ground, you see";
		mes "some equipment that looks";
		mes "similarly to that used by";
		mes "the Rachel soldiers.^000000";
		close;
	}
	else if (rachel_camel == 7) {
		mes "^3355FFIt seems that someone";
		mes "has come by to give";
		mes "Curdie food and water.^000000";
		close;
	}
	else if (rachel_camel == 9) {
		mes "^3355FFCurdie squints at you";
		mes "as you walk by. It seems";
		mes "that her vision gets worse";
		mes "the longer she's locked";
		mes "up in this cave.";
		close;
	}
	else if (rachel_camel == 10) {
		mes "^3355FFYou'd better find the";
		mes "Silk Sand Camel and get";
		mes "the soap ingredients if";
		mes "you really want to free";
		mes "Curdie from her shackles.^000000";
		close;
	}
	else if (rachel_camel == 11) {
		mes "["+strcharinfo(0)+"]";
		mes "I'd better find Mr. Saraman's";
		mes "lost camel, feed it camel";
		mes "appetite stimulants, and";
		mes "then get the soap ingredient";
		mes "and 5 lumps of camel dung";
		mes "if I want to free Curdie.";
		close;
	}
	else if (rachel_camel > 11 && rachel_camel < 17) {
		mes "^3355FFYou already found the";
		mes "camel, so you need to collect";
		mes "the soap ingredients if you";
		mes "want to free Curdie.^000000";
		close;
	}
	else if (rachel_camel == 17) {
		mes "["+strcharinfo(0)+"]";
		mes "I managed to get the soap";
		mes "ingredients: 5 of those";
		mes "camel dung lumps. I should";
		mes "head back to Mr. Saraman to";
		mes "tell him where his camel is,";
		mes "and then go to Ms. Ivory.";
		close;
	}
	else if (rachel_camel == 18) {
		mes "^3355FFYou should be leaving";
		mes "to see Ms. Ivory now if";
		mes "you really want to free";
		mes "Curdie from her shackles.^000000";
		close;
	}
	else if (rachel_camel == 19) {
		mes "^3355FFNow that you have the";
		mes "Silk Sand Camel Soap,";
		mes "you should bring it";
		mes "over to Mr. Lockenlock.^000000";
		close;
	}
	else if (rachel_camel == 20) {
		mes "^3355FFCurdie is exactly";
		mes "where you left her.";
		mes "There's a bowl of cold";
		mes "soup next to her, so it's";
		mes "clear that someone has";
		mes "been feeding her.^000000";
		next;
		mes "^3355FFYou pour the soap into";
		mes "the shackle's lock to create";
		mes "a mold that Mr. Lockenlock";
		mes "can use to make a key.^000000";
		next;
		mes "[Little Curdie]";
		mes "Will...";
		mes "Will I always";
		mes "be stuck here?";
		mes "I... I want my mommy...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Oh... You're awake?";
		mes "Don't worry, Curdie,";
		mes "I'm sure that I'll be";
		mes "able to get you free soon.";
		mes "Try to hold on a bit longer.";
		next;
		mes "[Little Curdie]";
		mes "When the door is open,";
		mes "I see blazing flames...";
		mes "And I hear... the sound";
		mes "of machines? These men";
		mes "wearing the same clothes";
		mes "keep marching past me...";
		next;
		mes "[Little Curdie]";
		mes "I... They scare me so much!";
		mes "Th-the man that brings me";
		mes "food says that they won't";
		mes "let me go because of what";
		mes "I saw inside there. They...";
		mes "They won't let be go home...";
		next;
		mes "^3355FFCurdie's eyes are";
		mes "disfocused and are";
		mes "pointed above your head.";
		mes "She might not survive if";
		mes "she's forced to remain";
		mes "here for much longer.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Don't worry.";
		mes "I'll come rescue";
		mes "you as soon as I make";
		mes "the key to unlock these";
		mes "awful shackles. Don't worry...";
		next;
		mes "[Little Curdie]";
		mes "If I'm not here the";
		mes "next time you come,";
		mes "then just run away.";
		mes "Don't even tell my brother.";
		mes "Get far away before they";
		mes "can catch you. I-I'm serious...";
		next;
		mes "[Little Curdie]";
		mes "Even if I don't see you";
		mes "again... I just... I just";
		mes "want to thank you for doing";
		mes "your best to help me.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Everything will be";
		mes "alright. I just have";
		mes "to hurry a little bit.";
		mes "Alright, it's time to go.";
		next;
		mes "^3355FFYou extract the soap";
		mes "from the lock, and";
		mes "carefully wrap it.";
		mes "Now you need to take";
		mes "the mold back to town";
		mes "to Mr. Lockenlock.^000000";
		changequest 3079,3080;
		set rachel_camel,21;
		close;
	}
	else if (rachel_camel == 21) {
		mes "^3355FFYou have to hurry back";
		mes "to town and bring the";
		mes "key mold to Mr. Lockenlock";
		mes "so that he can make a key";
		mes "to unlock Curdie's shackles.^000000";
		close;
	}
	else if (rachel_camel == 23) {
		mes "[Little Curdie]";
		mes "Y-you...";
		mes "Is it really you?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Hang on, Curdie!";
		mes "I hope this key works...";
		next;
		mes "^3355FFYou unlock the";
		mes "shackles with";
		mes "Mr. Lockenlock's key.^000000";
		next;
		mes "^333333*Crack*^000000";
		next;
		mes "[Little Curdie]";
		mes "Aaaah!";
		mes "M-my... My...!";
		next;
		mes "^3355FFCurdie's legs are";
		mes "swollen from the";
		mes "weight and pressure";
		mes "of wearing the shackles";
		mes "for such a long time.^000000";
		next;
		mes "[Little Curdie]";
		mes "I can't move my legs!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Well, there's no other";
		mes "choice. Curdie, I'm";
		mes "going to send you back to";
		mes "town with a Butterfly Wing.";
		mes "Try not to move, alright?";
		next;
		mes "[Little Curdie]";
		mes "Oh! Thank you...";
		mes "I... I can go home...";
		mes "Thank you s-so much...";
		next;
		mes "^3355FFYou use the power";
		mes "of a Butterfly Wing to";
		mes "send Curdie back to";
		mes "town. Hopefully, she'll";
		mes "arrive safely and see";
		mes "her brother Karyn again.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What did she see behind";
		mes "the steel door in this old";
		mes "volcano? It must have been";
		mes "dangerous... Something";
		mes "related to the Rachel Army...";
		changequest 3082,3083;
		set rachel_camel,24;
		close;
	}
	else {
		mes "[Little Curdie]";
		mes " ...Wah....";
		close;
	}
}

veins,181,166,3	script	Lockenlock	900,{
	if (rachel_camel && rachel_camel < 4) {
		mes "^3355FFIt's a drunkard...";
		mes "The scent of pure";
		mes "alcohol wafts around him.";
		mes "There's a certain beauty";
		mes "to his disheveled misery.^000000";
		close;
	}
	else if (rachel_camel == 4) {
		if (countitem(503) > 0) {
			mes "["+strcharinfo(0)+"]";
			mes "Excuse me...?";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Huh? Arrrgh...";
			mes "My head... What";
			mes "do you want?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Oh, I'd like";
			mes "to make a key.";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Keys? Yeah, yeah...";
			mes "That's what I do.";
			mes "If you've got the lock,";
			mes "it'll be a piece of cake.";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Ugh, but I'm so thirsty";
			mes "and this headache is";
			mes "killing me. You mind";
			mes "bringing me a Yellow";
			mes "Potion first?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Sure, I guess.";
			mes "I can part with just";
			mes "1 Yellow Potion.";
			mes "Here you go.";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Ah, that hit the spot!";
			mes "Wait, wait... Now I feel";
			mes "dizzy... What's going...";
			mes "What's going on...?";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Okay, okay...";
			mes "I'm alright now.";
			mes "So what'd you say you";
			mes "needed? A key? Did you";
			mes "bring the lock with you?";
			next;
			mes "[Locksmith Lockenlock]";
			mes "I'm an expert in crafting";
			mes "keys and locks. Hell, my locks";
			mes "are strong enough to hold down";
			mes "a dragon, you know that? I'll";
			mes "have you know that the Rachel";
			mes "Army's a regular customer~";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "(^333333This guy made locks for";
			mes "the Rachel army?! It might";
			mes "not be a good idea to let him";
			mes "know that I'm trying to free";
			mes "one of their prisoners. Who";
			mes "knows if he's loyal to them?^000000)";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "So what happened was...";
			mes "I lost my key, but I can't";
			mes "bring the lock here with me.";
			mes "I think I'd end up breaking";
			mes "it if I brought it with me.";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Oh, yeah? No problem.";
			mes "Just take me to the lock.";
			mes "I'll charge you extra, though,";
			mes "especially since my knees";
			mes "are going bad. So where";
			mes "are we going exactly?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Wait!";
			mes "We can't do that!";
			next;
			mes "[Locksmith Lockenlock]";
			mes "What do you mean?";
			mes "You're not trying to";
			mes "open up a bank safe";
			mes "or something, are you?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "No, it's nothing like";
			mes "that! It's just that the lock";
			mes "is in a dangerous place.";
			mes "This is really important...";
			mes "Please, you have to help me!";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Huh. Well, bottom line,";
			mes "I can't make a key without";
			mes "looking at the lock. Let me";
			mes "think of a way I can help you.";
			mes "Give me a second, will you?";
			next;
			mes "[Locksmith Lockenlock]";
			mes "...............................";
			mes "Well, I guess you can try";
			mes "to make a mold of the lock.";
			mes "It'll have to be perfect, so";
			mes "this'll get pretty expensive.";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Go to the market and";
			mes "find a lady selling organic";
			mes "soap. You need to get a bottle";
			mes "of Chamelepu Soap. You will";
			mes "need that exact type of soap:";
			mes "nothing else will do.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Chamelpu Soap?";
			mes "What is th--";
			next;
			mes "[Locksmith Lockenlock]";
			mes "No time to explain.";
			mes "You'd better hurry and";
			mes "find her before she closes";
			mes "shop for the day. The shop";
			mes "owner's a beauty, so it'll";
			mes "be tough for you to miss her.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "...........";
			delitem 503,1; //Yellow_Potion
			changequest 3063,3064;
			set rachel_camel,5;
			close;
		}
		else {
			mes "^3355FFIt's a drunkard...";
			mes "This man must be the";
			mes "Mr. Lockenlock that you seek.";
			mes "You'd better follow Toby's";
			mes "advice and bring this man";
			mes "a Yellow Potion first.^000000";
			close;
		}
	}
	else if (rachel_camel == 5) {
		mes "[Locksmith Lockenlock]";
		mes "Go to the market and";
		mes "find a lady selling organic";
		mes "soap, and get a bottle of";
		mes "Chamelepu Soap. You will";
		mes "need that exact type of soap:";
		mes "nothing else will do.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Chamelpu Soap?";
		mes "What is th--";
		next;
		mes "[Locksmith Lockenlock]";
		mes "No time to explain.";
		mes "You'd better hurry and";
		mes "find her before she closes";
		mes "shop for the day. The shop";
		mes "owner's a beauty, so it'll";
		mes "be tough for you to miss her.";
		close;
	}
	else if (rachel_camel == 6) {
		mes "["+strcharinfo(0)+"]";
		mes "Wait... I should be";
		mes "bringing Ms. Ivory all";
		mes "of the soap ingredients.";
		mes "What were they again...?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "^4D4DFF10 Milk^000000,";
		mes "^4D4DFF100 Green Herbs^000000,";
		mes "^4D4DFF50 Jellopies^000000, and";
		mes "^4D4DFF5 Empty Bottles^000000.";
		mes "I better get those...";
		close;
	}
	else if (rachel_camel == 7) {
		mes "["+strcharinfo(0)+"]";
		mes "I need to talk to";
		mes "someone named Saraman";
		mes "to get the soap ingredients...";
		close;
	}
	else if (rachel_camel == 8) {
		mes "["+strcharinfo(0)+"]";
		mes "Let's see...";
		mes "I need to bring";
		mes "Mr. Saruman all the";
		mes "things he needs to";
		mes "stimulate a camel's ";
		mes "appetite. I need to get...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "^4D4DFF1 Unripe Apple^000000,";
		mes "^4D4DFF5 Monster's Feed^000000,";
		mes "^4D4DFF1 Empty Bottle^000000, and";
		mes "^4D4DFF1 Yellow Potion^000000.";
		close;
	}
	else if (rachel_camel == 9) {
		mes "["+strcharinfo(0)+"]";
		mes "I have everything I need";
		mes "to stimulate a camel's";
		mes "appetite. Now I need to";
		mes "feed the camel so that I can";
		mes "get the soap ingredients and";
		mes "5 lumps of camel dung.";
		close;
	}
	else if (rachel_camel == 10) {
		mes "["+strcharinfo(0)+"]";
		mes "Right now, my time";
		mes "would be better spent";
		mes "looking for the Silk Sand";
		mes "Camel for the ingredients.";
		close;
	}
	else if (rachel_camel == 11) {
		mes "["+strcharinfo(0)+"]";
		mes "I'd better find Mr. Saraman's";
		mes "lost camel, feed it camel";
		mes "appetite stimulants, and";
		mes "then get the soap ingredient";
		mes "and 5 lumps of camel dung";
		mes "if I want to free Curdie.";
		close;
	}
	else if (rachel_camel == 12) {
		mes "["+strcharinfo(0)+"]";
		mes "Well... I found the";
		mes "camel. Now I need to get";
		mes "all the soap ingredients.";
		mes "The sooner I do that, the";
		mes "sooner I can help Curdie.";
		close;
	}
	else if (rachel_camel > 12 && rachel_camel < 17) {
		mes "^3355FFYou already found the";
		mes "camel, so you need to collect";
		mes "the soap ingredients if you";
		mes "want to free Curdie.^000000";
		close;
	}
	else if (rachel_camel == 17) {
		mes "["+strcharinfo(0)+"]";
		mes "I managed to get the soap";
		mes "ingredients: 5 of those";
		mes "camel dung lumps. I should";
		mes "head back to Mr. Saraman to";
		mes "tell him where his camel is,";
		mes "and then go to Ms. Ivory.";
		close;
	}
	else if (rachel_camel == 18) {
		mes "["+strcharinfo(0)+"]";
		mes "Let's see...";
		mes "Shouldn't I be going";
		mes "to see Ms. Ivory now?";
		close;
	}
	else if (rachel_camel == 19) {
		mes "[Locksmith Lockenlock]";
		mes "Oh, so you're finally";
		mes "back with the Chamelpu";
		mes "Soap. What took so long?";
		mes "All you had to do was go";
		mes "to the market and buy it.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "...............................";
		mes "...............................";
		mes "...............................";
		mes "...............................";
		mes "...............................";
		mes "...............................";
		next;
		mes "[Locksmith Lockenlock]";
		mes "Uh, anyway, did Ms. Ivory";
		mes "tell you how to use the soap?";
		mes "You just pour it into the";
		mes "keyhole, and then pour the";
		mes "soap back into the bottle.";
		mes "Do it carefully and quickly.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "Make sure you close the";
		mes "bottle tightly when you're";
		mes "done so no air gets into it.";
		mes "If you take more than thirty";
		mes "seconds, the soap won't retain";
		mes "the lock's shape very well.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "Pour the liquid soap to the key hole in the lock,";
		mes "pour the soap back to the bottle.";
		mes "and close the lid so tightly that the air wouldn't go inside the bottle.";
		mes "Remember, you can't take longer than 30 seconds to finish the procedures.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "Finally, bring the bottle";
		mes "back here for me so that";
		mes "I can make the key. But when";
		mes "you come back, I need to make";
		mes "sure that the key you're making";
		mes "isn't for anything illegal...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Alright.";
		changequest 3078,3079;
		set rachel_camel,20;
		close;
	}
	else if (rachel_camel == 20) {
		mes "["+strcharinfo(0)+"]";
		mes "I'd better use the soap to";
		mes "make a key mold that I can";
		mes "bring over to Mr. Lockenlock.";
		close;
	}
	else if (rachel_camel == 21) {
		mes "[Locksmith Lockenlock]";
		mes "Oh, you're back...";
		mes "So did you manage";
		mes "to make the key mold?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Yes, I did. Would you";
		mes "please hurry? This is an";
		mes "emergency, and it could";
		mes "get really bad if I don't";
		mes "get this key made soon...";
		next;
		mes "[Locksmith Lockenlock]";
		mes "Let me see... Well,";
		mes "it's not really perfect, but";
		mes "I should be able to fashion";
		mes "a key for this lock. Ooh...";
		mes "But you know what? I don't";
		mes "have any materials on me.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "I've already made all";
		mes "the keys and locks for this";
		mes "town, so no one's really had";
		mes "to send in any orders lately.";
		mes "That's why I didn't have any";
		mes "materials onhand. Sorry.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "All I need is ^4D4DFF1 Steel^000000.";
		mes "It won't take me more";
		mes "than five minutes to make";
		mes "the key, so I can get it done";
		mes "as soon as you can bring";
		mes "me the Steel. I'll be waiting.";
		changequest 3080,3081;
		set rachel_camel,22;
		close;
	}
	else if (rachel_camel == 22) {
		if (countitem(999) > 0) {
			mes "["+strcharinfo(0)+"]";
			mes "Here's the Steel that";
			mes "you need. Would you";
			mes "please make the key now?";
			next;
			mes "[Locksmith Lockenlock]";
			mes "...............................";
			mes "I've been studying";
			mes "this key mold, and";
			mes "I just realized something...";
			mes "Tell me right now: what";
			mes "are you using this key for?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Huh...?";
			mes "What are you...?";
			next;
			mes "[Locksmith Lockenlock]";
			mes "I asked you first.";
			mes "Tell me what you intend";
			mes "to do with this key! If you";
			mes "don't, I can't help you.";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Don't lie to me.";
			mes "This mold... This is";
			mes "the lock for the shackles";
			mes "that I've made under the";
			mes "orders of the Rachel Army.";
			mes "I have the master key for that.";
			next;
			mes "[Locksmith Lockenlock]";
			mes "These shackles are only";
			mes "supposed to be used for";
			mes "prisoners! If I release one";
			mes "of them, they will hunt you";
			mes "down and hold me accountable.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "The truth is... I really";
			mes "am trying to free somebody";
			mes "the Rachel Army imprisoned...";
			mes "She's Curdie, a young girl";
			mes "that they locked up in";
			mes "Thor Volcano...";
			next;
			mes "[Locksmith Lockenlock]";
			mes "What...?!";
			mes "Are you serious?";
			mes "Y-you're... No way.";
			mes "You're not lying. This...";
			mes "I'm sorry. You shouldn't";
			mes "have gotten involved, but...";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Oh God!";
			mes "They... They";
			mes "really imprisoned";
			mes "an innocent child?!";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Here. Take it.";
			mes "Take the master key.";
			mes "Bring it to Thor Volcano";
			mes "and rescue that poor kid.";
			mes "We could get in a lot of";
			mes "trouble for doing this, but...";
			next;
			mes "[Locksmith Lockenlock]";
			mes "My conscience won't allow";
			mes "them to do something like";
			mes "this. Rescue that kid, and";
			mes "then throw the key away";
			mes "somewhere when you're done.";
			next;
			mes "[Locksmith Lockenlock]";
			mes "That way, if the army";
			mes "comes to interrogate me,";
			mes "I'll just say that it was";
			mes "stolen from my shop by";
			mes "some thief. I should get";
			mes "rid of all my keys too...";
			next;
			mes "[Locksmith Lockenlock]";
			mes "Hurry up and go!";
			mes "Make sure that you";
			mes "bring that child back";
			mes "safe to her family!";
			changequest 3081,3082;
			set rachel_camel,23;
			close;
		}
		else {
			mes "[Locksmith Lockenlock]";
			mes "All I need is ^4D4DFF1 Steel^000000.";
			mes "It won't take me more";
			mes "than five minutes to make";
			mes "the key, so I can get it done";
			mes "as soon as you can bring";
			mes "me the Steel. I'll be waiting.";
			close;
		}
	}
	else if (rachel_camel == 23) {
		mes "[Locksmith Lockenlock]";
		mes "Here. Take it.";
		mes "Take the master key.";
		mes "Bring it to Thor Volcano";
		mes "and rescue that poor kid.";
		mes "We could get in a lot of";
		mes "trouble for doing this, but...";
		next;
		mes "[Locksmith Lockenlock]";
		mes "Hurry up and go!";
		mes "Make sure that you";
		mes "bring that child back";
		mes "safe to her family!";
		close;
	}
	else if (rachel_camel == 24) {
		mes "[Locksmith Lockenlock]";
		mes "Hey, that kid you saved...";
		mes "Curdie. She's safely back";
		mes "in town. I feel so responsible";
		mes "about what happened. I mean,";
		mes "she was locked up in shackles";
		mes "that I designed for the army.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "Anyway, I'm packing my";
		mes "things. I'm thinking of";
		mes "leaving this town for good.";
		mes "The army's rotten to the core";
		mes "for doing something like this.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "You're a real good person,";
		mes "and I'm glad I got to know";
		mes "you. I don't know if we'll";
		mes "ever meet again, but it's";
		mes "good that there are people";
		mes "like you in this world.";
		close;
	}
	else if (rachel_camel == 25) {
		mes "[Locksmith Lockenlock]";
		mes "Hey, that kid you saved...";
		mes "Curdie. She's safely back";
		mes "in town. I feel so responsible";
		mes "about what happened. I mean,";
		mes "she was locked up in shackles";
		mes "that I designed for the army.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "Anyway, I'm packing my";
		mes "things. I'm thinking of";
		mes "leaving this town for good.";
		mes "The army's rotten to the core";
		mes "for doing something like this.";
		next;
		mes "[Locksmith Lockenlock]";
		mes "You're a real good person,";
		mes "and I'm glad I got to know";
		mes "you. I don't know if we'll";
		mes "ever meet again, but it's";
		mes "good that there are people";
		mes "like you in this world.";
		close;
	}
	else {
		mes "[Lockenlock]";
		mes "Zzzz...";
		mes "Zzzz... Argh!";
		mes "...Zzz...";
		next;
		mes "^3355FFHe's drunk and";
		mes "fast asleep.^000000";
		close;
	}
}

veins,227,127,5	script	Ivory	940,{
	if (rachel_camel && rachel_camel < 5) {
		mes "[Organic Soap Maker Ivory]";
		mes "I need to make more of";
		mes "my soap, but I've run out";
		mes "of ingredients. Well, there's";
		mes "not much I can do without them,";
		mes "so maybe it'd be better if";
		mes "I just close up shop today...";
		close;
	}
	else if (rachel_camel == 5) {
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me...?";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "Oh, I'm sorry, but I'm";
		mes "closing shop right now";
		mes "because I just ran out of";
		mes "soap ingredients. If you";
		mes "ordered something, then you";
		mes "could just come back tomorrow.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Um, this is an emergency!";
		mes "Mr. Lockenlock told me to";
		mes "come here to get some kind";
		mes "of special soap. I need it";
		mes "to make a mold for him";
		mes "to make a key for me...";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "Oh? You locked yourself";
		mes "out? Ah, Mr. Lockenlock";
		mes "must have been talking";
		mes "about my organic Chamelepu";
		mes "soap. It's an artistic soap";
		mes "that you can shape easily~";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Yes, that's right!";
		mes "Chamelepu Soap!";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "My Chamelepu Soap";
		mes "is pretty popular. It's";
		mes "a liquid soap that you can";
		mes "pour into anything, and it'll";
		mes "harden into any shape that";
		mes "you want. Neat, huh?";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "Well, as I told you earlier,";
		mes "I ran out of every soap ingredient,";
		mes "so I cannot make any more soap today.";
		mes "You should come back tomorrow evening";
		mes "if you want to buy the soap.";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "If you really need it";
		mes "right away, I can still";
		mes "make it for you if can";
		mes "bring all the ingredients.";
		mes "They might be a bit hard";
		mes "to obtain, though...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "That's fine. The";
		mes "important thing for me";
		mes "is to get this soap as";
		mes "soon as I possibly can!";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "Alright, first I want";
		mes "you to bring me the basic";
		mes "stuff. Bring these items";
		mes "in the exact amounts I ask";
		mes "for, alright? Ratios are pretty";
		mes "important in making soap.";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "^4D4DFF10 Milk^000000,";
		mes "^4D4DFF100 Green Herbs^000000,";
		mes "^4D4DFF50 Jellopies^000000, and";
		mes "^4D4DFF5 Empty Bottles^000000.";
		mes "Then we can move";
		mes "on to the hard part.";
		changequest 3064,3065;
		set rachel_camel,6;
		close;
	}
	else if (rachel_camel == 6) {
		if ((countitem(511) > 99) && (countitem(909) > 49) && (countitem(519) > 9) && (countitem(713) > 4)) {
			mes "[Organic Soap Maker Ivory]";
			mes "Oh, great! You brought";
			mes "everything! Now... It's";
			mes "time for you to do the,";
			mes "um, hard part.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "...............................";
			mes "...............................";
			mes "...............................";
			next;
			mes "[Organic Soap Maker Ivory]";
			mes "Please tell the";
			mes "Silk Sand Camel farm";
			mes "owner in town that I sent";
			mes "you, and show him the";
			mes "ingredients that you've";
			mes "gathered for me so far.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Wait...";
			mes "Why would I want";
			mes "to see the guy that";
			mes "takes care of Silk Sand";
			mes "Camels? What does he";
			mes "have to do with soap?";
			next;
			mes "[Organic Soap Maker Ivory]";
			mes "Don't sweat it for now...";
			mes "Just go visit Mr. Saraman,";
			mes "the Camel Farm owner.";
			mes "I can't wait for you that long,";
			mes "so please come back here";
			mes "as soon as possible.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Mr. Saraman...?";
			mes "Okay, so I need to visit";
			mes "him if I really need you";
			mes "to make the soap...";
			changequest 3065,3066;
			set rachel_camel,7;
			close;
		}
		else {
			mes "[Organic Soap Maker Ivory]";
			mes "Alright, first I want";
			mes "you to bring me the basic";
			mes "stuff. Bring these items";
			mes "in the exact amounts I ask";
			mes "for, alright? Ratios are pretty";
			mes "important in making soap.";
			next;
			mes "[Organic Soap Maker Ivory]";
			mes "^4D4DFF10 Milk^000000,";
			mes "^4D4DFF100 Green Herbs^000000,";
			mes "^4D4DFF50 Jellopies^000000, and";
			mes "^4D4DFF5 Empty Bottles^000000.";
			mes "Then we can move";
			mes "on to the hard part.";
			close;
		}
	}
	else if (rachel_camel == 7) {
		mes "["+strcharinfo(0)+"]";
		mes "I need to talk to";
		mes "someone named Saraman";
		mes "to get the soap ingredients...";
		close;
	}
	else if (rachel_camel == 8) {
		mes "["+strcharinfo(0)+"]";
		mes "Let's see...";
		mes "I need to bring";
		mes "Mr. Saruman all the";
		mes "things he needs to";
		mes "stimulate a camel's ";
		mes "appetite. I need to get...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "^4D4DFF1 Unripe Apple^000000,";
		mes "^4D4DFF5 Monster's Feed^000000,";
		mes "^4D4DFF1 Empty Bottle^000000, and";
		mes "^4D4DFF1 Yellow Potion^000000.";
		close;
	}
	else if (rachel_camel == 9) {
		mes "["+strcharinfo(0)+"]";
		mes "I have everything I need";
		mes "to stimulate a camel's";
		mes "appetite. Now I need to";
		mes "feed the camel so that I can";
		mes "get the soap ingredients and";
		mes "5 lumps of camel dung.";
		close;
	}
	else if (rachel_camel == 10) {
		mes "["+strcharinfo(0)+"]";
		mes "Right now, my time";
		mes "would be better spent";
		mes "looking for the Silk Sand";
		mes "Camel for the ingredients.";
		close;
	}
	else if (rachel_camel == 11) {
		mes "["+strcharinfo(0)+"]";
		mes "I'd better find Mr. Saraman's";
		mes "lost camel, feed it camel";
		mes "appetite stimulants, and";
		mes "then get the soap ingredient";
		mes "and 5 lumps of camel dung";
		mes "if I want to free Curdie.";
		close;
	}
	else if (rachel_camel == 12) {
		mes "["+strcharinfo(0)+"]";
		mes "Well... I found the";
		mes "camel. Now I need to get";
		mes "all the soap ingredients.";
		mes "The sooner I do that, the";
		mes "sooner I can help Curdie.";
		close;
	}
	else if (rachel_camel > 12 && rachel_camel < 17) {
		mes "^3355FFYou already found the";
		mes "camel, so you need to collect";
		mes "the soap ingredients if you";
		mes "want to free Curdie.^000000";
		close;
	}
	else if (rachel_camel == 17) {
		mes "["+strcharinfo(0)+"]";
		mes "I managed to get the soap";
		mes "ingredients: 5 of those";
		mes "camel dung lumps. I should";
		mes "head back to Mr. Saraman to";
		mes "tell him where his camel is,";
		mes "and then go to Ms. Ivory.";
		close;
	}
	else if (rachel_camel == 18) {
		mes "[Organic Soap Maker Ivory]";
		mes "Hm, did Soony give you";
		mes "any trouble? I'm guessing";
		mes "that's why it's been taking";
		mes "you so long to get all that";
		mes "camel dung over here.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "It was a pretty big";
		mes "hassle... But hopefully,";
		mes "this will all be worth it.";
		mes "Anyway, take this camel";
		mes "dung. I don't want to";
		mes "handle it for much longer.";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "Yes, I can understand that.";
		mes "Even though it's in bottles,";
		mes "it's pretty gross that these";
		mes "bottles are still warm...";
		mes "Anyway, we're good to go.";
		mes "Let me make you some soap~";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "You spent a lot of";
		mes "time and energy to get";
		mes "these, so I won't charge";
		mes "you for my service. Besides,";
		mes "you brought enough materials";
		mes "that I'll have some left over.";
		next;
		mes "^3355FFMs. Ivory put on a pair";
		mes "of long gloves, and mixed";
		mes "the ingredients. She then";
		mes "placed them in a clean bottle.^000000";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "Here's your soap! After";
		mes "you pour the soap into";
		mes "something, don't forget";
		mes "to put it into a larger bottle";
		mes "after about twenty seconds.";
		next;
		mes "[Organic Soap Maker Ivory]";
		mes "And um... Don't let";
		mes "anyone else know what";
		mes "I use to make this soap.";
		mes "People won't buy it if they";
		mes "knew they were washing their";
		mes "faces with... You know...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Don't worry, I won't";
		mes "tell anyone. Thanks";
		mes "for making the soap! ";
		next;
		mes "^3355FFNow that you have the";
		mes "Silk Sand Camel Soap.";
		mes "you should bring it";
		mes "to Mr. Lockenlock.^000000";
		changequest 3077,3078;
		set rachel_camel,19;
		close;
	}
	else if (rachel_camel == 19) {
		mes "^3355FFNow that you have the";
		mes "Silk Sand Camel Soap.";
		mes "you should bring it";
		mes "to Mr. Lockenlock.^000000";
		close;
	}
	else if (rachel_camel > 19 && rachel_camel < 26) {
		mes "[Organic Soap Maker Ivory]";
		mes "^333333*Phew!*^000000 It's been";
		mes "a long day. I think";
		mes "I'll close up shop now~";
		close;
	}
	else {
		mes "[Beautiful Lady]";
		mes "Hm? Did you need";
		mes "something? I'm still";
		mes "setting up shop now";
		mes "so I'm not really ready";
		mes "to sell anything yet.";
		close;
	}
}

veins,115,59,5	script	Saraman	847,{
	if (rachel_camel && rachel_camel < 7) {
		mes "[Saraman]";
		mes "Zzzzz...";
		mes "Zzz... Zzzzzz...";
		close;
	}
	else if (rachel_camel == 7) {
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me. Hello~";
		mes "Ms. Ivory sent me";
		mes "here with these soap";
		mes "ingredients? She said";
		mes "I had to come to you if";
		mes "I wanted her to make it.";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Soap, eh? Oh, I see.";
		mes "You must be here to get";
		mes "some fresh camel dung.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Wh-what?";
		mes "My God!";
		mes "A-are you sure?";
		mes "Tell me you're joking!";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Sure as sin, and";
		mes "honest to God.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "...............................";
		mes "...............................";
		mes "...............................";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Yeah, those ingredients";
		mes "you brought me? They're for";
		mes "making soap alright. ^FF0000That's";
		mes "what we feed the camels^000000 so";
		mes "that they make a whole lotta";
		mes "dung. Dung to make soap.";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Oh, don't worry. Camel";
		mes "dung is sterile, completely";
		mes "safe. In fact, it smells nice,";
		mes "has medicinal properties, and";
		mes "it's considered a delicacy";
		mes "in certain countries.";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Sadly, Silk Sand Camels";
		mes "are almost extinct, so I only";
		mes "have one on this farm. That's";
		mes "why we have a special contract with Ms. Ivory to make her soap.";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Say... I wasn't expecting";
		mes "her to send a deliveryman";
		mes "until tomorrow. Why are";
		mes "you here so early anyway?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Actually, this is kind";
		mes "of an emergency. You see,";
		mes "I need the soap to make a";
		mes "key mold because I lost--";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Never mind, never mind.";
		mes "I'm sorry I asked! So this";
		mes "is a personal favor for you,";
		mes "huh? Well, there's a bit of";
		mes "a problem that we need to";
		mes "solve first. Listen up...";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "We can only get camel";
		mes "dung after a camel eats,";
		mes "right? Well, my camel isn't";
		mes "used to eating so late in the";
		mes "day. Even if we put food in";
		mes "front of her, she won't eat it.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What? Isn't there";
		mes "something we can do?";
		mes "I mean, I'm talking about";
		mes "a life or death matter!";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "*Sigh* ...This isn't good... Okay then, let's do this.";
		mes "Sometimes I make an appetite stimulant for the camel";
		mes "when she's sick and wouldn't eat anything.";
		mes "We can try feeding her the stimulant, and make it poop.";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Well, we can't forcefeed";
		mes "her, but we can get her to";
		mes "munch a bit on some appetite";
		mes "stimulant. I usually use that";
		mes "if she's sick, but if you say";
		mes "that this is an emergency...";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Alright, I guess we";
		mes "can try it. But I want you";
		mes "to bring me the ingredients.";
		mes "Get me... Let's see now...";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "^4D4DFF1 Unripe Apple^000000,";
		mes "^4D4DFF5 Monster's Feed^000000,";
		mes "^4D4DFF1 Empty Bottle^000000, and";
		mes "^4D4DFF1 Yellow Potion^000000.";
		changequest 3066,3067;
		set rachel_camel,8;
		close;
	}
	else if (rachel_camel == 8) {
		if ((countitem(528) > 4) && (countitem(503) > 0) && (countitem(619) > 0) && (countitem(713) > 0)) {
			mes "[Camel Farm Owner Saraman]";
			mes "Oh good, you're back.";
			mes "Did you bring everything?";
			mes "Here, I need to mix it all";
			mes "together first before you";
			mes "can feed it to my camel.";
			mes "Just a minute now...";
			next;
			mes "^3355FFSaraman mixed all";
			mes "of the ingredients,";
			mes "and gingerly poured";
			mes "them into a bottle.^000000";
			next;
			mes "[Camel Farm Owner Saraman]";
			mes "Alright, now bring";
			mes "this to the camels over";
			mes "there. Only my Silk Sand";
			mes "Camel will know to eat it,";
			mes "so she'll come after you.";
			next;
			mes "[Camel Farm Owner Saraman]";
			mes "Once she nibbles this";
			mes "appetite stimulant, she'll";
			mes "eat her feed like crazy.";
			mes "Then the dung will flow";
			mes "like a faucet. Come on,";
			mes "why don't you give it a try?";
			next;
			mes "[Camel Farm Owner Saraman]";
			mes "Oh, right. You should";
			mes "be able to get 5 lumps";
			mes "of camel dung with those";
			mes "ingredients. That's a good";
			mes "amount to collect since that's";
			mes "what Ms. Ivory usually orders.";
			delitem 528,5; //Monster's_Feed
			delitem 503,1; //Yellow_Potion
			delitem 619,1; //Unripe_Apple
			delitem 713,1; //Empty_Bottle
			changequest 3067,3068;
			set rachel_camel,9;
			close;
		}
		else {
			mes "[Camel Farm Owner Saraman]";
			mes "Well, we can't forcefeed";
			mes "her, but we can get her to";
			mes "munch a bit on some appetite";
			mes "stimulant. I usually use that";
			mes "if she's sick, but if you say";
			mes "that this is an emergency...";
			next;
			mes "[Camel Farm Owner Saraman]";
			mes "Alright, I guess we";
			mes "can try it. But I want you";
			mes "to bring me the ingredients.";
			mes "Get me... Let's see now...";
			next;
			mes "[Camel Farm Owner Saraman]";
			mes "^4D4DFF1 Unripe Apple^000000,";
			mes "^4D4DFF5 Monster's Feed^000000,";
			mes "^4D4DFF1 Empty Bottle^000000, and";
			mes "^4D4DFF1 Yellow Potion^000000.";
			close;
		}
	}
	else if (rachel_camel == 9) {
		mes "[Camel Farm Owner Saraman]";
		mes "Once she nibbles this";
		mes "appetite stimulant, she'll";
		mes "eat her feed like crazy.";
		mes "Then the dung will flow";
		mes "like a faucet. Come on,";
		mes "why don't you give it a try?";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Oh, right. You should";
		mes "be able to get 5 lumps";
		mes "of camel dung with those";
		mes "ingredients. That's a good";
		mes "amount to collect since that's";
		mes "what Ms. Ivory usually orders.";
		close;
	}
	else if (rachel_camel == 10) {
		mes "["+strcharinfo(0)+"]";
		mes "Mr. Saraman, none";
		mes "of the camels will eat";
		mes "this appetite stimulant...";
		mes "Am I doing something wrong?";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Oh, yes, well...";
		mes "One of my workers";
		mes "just came by, and told me";
		mes "that my Silk Sand Camel";
		mes "disappeared somewhere...";
		mes "This is terrible news!";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "My precious Silk Sand";
		mes "Camel... It's my biggest";
		mes "business investment! I'm";
		mes "ruined without it! Please...";
		mes "I'll reward you if you can";
		mes "find my camel for me!";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Damn it! My stupid worker";
		mes "forgot to tie her up, so";
		mes "she ended up running away!";
		mes "Ugh! Please help me find her!";
		mes "Without her, you won't be able";
		mes "to get your special camel dung.";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Wait, don't panic...";
		mes "It'll all be alright.";
		mes "This camel moves very slowly";
		mes "so she shouldn't be far from";
		mes "here. Please find my camel";
		mes "Soony as soon as you can!";
		changequest 3069,3070;
		set rachel_camel,11;
		close;
	}
	else if (rachel_camel == 11) {
		mes "[Camel Farm Owner Saraman]";
		mes "Soony! Soony...!";
		mes "Wh-where are you?!";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Please, help me find";
		mes "my Soony, my Silk Sand";
		mes "Camel. You won't be able to";
		mes "make your soap without her!";
		mes "And my business is really";
		mes "dependent on my Soony!";
		close;
	}
	else if (rachel_camel == 12) {
		mes "["+strcharinfo(0)+"]";
		mes "Well... I found the";
		mes "camel. Now I need to get";
		mes "all the soap ingredients.";
		mes "The sooner I do that, the";
		mes "sooner I can help Curdie.";
		close;
	}
	else if (rachel_camel > 12 && rachel_camel < 17) {
		mes "^3355FFYou already found the";
		mes "camel, so you need to collect";
		mes "the soap ingredients if you";
		mes "want to free Curdie.^000000";
		close;
	}
	else if (rachel_camel == 17) {
		mes "[Camel Farm Owner Saraman]";
		mes "Oh, it's you!";
		mes "Did you find my";
		mes "Soony? Where is she?";
		mes "What happened to her?";
		mes "Oh God, I don't know what";
		mes "I'll do without that camel!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Don't worry, Mr. Saraman,";
		mes "I found Soony at the outskirts";
		mes "of town. She hurt her leg so";
		mes "I think it'd be a good idea if";
		mes "you sent some people to";
		mes "help bring her back.";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Thank god! Thank you, thank you so much!";
		mes "I'll send my workers over there immediately.";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Thank goodness, you have";
		mes "no idea how valuable that";
		mes "camel is! I'll send some of";
		mes "my men to bring her home";
		mes "immediately! Thank you,";
		mes "you just saved my business!";
		next;
		mes "[Camel Farm Owner Saraman]";
		mes "Here, I want you to";
		mes "have this. Consider it";
		mes "a little thank you gift for";
		mes "what you've done for me.";
		mes "Good luck with getting";
		mes "that soap you want made.";
		changequest 3076,3077;
		getitem 617,1; //Old_Violet_Box
		set rachel_camel,18;
		close;
	}
	else if (rachel_camel == 18) {
		mes "["+strcharinfo(0)+"]";
		mes "Let's see...";
		mes "Shouldn't I be going";
		mes "to see Ms. Ivory now?";
		close;
	}
	else if (rachel_camel > 18 && rachel_camel < 24) {
		mes "[Camel Farm Owner Saraman]";
		mes "Thank you for finding my";
		mes "precious Silk Sand Camel";
		mes "Soony. Come again sometime,";
		mes "and maybe we can special my";
		mes "special camel yogurt together.";
		close;
	}
	else {
		mes "[Saraman]";
		mes "Zzz... Zzz~";
		mes "Zzz...";
		next;
		mes "^3355FFWatching this man";
		mes "snore also makes you";
		mes "want to take a snooze.^000000";
		close;
	}
}

veins,78,226,5	script	Camel#camelcc1::VeinsCamel	938,{
	if (rachel_camel == 9) {
		mes "^3355FFThe camel sniffed the";
		mes "appetite stimulant, but";
		mes "brusquely turned its";
		mes "nose away from it.^000000";
		changequest 3068,3069;
		set rachel_camel,10;
		close;
	}
	else if (rachel_camel == 10) {
		mes "^3355FFThe camel sniffed the";
		mes "appetite stimulant, but";
		mes "brusquely turned its";
		mes "nose away from it.";
		mes "This probably isn't the";
		mes "camel you're looking for.^000000";
		close;
	}
	else {
		mes "[Camel]";
		mes "*Neigh* ~";
		mes "*Chew Chew*";
		close;
	}
}

veins,72,227,3	duplicate(VeinsCamel)	Camel#camelcc3	938
veins,81,222,1	duplicate(VeinsCamel)	Camel#camelcc4	938
veins,77,219,5	duplicate(VeinsCamel)	Camel#camelcc5	938
veins,73,215,8	duplicate(VeinsCamel)	Camel#camelcc6	938
veins,68,215,5	duplicate(VeinsCamel)	Camel#camelcc7	938

ve_fild07,235,42,3	script	Silk Sand Camel	938,{
	if (rachel_camel == 11) {
		mes "^3355FFThis camel's leg is";
		mes "wounded. Although it";
		mes "seems hurt, its nostrils";
		mes "flared as soon as it saw";
		mes "the camel appetite stimulant,";
		mes "and it smacked its lips.^000000";
		next;
		mes "[Camel]";
		mes "^333333*Chew Chew~*^000000";
		mes "^333333*Smacks lips*^000000";
		next;
		mes "^3355FFThe camel started nibbling";
		mes "the stimulant, but its eating";
		mes "became quicker as it ate";
		mes "more of the feed until it";
		mes "was completely consumed.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "This must be the";
		mes "Silk Sand Camel...";
		mes "I guess all I need to";
		mes "do is collect some of";
		mes "that precious camel dung.";
		changequest 3070,3071;
		set rachel_camel,12;
		close;
	}
	else if (rachel_camel > 11 && rachel_camel < 17) {
		if (countitem(511) > 19 && countitem(909) > 9 && countitem(519) > 1 && countitem(713) > 0) {
			mes "^3355FFThe camel can smell";
			mes "that you have food for";
			mes "it, and started salivating.";
			mes "You may as well just feed it.^000000";
			next;
			switch(rand(3)) {
			case 1:
				if (rachel_camel == 12) {
					mes "[Silk Sand Camel]";
					mes "^333333*Chew Chew~*^000000";
					mes "^333333*Smacks lips*^000000";
					next;
					mes "^3355FFThe camel ate everything,";
					mes "but it doesn't seem like";
					mes "it'll go through any bowel";
					mes "movements anytime soon.^000000";
				}
				else  {
					mes "^3355FFThe camel grimaced";
					mes "as if it were suffering";
					mes "from a stomachache...";
					mes "And... Out pops 2 Sweet";
					mes "Potatoes. They're probably";
					mes "safe to eat... Hopefully.^000000";
					getitem 516,2; //Sweet_Potato
				}
				delitem 519,2; //Milk
				delitem 511,20; //Green_Herb
				delitem 909,10; //Jellopy
				close;
			case 2:
				mes "[Silk Sand Camel]";
				mes "^333333*Chew Chew~*^000000";
				mes "^333333*Smacks lips*^000000";
				next;
				mes "^3355FFThe camel grimaced";
				mes "as if it were suffering";
				mes "from a stomachache...";
				mes "Huzzah! You got a lump";
				mes "of steaming camel dung!";
				mes "This is cause for celebration!^000000";
				next;
				mes "[" + strcharinfo(0) + "]";
				if (rachel_camel == 12) {
					mes "Now all I need is";
					mes "just 4 more lumps";
					mes "of this nasty old dung.";
					set rachel_camel, 13;
					changequest 3071,3072;
				}
				else if (rachel_camel == 13) {
					mes "Awesome! I got";
					mes "2 glorious camel dung";
					mes "lumps! Only 3 more to go!";
					set rachel_camel, 14;
					changequest 3072,3073;
				}
				else if (rachel_camel == 14) {
					mes "Yes! Now I have";
					mes "3 camel dung lumps.";
					mes "Just 2 more... I'm more";
					mes "than halfway done!";
					set rachel_camel, 15;
					changequest 3073,3074;
				}
				else if (rachel_camel == 15) {
					mes "4 lumps of camel dung...";
					mes "Heh heh! This is going";
					mes "better than I thought!";
					mes "Only 1 more to go!";
					set rachel_camel, 16;
					changequest 3074,3075;
				}
				else if (rachel_camel == 16) {
					mes "In my hands...";
					mes "I am holding";
					mes "5 lumps of camel dung.";
					mes "This is my finest moment.";
					next;
					mes "[" + strcharinfo(0) + "]";
					mes "Never, in all my years";
					mes "of adventuring, saving the";
					mes "oppressed, protecting the";
					mes "innocent, did I dare dream";
					mes "that I'd accomplish such";
					mes "a magnificent feat.";
					next;
					mes "[" + strcharinfo(0) + "]";
					mes "I am so happy--nay--";
					mes "^4D4DFFproud^000000 that my strength, my";
					mes "valor, and my determination";
					mes "was up to this task. May the";
					mes "annals of history never forget";
					mes "this day! Long live "+strcharinfo(0)+"!";
					next;
					mes "^3355FFIt's time for you to";
					mes "return to Mr. Saraman.^000000";
					set rachel_camel, 17;
					changequest 3075,3076;
				}
				delitem 519,2; //Milk
				delitem 511,20; //Green_Herb
				delitem 909,10; //Jellopy
				delitem 713,1; //Empty_Bottle
				close;
			default:
				mes "[Silk Sand Camel]";
				mes "^333333*Chew Chew~*^000000";
				mes "^333333*Smacks lips*^000000";
				next;
				mes "^3355FFThe camel grimaced";
				mes "as if it were suffering";
				mes "from a stomachache...";
				mes "And... Out pops a Sweet";
				mes "Potato. It's probably";
				mes "safe to eat... Maybe.^000000";
				delitem 519,2; //Milk
				delitem 511,20; //Green_Herb
				delitem 909,10; //Jellopy
				getitem 516,1; //Sweet_Potato
				close;
			}
		}
		else {
			mes "["+strcharinfo(0)+"]";
			if (rachel_camel == 12) {
				mes "I need to feed this camel if";
				mes "I ever want to get any dung";
				mes "from it. Let's see, Mr. Saraman";
				mes "mentioned that the items I got";
				mes "for Ms. Ivory were actually";
				mes "camel feed. I need to have...";
			}
			else {
				mes "Did I run out of feed";
				mes "already? Nuts, if I want";
				mes "to feed this camel again,";
				mes "then I need to bring it...";
			}
			next;
			mes "["+strcharinfo(0)+"]";
			mes "^4D4DFF2 Milk^000000,";
			mes "^4D4DFF20 Green Herbs^000000,";
			mes "^4D4DFF10 Jellopies^000000, and";
			mes "^4D4DFF1 Empty Bottles^000000.";
			next;
			mes "[Silk Sand Camel]";
			mes "*Chew Chew*";
			mes "*Neigh Neigh*~";
			close;
		}
	}
	else if (rachel_camel == 17) {
		mes "["+strcharinfo(0)+"]";
		mes "I managed to get the soap";
		mes "ingredients: 5 of those";
		mes "camel dung lumps. I should";
		mes "head back to Mr. Saraman to";
		mes "tell him where his camel is,";
		mes "and then go to Ms. Ivory.";
		close;
	}
	else {
		mes "[Silk Sand Camel]";
		mes "*Neigh Neigh*~";
		next;
		mes "^3355FFSilly camel.^000000";
		close;
	}
}

veins,221,120,5	script	Young Town Native	943,{
	if (rachel_camel == 3) {
		mes "[Native Young Man]";
		mes "My name is Toby.";
		mes "I was born and raised here,";
		mes "and no one knows more about";
		mes "this town than me. Feel free";
		mes "to ask if you need to find";
		mes "your way around here.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me, but do";
		mes "you know where I can";
		mes "find a locksmith?";
		next;
		mes "[Toby]";
		mes "Of course, I do!";
		mes "Mr. Lockenlock is a famous";
		mes "locksmith, and he makes almost";
		mes "all the keys and locks in Veins";
		mes "and even in Rachel.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Mr. Lockenlock, eh?";
		mes "So where can I find him?";
		next;
		mes "[Toby]";
		mes "Oh, he's always sitting";
		mes "somewhere in the market";
		mes "street. He drinks a lot,";
		mes "though, so he doesn't really";
		mes "work when he's hung over.";
		next;
		mes "[Toby]";
		mes "Ah, but you know what'll";
		mes "shock him back to sobriety?";
		mes "A Yellow Potion! It never";
		mes "fails with that guy!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I see.";
		mes "Thanks for";
		mes "the advice.";
		next;
		mes "[Toby]";
		mes "You're so very";
		mes "welcome! It's just...";
		mes "After all these years...";
		mes "I'm finally useful to someone!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "...Ha...?";
		next;
		mes "^3355FFFind Mr. Lockenlock";
		mes "in the market street, and";
		mes "bring him a Yellow Potion.^000000";
		changequest 3062,3063;
		set rachel_camel,4;
		close;
	}
	else if (rachel_camel == 4) {
		mes "[Toby]";
		mes "After all these years...";
		mes "I'm finally useful to someone!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "...Ha...?";
		next;
		mes "^3355FFFind Mr. Lockenlock";
		mes "in the market street, and";
		mes "bring him a Yellow Potion.^000000";
		close;
	}
	else {
		mes "[Native Young Man]";
		mes "My name is Toby.";
		mes "I was born and raised here,";
		mes "and no one knows more about";
		mes "this town than me. Feel free";
		mes "to ask if you need to find";
		mes "your way around here.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "No, thanks.";
		next;
		mes "[Native Young Man]";
		mes "You don't...";
		mes "^333333*Sob*^000000 You don't";
		mes "need me at all?";
		close;
	}
}

// Thor Volcano Base Quest :: veins_camp
//============================================================ 
ra_temin,87,133,1	script	Rachel Guard#vol1	934,5,2,{
	if (aru_vol == 2) {
		mes "[Guard Karlum]";
		mes "High Priest Vildt isn't";
		mes "here right now. Please";
		mes "come back later if you";
		mes "wish to see him.";
		next;
		select("Think of a Distraction");
		mes "["+strcharinfo(0)+"]";
		mes "This guy's not going to";
		mes "let me pass. Let's see...";
		mes "Is there some way I could";
		mes "get him to leave? What, or";
		mes "even ^FF0000who^000000, could distract him?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Wait a second...";
		mes "Of course! I should";
		mes "talk to him about...";
		next;
		input .@input$;
		mes "["+strcharinfo(0)+"]";
		mes "Wait a second...";
		mes "Of course! I should";
		mes "talk to him about ^FF0000"+.@input$+"^000000 !!";
		next;
		if (.@input$ != "Lamir") {
			mes "["+strcharinfo(0)+"]";
			mes "What the...?";
			mes "Where did I think of that?";
			mes "That doesn't make any sense...";
			close;
		}
		mes "["+strcharinfo(0)+"]";
		mes "That's right! I talked";
		mes "to Lamir a while ago.";
		mes "If she's right, then this";
		mes "guy must be Karlum, the guy";
		mes "who's totally in love with her.";
		mes "Hmm... I know what I'll say...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "^333333*Ahem*^000000 Excuse me,";
		mes "but are you Karlum?";
		mes "I've got a message for you.";
		next;
		mes "[Guard Karlum]";
		mes "A message for me?";
		mes "Is that why you're still";
		mes "loitering around? Well,";
		mes "spit it out. I can't waste";
		mes "too much time on the job...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "You know ^3131FFLamir^000000, right?";
		next;
		emotion ET_HUK;
		mes "[Guard Karlum]";
		mes "Lamir? Oh... My.";
		mes "Oh no! Did something";
		mes "bad happen to her?";
		mes "Quick, tell me!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "No, nothing like that.";
		mes "She just told me that she";
		mes "had something important to";
		mes "tell you, and that you had to";
		mes "come see her when you're free.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I tried to ask her";
		mes "more, but she just kept";
		mes "blushing and turning away.";
		mes "Is there something going";
		mes "on between you too?";
		next;
		mes "[Guard Karlum]";
		mes "...I don't believe it.";
		mes "Finally. After all these";
		mes "years. She feels the same";
		mes "way I feel for her! My midnight";
		mes "serenade a few days ago";
		mes "must've touched her heart.";
		next;
		mes "[Guard Karlum]";
		mes "Screw this stupid job!";
		mes "I've made my choice, and";
		mes "I choose true love! I can't";
		mes "keep Lamir waiting any longer!";
		set aru_vol,3;
		donpcevent "vol_time::OnEnable";
		close2;
		disablenpc "Rachel Guard#vol1";
		end;
	}
	else if ((aru_vol > 2) && (aru_vol < 5)) {
		mes "[Guard Karlum]";
		mes "Hey! Lamir told me that";
		mes "she didn't want to see";
		mes "me at all! What's your";
		mes "game, huh? Do you think";
		mes "I'm that easy to trick?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What? Is that what";
		mes "happened? I could've";
		mes "sworn th--Oooh. I get it now.";
		mes "She must be playing hard to";
		mes "get. That must mean that";
		mes "she's reeeeally into you.";
		next;
		mes "[Guard Karlum]";
		mes "Ah! That makes perfect";
		mes "sense! No wonder she treated";
		mes "me that way! Hahaha! I should";
		mes "have figured it out sooner!";
		mes "Well then, I should go see";
		mes "her and play hard to get too!";
		donpcevent "vol_time::OnEnable";
		close2;
		disablenpc "Rachel Guard#vol1";
		end;
	}
	mes "[Guard Karlum]";
	mes "High Priest Vildt isn't";
	mes "here right now. Please";
	mes "come back later if you";
	mes "wish to see him.";
	close;

OnInit:
	enablenpc "Rachel Guard#vol1";
	end;

OnTouch:
	warp "ra_temin",85,137;
	end;
}

ra_temin,82,133,7	script	Rachel Guard#vol2	934,5,2,{
	mes "[Guard Krodger]";
	mes "High Priest Vildt isn't";
	mes "here right now. Please";
	mes "come back later if you";
	mes "wish to see him.";
	close;

OnInit:
	enablenpc "Rachel Guard#vol2";
	end;

OnTouch:
	warp "ra_temin",85,137;
	end;
}

ra_temin,115,140,1	script	Flower Vase#vol	111,{
	if ((aru_vol > 2) && (aru_vol < 5)) {
		mes "^3355FFYou find a giant";
		mes "vase full of beautiful";
		mes "flowers that look freshly";
		mes "picked from a garden.^000000";
		next;
		if (select("Destroy Vase:Don't Destroy Vase") == 1) {
			mes "^3355FFYou grasp the flower";
			mes "vase with both hands, and";
			mes "then hurl it to the ground.^000000";
			next;
			mes "^3355FF*Crash!*^000000";
			next;
			mes "[Guard Krodger]";
			mes "Who's there?!";
			disablenpc "Rachel Guard#vol2";
			enablenpc "Rachel Guard#vol2_1";
			donpcevent "vol_time2::OnEnable";
			set aru_vol,4;
			disablenpc "Flower Vase#vol";
			close;
		}
		mes "["+strcharinfo(0)+"]";
		mes "A lot of loving care";
		mes "was put into arranging";
		mes "these flowers.. I can't";
		mes "bear to disturb their beauty.";
		next;
		mes "^3355FFAnd so you just";
		mes "stood there, looking";
		mes "a bit pitiable, but not";
		mes "really all that pathetic.^000000";
		close;
	}
	mes "^3355FFYou find a giant";
	mes "vase full of beautiful";
	mes "flowers that look freshly";
	mes "picked from a garden.^000000";
	close;
}

ra_temin,85,131,0	script	path_vol1	-1,5,0,{
OnTouch:
	if ((aru_vol != 3) && (aru_vol != 4)) {
		warp "ra_temin",85,137;
	}
	end;
}

ra_temin,82,131,0	script	path_vol1#2	-1,5,0,{
OnTouch:
	if (aru_vol != 4) {
		warp "ra_temin",85,137;
	}
	end;
}

ra_temin,82,127,0	script	path_vol1#3	-1,5,1,{
OnTouch:
	if (aru_vol == 5) {
		warp "ra_temin",84,124;
	}
	end;
}

ra_temin,40,124,3	script	Female Follower#vol	920,{
	mes "[Lamir]";
	mes "^333333*Sigh*^000000 High Priest Vildt";
	mes "left over so much food after";
	mes "eating. Didn't he learn to";
	mes "finish all of his food?";
	next;
	mes "[Lamir]";
	mes "You know, my mother used";
	mes "to threaten that she'd force";
	mes "me to marry Karlum if I didn't";
	mes "finish all my food when I was";
	mes "a kid. I learned never to";
	mes "leave any leftovers that way~";
	next;
	select("Who's Karlum?");
	mes "[Lamir]";
	mes "Karlum? Oh, he's been";
	mes "chasing me ever since we";
	mes "were kids, declaring his";
	mes "love and all that. Even";
	mes "after we grew up, he's still";
	mes "stubborn about that point.";
	next;
	mes "[Lamir]";
	mes "Ugh! Even today, he";
	mes "still gets on my nerves!";
	mes "I mean, it's great that he's";
	mes "a guard at High Priest Vildt's";
	mes "office, but come on! Why can't";
	mes "he bother another girl?";
	if (aru_vol == 1) {
		set aru_vol,2;
	}
	close;
}

ra_temin,42,124,3	script	Rachel Guard#vol1_1	934,{
	end;

OnInit:
	disablenpc "Rachel Guard#vol1_1";
	end;
}

ra_temin,5,5,3	script	vol_time	844,{
OnInit:
	stopnpctimer;
	end;

OnEnable:
	initnpctimer;
	enablenpc "Rachel Guard#vol1_1";
	end;

OnTimer10000:
	mapannounce "ra_temin","Guard Karlum: Lamir! It's Karlum! Your love is here!",bc_map,"0xFFCE00";
	end;

OnTimer15000:
	mapannounce "ra_temin","Lamir: Karlum? What are you doing here?",bc_map,"0xFFCE00";
	end;

OnTimer20000:
	mapannounce "ra_temin","Guard Karlum: Lamir, you can stop pretending now. I've come to realize that your coldness masks your love~",bc_map,"0xFFCE00";
	end;

OnTimer30000:
	mapannounce "ra_temin","Lamir: What are you talking about? Sorry, Karlum, but I don't have any special feelings for you.",bc_map,"0xFFCE00";
	end;

OnTimer35000:
	mapannounce "ra_temin","Guard Karlum: I know, it's embarrassing to confess your true feelings~",bc_map,"0xFFCE00";
	end;

OnTimer40000:
	mapannounce "ra_temin","Guard Karlum: However, I can't deny that your shyness is breaking my heart.",bc_map,"0xFFCE00";
	end;

OnTimer45000:
	mapannounce "ra_temin","Lamir: Karlum, when will you realize that I haven't, and won't ever fall in love with you?",bc_map,"0xFFCE00";
	end;

OnTimer50000:
	mapannounce "ra_temin","Guard Karlum: .............",bc_map,"0xFFCE00";
	end;

OnTimer55000:
	mapannounce "ra_temin","Guard Karlum: Wha--? But I thought...? Huh, sorry. I should get going...",bc_map,"0xFFCE00";
	stopnpctimer;
	disablenpc "Rachel Guard#vol1_1";
	enablenpc "Rachel Guard#vol1";
	end;
}

ra_temin,113,140,1	script	Rachel Guard#vol2_1	934,{
	mes "[Guard Krodger]";
	mes "What's with this vase?";
	mes "They always send me out";
	mes "here to clean up this mess!";
	mes "I mean, it happens so often,";
	mes "I don't think it's accidental.";
	mes "You think it's vandals?";
	close;

OnInit:
	disablenpc "Rachel Guard#vol2_1";
	end;
}

ra_temin,5,5,1	script	vol_time2	844,{
OnInit:
	stopnpctimer;
	end;

OnEnable:
	initnpctimer;
	end;

OnTimer30000:
	mapannounce "ra_temin","Guard Krodger: Phew~, now I'm done cleaning up this mess.",bc_map,"0xFFCE00";
	stopnpctimer;
	disablenpc "Rachel Guard#vol2_1";
	enablenpc "Rachel Guard#vol2";
	enablenpc "Flower Vase#vol";
	end;
}

ra_temin,87,118,3	script	Drawer#vol1::VeinsDrawer	111,{
	mes "^3355FFThere are some neatly";
	mes "printed and organized";
	mes "documents inside";
	mes "these drawers.^000000";
	close;
}

ra_temin,83,118,3	duplicate(VeinsDrawer)	Drawer#vol2	111

ra_temin,85,118,3	script	Drawer#vol3	111,{
	if ((MaxWeight-Weight) < 2000 || 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 (aru_vol == 4) {
		mes "^3355FFYou find a thick pile";
		mes "of reports submitted";
		mes "to the high priest";
		mes "inside this drawer.^000000";
		next;
		if (select("Check the Reports:Cancel") == 1) {
			mes "["+strcharinfo(0)+"]";
			mes "Well, it might not to";
			mes "the most moral thing,";
			mes "but I get the feeling";
			mes "that I should at least";
			mes "check some of these out.";
			next;
			mes "^3355FFYou started shuffling";
			mes "through the documents,";
			mes "glancing at a few that";
			mes "catch your interest.^000000";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Ooh...";
			mes "This might be";
			mes "what I'm looking for.";
			next;
			mes "^3355FFYou take the thick report";
			mes "labeled ''Veins Geological";
			mes "Research Institute'' on";
			mes "the cover, and then you";
			mes "close the drawer.^000000";
			changequest 2114,2115;
			set aru_vol,5;
			getitem 7342,1; //File01
			close;
		}
		mes "["+strcharinfo(0)+"]";
		mes "Forget it.";
		mes "I didn't get permission";
		mes "to look through these files.";
		close;
	}
	else if (aru_vol == 5) {
		if (countitem(7342) < 1) {
			mes "["+strcharinfo(0)+"]";
			mes "Oh! Here's another";
			mes "copy of that report";
			mes "I wanted! Pretty lucky~";
			getitem 7342,1; //File01
			close;
		}
		mes "^3355FFYou find a thick pile";
		mes "of reports submitted";
		mes "to the high priest";
		mes "inside this drawer.^000000";
		close;
	}
	mes "^3355FFYou find a thick pile";
	mes "of reports submitted";
	mes "to the high priest";
	mes "inside this drawer.^000000";
	close;
}

ra_temin,88,117,3	script	Goddess Statue#vol1	111,{
	mes "^3355FFIt's a statue of Freya,";
	mes "a goddess revered for her";
	mes "clemency and wisdom.^000000";
	close;
}

ra_temin,73,126,1	script	Ladder#vol1	111,{
	if (aru_vol == 5) {
		mes "["+strcharinfo(0)+"]";
		mes "Wait, I can use this";
		mes "ladder to sneak out of";
		mes "here! I snuck inside so";
		mes "I'd get caught if I just";
		mes "passed the guards...";
		next;
		if (select("Climb Ladder:Cancel") == 1) {
			mes "^3355FFYou climbed the";
			mes "ladder over the";
			mes "wall and snuck out.^000000";
			close2;
			warp "ra_temin",74,136;
			end;
		}
		mes "^3355FFYou decided not to climb";
		mes "up the ladder for now.^000000";
		close;
	}
	end;
}

ve_in,280,223,0	script	#volroom	-1,2,2,{
OnTouch:
	if (aru_vol == 6) {
		mes "^3355FFThis house looks like";
		mes "it's been abandoned for";
		mes "a while: the floor is thickly";
		mes "covered with dust and many";
		mes "pieces of discarded paper.^000000";
		next;
		mes "^3355FFOne particular piece";
		mes "of paper catches your";
		mes "attention. You pick it";
		mes "up and give it a read.^000000";
		next;
		mes "[Paper]";
		mes "''^333333The regularly scheduled";
		mes "geological survey had been";
		mes "postponed for over a week.";
		mes "Please submit your report";
		mes "to us as soon as possible.^000000''";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Although the sender's";
		mes "name isn't on this letter,";
		mes "I can guess who wrote it. ";
		mes "Speaking of which...";
		mes "Where's the geologist?";
		set aru_vol,7;
		close;
	}
	else if (aru_vol < 6) {
		mes "^3355FFThis house looks like";
		mes "it's been abandoned for";
		mes "a while: the floor is thickly";
		mes "covered with dust and many";
		mes "pieces of discarded paper.^000000";
		close;
	}
	end;
}

veins,159,171,3	script	Towner#vol	945,{
	mes "[Towner]";
	mes "The small office on the";
	mes "2nd floor of this weapon";
	mes "shop is occupied by a";
	mes "geologist. At least, he's";
	mes "supposed to be one...";
	next;
	mes "[Towner]";
	mes "The guy might be a quack:";
	mes "all he does is drink and";
	mes "flirt with skanky women";
	mes "all day. I thought scholars";
	mes "are supposed to read and study";
	mes "and discover things, you know?";
	close;
}

ve_in,233,116,3	script	Drunken Man#vol	901,{
	if ((MaxWeight-Weight) < 2000 || 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 (aru_vol < 7) {
		mes "[Drunken Man]";
		mes "So... ^333333*Urp*^000000";
		mes "So then I said...";
		next;
		mes "[Drunken Man]";
		mes "''^3131FFHey, buddy! A man";
		mes "uses his back to talk,";
		mes "not his fists! You wanna";
		mes "piece of me? Bring it on!^000000''";
		next;
		mes "[Drunken Man]";
		mes "Then he got all";
		mes "scared, and ran away!";
		mes "Hahahaha! Guess I look";
		mes "pretty tough, don't I?";
		next;
		emotion ET_THROB, getnpcid(0, "Drunken Lady#1");
		emotion ET_THROB, getnpcid(0, "Drunken Lady#2");
		mes "[Ladies]";
		mes "Oh, my God!";
		mes "You're so cool~!";
		next;
		mes "[Drunken Man]";
		mes "Well... Anyone would";
		mes "have done it. I was just";
		mes "being a gentleman.";
		mes "Hahahah, that's right!";
		close;
	}
	else if (aru_vol == 7) {
		mes "[Drunken Man]";
		mes "So... ^333333*Urp*^000000";
		mes "So then I said...";
		next;
		mes "[Drunken Man]";
		mes "''^3131FFHey, buddy! A man";
		mes "uses his back to talk,";
		mes "not his fists! You wanna";
		mes "piece of me? Bring it on!^000000''";
		next;
		mes "[Drunken Man]";
		mes "Then he got all";
		mes "scared, and ran away!";
		mes "Hahahaha! Guess I look";
		mes "pretty tough, don't I?";
		next;
		emotion ET_THROB, getnpcid(0, "Drunken Lady#1");
		emotion ET_THROB, getnpcid(0, "Drunken Lady#2");
		mes "[Ladies]";
		mes "Oh, my God!";
		mes "You're so cool~!";
		next;
		mes "[Drunken Man]";
		mes "Well... Anyone would";
		mes "have done it. I was just";
		mes "being a gentleman.";
		mes "Hahahah, that's right!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me, but are";
		mes "you the executive director";
		mes "of the Veins Geological Team?";
		next;
		mes "[Drunken Man]";
		mes "Yeah, sure! Executive";
		mes "director, deputy director,";
		mes "director, researcher, CEO,";
		mes "no... No, wait, that last one";
		mes "doesn't sound right. Hah!";
		mes "I'm all of those~";
		next;
		mes "[Drunken Man]";
		mes "I'm the executive director...";
		mes "I'm the only one that works";
		mes "at the institute, really.";
		mes "Why, what do you want?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Uhh... There are some";
		mes "official notices for you";
		mes "at your office. I guess you";
		mes "need to get some surveys";
		mes "done? They sound like";
		mes "they're pretty important.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Maybe...";
		mes "Maybe even ^FF0000urgent^000000.";
		next;
		mes "[Drunken Man]";
		mes "Wha--? Hey, what day";
		mes "is it today? Damn it!";
		mes "Fine, fine, time to get";
		mes "to work. Just when I was";
		mes "really enjoying myself too!";
		mes "Argh, I never wanna be sober!";
		next;
		mes "[Drunken Man]";
		mes "But... Working is the";
		mes "only way for me to afford";
		mes "all this drinking... Such";
		mes "is life. Such is life.";
		next;
		mes "[Ladies]";
		mes "Where are you going?";
		mes "Can't you stay a bit";
		mes "longer and talk with";
		mes "us? Pleeeeeease?";
		next;
		mes "[Drunken Man]";
		mes "Sorry, ladies,";
		mes "but duty calls.";
		mes "Hahahahahahha~";
		next;
		emotion ET_THROB, getnpcid(0, "Drunken Lady#1");
		emotion ET_THROB, getnpcid(0, "Drunken Lady#2");
		mes "[Ladies]";
		mes "Please don't go~";
		next;
		mes "[Drunken Man]";
		mes "Ahem!";
		mes "Let's see now.";
		mes "What'd be best...?";
		mes "..............................";
		mes "..............................";
		mes "..............................";
		next;
		mes "[Drunken Man]";
		mes "..............................";
		mes "..............................";
		mes "........................Right!";
		next;
		mes "[Drunken Man]";
		mes "Hey, you.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Yes?";
		next;
		emotion ET_BEST;
		mes "[Drunken Man]";
		mes "I hereby promote you as";
		mes "chief researcher of the";
		mes "Veins Geological Research";
		mes "Institute. Congratulations!";
		mes "Welcome to the team, friend!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Huh...?";
		mes "I don't understand";
		mes "what you're talking about!";
		next;
		mes "[Drunken Man]";
		mes "Heh! You should be grateful";
		mes "that I'm accepting you as my";
		mes "student! Everyone'd be proud";
		mes "to study under me, Gio, the";
		mes "world's greatest geologist!";
		mes "(Well, maybe.)";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Hey, I never--";
		next;
		mes "[Geologist Gio]";
		mes "Ah-ah! Now that you're";
		mes "my student, I expect you";
		mes "to work hard if you're going";
		mes "to learn anything. First thing";
		mes "first--go to my office and";
		mes "clear up my belated business.";
		next;
		mes "[Geologist Gio]";
		mes "Here, take this ^FF0000reference";
		mes "guide^000000 with you to my office.";
		mes "When you check my desk, you'll";
		mes "find a ^FF0000pyrometer^000000 and a ^FF0000report";
		mes "form^000000. You'll need to bring all";
		mes "that stuff to Thor Volcano.";
		next;
		mes "[Geologist Gio]";
		mes "When you get to Thor Volcano,";
		mes "use the pryometer to check the";
		mes "volcano's temperature, and";
		mes "fill out the report form.";
		next;
		mes "[Geologist Gio]";
		mes "Take the filled report";
		mes "form to the geology camp";
		mes "that's deep inside the volcano";
		mes "so that they can stamp their";
		mes "confirmation on it. That's";
		mes "not so hard now, is it?";
		next;
		mes "[Geologist Gio]";
		mes "Ahh, I've also decided";
		mes "to take these lovely ladies";
		mes "on as my students as well~";
		mes "I should stay here and";
		mes "entreat them to a lecture.";
		next;
		emotion ET_THROB, getnpcid(0, "Drunken Lady#1");
		emotion ET_THROB, getnpcid(0, "Drunken Lady#2");
		mes "[Ladies]";
		mes "Oh~! You'll really";
		mes "teach us geology?";
		next;
		mes "[Geologist Gio]";
		mes "Oh, right! When they";
		mes "ask you about the volcano's";
		mes "temperature when you submit";
		mes "the report at the geological";
		mes "camp, make something up.";
		mes "Make sure it sounds bad!";
		next;
		mes "[Geologist Gio]";
		mes "Words like ''explosion,''";
		mes "''disaster,'' and ''collatoral";
		mes "damage'' would be perfect.";
		mes "Just do your part, and I'll";
		mes "take care of the rest. Okay~";
		mes "Come back soon, my pupil!";
		next;
		mes "^3355FFWell, this isn't what";
		mes "you expected, but you get";
		mes "the feeling that this will";
		mes "all turn out in your favor.";
		mes "You know that feeling, right?^000000";
		changequest 2116,2117;
		set aru_vol,8;
		getitem 7705,1; //Note_Of_Geologist
		close;
	}
	else if ((aru_vol > 7) && (aru_vol < 24)) {
		mes "[Geologist Gio]";
		mes "Hey, you'd better hurry";
		mes "it up. I mean, you're the";
		mes "one that found that notice";
		mes "in my office, didn't you?";
		mes "You know how important";
		mes "this work is to us!";
		next;
		mes "[Geologist Gio]";
		mes "Get the pyrometer,";
		mes "and go to Thor Volcano";
		mes "to fill out the report";
		mes "form and submit it to";
		mes "the geological camp!";
		close;
	}
	else if (aru_vol == 24) {
		mes "[Geologist Gio]";
		mes "Well, those are";
		mes "nice legs, but they're";
		mes "not the best pair I've see--";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I'm back.";
		next;
		mes "[Geologist Gio]";
		mes "*Ahem* And that's how";
		mes "erosion... Works. Tomorrow,";
		mes "I'll teach you ladies all";
		mes "about rocks. All of them.";
		next;
		mes "[Geologist Gio]";
		mes "Welcome back! So,";
		mes "how was the volcanic";
		mes "temperature report?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Well, I did what you";
		mes "told me. Hey, are you";
		mes "sure you wanted me to";
		mes "exaggerate the temperature?";
		mes "What about the camp?";
		next;
		mes "[Geologist Gio]";
		mes "Oh, don't worry about";
		mes "the temperature. It's";
		mes "supposed to go up.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What are you...?";
		mes "Actually, I thought that";
		mes "maybe the pryometer";
		mes "might be broken.";
		next;
		mes "[Geologist Gio]";
		mes "Heh! You're right~";
		mes "I broke it on purpose.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What?!";
		next;
		mes "[Geologist Gio]";
		mes "You know, it's hard for";
		mes "scholars like me to make";
		mes "a decent living. Hell, I was";
		mes "lucky enough to get that";
		mes "temperature measuring job";
		mes "from the geological camp.";
		next;
		mes "[Geologist Gio]";
		mes "Those guys've been trying";
		mes "to fire me ever since they";
		mes "realized the volcano became";
		mes "dormant. But... They can't";
		mes "fire me if there's proof that";
		mes "it might go off anytime!";
		next;
		mes "[Geologist Gio]";
		mes "Then, when they're all";
		mes "panicked, I calmly and";
		mes "suavely offer a solution";
		mes "that looks like it works.";
		mes "Of course, there's never";
		mes "a problem to begin with...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "So...";
		mes "You're a con man.";
		next;
		mes "[Geologist Gio]";
		mes "Awww, don't look at";
		mes "me like that. I'm a real";
		mes "scientist. Come on...";
		mes "Oh, come on...";
		next;
		mes "[Geologist Gio]";
		mes "Look, why don't you head";
		mes "back to my institute and";
		mes "check out my bookshelf?";
		mes "I keep a small box there";
		mes "where I keep all sorts";
		mes "of nifty little goodies.";
		next;
		mes "[Geologist Gio]";
		mes "You can have the very";
		mes "first thing that pops out";
		mes "of that box. I wonder if the";
		mes "goddess will grace you";
		mes "with good fortune. You";
		mes "might get something good~";
		next;
		mes "[Geologist Gio]";
		mes "Consider it your";
		mes "payment for a job";
		mes "well done. Good work!";
		mes "I expected nothing less";
		mes "from my star pupil!";
		changequest 60211,60212;
		set aru_vol,25;
		delitem 7342,1; //File01
		delitem 7704,1; //Broken_Thermometer
		delitem 7705,1; //Note_Of_Geologist
		close;
	}
	mes "[Drunken Man]";
	mes "So... ^333333*Urp*^000000";
	mes "So then I said...";
	next;
	mes "[Drunken Man]";
	mes "''^3131FFHey, buddy! A man";
	mes "uses his back to talk,";
	mes "not his fists! You wanna";
	mes "piece of me? Bring it on!^000000''";
	next;
	mes "[Drunken Man]";
	mes "Then he got all";
	mes "scared, and ran away!";
	mes "Hahahaha! Guess I look";
	mes "pretty tough, don't I?";
	next;
	emotion ET_THROB, getnpcid(0, "Drunken Lady#1");
	emotion ET_THROB, getnpcid(0, "Drunken Lady#2");
	mes "[Ladies]";
	mes "Oh, my God!";
	mes "You're so cool~!";
	next;
	mes "[Drunken Man]";
	mes "Well... Anyone would";
	mes "have done it. I was just";
	mes "being a gentleman.";
	mes "Hahahah, that's right!";
	close;
}

ve_in,232,117,5	script	Drunken Lady#1	940,{
	mes "[Drunken Lady]";
	mes "This guys' actually";
	mes "pretty boring, but...";
	mes "I get free drinks if";
	mes "I can put up with him~";
	close;
}

ve_in,234,115,3	script	Drunken Lady#2	940,{
	mes "[Drunken Lady]";
	mes "This tavern might look";
	mes "luxurious and gorgeous,";
	mes "but the drinks here stink!";
	mes "I can mix better drinks";
	mes "at home, no sweat at all~";
	close;
}

ve_in,277,229,3	script	Wall Closet#vol	111,{
	if ((MaxWeight-Weight) < 2000 || 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 (aru_vol == 8) {
		if (countitem(7704) == 0) {
			mes "^3355FFYou found the";
			mes "pyrometer inside";
			mes "the closet.^000000";
			getitem 7704,1; //Broken_Thermometer
			close;
		}
		mes "^3355FFThere's so much junk";
		mes "crammed in here!^000000";
		close;
	}
	mes "^3355FFThere's so much junk";
	mes "crammed in here!^000000";
	close;
}

ve_in,281,214,3	script	Bookshelf#vol	111,{
	if ((MaxWeight-Weight) < 2000 || 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 (aru_vol == 8) {
		if (countitem(7342) == 0) {
			mes "^3355FFYou find a bundle";
			mes "of reports carelessly";
			mes "stuck between some";
			mes "books on this bookshelf.^000000";
			getitem 7342,1; //File01
			close;
		}
		mes "^3355FFThere's a lot of";
		mes "scattered books and";
		mes "notebooks lying on";
		mes "this bookshelf.^000000";
		close;
	}
	else if ((aru_vol > 8) && (aru_vol < 25)) {
		mes "^3355FFThere's a lot of";
		mes "scattered books and";
		mes "notebooks lying on";
		mes "this bookshelf.^000000";
		close;
	}
	else if (aru_vol == 25) {
		mes "^3355FFThere's a lot of";
		mes "scattered books and";
		mes "notebooks lying on";
		mes "this bookshelf.^000000";
		next;
		mes "^3355FFAfter a quick look,";
		mes "you notice the grayish";
		mes "purple box that Gio was";
		mes "talking about it. You close";
		mes "your eyes, and reach inside";
		mes "Gio's purple box of goodies.^000000";
		next;
		changequest 60212,60213;
		set aru_vol,26;
		set .@box_box,rand(1,20);
		if (.@box_box < 7) {
			getitem 12104,1; //Random_Quiver
		}
		else if ((.@box_box > 6) && (.@box_box < 9)) {
			getitem 661,1; //Sway_Apron
		}
		else if ((.@box_box > 8) && (.@box_box < 20)) {
			getitem 12027,5; //Giggling_Box
		}
		else {
			getitem 12103,1; //Bloody_Dead_Branch
		}
		getexp (checkre(3))?100000:800000,0;
		mes "^3355FFWell, you've done all";
		mes "that you could here.";
		mes "Now would be a good time";
		mes "to return to High Priest Zhed.^000000";
		close;
	}
	mes "^3355FFThere's a lot of";
	mes "scattered books and";
	mes "notebooks lying on";
	mes "this bookshelf.^000000";
	close;
}

thor_v01,37,234,3	script	Hot Land Surface#1	111,{
	if (aru_vol == 8) {
		if ((countitem(7704) > 0) && (countitem(7342) > 0)) {
			mes "^3355FFYou use the pyrometer";
			mes "to check the surface";
			mes "temperature of the ground";
			mes "here in the volcano.^000000";
			next;
			mes "^3131FFBeep-- Beep-- Bee-^000000";
			next;
			mes "^3131FFCurrent Temperature: 2300 ThT^000000";
			next;
			mes "^3355FFYou record the";
			mes "temperature in";
			mes "your report.^000000";
			changequest 2117,2118;
			set aru_vol,9;
			next;
			mes "["+strcharinfo(0)+"]";
			mes "I should take a few more";
			mes "temperature measurements";
			mes "before I submit this report,";
			mes "just to be absolutely sure.";
			close;
		}
		mes "^3355FFYou need both the";
		mes "pyrometer and the";
		mes "report form to measure";
		mes "and record the temperature";
		mes "of the ground's surface here.^000000";
		close;
	}
	mes "^3355FFThis patch of ground";
	mes "emits an intense heat";
	mes "that stings your face.^000000";
	close;
}

thor_v02,165,37,3	script	Hot Land Surface#2	111,{
	if (aru_vol == 9) {
		if ((countitem(7704) > 0) && (countitem(7342) > 0)) {
			mes "^3355FFYou use the pyrometer";
			mes "to check the surface";
			mes "temperature of the ground";
			mes "here in the volcano.^000000";
			next;
			mes "^3131FFBeep-- Beep-- Bee-^000000";
			next;
			mes "^3131FFCurrent Temperature: 2270 ThT^000000";
			next;
			mes "^3355FFYou record the";
			mes "temperature in";
			mes "your report.^000000";
			changequest 2118,2119;
			set aru_vol,10;
			close;
		}
		mes "^3355FFYou need both the";
		mes "pyrometer and the";
		mes "report form to measure";
		mes "and record the temperature";
		mes "of the ground's surface here.^000000";
		close;
	}
	mes "^3355FFThis patch of ground";
	mes "emits an intense heat";
	mes "that stings your face.^000000";
	close;
}

thor_v02,170,100,3	script	Hot Land Surface#3	111,{
	if (aru_vol == 10) {
		if ((countitem(7704) > 0) && (countitem(7342) > 0)) {
			mes "^3355FFYou use the pyrometer";
			mes "to check the surface";
			mes "temperature of the ground";
			mes "here in the volcano.^000000";
			next;
			mes "^3131FFBeep-- Beep-- Bee-^000000";
			next;
			mes "^3131FFCurrent Temperature: 2500 ThT^000000";
			next;
			mes "^3355FFYou record the";
			mes "temperature in";
			mes "your report.^000000";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "I've taken enough";
			mes "measurements. I should";
			mes "submit this report to the";
			mes "geological camp now~";
			changequest 2119,2120;
			set aru_vol,11;
			close;
		}
		mes "^3355FFYou need both the";
		mes "pyrometer and the";
		mes "report form to measure";
		mes "and record the temperature";
		mes "of the ground's surface here.^000000";
		close;
	}
	else if (aru_vol == 11) {
		mes "["+strcharinfo(0)+"]";
		mes "I've taken enough";
		mes "measurements. I should";
		mes "submit this report to the";
		mes "geological camp now~";
		close;
	}
	mes "^3355FFThis patch of ground";
	mes "emits an intense heat";
	mes "that stings your face.^000000";
	close;
}

que_thor,145,66,3	script	Guard#vol::VeinsGuard	939,{
	if (aru_vol == 11) {
		mes "[Guard]";
		mes "Only authorized";
		mes "personnel can enter this";
		mes "area. Identify yourself!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I'm a research student working";
		mes "under Director Gio for the";
		mes "Veins Geological Research";
		mes "Institute. Would you please";
		mes "stamp this temperature";
		mes "report for me?";
		next;
		mes "[Guard]";
		mes "Oh, I see. Well, I'm";
		mes "not the one that stamps";
		mes "reports. Go inside and";
		mes "ask Sahedi to help you.";
		mes "He's at the airship just";
		mes "south of the train station.";
		changequest 2120,2121;
		set aru_vol,12;
		close2;
		warp "thor_camp",248,190;
		end;
	}
	else if ((aru_vol > 11) && (aru_vol < 24)) {
		mes "[Guard]";
		mes "Oh, you're that student";
		mes "from the institute. I don't";
		mes "think we're expecting";
		mes "any reports soon.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Oh, we just found out";
		mes "that the instruments we";
		mes "used were faulty, so we";
		mes "had to revise our report.";
		next;
		mes "[Guard]";
		mes "Your tools were broken";
		mes "the first time? Okay, okay,";
		mes "I can understand that.";
		mes "Alright, you can pass.";
		close2;
		warp "thor_camp",248,190;
		end;
	}
	mes "[Guard]";
	mes "Who are you?!";
	close;
}

que_thor,136,66,3	duplicate(VeinsGuard)	Guard#vol2	939
que_thor,127,60,5	duplicate(VeinsGuard)	Guard#vol3	939

thor_camp,250,104,3	script	Sahedi#vol	934,{
	if ((MaxWeight-Weight) < 2000 || 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 (aru_vol == 12) {
		mes "[Sahedi]";
		mes "I'm sorry, but I don't";
		mes "think I know you. Only";
		mes "authorized personnel is";
		mes "allowed in this area, so";
		mes "if you don't have any";
		mes "reason to be here...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I'm a research student working";
		mes "under Director Gio for the";
		mes "Veins Geological Research";
		mes "Institute. Would you please";
		mes "stamp this temperature";
		mes "report for me?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Um, Gio is sick right";
		mes "now, so that's why he";
		mes "had me fill out this report";
		mes "form and submit it for him.";
		next;
		mes "[Sahedi]";
		mes "Ah, so that's why his";
		mes "report's late this time.";
		mes "I'm sorry to hear that.";
		mes "And here I thought he was";
		mes "just wasting his time on";
		mes "women and alcohol...";
		next;
		mes "[Sahedi]";
		mes "Let's see...";
		next;
		emotion ET_HUK;
		mes "[Sahedi]";
		mes "Oh God! Why is the";
		mes "temperature so high?!";
		mes "We've had a few reports";
		mes "like this in the past, but...";
		mes "Is this... How bad is this?";
		next;
		emotion ET_PROFUSELY_SWEAT, playerattached();
		mes "["+strcharinfo(0)+"]";
		mes "Oh... Oh, no!";
		mes "Yikes! I guess if it's";
		mes "higher than normal...";
		mes "It might be bad?";
		next;
		mes "[Sahedi]";
		mes "What should I do?";
		mes "Should I activate";
		mes "the alarm? I don't...";
		mes "I don't wanna die!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "You might want to calm";
		mes "down first. I'll take a look";
		mes "around the camp, so please";
		mes "don't say anything that will";
		mes "make anyone else panic for now.";
		next;
		mes "[Sahedi]";
		mes "Okay...";
		mes "Please go ahead, and";
		mes "see if this camp will be";
		mes "safe from any disaster.";
		changequest 2121,2122;
		set aru_vol,13;
		delitem 7342,1; //File01
		close;
	}
	else if ((aru_vol > 12) && (aru_vol < 23)) {
		mes "[Sahedi]";
		mes "So, are we in any";
		mes "danger? Does it look";
		mes "like this volcano will";
		mes "erupt anytime soon?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Oh, I'm not finished";
		mes "investigating yet. Would";
		mes "you please wait a bit longer?";
		next;
		mes "[Sahedi]";
		mes "Sure, sure. Just make";
		mes "sure that you do a real";
		mes "thorough check of everything";
		mes "in the volcano for me, yeah?";
		close;
	}
	else if (aru_vol == 23) {
		mes "[Sahedi]";
		mes "So, are we in any";
		mes "danger? Does it look";
		mes "like this volcano will";
		mes "erupt anytime soon?";
		next;
		while(1) {
			if (select("Yes:No") == 1) {
				mes "["+strcharinfo(0)+"]";
				mes "I guess I can't hide it";
				mes "from you... The recent";
				mes "activity of this volcano";
				mes "has recently been fairly...";
				mes "disconcerting.";
				next;
				break;
			}
			else {
				mes "^3355FFWait... You should take";
				mes "advantage of this situation.";
				mes "This could be your chance to";
				mes "intervene in the conflict";
				mes "between two contries!^000000";
				next;
				mes "^3355FFYou might not be able";
				mes "to stop their war, but";
				mes "maybe you can distract";
				mes "them with the threat";
				mes "of natural disaster...^000000";
				next;
			}
		}
		emotion ET_HUK;
		mes "[Sahedi]";
		mes "Huh? Are you serious?";
		mes "Thor Volcano's gonna";
		mes "erupt?! We-we have to";
		mes "get the hell out of here!";
		mes "It'll be a disaster, just";
		mes "like it happened in the past!";
		next;
		emotion ET_SPARK, playerattached();
		mes "["+strcharinfo(0)+"]";
		mes "Yes, I agree. There's";
		mes "a good chance of an...";
		mes "explosion that'll cause";
		mes "a lot of collateral damage.";
		next;
		mes "[Sahedi]";
		mes "What are our chances?";
		mes "How much time do we";
		mes "have to evacuate?";
		next;
		emotion ET_SPARK, playerattached();
		mes "["+strcharinfo(0)+"]";
		mes "Well... Uh...";
		mes "According to my data...";
		mes "Analysis... There's a 75%";
		mes "chance of eruption within";
		mes "the next thirty days.";
		next;
		mes "[Sahedi]";
		mes "What?! We must report";
		mes "this to the high priest";
		mes "immediately! Aitra!";
		next;
		enablenpc "Aitra#vol";
		mes "[Aitra]";
		mes "Yes, sir!";
		next;
		mes "[Sahedi]";
		mes "This is an emergency.";
		mes "Bring this message to";
		mes "the high priest as soon";
		mes "as possible. And don't";
		mes "forget to pack all your";
		mes "things before you leave.";
		next;
		mes "[Aitra]";
		mes "Huh?";
		mes " ...Yes, sir.";
		next;
		disablenpc "Aitra#vol";
		mes "[Sahedi]";
		mes "Oh, this is a nightmare...";
		mes "Will you please take your";
		mes "report to your director, Gio?";
		mes "Hopefully he'll have some";
		mes "advice for what we can";
		mes "do about this disaster...";
		changequest 2128,60211;
		set aru_vol,24;
		getitem 7342,1; //File01
		close;
	}
	mes "[Sahedi]";
	mes "Argh, I'm so busy!";
	close;
}


thor_camp,194,220,0	script	#Colonel1	-1,5,5,{
OnTouch:
	if (aru_vol == 13) {
		enablenpc "Colonel Vito#1";
		mes "[????]";
		mes "You...!";
		mes "What are you doing";
		mes "just standing around?!";
		mes "Aren't you supposed to";
		mes "be transporting cargo? ";
		mes "Attention to orders!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Are you talking to me?";
		mes "No, I'm from the Veins Geo--";
		next;
		mes "[Colonel Vito]";
		mes "Look at you. You don't";
		mes "even have your uniform";
		mes "yet. Still a rookie, eh?";
		mes "Looks like I'll have to";
		mes "personally train you as";
		mes "one of our holy knights!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "But I'm not--";
		next;
		mes "[Colonel Vito]";
		mes "You should be honored to";
		mes "have the rare opportunity";
		mes "to be trained by me, the";
		mes "great Colonel Vito. I'll mold";
		mes "you into a true warrior for";
		mes "Freya! Now follow me!";
		changequest 2122,2123;
		set aru_vol,14;
		close2;
		disablenpc "Colonel Vito#1";
		warp "thor_camp",156,68;
		end;
	}
	else if (aru_vol == 14) {
		enablenpc "Colonel Vito#1";
		mes "[Colonel Vito]";
		mes "What are you still";
		mes "doing standing there?";
		mes "Don't slack off! Come!";
		close2;
		disablenpc "Colonel Vito#1";
		warp "thor_camp",156,68;
		end;
	}
	end;
}

thor_camp,162,182,0	script	#Colonel2	-1,7,7,{
OnTouch:
	if (aru_vol == 13) {
		enablenpc "Colonel Vito#2";
		mes "[????]";
		mes "You...!";
		mes "What are you doing";
		mes "just standing around?!";
		mes "Aren't you supposed to";
		mes "be transporting cargo? ";
		mes "Attention to orders!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Are you talking to me?";
		mes "No, I'm from the Veins Geo--";
		next;
		mes "[Colonel Vito]";
		mes "Look at you. You don't";
		mes "even have your uniform";
		mes "yet. Still a rookie, eh?";
		mes "Looks like I'll have to";
		mes "personally train you as";
		mes "one of our holy knights!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "But I'm not--";
		next;
		mes "[Colonel Vito]";
		mes "You should be honored to";
		mes "have the rare opportunity";
		mes "to be trained by me, the";
		mes "great Colonel Vito. I'll mold";
		mes "you into a true warrior for";
		mes "Freya! Now follow me!";
		changequest 2122,2123;
		set aru_vol,14;
		disablenpc "Colonel Vito#2";
		close2;
		warp "thor_camp",156,68;
		end;
	}
	else if (aru_vol == 14) {
		enablenpc "Colonel Vito#1";
		mes "[Colonel Vito]";
		mes "What are you still";
		mes "doing standing there?";
		mes "Don't slack off! Come!";
		close2;
		disablenpc "Colonel Vito#2";
		warp "thor_camp",156,68;
		end;
	}
	end;
}

thor_camp,187,228,5	script	Colonel Vito#1	946,{
	end;

OnInit:
	disablenpc "Colonel Vito#1";
	end;
}

thor_camp,155,175,7	script	Colonel Vito#2	946,{
	end;

OnInit:
	disablenpc "Colonel Vito#2";
	end;
}

thor_camp,159,74,3	script	Colonel Vito#3	946,{
	if (aru_vol == 14) {
		mes "[Colonel Vito]";
		mes "I am Colonel Vito,";
		mes "and I'm in charge of";
		mes "the Arunafeltz camp";
		mes "here in Thor Volcano.";
		mes "What's your name, soldier?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes ""+strcharinfo(0)+", sir.";
		next;
		mes "[Colonel Vito]";
		mes "Hmpf! That's a weakling's";
		mes "name! I can tell that your";
		mes "mind and body are too weak!";
		mes "That won't do. How will you";
		mes "be worthy of serving the";
		mes "beautiful, graceful Freya?";
		next;
		mes "[Colonel Vito]";
		mes "You need more training.";
		mes "Take a break first, and";
		mes "prepare yourself. We will";
		mes "begin as soon as you're ready.";
		set aru_vol,15;
		close;
	}
	else if (aru_vol == 15) {
		mes "[Colonel Vito]";
		mes "First, we need to take";
		mes "care of that weak mind";
		mes "of yours. This first";
		mes "training exercise will";
		mes "be verbal based.";
		next;
		while(1) {
			mes "[Colonel Vito]";
			mes "Question one!";
			mes "Who do we fight for?";
			mes "Who do we live for?";
			next;
			if (select("Odin:Freya:Thor") == 2) {
				break;
			}
			mes "[Colonel Vito]";
			mes "You idiot!";
			percentheal -10,0;
			specialeffect2 EF_HIT2;
			next;
		}
		mes "[Colonel Vito]";
		mes "Right! Freya is not only";
		mes "a goddess of love, but she's";
		mes "also a goddess of war.";
		mes "We are on a sacred mission";
		mes "to recover the pieces of";
		mes "Ymir's Heart for her sake.";
		next;
		mes "[Colonel Vito]";
		mes "Freya was greatly wounded";
		mes "in the war among gods,";
		mes "humans, and demons.";
		mes "Odin, the leader of the";
		mes "gods, tried to help her, but";
		mes "even his power wasn't enough.";
		next;
		mes "[Colonel Vito]";
		mes "Odin did advise her to";
		mes "obtain Ymir's Heart, as";
		mes "it would fully recover her";
		mes "powers. That is why we are";
		mes "preparing for war: we must";
		mes "obtain Ymir's Heart for Freya!";
		next;
		mes "[Colonel Vito]";
		mes "DO YOU UNDERSTAND?!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Yes, sir!";
		next;
		mes "[Colonel Vito]";
		mes "Now, there's a country";
		mes "called the Rune-Midgarts";
		mes "Kingdom that's full of fools.";
		mes "Their ancestors branded us";
		mes "as heretics and drove us";
		mes "to this deserted land.";
		next;
		mes "[Colonel Vito]";
		mes "We cannot forgive how they";
		mes "denied us our freedom to";
		mes "worship Freya. Our people";
		mes "will have revenge on them.";
		mes "Mark my word, soldier.";
		mes "Now, repeat after me.";
		next;
		mes "[Colonel Vito]";
		mes "I, "+strcharinfo(0)+",";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I, "+strcharinfo(0)+",";
		next;
		while(1) {
			mes "[Colonel Vito]";
			mes "^FF0000as a devoted servant";
			mes "of Goddess Freya";
			next;
			input .@input$;
			set .@answer$,"as a devoted servant of Goddess Freya";
			if (.@input$ == .@answer$) {
				mes "["+strcharinfo(0)+"]";
				mes "as a devoted servant";
				mes "of Goddess Freya, the";
				mes "patron saint of the";
				mes "great Arunafeltz,^000000";
				next;
				break;
			}
			else {
				mes "[Colonel Vito]";
				mes "Wrong! Try again!";
				next;
			}
		}
		while(1) {
			mes "[Colonel Vito]";
			mes "^FF0000I pledge my honor to";
			mes "overthrow our mortal enemy";
			next;
			input .@input$;
			set .@answer$,"I pledge my honor to overthrow our mortal enemy";
			if (.@input$ == .@answer$) {
				mes "["+strcharinfo(0)+"]";
				mes "I pledge my honor to";
				mes "overthrow our mortal enemy,";
				mes "the Rune-Midgarts Kingdom.";
				next;
				break;
			}
			else {
				mes "[Colonel Vito]";
				mes "Wrong! Try again!";
				next;
			}
		}
		while(1) {
			mes "[Colonel Vito]";
			mes "^FF0000I will show no mercy^000000";
			next;
			input .@input$;
			set .@answer$,"I will show no mercy";
			if (.@input$ == .@answer$) {
				mes "["+strcharinfo(0)+"]";
				mes "I will show no mercy.";
				mes "Nothing will stay my hand.^000000";
				next;
				break;
			}
			else {
				mes "[Colonel Vito]";
				mes "Wrong! Try again!";
				next;
			}
		}
		while(1) {
			mes "[Colonel Vito]";
			mes "^FF0000I shall devote";
			mes "my entire life^000000";
			next;
			input .@input$;
			set .@answer$,"I shall devote my entire life";
			if (.@input$ == .@answer$) {
				mes "["+strcharinfo(0)+"]";
				mes "I shall devote my";
				mes "entire life to the";
				mes "full recovery of";
				mes "Goddess Freya.^000000";
				next;
				break;
			}
			else {
				mes "[Colonel Vito]";
				mes "Wrong! Try again!";
				next;
			}
		}
		while(1) {
			mes "[Colonel Vito]";
			mes "^FF0000Down with the";
			mes "Rune-Midgarts Kingdom!^000000";
			next;
			input .@input$;
			set .@answer$,"Down with the Rune-Midgarts Kingdom!";
			if (.@input$ == .@answer$) {
				mes "["+strcharinfo(0)+"]";
				mes "Down with the";
				mes "Rune-Midgarts Kingdom!^000000";
				next;
				break;
			}
			else {
				mes "[Colonel Vito]";
				mes "Wrong! Try again!";
				next;
			}
		}
		mes "[Colonel Vito]";
		mes "Good. Now you know the";
		mes "kind of attitude that you";
		mes "must have as a holy warrior";
		mes "in Freya's service. That";
		mes "is all for the first exercise,";
		mes "but there's one more left.";
		changequest 2123,2124;
		set aru_vol,16;
		close;
	}
	else if (aru_vol == 16) {
		mes "[Colonel Vito]";
		mes "Before we actually do";
		mes "the 2nd training exercise,";
		mes "I have a duty to assign to";
		mes "you. Find the huge pipe zone";
		mes "to the north of this building";
		mes "and find any broken machines.";
		set aru_vol,17;
		close;
	}
	else if (aru_vol == 17) {
		mes "[Colonel Vito]";
		mes "Inspect the machines";
		mes "in the pipe zone to the";
		mes "north of this building.";
		mes "Don't dawdle: move out!";
		close;
	}
	else if (aru_vol == 18) {
		mes "[Colonel Vito]";
		mes "Good work. Remember";
		mes "that your first priority is to";
		mes "check the control panel.";
		mes "It needs to be regularly";
		mes "inspected since it controls";
		mes "the camp's energy resources.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Yes, sir!";
		next;
		mes "[Colonel Vito]";
		mes "Now it's time for the";
		mes "second training exercise";
		mes "which will strengthen your";
		mes "body. See the dummy in";
		mes "front of you? Practice by";
		mes "chopping it 10 times. Go!";
		changequest 2125,2126;
		set aru_vol,19;
		next;
		if (select("Yes, sir!:What do you mean by chop?") == 1) {
			mes "[Colonel Vito]";
			mes "Focus your energy in";
			mes "your yell when you strike!";
			mes "Chop! 10 Times! Do it!";
			close;
		}
		mes "[Colonel Vito]";
		mes "Chop...? It's a hand chop.";
		mes "You strike the enemy with";
		mes "the bottom of your hand";
		mes "like a knife blade. How";
		mes "did you join the army";
		mes "without knowing that?";
		next;
		mes "[Colonel Vito]";
		mes "Focus your energy in";
		mes "your yell when you strike!";
		mes "Chop! 10 Times! Do it!";
		close;
	}
	else if (aru_vol == 20) {
		mes "[Colonel Vito]";
		mes "The more you train,";
		mes "the stronger you become.";
		mes "As you grow stronger, so";
		mes "does Freya's holy troops.";
		mes "Train everyday, and don't";
		mes "you ever slack off!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Yes, sir!";
		next;
		mes "[Colonel Vito]";
		mes "That is all for your";
		mes "training. If you have";
		mes "any questions about camp";
		mes "life, go ask Sahedi right";
		mes "outside this building.";
		mes "You are dismissed.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "(^333333Well... I think";
		mes "I will go back to";
		mes "Sahedi. Hopefully,";
		mes "he'll think of me as";
		mes "a geological researcher";
		mes "instead of as a soldier.^000000)";
		changequest 2126,2127;
		set aru_vol,21;
		close;
	}
	mes "[Colonel Vito]";
	mes "We must be ever";
	mes "vigilant in our training.";
	mes "You can never know when";
	mes "Freya will call on us to fight!";
	close;
}

thor_camp,141,62,0	script	#vol_study1::VeinsWarp	-1,3,3,{
OnTouch:
	if ((aru_vol > 13 && aru_vol < 17) || (aru_vol == 19)) {
		warp "thor_camp",156,67;
	}
	end;
}

thor_camp,172,72,0	duplicate(VeinsWarp)	#vol_study2	-1,3,3
thor_camp,172,38,0	duplicate(VeinsWarp)	#vol_study3	-1,3,3

thor_camp,172,132,0	script	#sita_vol	-1,3,3,{
OnTouch:
	if (aru_vol == 21) {
		mes "^3355FFThere's a stream of";
		mes "magma running down";
		mes "through a path under";
		mes "the barbed wires.^000000";
		next;
		mes "^3355FFYou can hear the faint";
		mes "sound of hammering, as if";
		mes "iron was being manufactured";
		mes "from deep underground.^000000";
		set aru_vol,22;
		close;
	}
	end;
}

thor_camp,148,310,0	script	#buki_vol	-1,5,5,{
OnTouch:
	if (aru_vol == 22) {
		mes "^3355FFPeople are carrying";
		mes "many heavy wooden boxes";
		mes "imprinted with the stamp";
		mes "of the Schwarzwald Republic.";
		mes "These must contain military";
		mes "supplies for the camp.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I should go back";
		mes "to Sahedi now.";
		changequest 2127,2128;
		set aru_vol,23;
		close;
	}
	end;
}

thor_camp,124,314,1	script	Soldier#vol1	939,{
	mes "[Thor Volcano Camp Soldier]";
	mes "Freya, I'm so exhausted!";
	mes "I'm starving to death too!";
	mes "When will we get more rations?";
	close;
}

thor_camp,134,309,5	script	Soldier#vol2	939,{
	mes "[Thor Volcano Camp Soldier]";
	mes "I hear we'll be eating";
	mes "chicken salad, fried chicken,";
	mes "and Kunlun style chicken for";
	mes "dinner tonight! I wonder who";
	mes "was rich enough to donate";
	mes "so much chicken to us?";
	next;
	mes "[Thor Volcano Camp Soldier]";
	mes "Heheh...";
	mes "I can't wait for dinner!";
	close;
}

thor_camp,109,167,3	script	Control Panel#vol	111,{
	if (aru_vol == 17) {
		mes "^3355FFThis control panel";
		mes "controls the main power";
		mes "resources for the Thor";
		mes "Volcano camp, helping it";
		mes "run its operations smoothly";
		mes "under the ground.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "All these pipes with molten";
		mes "rock flowing through them...";
		mes "I guess their heat is what";
		mes "powers this camp. That's";
		mes "actually a smart idea~";
		next;
		mes "^3355FFThe control panel emits";
		mes "faint mechanical noises";
		mes "and seems to be running";
		mes "pretty smoothly. Everything";
		mes "looks to be in working order.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "No problems here.";
		mes "I guess I can go";
		mes "back to that colonel.";
		changequest 2124,2125;
		set aru_vol,18;
		close;
	}
	end;
}

thor_camp,150,65,3	script	Dummy#1::VeinsDummy	111,{
	if (aru_vol == 19) {
		mes "^3355FFIt's a training dummy";
		mes "that looks like it can";
		mes "take a beating. Its chest";
		mes "is marked with the emblem";
		mes "of the Rune-Midgarts Kingdom.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Wow...";
		mes "They really hate the";
		mes "Rune-Midgarts Kingdom...";
		mes "(^333333Technically, I shouldn't";
		mes "be doing this. Isn't this";
		mes "considered treason?^000000)";
		next;
		mes "[Colonel Vito]";
		mes "I can't hear you,";
		mes "soldier! Make your";
		mes "voice loud and clear!";
		mes "Now... Execute attack!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Yes, sir!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "One!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Two!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Three!!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Four!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Five!!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Six!!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Seven!!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Eight!!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Nine!";
		next;
		specialeffect EF_HIT2;
		mes "["+strcharinfo(0)+"]";
		mes "Ten!";
		set aru_vol,20;
		close;
	}
	else if (aru_vol == 20) {
		mes "^3355FF*THUD*^000000";
		specialeffect EF_HIT2;
		emotion ET_HUK, playerattached();
		next;
		mes "[Colonel Vito]";
		mes "Soldier...";
		mes "How many times";
		mes "did I order you to";
		mes "chop the dummy?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "10 times, sir!";
		next;
		mes "[Colonel Vito]";
		mes "And how many times";
		mes "did you actually";
		mes "chop the dummy?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "11 times, sir!";
		next;
		mes "[Colonel Vito]";
		mes "Unacceptable!";
		mes "Listen to your orders";
		mes "this time, and do it";
		mes "again properly!";
		set aru_vol,19;
		close;
	}
}

thor_camp,156,65,3	duplicate(VeinsDummy)	Dummy#2	111
thor_camp,162,65,3	duplicate(VeinsDummy)	Dummy#3	111
thor_camp,150,57,3	duplicate(VeinsDummy)	Dummy#4	111
thor_camp,156,57,3	duplicate(VeinsDummy)	Dummy#5	111
thor_camp,162,57,3	duplicate(VeinsDummy)	Dummy#6	111

thor_camp,248,104,5	script	Aitra#vol	939,{
	end;
OnInit:
	disablenpc "Aitra#vol";
	end;
}

thor_camp,49,97,3	script	High Priest#vol	933,{
	mes "^3355FFYou'd better not";
	mes "do anything too";
	mes "conspicuous in";
	mes "front of him.^000000";
	close;
}

thor_camp,49,122,1	script	Thor Volcano Soldier#vo1	939,{
	mes "^3355FFYou'd better not";
	mes "do anything too";
	mes "conspicuous in";
	mes "front of him.^000000";
	close;
}

thor_camp,31,93,1	script	Thor Volcano Soldier#vo2	939,{
	mes "^3355FFYou'd better not";
	mes "do anything too";
	mes "conspicuous in";
	mes "front of him.^000000";
	close;
}

thor_camp,59,79,1	script	Thor Volcano Soldier#vo3	939,{
	mes "^3355FFYou'd better not";
	mes "do anything too";
	mes "conspicuous in";
	mes "front of him.^000000";
	close;
}

thor_camp,143,114,1	script	Thor Volcano Soldier#vo4	939,{
	emotion ET_CRY;
	mes "[Soldier]";
	mes "Oh Freya...";
	mes "Bless this Old Blue Box";
	mes "so that I don't get anything";
	mes "lame again. I am so tired";
	mes "of getting arrows from these...";
	close;
}

thor_camp,206,92,3	script	Thor Volcano Soldier#vo5	939,{
	mes "[Soldier]";
	mes "Ah, time to";
	mes "go to work.";
	next;
	mes "[Soldier]";
	mes "What th-?!";
	mes "Something smells";
	mes "like sweaty socks that";
	mes "haven't been washed!";
	close;
}

thor_camp,201,321,1	script	Thor Volcano Soldier#vo6	939,{
	mes "[Soldier]";
	mes "Yo-ho! Yo-ho!";
	close;
}

thor_camp,196,315,7	script	Thor Volcano Soldier#vo7	939,{
	mes "[Soldier]";
	mes "I guess I need to go";
	mes "on Guardian polishing";
	mes "duty. Those things are";
	mes "so huge, and I gotta";
	mes "clean up about twenty...";
	close;
}

thor_camp,181,231,0	script	Guardian#vol_7	111,{
	mes "^3355FFThere are many guardians";
	mes "here in different stages";
	mes "of disassembly. It looks";
	mes "like they're all in the";
	mes "middle of being repaired.^000000";
	close;
}

thor_camp,98,213,5	script	Thor Volcano Soldier#vo8	939,{
	mes "[Soldier]";
	mes "Aren't you the one from";
	mes "the geological research";
	mes "center? There's nothing";
	mes "for you here, we're just";
	mes "performing maintenance";
	mes "on these guardians.";
	close;
}

thor_camp,98,209,5	script	Thor Volcano Soldier#vo9	939,{
	mes "[Soldier]";
	mes "Why am I always";
	mes "stationed here?!";
	mes "No one ever comes";
	mes "here! Nobody!";
	close;
}

thor_v02,143,78,0	script	#totcamp	45,2,2,{
OnTouch_:
	if (rachel_camel < 24) {
		warp "que_thor",65,55;
		end;
	}
	warp "que_thor",182,55;
	end;
}

que_thor,69,56,0	script	#tov_1	45,2,2,{
OnTouch_:
	warp "thor_v02",146,84;
	end;
}

que_thor,187,56,0	script	#tov_2	45,2,2,{
OnTouch_:
	warp "thor_v02",146,84;
	end;
}

thor_camp,62,98,0	script	#volbq	-1,5,5,{
OnTouch:
	mes "^3355FFThere is an old man";
	mes "in high priest robes";
	mes "in front of you.^000000";
	next;
	mes "^3355FFYou'd better not";
	mes "do anything too";
	mes "conspicuous in";
	mes "front of him.^000000";
	close;
}

thor_camp,246,191,3	script	Guard#goto	939,{
	mes "[Guard]";
	mes "What now?";
	mes "Can't you see I'm busy?";
	next;
	if (select("Let me go out.:I'm sorry.") == 1) {
		mes "[Guard]";
		mes "Hurry up, and get out!";
		close2;
		warp "que_thor",145,60;
		end;
	}
	mes "[Guard]";
	mes "If you're sorry,";
	mes "stop bugging me!";
	close;
}

veins,302,166,0	script	#whoau	-1,2,2,{
OnTouch_:
	mes "[House Owner]";
	mes "Wh-who the hell";
	mes "are you? Honey!";
	mes "There's this...";
	mes "person in our home!";
	next;
	mes "^3355FFHubbie never came.";
	mes "Nobody messes with";
	mes ""+strcharinfo(0)+". Nobody.^000000";
	close;
}

ve_in,235,135,5	script	Bartender#ve	947,{
	mes "[Bartender]";
	mes "Welcome to our tavern.";
	mes "Please, have a seat.";
	mes "Let me bring you a";
	mes "glass of ice water first.";
	close;
}

ve_in,237,131,1	script	Female Customer#ve1	940,{
	mes "[Female Customer]";
	mes "Bartender, aren't any of";
	mes "your regulars nice young";
	mes "men? You know, I've been";
	mes "pretty lonely lately...";
	next;
	if (Sex == SEX_FEMALE) {
		mes "[Bartender]";
		mes "Haha, well,";
		mes "I'm not so sure..";
		next;
		mes "[Bartender]";
		mes "How about... me?";
		next;
		mes "[Female Customer]";
		mes "Hmpf...";
		next;
		mes "[Bartender]";
		mes "Oh, come on!";
		mes "I was kidding~";
		emotion ET_CRY;
		close;
	}
	mes "[Bartender]";
	mes "Haha, well,";
	mes "I'm not so sure..";
	mes "What about this nice";
	mes "young adventurer here?";
	next;
	mes "["+strcharinfo(0)+"]";
	mes "Meee?";
	emotion ET_PROFUSELY_SWEAT, playerattached();
	next;
	mes "[Female Customer]";
	mes "Mmm...";
	mes "Not my style.";
	emotion ET_THINK, playerattached();
	close;
}

ve_in,239,107,1	script	Male Customer#ve2	943,{
	mes "[Male Customer]";
	mes "How can that ugly old";
	mes "man have girls hanging";
	mes "off his arms when I just";
	mes "got dumped by my girlfriend";
	mes "and ditched by all my friends?!";
	next;
	mes "[Male Customer]";
	mes "Oh, alcohol...";
	mes "Right now, you're";
	mes "my only friend in";
	mes "all the world...";
	mes "A toast... To drinking!";
	specialeffect EF_ASPERSIO;
	close;
}
