//===== rAthena Script ======================================= 
//= Rachel Quests
//===== By: ================================================== 
//= L0ne_W0lf
//===== Current Version: ===================================== 
//= 3.6
//===== Compatible With: ===================================== 
//= rAthena Project
//===== Description: ========================================= 
//= Collection of Rachel Quests 
//= Lost Child Quest:
//= - End of quest coincides with opening the Sanctuary.
//= - Variable in use: lost_boy (max 13)
//= Bruspetti Quest:
//= - [Official Conversion]
//= - Requires friendship quest as a prerequisite.
//= - Variable in use: rach_vice (max 24)
//= Ice Necklace Quest:
//= - iRO uses a different sprite for Urstia, and no cutins.
//= - Variable in use: ice_necklace_q (max 7)
//= Sanctuary Quest:
//= - Actually two quests in one. Donation and dungeon quest.
//= - Requires 10000 donations before players can start the quest.
//= - Variable in use: ra_tem_q (max 23) (unset at end)
//= - Variable in use: Once completed MISC_QUEST bit 8192 is set
//= - Variable in use: ra_have_donated (0 no/1 yes)
//= - Variable in use: $rachel_donate (max 10000)
//===== Additional Comments: ================================= 
//= 3.0 Large reordering of Zhed, and Peace to the Arunafeltz addition. [L0ne_W0lf]
//=     Some more numeric conversion, and some other cleanup.
//= 3.1 Updated Ice Necklace quest, added missing checks. [L0ne_W0lf]
//= 3.2 Added missing updates for Peace to the Arunafeltz quest. [L0ne_W0lf]
//= 3.3 Fixed occurance of PcName. [L0ne_W0lf]
//=     Fixed level 4 ID warps always being usable.
//= 3.3a Fixed level 4 ID warps again. (Bugreport:4102) [L0ne_W0lf]
//= 3.4 Added quest log entries for:
//=     - Ice Necklace Quest
//=     - Thor Volcano Base Quest addition.
//= 3.5 Updated RE/Pre-RE EXP. [Euphy]
//= 3.6 Added questlog support. [Euphy]
//============================================================ 

// Lost Child Quest (Prerequisite to High Priest quest) :: rachel_wonjumin
//============================================================ 
ra_in01,384,246,3	script	Vincent#ra_in01	47,{
	if (BaseLevel < 60) {
		mes "[Vincent]";
		mes "You're inside Sir Zhed's";
		mes "looking for new employees,";
		mes "I don't think you're suited";
		mes "for this kind of domestic";
		mes "work, brave adventurer.";
		close;
	}
	if (lost_boy < 1) {
		mes "[Vincent]";
		mes "I am Vincert, steward of";
		mes "this mansion and faithful";
		mes "servant to its master, Sir";
		mes "Zhed, the most powerful";
		mes "man in all of Arunafeltz.";
		next;
		mes "[Vincent]";
		mes "My master is currently out";
		mes "to attend the High Priest";
		mes "assembly, and has been gone";
		mes "for a few days. I would like to";
		mes "ask you for your help with";
		mes "a problem on his behalf.";
		next;
		switch(select("I'm too busy.:Sure, why not?")) {
		case 1:
			mes "[Vincent]";
			mes "I understand.";
			mes "I'm sorry that you're";
			mes "too busy at the moment...";
			mes "If you should be available";
			mes "later, then I'd like to ask for";
			mes "your assistance once again.";
			close;
		case 2:
			mes "[Vincent]";
			mes "Thank you. You see,";
			mes "the pope awarded Sir Zhed";
			mes "for his great contributions to";
			mes "Arunafeltz with a precious gem.";
			mes "However, this jewel is missing";
			mes "and I need your help to find it.";
			next;
			mes "[Vincent]";
			mes "I don't have any proof, but";
			mes "I suspect it was stolen by";
			mes "Phobe, a servant that";
			mes "disappeared about the same";
			mes "time the gem disappeared.";
			next;
			mes "[Vincent]";
			mes "Please retrieve this gem";
			mes "and find who stole it before";
			mes "Sir Zhed returns and finds";
			mes "out what happened. If you";
			mes "can keep this secret, I'd";
			mes "very much appreciate it.";
			next;
			mes "[Vincent]";
			mes "I believe that you'd want";
			mes "to interrogate Phobe, but";
			mes "he has run away somewhere.";
			mes "You might want to question the";
			mes "other servants of his whereabouts. Thanks again for your help.";
			set lost_boy,1;
			setquest 8089;
			close;
		}
	}
	else if ((lost_boy >= 1) && (lost_boy < 4)) {
		mes "[Vincent]";
		mes "I suggest looking around";
		mes "the mansion and asking the";
		mes "servants for any clues about";
		mes "Phobe's current location.";
		close;
	}
	else if ((lost_boy >= 4) && (lost_boy < 7)) {
		mes "[Vincent]";
		mes "We're running out";
		mes "of time... Please find";
		mes "the gem and Phobe";
		mes "as soon as you can.";
		close;
	}
	else if (lost_boy == 7) {
		mes "[Vincent]";
		mes "Ah...!";
		mes "H-hello! How are";
		mes "you still, er... That";
		mes "look on your face? Did";
		mes "you happen to find Logan?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "No! I actually got";
		mes "stabbed by Mogan, and";
		mes "then we had a talk. What's";
		mes "the big idea? I come to help";
		mes "you, and you try to have me";
		mes "killed! I want an explanation!";
		next;
		mes "[Vincent]";
		mes "I... Yes, you deserve";
		mes "the truth after wh-what";
		mes "I tried to do to you. First";
		mes "of all, Phobe is my son, but";
		mes "please don't tell anybody!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What?";
		mes "Why, what's";
		mes "the big deal?";
		next;
		mes "[Vincent]";
		mes "There's something of";
		mes "a class system here in";
		mes "Arunafeltz. No one talks";
		mes "about it, but those that";
		mes "immigrated here and built this";
		mes "city are the dominant class.";
		next;
		mes "[Vincent]";
		mes "The native people are";
		mes "second class citizens that";
		mes "are looked down upon by the";
		mes "descendents of the settlers";
		mes "that developed this city. It";
		mes "is a sad, undeniable truth.";
		next;
		mes "[Vincent]";
		mes "The native people typically";
		mes "suffer from lower class status,";
		mes "and usually do the hard, blue";
		mes "collar work in the city. Jenny,";
		mes "Phobe's mother, is one of them.";
		next;
		mes "[Vincent]";
		mes "It's taboo for me to love her,";
		mes "especially since Sir Zhed has";
		mes "taken me under his wing and";
		mes "been like a father to me. If";
		mes "I married her, it'd greatly";
		mes "damage his reputation.";
		next;
		mes "[Vincent]";
		mes "I tried to control my";
		mes "feelings but... Well,";
		mes "Phobe was born. And there's";
		mes "no going back now. We did";
		mes "get secretly married though,";
		mes "and I don't regret that.";
		next;
		mes "[Vincent]";
		mes "Phobe must resent me...";
		mes "I've had to treat him and";
		mes "his mother like slaves";
		mes "in front of other people.";
		mes "I know it's horrible... To be";
		mes "so cold to those you love.";
		next;
		mes "[Vincent]";
		mes "When he ran off with the";
		mes "jewel, I was actually more";
		mes "worried about Phobe than";
		mes "my master's treasure. So...";
		mes "I did what I could to try to";
		mes "get him back: I hired you.";
		next;
		mes "[Vincent]";
		mes "However, once you found";
		mes "Phobe, I planned to have";
		mes "you killed so that we could";
		mes "blame you for the theft. I'm";
		mes "sorry, I know it's wrong, but";
		mes "I was so worried about my boy!";
		next;
		mes "[Vincent]";
		mes "I hope you forgive me...";
		mes "I'll do what I should've";
		mes "done from the beginning...";
		mes "I'll take full responsibility";
		mes "for the gem's theft, and Sir";
		mes "Zhed can do to me what he will.";
		next;
		mes "[Vincent]";
		mes "The gem is very special...";
		mes "Our pope commanded my";
		mes "master to keep the jewel";
		mes "safely, as it has the power";
		mes "to save Arunafeltz and Rachel";
		mes "when the time comes.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "The gem is really that";
		mes "important, huh? Well, you";
		mes "almost had me killed, but";
		mes "since I'm still alive, I guess";
		mes "I can overlook it, you know?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "You won't get in trouble";
		mes "if I can find the jewel and";
		mes "Phobe before Sir Zhed";
		mes "returns, so I'll try to find";
		mes "them for you as soon as I can.";
		next;
		mes "[Vincent]";
		mes "You're willing to";
		mes "do that for me? ^333333*Sob*^000000";
		mes "Even after what I've put";
		mes "you through? ^333333*Sniff*^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Eh, I went through all";
		mes "this trouble already, so";
		mes "I might as well finish the";
		mes "job. Besides, Phobe is";
		mes "just a kid, so he's probably";
		mes "hiding somewhere in town.";
		set lost_boy,8;
		changequest 8094,8095;
		close;
	}
	else if (lost_boy == 8) {
		mes "[Vincent]";
		mes "The gem is very special...";
		mes "Our pope commanded my";
		mes "master to keep the jewel";
		mes "safely, as it has the power";
		mes "to save Arunafeltz and Rachel";
		mes "when the time comes.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "The gem is really that";
		mes "important, huh? Well, you";
		mes "almost had me killed, but";
		mes "since I'm still alive, I guess";
		mes "I can overlook it, you know?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "You won't get in trouble";
		mes "if I can find the jewel and";
		mes "Phobe before Sir Zhed";
		mes "returns, so I'll try to find";
		mes "them for you as soon as I can.";
		next;
		mes "[Vincent]";
		mes "You're willing to";
		mes "do that for me? ^333333*Sob*^000000";
		mes "Even after what I've put";
		mes "you through? ^333333*Sniff*^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Eh, I went through all";
		mes "this trouble already, so";
		mes "I might as well finish the";
		mes "job. Besides, Phobe is";
		mes "just a kid, so he's probably";
		mes "hiding somewhere in town...";
		close;
	}
	else if (lost_boy == 9) {
		mes "[Vincent]";
		mes "You came back!";
		mes "Were you able to";
		mes "find Phobe?! H-how";
		mes "is he? Is he alright?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Huh? Oh yeah, he's";
		mes "just fine. I found Phobe";
		mes "loitering around Freya's";
		mes "Spring. Er, he's not willing";
		mes "to come home yet, but he did";
		mes "give me the gem he stole.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "So... I earned my";
		mes "reward now, right?";
		mes "And no one has to die?";
		next;
		mes "[Vincent]";
		mes "Yes, yes, thank you so";
		mes "much! I'll never forget";
		mes "what you've done for me.";
		mes "Oh, my boy is alright!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "H-hey! Um, take";
		mes "this jewel! You need";
		mes "to return it to wherever";
		mes "it's supposed to go, right?";
		next;
		mes "[Vincent]";
		mes "Oh, yes, I'd better do";
		mes "that. While I return this";
		mes "jewel, would you please";
		mes "tell my wife Jenny that our";
		mes "boy is okay? She's been";
		mes "very worried about him, so...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "You want me to tell";
		mes "Jenny about Phobe?";
		mes "Sure, sure, I'll do that.";
		set lost_boy,10;
		changequest 8096,8097;
		close;
	}
	else if (lost_boy == 10) {
		mes "[Vincent]";
		mes "Oh! While I return this";
		mes "jewel, would you please";
		mes "tell my wife Jenny that our";
		mes "boy is okay? She's been";
		mes "very worried about him, so...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "You want me to tell";
		mes "Jenny about Phobe?";
		mes "Sure, sure, I'll do that.";
		close;
	}
	else if (lost_boy == 11) {
		mes "["+strcharinfo(0)+"]";
		mes "I told Jenny that";
		mes "about Phobe, and that";
		mes "the gem was returned...";
		mes "She seemed pretty relieved...";
		next;
		mes "[Vincent]";
		mes "Thank you so much,";
		mes "adventurer. She's such";
		mes "a kind, loving woman, and";
		mes "I hate to see her go through";
		mes "all that torment. I don't deserve";
		mes "such a beautiful woman...";
		next;
		mes "[Vincent]";
		mes "It's very fortunate that";
		mes "you've come to save us...";
		mes "Please drop by the next";
		mes "time that you're in Rachel,";
		mes "and I'll try to help you if I can.";
		next;
		mes "[Vincent]";
		mes "Ah, actually, I have";
		mes "one last favor to ask";
		mes "of you. Would you please";
		mes "bring this note and package";
		mes "to my master? He should still";
		mes "be in the temple right now.";
		next;
		mes "[Vincent]";
		mes "If you ask for High";
		mes "Priest Zhed and mention";
		mes "that I sent you, then he";
		mes "will meet with you.";
		next;
		mes "[Vincent]";
		mes "Now is the time for";
		mes "me to give you your";
		mes "reward. How about that?";
		mes "I don't know what's inside,";
		mes "but I know these items are";
		mes "quite valuable nowadays...";
		set lost_boy,12;
		changequest 8098,8099;
		getitem 617,1; //Old_Violet_Box
		next;
		mes "[Vincent]";
		mes "Ah, and this note is a";
		mes "letter of recommendation";
		mes "that I have written for you.";
		mes "Please deliver it to Sir Zhed";
		mes "as soon as possible. Good bye,";
		mes "and thank you for everything.";
		next;
		mes "^3355FFYou received a letter";
		mes "of recommendation";
		mes "from Vincent.^000000";
		close;
	}
	else {
		mes "[Vincent]";
		mes "Thank you for everything";
		mes "that you've done for me";
		mes "and my family. If you ever";
		mes "need help, please don't";
		mes "hesitate to ask me, alright?";
		close;
	}
}

rachel,114,232,3	script	Logan#ra_in01	869,{
	if ((lost_boy < 1) || (lost_boy >= 3)) {
		mes "[Logan]";
		mes "I'm just Logan, one";
		mes "of the many servants";
		mes "working here in Sir Zhed's";
		mes "glorious mansion. I've got";
		mes "a lot of work to do, so don't";
		mes "don't distract me, please.";
		close;
	}
	else if (lost_boy == 1) {
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me, but do";
		mes "you know man named";
		mes "Phobe by any chance?";
		mes "I heard that he used";
		mes "to work around here.";
		next;
		mes "[Logan]";
		mes "Er, may I ask";
		mes "you are? Why are";
		mes "you looking for him?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Well, I've just been";
		mes "hired to look for him,";
		mes "and I was told that asking";
		mes "the servants around here";
		mes "was a good starting point.";
		next;
		mes "[Logan]";
		mes "Oh, okay. Yeah, Phobe's";
		mes "been missing ever since";
		mes "he left to buy stuff from";
		mes "the market a few days ago.";
		mes "I hope the kid is alright.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Er, kid? Just";
		mes "how old is Phobe?";
		next;
		mes "[Logan]";
		mes "He just turned fifteen.";
		mes "That's all I know about";
		mes "him. Truth be told, I don't";
		mes "know much since I just";
		mes "started working here. Why don't";
		mes "you ask the senior employees?";
		next;
		mes "[Logan]";
		mes "Let's see...";
		mes "You could ask Mr. Manson";
		mes "inside the mansion. He's";
		mes "been working here for a while.";
		set lost_boy,2;
		changequest 8089,8090;
		close;
	}
	else if (lost_boy == 2) {
		mes "[Logan]";
		mes "If you want to learn";
		mes "more about Phobe, you'd";
		mes "better ask one of the senior";
		mes "employees since I just started";
		mes "working here. Mr. Manson in";
		mes "the mansion is a good bet.";
		close;
	}
}

ra_in01,372,200,3	script	Manson#ra_in01	929,{
	if (lost_boy < 1) {
		mes "[Manson]";
		mes "I am Manson, one of the";
		mes "many servants working here";
		mes "in Sir Zhed's mansion. Er,";
		mes "would you be more careful";
		mes "walking around here? I hate";
		mes "cleaning up after visitors.";
		close;
	}
	else if (lost_boy == 1) {
		mes "[Manson]";
		mes "You know, considering";
		mes "that natives like me are";
		mes "looked down upon and";
		mes "are kinda of lower class,";
		mes "I'm really lucky to work for";
		mes "Sir Zhed here in the mansion.";
		close;
	}
	else if (lost_boy == 2) {
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me, but do you";
		mes "know a man named Phobe?";
		mes "He's gone missing, so I've";
		mes "been hired to look for him.";
		next;
		mes "[Manson]";
		mes "Ah, so you're the one";
		mes "that Vincent hired, huh?";
		mes "That's good, that's good.";
		mes "I'm pretty sure Phobe is";
		mes "hiding somewhere and";
		mes "just goofing around.";
		next;
		mes "[Manson]";
		mes "I'm sure he can take care";
		mes "of himself, so we won't have";
		mes "to worry too much. Let's see,";
		mes "he asked me if I had any";
		mes "errands to for him to do,";
		mes "so I sent him to the market.";
		next;
		mes "[Manson]";
		mes "That's the last time I saw";
		mes "him. I guess he's using the";
		mes "money I gave him to feed himself";
		mes "while he's run away. He's young,";
		mes "so I can't really blame him.";
		mes "We've all done crazy things~";
		next;
		mes "[Manson]";
		mes "Ah, our gardener Jenny";
		mes "was the one that introduced";
		mes "me to him. She's worked for";
		mes "Sir Zhed for a long time, and";
		mes "she loves kids. I guess she's";
		mes "got a soft spot for Phobe.";
		next;
		mes "[Manson]";
		mes "No one knows who his";
		mes "parents are, so I guess";
		mes "he's an orphan. That's";
		mes "probably why she has him.";
		mes "working with us in the mansion.";
		next;
		mes "[Manson]";
		mes "Jenny has done a lot for";
		mes "that boy. We skipped our";
		mes "usual employment process";
		mes "just for her, you know? And";
		mes "now Jenny and even Vincent";
		mes "are worried about him missing.";
		next;
		mes "[Manson]";
		mes "You know, if you want to";
		mes "know more about that kid,";
		mes "you should talk to Jenny.";
		mes "She's working in the garden";
		mes "now, and she'd appreciate";
		mes "your help in finding Phobe.";
		set lost_boy,3;
		changequest 8090,8091;
		close;
	}
	else if (lost_boy == 3) {
		mes "[Manson]";
		mes "You know, if you want to";
		mes "know more about that kid,";
		mes "you should talk to Jenny.";
		mes "She's working in the garden";
		mes "now, and she'd appreciate";
		mes "your help in finding Phobe.";
		close;
	}
	else {
		mes "[Manson]";
		mes "Nuts, there's so much";
		mes "work to do! I never seem";
		mes "to get it all done until";
		mes "the very end of the day.";
		mes "Ah well, it's a living.";
		close;
	}
}

rachel,48,237,3	script	Jenny#ra_in01	894,{
	if (lost_boy < 3) {
		mes "[Jenny]";
		mes "These grounds are owned by";
		mes "Sir Zhed and are considered";
		mes "private property. Please";
		mes "leave immediately if you";
		mes "haven't been invited!";
		close;
	}
	else if (lost_boy == 3) {
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me, but are";
		mes "you Jenny? I've been";
		mes "told by Manson to speak";
		mes "to you if I wanted to learn";
		mes "more about Phobe. You see,";
		mes "Vincent hired me to find him.";
		next;
		mes "[Jenny]";
		mes "Oh! That's wonderful";
		mes "news! Y-yes, I'm Jenny.";
		mes "What did you need to know?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Er, anything you could";
		mes "tell me would be fine.";
		mes "Things like his favorite";
		mes "hangouts might also be";
		mes "helpful for me to investigate.";
		next;
		mes "[Jenny]";
		mes "Phobe is such a good";
		mes "boy. I don't know what";
		mes "kind of trouble he's gotten";
		mes "into this time, but he's";
		mes "really a great kid if you";
		mes "just give him a chance.";
		next;
		mes "[Jenny]";
		mes "Oh... Vincent must";
		mes "also be--I'm-I'm very";
		mes "glad that he's hired";
		mes "you. But as for places";
		mes "he might be found, I'm";
		mes "not sure if I know.";
		next;
		mes "[Jenny]";
		mes "Have you tried the";
		mes "market? That's where";
		mes "he was last seen, wasn't it?";
		mes "Maybe they have some idea";
		mes "of where he was going?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Oh... That's a good idea.";
		mes "Alright, I guess I can go";
		mes "to the market and ask around.";
		set lost_boy,4;
		changequest 8091,8092;
		close;
	}
	else if ((lost_boy >= 3) && (lost_boy < 6)) {
		mes "[Jenny]";
		mes "Please find Phobe,";
		mes "and bring him back";
		mes "safely as soon as you";
		mes "can! I can't help but worry";
		mes "about that boy, you know?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I'll do my best";
		mes "First, I guess I should ask";
		mes "around the market where";
		mes "Phobe was last seen.";
		close;
	}
	else if (lost_boy == 6) {
		mes "[Jenny]";
		mes "Please find Phobe,";
		mes "and bring him back";
		mes "safely as soon as you";
		mes "can! I can't help but worry";
		mes "about that boy, you know?";
		close;
	}
	else if ((lost_boy > 6) && (lost_boy < 11)) {
		mes "[Jenny]";
		mes "Oh! You're back!";
		mes "Did you find Phobe?";
		next;
		if (lost_boy == 7) {
			mes "["+strcharinfo(0)+"]";
			mes "Actually... Uh...";
			mes "I have something very";
			mes "important to discuss";
			mes "with Vincent first.";
		}
		else if (lost_boy == 8) {
			mes "["+strcharinfo(0)+"]";
			mes "Actually... Uh...";
			mes "Not just yet. But I'm";
			mes "following a really good";
			mes "lead! Don't worry, I'll";
			mes "find him soon, I promise.";
		}
		else if (lost_boy == 9) {
			mes "["+strcharinfo(0)+"]";
			mes "Actually... Uh...";
			mes "I should report to";
			mes "Vincent first and return";
			mes "this jewel, but I'll deliver";
			mes "some good news soon,";
			mes "I promise. Se eyou later~";
		}
		else if (lost_boy == 10) {
			mes "["+strcharinfo(0)+"]";
			mes "Yes, he's fine, just";
			mes "hanging around the south";
			mes "side of town. He's safe,";
			mes "but he's not willing to";
			mes "come home just right now.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "The jewel's been returned,";
			mes "so everything should be fine";
			mes "now. Also, Vincent explained";
			mes "everything to me. You know,";
			mes "how you, him, and Phobe";
			mes "are all related, so...";
			next;
			mes "[Jenny]";
			mes "Oh! Oh, I see. He told";
			mes "you our secret? Well,";
			mes "I guess we can trust you.";
			mes "Mostly, I'm just relieved";
			mes "that my son is alright, and";
			mes "that he won't get in trouble.";
			next;
			mes "[Jenny]";
			mes "Anyway, even though Phobe";
			mes "is being pretty stubborn,";
			mes "I'm sure he'll come back";
			mes "soon. As he grows up, I think";
			mes "he'll understand his father's";
			mes "position a little bit better.";
			next;
			mes "[Jenny]";
			mes "I hope so. Although";
			mes "it's been very hard for";
			mes "all three of us to live";
			mes "this way, I couldn't be";
			mes "happier. Thank you for";
			mes "all of your help, adventurer~";
			set lost_boy,11;
			changequest 8097,8098;
		}
		close;
	}
	else if ((lost_boy > 10) && (lost_boy < 13)) {
		mes "[Jenny]";
		mes "Thank you so much for";
		mes "finding my son. If there's";
		mes "anything I can ever do for";
		mes "you, please let me know.";
		mes "You don't know how grateful";
		mes "I am to you as a mother...";
		close;
	}
	end;
}

rachel,138,73,5	script	Idle Merchant#ra_in01	85,{
	if ((lost_boy < 4) || (lost_boy >= 6)) {
		mes "[Idle Merchant]";
		mes "Man! Business is going";
		mes "sooo slooow right now!";
		mes "Well, no point standing";
		mes "around this dump much";
		mes "longer. Maybe I should";
		mes "pack it up and go home.";
		close;
	}
	else if (lost_boy == 4) {
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me?";
		mes "Hello? Sir?";
		next;
		mes "[Idle Merchant]";
		mes "Finally! A customer!";
		mes "I knew someone would come";
		mes "eventually! So whaddya want";
		mes "to buy? I got all sorts of";
		mes "handy little knickknacks~";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Sorry, not interested.";
		mes "I just wanted to ask if";
		mes "you've seen a boy around";
		mes "here that's about fifteen";
		mes "years old. He supposedly";
		mes "ran away from home, so.";
		next;
		mes "[Idle Merchant]";
		mes "Fifteen? My own son is";
		mes "that age... I'm sorry, but";
		mes "I haven't seen any lads that";
		mes "age around here in the past";
		mes "few days. Though, you might";
		mes "want to ask the other merchants.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Cool. Thanks a lot.";
		next;
		mes "[Idle Merchant]";
		mes "Alright, then!";
		mes "Good luck bringing that";
		mes "boy home! Oh, and are you";
		mes "sure that you don't want";
		mes "to take a look around?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Er, what exactly do";
		mes "you sell here? I can't";
		mes "recognize any of these";
		mes "goods that you're selling.";
		next;
		mes "[Idle Merchant]";
		mes "You know how some restaurants";
		mes "offer dishes with mock meat";
		mes "made out of vegetables and";
		mes "stuff like wheat gluten, right?";
		next;
		mes "[Idle Merchant]";
		mes "Get this: mock vegetables";
		mes "made out of pure meat! Now";
		mes "how's that for the best of both";
		mes "worlds? Yeah? Yeah? Here,";
		mes "why don't you try a sample?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What the?!";
		mes "No way in hell am";
		mes "I putting that in my";
		mes "mouth! What the heck";
		mes "is that supposed to be?";
		next;
		mes "[Idle Merchant]";
		mes "It's the world's";
		mes "first zucchini...";
		mes "Made completely out";
		mes "of Grade A Sirloin Steak!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "No no no! I've got to";
		mes "go and ask those other";
		mes "merchants about that";
		mes "missing boy. Er, but";
		mes "good luck selling that.";
		set lost_boy,5;
		close;
	}
	else if (lost_boy >= 5) {
		mes "["+strcharinfo(0)+"]";
		mes "(^333333I better ask the other";
		mes "merchants around here if";
		mes "they've seen that boy. I'm";
		mes "wasting my time talking to";
		mes "this crazy merchant and his";
		mes "ridiculous mock vegetables.^000000)";
		close;
	}
}

rachel,120,47,3	script	Idle Merchant#ra_in01_2	85,{
	if ((lost_boy < 5) || (lost_boy > 6)) {
		mes "[Idle Merchant]";
		mes "I'm thinking of quitting";
		mes "this business... No one";
		mes "to seems to want whatever";
		mes "I'm selling! I definitely can't";
		mes "make a living like this.";
		close;
	}
	else if (lost_boy == 5) {
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me,";
		mes "um... Hello?";
		next;
		mes "[Idle Merchant]";
		mes "Oh! Welcome to my shop!";
		mes "How can I help you today?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Actually, I'm not";
		mes "here to buy anything...";
		mes "I'm looking for a boy";
		mes "named Phobe that was";
		mes "here a few days ago.";
		mes "Have you seen him?";
		next;
		mes "[Idle Merchant]";
		mes "Oh! Yeah, last night,";
		mes "some guy asked me to tell";
		mes "anyone looking for this guy";
		mes "named Phobe to give you";
		mes "a message. Basically, he wants";
		mes "you to come to the ''ice cave.''";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Who asked you to tell";
		mes "me that? How did he know";
		mes "that I'd come over here?";
		mes "Does he know where Phobe";
		mes "is? I-Is Phobe alright?";
		next;
		mes "[Idle Merchant]";
		mes "No clue. I told you all";
		mes "I know. Let's see, his";
		mes "name was... Nogan?";
		mes "Rogan? Something";
		mes "like that. That's";
		mes "all I know, honest.";
		next;
		mes "[Idle Merchant]";
		mes "So the kid's missing,";
		mes "huh? Good luck finding";
		mes "him. Oh, and be careful";
		mes "in that ice cave. That place";
		mes "can be plenty dangerous.";
		set lost_boy,6;
		changequest 8092,8093;
		close;
	}
	else if (lost_boy == 6) {
		mes "[Idle Merchant]";
		mes "So yeah, last night,";
		mes "some guy asked me to tell";
		mes "anyone looking for this guy";
		mes "named Phobe to give you";
		mes "a message. Basically, he wants";
		mes "you to come to the ''ice cave.''";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Who asked you to tell";
		mes "me that? How did he know";
		mes "that I'd come over here?";
		mes "Does he know where Phobe";
		mes "is? I-Is Phobe alright?";
		next;
		mes "[Idle Merchant]";
		mes "No clue. I told you all";
		mes "I know. Let's see, his";
		mes "name was... Nogan?";
		mes "Rogan? Something";
		mes "like that. That's";
		mes "all I know, honest.";
		next;
		mes "[Idle Merchant]";
		mes "So the kid's missing,";
		mes "huh? Good luck finding";
		mes "him. Oh, and be careful";
		mes "in that ice cave. That place";
		mes "can be plenty dangerous.";
		close;
	}
}

ra_fild01,245,325,3	script	Suspicious Man#ra_in01	934,{
	if ((lost_boy < 6) || (lost_boy > 7)) {
		mes "[Suspicious Man]";
		mes "Th-there's not enough";
		mes "air here, it's so stuffy!";
		mes "Hey, get away! You're";
		mes "wasting all of my";
		mes "precious oxygen!";
		close;
	}
	if (lost_boy == 6) {
		mes "["+strcharinfo(0)+"]";
		mes "Excuse me, but do you";
		mes "know a man named";
		mes "Rogan? I'm here to--";
		next;
		mes "[Suspicious Man]";
		mes "Hah! I had no idea";
		mes "it'd be this simple!";
		mes "Easiest money I've";
		mes "ever made! Bwahahaha!";
		mes "Time for you to die, kid!";
		next;
		mes "[Suspicious Man]";
		mes "Hyah!";
		percentheal -50,0;
		next;
		mes "^3355FFThis suspicious man";
		mes "wounded you with a throwing";
		mes "dagger, and then threw another";
		mes "one that you managed to dodge.";
		mes "You quickly retaliate to keep";
		mes "him from further harming you.^000000";
		next;
		mes "[Suspicious Man]";
		mes "Argh! I...";
		mes "I guess I underestimated";
		mes "you! You're a lot stronger";
		mes "than when you're taken by";
		mes "surprise, adventurer!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Hey, who the hell are";
		mes "you?! Are you Rogan?";
		mes "Are you the one that";
		mes "kidnapped Phobe?";
		next;
		mes "[Suspicious Man]";
		mes "What th--? I didn't";
		mes "kidnap nobody! I don't";
		mes "know any Phobe! I was";
		mes "just hired to kill you and";
		mes "bring your body to my client.";
		mes "This wasn't what I expected.";
		next;
		mes "[Suspicious Man]";
		mes "Vincent's instructions";
		mes "were to kill anyone that";
		mes "asked about Rogan, some";
		mes "name he made up. My name";
		mes "is Mogan. Gosh... I thought";
		mes "you were a really bad guy.";
		next;
		mes "[Mogan]";
		mes "Hey, set me straight";
		mes "here. Did you steal";
		mes "something really";
		mes "valuable, like some";
		mes "red jewel or something?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Huh? No! Vincent actually";
		mes "sent me to look for the guy";
		mes "that stole that jewel, and";
		mes "to retrieve it for him!";
		next;
		mes "[Mogan]";
		mes "It looks like he set";
		mes "us up, dude. That's...";
		mes "That's really low. Sorry,";
		mes "if I had known, I wouldn't";
		mes "have done it. Why would";
		mes "he manipulate us like that?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I don't know...";
		mes "I'm going to talk";
		mes "to Vincent and make";
		mes "him explain everything.";
		set lost_boy,7;
		changequest 8093,8094;
		close;
	}
	else if (lost_boy == 7) {
		mes "[Mogan]";
		mes "It looks like he set";
		mes "us up, dude. That's...";
		mes "That's really low. Sorry,";
		mes "if I had known, I wouldn't";
		mes "have done it. Why would";
		mes "he manipulate us like that?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I don't know...";
		mes "I'm going to talk";
		mes "to Vincent and make";
		mes "him explain everything.";
		close;
	}
}

rachel,263,32,3	script	Kid#ra_in01	931,{
	if (lost_boy < 7) {
		mes "[Kid]";
		mes "Leave me alone!";
		close;
	}
	else if (lost_boy == 8) {
		mes "^3355FFYou catch a shining";
		mes "glint from this boy's";
		mes "back pocket. Perhaps he";
		mes "has the jewel that Vincent";
		mes "wants you to retrieve.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Hey, you.";
		mes "You must be";
		mes "Phobe, right?";
		next;
		mes "[Kid]";
		mes "Yeah?";
		mes "So what?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Your father sent";
		mes "me here to find you.";
		next;
		mes "[Phobe]";
		mes "No! Don't touch me!";
		mes "I have no father!";
		mes "H-he's dead to me!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Well, in any case, I need";
		mes "to return the jewel that";
		mes "you're hiding in your pocket.";
		mes "I know that it really belongs";
		mes "to Sir Zhed.  If I don't, then";
		mes "your father will be in trouble.";
		next;
		mes "[Phobe]";
		mes "Hah! You mean ''Mister";
		mes "Vincent!'' That's fine";
		mes "by me! That's exactly";
		mes "why I took this thing!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Oh, yeah? How do you";
		mes "think Ms. Jenny will";
		mes "feel? Do you think";
		mes "that she'll be happy";
		mes "hearing about this?";
		next;
		mes "[Phobe]";
		mes "..............................";
		mes "...So you know about";
		mes "our family secret, huh?";
		mes "Alright, I'll give this to";
		mes "you. But I'm doing this for";
		mes "my mom, and not for him!";
		next;
		mes "^3355FFPhobe gingerly pulls";
		mes "the shining red jewel";
		mes "from his pocket and";
		mes "reluctantly hands it to you.^000000";
		next;
		mes "[Phobe]";
		mes "Just so you know,";
		mes "I don't plan on going";
		mes "back home! Well, just";
		mes "not this second anyway.";
		mes "But let my mom know that";
		mes "I'm fine and not to worry.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Alright, I'll tell your mom";
		mes "But you should be getting";
		mes "back to them soon. Your";
		mes "father took a really big";
		mes "risk covering up for you.";
		next;
		mes "[Phobe]";
		mes "Hmpf! I...";
		mes "I don't care!";
		next;
		mes "^3355FFIt doesn't look like";
		mes "you can force Phobe to";
		mes "return home for now, so";
		mes "you should bring this red";
		mes "jewel back to Vincent.^000000";
		set lost_boy,9;
		changequest 8095,8096;
		close;
	}
	else if (lost_boy == 9) {
		mes "[Phobe]";
		mes "I... I'm not ready";
		mes "to go back home just";
		mes "fine, and let Mister Vincent";
		mes "know that I'm not sorry";
		mes "for what I did, okay?!";
		next;
		mes "^3355FFIt doesn't look like";
		mes "you can force Phobe to";
		mes "return home for now, so";
		mes "you should bring this red";
		mes "jewel back to Vincent.^000000";
		close;
	}
	else {
		mes "["+strcharinfo(0)+"]";
		mes "You know, you should";
		mes "quit making trouble and";
		mes "listen to your parents.";
		next;
		mes "[Phobe]";
		mes "You're not the boss";
		mes "of me! Mind your own";
		mes "business! Jeez louise!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I can't mind my own";
		mes "business if your actions";
		mes "are causing this much trouble";
		mes "to so many other people! You";
		mes "need to act more responsibly!";
		next;
		mes "[Phobe]";
		mes "Mmmrrrr...";
		mes "Gosh... Fine.";
		close;
	}
}

// Bruspetti Quest (Perequisite: Lighthalzen "Friendship" quest) :: rachel_ryu
//============================================================ 
ra_in01,235,194,5	script	Katinshuell	931,{
	if (rach_vice > 21) {
		mes "[Katinshuell]";
		mes "If I had only turned";
		mes "myself in... Maybe if I had";
		mes "made an effort to pay for";
		mes "my crime, me and Bruspetti";
		mes "could have had a chance...";
		close;
	}
	else if ((rach_vice == 21) && (countitem(1201) > 0)) {
		mes "[Katinshuell]";
		mes "Please... Please just";
		mes "leave me alone. I've lost";
		mes "the woman I love because";
		mes "of something stupid I did";
		mes "in the past. If you want to";
		mes "turn me in, go ahead...";
		delitem 1201,1; //Knife
		set rach_vice,22;
		changequest 8121,8122;
		close;
	}
	else if (rach_vice == 21) {
		mes "[Katinshuell]";
		mes "I suppose it's my";
		mes "fate to bear this guilt.";
		mes "It's already destroyed my";
		mes "best chance of ever being";
		mes "truly happy. Bruspetti...";
		close;
	}
	else if ((rach_vice == 20) && (countitem(1201) > 0)) {
		mes "[Katinshuell]";
		mes "I suppose there's";
		mes "no reason to hide";
		mes "anything anymore...";
		mes "You've probably figured";
		mes "the important stuff by now...";
		next;
		mes "[Katinshuell]";
		mes "I used to work as one";
		mes "of the security guards in";
		mes "Lighthalzen. We basically";
		mes "watched the border between";
		mes "the rich area and the slums.";
		next;
		mes "[Katinshuell]";
		mes "I actually was ordered";
		mes "to kill someone that was";
		mes "repeatedly moving between";
		mes "the slums and the rich area.";
		mes "He was a wealthy kid...";
		mes "Didn't really deserve it.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "......";
		mes ".........";
		next;
		mes "[Katinshuell]";
		mes "I was paid a lot of money";
		mes "to do it. At first, I thought";
		mes "I was just doing my job. You";
		mes "know, I mean, the law was on";
		mes "my side. But the boy's blood";
		mes "wouldn't wash off my hands...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "......";
		mes ".........";
		next;
		mes "[Katinshuell]";
		mes "I was scared to kill him,";
		mes "but once I did it, the guilt";
		mes "and the torment has been";
		mes "unbearable! I haven't been";
		mes "able to sleep... That's why";
		mes "I had to leave Lighthalzen.";
		set rach_vice,21;
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "......";
		mes ".........";
		next;
		mes "[Katinshuell]";
		mes "Bruspetti shocked me when";
		mes "she had learned about what";
		mes "I did back then. My one true";
		mes "love... She couldn't bear the";
		mes "truth. When she heard it from";
		mes "my own lips, she went mad...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "......";
		mes ".........";
		next;
		mes "[Katinshuell]";
		mes "I couldn't stop her...";
		mes "I struggled, and tried to";
		mes "save her, but she managed";
		mes "to drown herself in Freya's";
		mes "Spring. She's gone from my";
		mes "life. Just like that. Forever.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "......";
		mes ".........";
		next;
		mes "[Katinshuell]";
		mes "I came here after";
		mes "killing a man to start";
		mes "a new life, maybe get";
		mes "a clean slate, but I end up";
		mes "indirectly killing the woman";
		mes "I love. Why God?! Why?!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "......";
		mes ".........";
		next;
		mes "[Katinshuell]";
		mes "Are you happy now?";
		mes "Are you happy now that?";
		mes "I've told you the truth?";
		mes "Doesn't that make me and";
		mes "you feel so much better?!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "......";
		mes ".........";
		next;
		mes "[Katinshuell]";
		mes "...............................";
		mes "God! My life sucks!";
		close;
	}
	else if (rach_vice == 21) {
		mes "[Katinshuell]";
		mes "^333333*Pant pant*^000000";
		mes "After all this";
		mes "time... I thought";
		mes "I could run away...";
		mes "But the voices still";
		mes "h-haunt me... Ha ha ha...";
		close;
	}
	else if ((rach_vice == 20) && (countitem(1201) > 0)) {
		mes "[Katinshuell]";
		mes "I...";
		mes "I don't deserve this!";
		mes "Why do you keep hounding";
		mes "me with these questions?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Did... Did something";
		mes "happen when Bruspetti";
		mes "confronted you at Freya's";
		mes "Spring? What did exactly";
		mes "did she learn about";
		mes "you in Lighthalzen?";
		next;
		mes "[Katinshuell]";
		mes "I... I don't have";
		mes "to tell you anything!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "How can you say that?!";
		mes "I just read in Bruspetti's";
		mes "diary that she learned";
		mes "something horrible about";
		mes "you, and it involved a";
		mes "Knife... just like this one.";
		next;
		mes "[Katinshuell]";
		mes ".........!";
		mes ".............";
		mes "NOoo! I'm sorry, it's";
		mes "my fault! I was desperate!";
		mes "You don't understand how";
		mes "I used to live, you d-don't--!";
		set rach_vice,21;
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh...?";
		mes "Mr. Katinshuell?";
		close;
	}
	else if ((rach_vice == 19) || (rach_vice == 20)) {
		mes "[Katinshuell]";
		mes "I...";
		mes "I don't deserve this!";
		mes "Why do you keep hounding";
		mes "me with these questions?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Did... Did something";
		mes "happen when Bruspetti";
		mes "confronted you at Freya's";
		mes "Spring? What did exactly";
		mes "did she learn about";
		mes "you in Lighthalzen?";
		next;
		mes "[Katinshuell]";
		mes "I... I don't have";
		mes "to tell you anything!";
		set rach_vice,20;
		changequest 8120,8121;
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "(^333333He's still resisting";
		mes "me... How can I get";
		mes "him to reveal the truth?^000000)";
		close;
	}
	else if (rach_vice == 18) {
		mes "[" + strcharinfo(0) + "]";
		mes "Let's see...";
		mes "Oh this entry looks";
		mes "interesting. It's all";
		mes "about you, Katinshuell.";
		next;
		mes "- Date: OOXX -";
		mes "I'm so in love with him,";
		mes "but he always changes the";
		mes "subject whenever I ask him";
		mes "personal questions about his";
		mes "past. Could it be that he's";
		mes "hiding something from me?";
		next;
		mes "- Date: OOXX -";
		mes "Is it another woman?";
		mes "I can't help but feel";
		mes "jealous! I need to know.";
		mes "That's why I've decided to";
		mes "go to Lighthalzen and see";
		mes "what I can find out.";
		next;
		mes "- Date: OOXO -";
		mes "Dear Diary,";
		mes "Today I just learned";
		mes "the horrible truth... I need";
		mes "to make him confess it to";
		mes "me. I hope we can still be";
		mes "together after all of this...";
		next;
		mes "- Date: OOXO -";
		mes "But I don't know if";
		mes "I can live with this!";
		mes "The man I love... It's";
		mes "unthinkable that he'd";
		mes "use a Knife t-to... I just";
		mes "want to throw up.";
		next;
		mes "- Date: OOXO -";
		mes "I'm planning to meet him";
		mes "tomorrow at Freya's Spring.";
		mes "I can't help but look at him";
		mes "differently now, but still...";
		mes "He's the man I truly love.";
		next;
		mes "- Date: OOXO -";
		mes "I hope that I have";
		mes "good news the next";
		mes "time I write in this diary...";
		mes "Well, here's hoping.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well, that was";
		mes "the very last page...";
		mes "What happened when";
		mes "Bruspetti confronted";
		mes "you at Freya's Spring?";
		set rach_vice,19;
		next;
		mes "[Katinshuell]";
		mes ".........";
		mes "I... I...";
		mes ".........";
		close;
	}
	else if (rach_vice == 17) {
		mes "[Katinshuell]";
		mes "Damn it! I don't want to";
		mes "think about her anymore!";
		mes "Get away from me, and take";
		mes "Bruspetti's diary with you!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "What?! No way, not after";
		mes "that little outburst about";
		mes "killing or not killing Bruspetti!";
		mes "Fine, if you're not going to";
		mes "talk, then I'm going to flip";
		mes "through this diary for answers.";
		set rach_vice,18;
		close;
	}
	else if (rach_vice == 16) {
		mes "[Katinshuell]";
		mes "Ha ha ha...";
		mes "Is this some sort";
		mes "of interrogation?";
		mes "I-I've done nothing";
		mes "wrong! Go ahead,";
		mes "ask me anything!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Alright then, why";
		mes "don't you explain this?";
		next;
		switch(select("Mr. Shendar's House:Lighthalzen:Freya's Spring:Bruspetti")) {
		case 1:
			mes "[" + strcharinfo(0) + "]";
			mes "Mr. Shendar, Bruspetti's";
			mes "father, says that someone";
			mes "has been sneaking into his";
			mes "house for some reason.";
			mes "Now, why would you do that?";
			next;
			mes "["+ strcharinfo(0) +"]";
			mes "You recognized";
			mes "Bruspetti's diary";
			mes "pretty quickly...";
			mes "And you did mention";
			mes "you were looking for it.";
			next;
			mes "[Katinshuell]";
			mes "Hmpf! S-stop";
			mes "talking crazy talk!";
			mes "I don't know what";
			mes "you're talking about!";
			close;
		case 2:
			mes "[" + strcharinfo(0) + "]";
			mes "You know, I found out";
			mes "that Bruspetti was planning";
			mes "on going to Lighthalzen.";
			mes "It seems that she needed";
			mes "to learn something really";
			mes "important over there...";
			next;
			mes "[Katinshuell]";
			mes "No...!";
			mes "She couldn't have...!";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Alright. It's no use";
			mes "pretending that you don't";
			mes "know her. You were her";
			mes "boyfriend, weren't you?";
			mes "What would she be trying";
			mes "to find in Lighthalzen?";
			next;
			mes "[Katinshuell]";
			mes "No! No no no!";
			mes "Shut up! Shut up!";
			mes "Please! Just leave";
			mes "me alone! Get away";
			mes "from me right now!";
			next;
			switch(select("Mr. Shendar's House:Freya's Spring:Recent Break-up")) {
			case 1:
				mes "[" + strcharinfo(0) + "]";
				mes "So while she was away";
				mes "in Lighthalzen, you snuck";
				mes "in Mr. Shendar's house and--";
				next;
				mes "[Katinshuell]";
				mes "Y-yes! Yes, that's right!";
				mes "It's because I was so worried";
				mes "about her! I had no idea that";
				mes "she went all the way over to";
				mes "Lighthalzen! Ha ha! Ha ha!";
				next;
				mes "[" + strcharinfo(0) + "]";
				mes "...............................";
				mes "(^333333Nuts! I think that";
				mes "backfired, so I'm going";
				mes "to have to try this again.)^000000";
				close;
			case 2:
				mes "[" + strcharinfo(0) + "]";
				mes "So while she was away";
				mes "in Lighthalzen, you went";
				mes "to Freya's Spring, all";
				mes "by yourself, didn't you?!";
				next;
				mes "[Katinshuell]";
				mes "......";
				mes ".........";
				mes "Um? ...Yes.";
				next;
				mes "[" + strcharinfo(0) + "]";
				mes "...............................";
				mes "(^333333Nuts! I think that";
				mes "backfired, so I'm going";
				mes "to have to try this again.)^000000";
				close;
			case 3:
				mes "[" + strcharinfo(0) + "]";
				mes "Wait a second! Your break-up";
				mes "and Bruspetti's sudden need";
				mes "to investigate something in";
				mes "Lighthalzen... They're related";
				mes "somehow, aren't they?";
				next;
				mes "[Katinshuell]";
				mes "......";
				mes ".........";
				mes "No! It's not true!";
				next;
				mes "[" + strcharinfo(0) + "]";
				next;
				switch(select("Mr. Shendar's house:Freya's Spring")) {
				case 1:
					mes "[" + strcharinfo(0) + "]";
					mes "So while she was away";
					mes "in Lighthalzen, you snuck";
					mes "in Mr. Shendar's house and--";
					next;
					mes "[Katinshuell]";
					mes "Y-yes! Yes, that's right!";
					mes "It's because I was so worried";
					mes "about her! I had no idea that";
					mes "she went all the way over to";
					mes "Lighthalzen! Ha ha! Ha ha!";
					next;
					mes "[" + strcharinfo(0) + "]";
					mes "...............................";
					mes "(^333333Nuts! I think that";
					mes "backfired, so I'm going";
					mes "to have to try this again.)^000000";
					close;
				case 2:
					mes "[" + strcharinfo(0) + "]";
					mes "Hmm... Why are you";
					mes "always hanging out at";
					mes "Freya's Spring alone?";
					mes "And why has Bruspetti";
					mes "not returned home yet?";
					next;
					mes "[Katinshuell]";
					mes "...Will you stop talking nonsense?";
					mes "What is your evidence to convict me with the crime?";
					mes "I don't wish to hear you any longer.";
					next;
					mes "[" + strcharinfo(0) + "]";
					mes "Even after you killed Bruspetti,";
					mes "you became worried about another possibility.";
					mes "So you were plotting to get rid of the possibility, too.";
					next;
					set rach_vice,17;
					mes "[Katinshuell]";
					mes "No! Stop it! Stop!";
					mes "Are you implying that";
					mes "I killed her?! I didn't!";
					mes "Quit this nonsense";
					mes "before I get really angry!";
					close;
				}
			}
		case 3:
			mes "[" + strcharinfo(0) + "]";
			mes "Freya's Spring.";
			mes "Why are you always";
			mes "hanging around there";
			mes "by yourself, eh?";
			next;
			mes "[Katinshuell]";
			mes "...............................";
			mes "It's because I really";
			mes "miss my ex-girlfriend.";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "Oh. Right.";
			mes "That's a pretty";
			mes "good reason.";
			close;
		case 4:
			mes "[" + strcharinfo(0) + "]";
			mes "If Bruspetti is not";
			mes "your girlfriend, then...";
			mes "Who is?! Answer that!";
			next;
			mes "[Katinshuell]";
			mes "...............................";
			mes "Fine, fine. You win.";
			mes "She was my ex-girlfriend.";
			mes "I just don't like talking";
			mes "about Bruspetti, that's all.";
			mes "Now will you leave me alone?";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "(^333333Nuts! He wasn't supposed";
			mes "to cave in like that! I need";
			mes "to question him again until";
			mes "my gut feeling is satisfied!^000000)";
			close;
		}
	}
	else if ((rach_vice == 15) && (countitem(7571))) {
		mes "[Katinshuell]";
		mes "Oh, it's you again.";
		mes "What do you want now?";
		mes "I just told you that I'm not";
		mes "in the mood for talking with";
		mes "anyone. I'm still coping with";
		mes "breaking up with my girlfriend.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Katinshuell... I get the";
		mes "feeling that you're hiding";
		mes "something. By any chance,";
		mes "was Bruspetti your girlfriend?";
		next;
		mes "[Katinshuell]";
		mes "Huh?! Er, wh-wh-what?";
		mes "What makes you think that?";
		mes "That's none of your business!";
		mes "Besides, don't you think that";
		mes "a girl like her is too good";
		mes "for some guy like me?!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "I don't have any real";
		mes "reason to suspect you of";
		mes "anything, but my gut feeling";
		mes "and the way you reacted isn't";
		mes "very reassuring. Well, I guess";
		mes "I can flip through this book...";
		next;
		mes "[Katinshuell]";
		mes "Hey! Hey that's...";
		mes "That's Bruspetti's diary!";
		mes "I-I've been looking for-- um...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Hey! How would you";
		mes "know about that?!";
		mes "Tell me the truth!";
		mes "Actually, you know what?";
		mes "Why don't we look at the";
		mes "truth together? How's that?";
		next;
		mes "^3355FFYou nonchalantly";
		mes "toss the diary at";
		mes "Katinshuell's feet,";
		mes "and it opens to one of";
		mes "the pages in the middle.^000000";
		next;
		mes "[Katinshuell]";
		mes "......!";
		delitem 7571,1; //Diary_Of_Blue
		set rach_vice,16;
		changequest 8119,8120;
		close;
	}
	else if ((rach_vice == 10) || (rach_vice == 11)) {
		mes "[Katinshuell]";
		mes "Argh! I'm so depressed.";
		mes "Honestly, I just want to";
		mes "be left by myself for a really";
		mes "long time. What the heck do you";
		mes "want to ask me about, anyway?";
		next;
		input .@input$;
		if (.@input$ == "Lighthalzen") {
			mes "[Katinshuell]";
			mes "Lighthalzen...?";
			mes "a city in the Schwarzwald";
			mes "Republic. That, and it's";
			mes "a tough place to live in.";
			mes "That's all I really know...";
			next;
		}
		else if (.@input$ == "Bruspetti") {
			mes "[Katinshuell]";
			mes "...It's been a while";
			mes "since I heard that name.";
			mes "Bruspetti... She's pretty";
			mes "popular around this town...";
			mes "Everyone liked her. Is that";
			mes "all you wanted to know?";
			next;
		}
		else if (.@input$ == "Freya's Spring") {
			mes "[Katinshuell]";
			mes "Freya's Spring...";
			mes "That's just a park";
			mes "where old people and";
			mes "couples sort of hang out.";
			mes "I don't like going there,";
			mes "though. You shouldn't, either.";
			next;
		}
		else {
			mes "[Katinshuell]";
			mes "..." + .@input$ + "?";
			mes "What? I don't understand you...";
			close;
		}
		if (rach_vice == 10) {
			set rach_vice,11;
			changequest 8114,8115;
		}
		mes "[Katinshuell]";
		mes "You happy, now?";
		mes "Quit trying to pry into";
		mes "my personal business,";
		mes "and just enjoy touring this";
		mes "little town. That's what";
		mes "you came to do, right?";
		close;
	}
	else if (rach_vice == 4) {
		mes "[Katinshuell]";
		mes "Uh... ";
		mes "I just told you that I broke";
		mes "up with my girlfriend. You";
		mes "know, I kinda sorta wanna";
		mes "be left alone. Go away...";
		close;
	}
	else if (rach_vice == 3) {
		mes "[Katinshuell]";
		mes "Eh? Oh, it's one of you";
		mes "guys, those do-gooder";
		mes "adventurers. You must not";
		mes "have anything else to do...";
		mes "Otherwise, why talk to me?";
		next;
		mes "[Katinshuell]";
		mes "Geez... I know you guys go";
		mes "around solving problems,";
		mes "but this is one thing you";
		mes "can't handle. Me and my";
		mes "girlfriend are history now.";
		mes "It's over between us.";
		set rach_vice,4;
		changequest 8107,8108;
		close;
	}
	else if (rach_vice == 2) {
		mes "[Katinshuell]";
		mes "You're an adventurer,";
		mes "so I don't think you'd ";
		mes "understand how difficult";
		mes "it is to live a quiet, peaceful";
		mes "life. When you've lived through";
		mes "certain things, it's tough.";
		next;
		mes "[Katinshuell]";
		mes "When you're busy, you're";
		mes "distracted. But even if I'm";
		mes "left all alone, these thoughts";
		mes "of mine never cease to haunt me...";
		close;
	}
	else if (rach_vice == 1) {
		mes "[Katinshuell]";
		mes "You're an adventurer,";
		mes "so I don't think you'd ";
		mes "understand how difficult";
		mes "it is to live a quiet, peaceful";
		mes "life. When you've lived through";
		mes "certain things, it's tough.";
		next;
		mes "[Katinshuell]";
		mes "When you're busy, you're";
		mes "distracted. But even if I'm";
		mes "left all alone, these thoughts of mine never cease to haunt me...";
		close;
	}
	else if (rach_vice == 0) {
		mes "[Katinshuell]";
		mes "You're an adventurer,";
		mes "so I don't think you'd ";
		mes "understand how difficult";
		mes "it is to live a quiet, peaceful";
		mes "life. When you've lived through";
		mes "certain things, it's tough.";
		next;
		mes "[Katinshuell]";
		mes "I don't need any more";
		mes "excitement in my life.";
		mes "I just want to live quietly,";
		mes "away from other people,";
		mes "and to be left all alone for";
		mes "some semblance of peace.";
		if (friendship > 10) set rach_vice,1;
		close;
	}
	mes "[Katinshuell]";
	mes "Do you believe in karma?";
	mes "I do... No matter what you";
	mes "do, even if you don't get";
	mes "caught, somehow it just";
	mes "catches up to you.";
	next;
	mes "[Katinshuell]";
	mes "Have you ever felt";
	mes "guilty about something,";
	mes "but hid from the truth?";
	mes "Let me tell you that it must";
	mes "be a painful experience. It's";
	mes "better to confess when you can.";
	close;
}

ra_in01,250,19,3	script	Mr. Shendar	929,{
	if (rach_vice > 21) {
		mes "[Mr. Shendar]";
		mes "When will my precious";
		mes "daughter Bruspetti be";
		mes "coming home? I'm sure that";
		mes "she can take care of herself,";
		mes "but a father can't help but";
		mes "worry himself to death.";
		next;
		mes "[Mr. Shendar]";
		mes "Ah, if you happen to";
		mes "see my daughter in your";
		mes "travels, please tell her";
		mes "that her daddy is waiting";
		mes "for her to come home.";
		mes "Thanks, adventurer.";
		close;
	}
	else if (rach_vice == 14) {
		mes "[Mr. Shendar]";
		mes "So you have a pretty";
		mes "good idea of who was";
		mes "sneaking around my house?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Well, I suspect this guy";
		mes "named Katinshuell because";
		mes "he might have been Bruspetti's";
		mes "boyfriend and he's been acting";
		mes "funny. Still, I don't have any";
		mes "real evidence of that.";
		next;
		mes "[Mr. Shendar]";
		mes "Bruspetti's boyfriend?!";
		mes "Hmpf! I don't like that";
		mes "boy already. I haven't";
		mes "met him yet, but its my";
		mes "solemn duty as a father";
		mes "to hate and distrust him!";
		close;
	}
	else if (rach_vice == 13) {
		mes "[Mr. Shendar]";
		mes "Hey! Hey! Are you";
		mes "the pervert that's been";
		mes "sneaking into my house";
		mes "to prey on my daughter?!";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Wha--?";
		mes "No, I'm just a--";
		next;
		percentheal -50,0;
		mes "^3355FF*BAM!*^000000";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Ow! What did";
		mes "you do that for?";
		next;
		mes "[Mr. Shendar]";
		mes "Still alive, eh? Hmpf!";
		mes "I'll finish you off! I'll...";
		mes "Er, huh?! Wait, I think";
		mes "I know you. You're that";
		mes "adventurer that's been";
		mes "here before, right?";
		next;
		mes "[Mr. Shendar]";
		mes "Oh... I think I've made";
		mes "a mistake. I thought you";
		mes "were that person that's";
		mes "been prowling around my";
		mes "house. I don't know who he,";
		mes "but I'm sure it's not you...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Wait, wait...";
		mes "So someone has been";
		mes "sneaking around here?";
		mes "That's weird. Wait, that";
		mes "guy, the one that might";
		mes "be Bruspetti's boyfriend...";
		next;
		mes "["+ strcharinfo(0) +"]";
		mes "Right, his name was";
		mes "Katinshuell. That guy's";
		mes "been acting really funny.";
		mes "Maybe he was the one sneaking";
		mes "around here? I'd better go";
		mes "and ask him about this...";
		next;
		mes "[Mr. Shendar]";
		mes "Wait, where are";
		mes "you going? I... I'm";
		mes "sorry for hitting you?";
		next;
		mes "[Mr. Shendar]";
		mes "Curses! If that guy is my";
		mes "daughter's boyfriend, and he's";
		mes "trespassing into my home, then";
		mes "he could be really dangerous.";
		mes "It's too bad that I can't ask";
		mes "Bruspetti anything about him...";
		next;
		mes "[Mr. Shendar]";
		mes "Hm... Alright, adventurer.";
		mes "If you can find it, I'll allow";
		mes "you to take and read my";
		mes "daughter's diary. We need";
		mes "to learn more about this guy";
		mes "Katinshuell. If he's dangerous...";
		next;
		mes "[Mr. Shendar]";
		mes "I'm sorry... I'm asking you";
		mes "for your help... But there's";
		mes "nothing else I can do as her";
		mes "father. Besides, adventurers";
		mes "like you can offer her the";
		mes "best protection...";
		set rach_vice,14;
		changequest 8117,8118;
		close;
	}
	else if (rach_vice == 9) {
		mes "[Mr. Shendar]";
		mes "Curses! I should have never";
		mes "mentioned my daughter's";
		mes "diary to an adventurer like";
		mes "you! I know that your kind";
		mes "is naturally too curious...!";
		close;
	}
	else if (rach_vice == 8) {
		mes "[Mr. Shendar]";
		mes "What? My daughter went";
		mes "to Lighthalzen? She doesn't";
		mes "know anyone there. Hmm, maybe";
		mes "that's the place where she was";
		mes "planning to go to learn more";
		mes "about what was bothering her.";
		next;
		mes "[Mr. Shendar]";
		mes "Yes, she was very generic:";
		mes "''Dad, I need to go somewhere.''";
		mes "and ''There's something I need";
		mes "to make sure of.'' Leaving out";
		mes "all the details does not put";
		mes "a doting father at ease!";
		next;
		mes "[Mr. Shendar]";
		mes "Well, thank you for letting";
		mes "me know where she might be.";
		mes "Now, I wish I knew what she";
		mes "was planning on doing. Maybe";
		mes "she wrote something about it";
		mes "in her diary? Yes, perhaps...";
		next;
		mes "[Mr. Shendar]";
		mes "No! I can't do it!";
		mes "As a loving father, I can't";
		mes "allow myself to invade my";
		mes "precious daughter's privacy.";
		mes "Even if she did carelessly leave";
		mes "her diary on top of her drawer.";
		next;
		mes "[Mr. Shendar]";
		mes "Oh, but how a father";
		mes "worries. Will my sweet,";
		mes "darling Bruspetti be alright?";
		set rach_vice,9;
		changequest 8112,8113;
		close;
	}
	else if ((rach_vice == 4) || (rach_vice == 5)) {
		mes "[Mr. Shendar]";
		mes "I miss my daughter. Yes,";
		mes "the house smells different";
		mes "without her around. It's a little";
		mes "weird to be talking about this,";
		mes "but Bruspetti always did smell";
		mes "nice, just like her mother.";
		next;
		mes "[Mr. Shendar]";
		mes "Even if they didn't wear";
		mes "perfume, they had this";
		mes "distinctively pleasant";
		mes "scent about them. I guess";
		mes "it must be pheremonal?";
		if (rach_vice == 4) {
			set rach_vice,5;
			changequest 8108,8109;
		}
		close;
	}
	else if (rach_vice == 2) {
		mes "[Mr. Shendar]";
		mes "Take my advice: never";
		mes "have a daughter! You worry";
		mes "too much about them, and they";
		mes "neglect their parents once";
		mes "they grow up! I bet she's";
		mes "having a grand old time...";
		next;
		mes "[Mr. Shendar]";
		mes "Confound it...!";
		mes "Whoever that guy is,";
		mes "he better not try any funny";
		mes "business! As her father, I have";
		mes "the legal right to wring his";
		mes "little neck! At least, I should...";
		close;
	}
	else if (rach_vice == 1) {
		mes "[Mr. Shendar]";
		mes "I just found out that";
		mes "my precious daughter has";
		mes "been going out with someone.";
		mes "She went to some other town";
		mes "for this boy, and I haven't";
		mes "heard a word from her since!";
		next;
		mes "[Mr. Shendar]";
		mes "Take my advice: never";
		mes "have a daughter! You worry";
		mes "too much about them, and they";
		mes "neglect their parents once";
		mes "they grow up! I bet she's";
		mes "having a grand old time...";
		next;
		mes "[Mr. Shendar]";
		mes "Probably on some lovey";
		mes "dovey trip with whoever that";
		mes "boy is. She's been gone an";
		mes "awful long time, but she's";
		mes "also an adult now. I... I guess";
		mes "she should be just fine.";
		set rach_vice,2;
		setquest 8106;
		close;
	}
	mes "[Mr. Shendar]";
	mes "I just found out that";
	mes "my precious daughter has";
	mes "been going out with someone.";
	mes "She went to some other town";
	mes "to see this boy, and I haven't";
	mes "heard a word from her since!";
	next;
	mes "[Mr. Shendar]";
	mes "Take my advice: never";
	mes "have a daughter! You worry";
	mes "too much about them, and they";
	mes "neglect their parents once";
	mes "they grow up! I bet she's";
	mes "having a grand old time...";
	close;
}

rachel,73,244,3	script	Lachellen	919,{
	if (rach_vice > 21) {
		mes "[Lachellen]";
		mes "If you happen to see";
		mes "Bruspetti, tell her to";
		mes "come talk to me. I need";
		mes "to know whether I figured";
		mes "out who her boyfriend is!";
		mes "I can't wait to see her~";
		close;
	}
	else if ((rach_vice == 11) || (rach_vice == 12)) {
		mes "[Lachellen]";
		mes "Oh, hello again~";
		mes "Is there any way I can";
		mes "help you this time? I know";
		mes "you're looking for Bruspetti,";
		mes "so I'll help you if you have";
		mes "any questions for me~";
		next;
		input .@input$;
		if (.@input$ == "Lighthalzen") {
			mes "[Lachellen]";
			mes "Lighthalzen? Oh, that's";
			mes "right! Bruspetti did ask";
			mes "me about Lighthalzen a while";
			mes "ago. Yes, she seemed really";
			mes "interested in learning more";
			mes "about that place recently.";
			next;
		}
		else if (.@input$ == "Freya's Spring") {
			mes "[Lachellen]";
			mes "Freya's Spring?";
			mes "Oh, I like that place!";
			mes "Speaking of which, I know";
			mes "someone named Katinshuell";
			mes "that went there pretty often.";
			mes "Usually men don't go alone...";
			next;
			mes "[Lachellen]";
			mes "Wait, that's the place";
			mes "I told you about, where";
			mes "Bruspetti and her boyfriend";
			mes "usually met. Do you think";
			mes "she and Katinshuell...?";
			mes "Ooh, maybe I figured it out!";
			next;
			mes "[Lachellen]";
			mes "But yeah, that place is";
			mes "usually filled with couples,";
			mes "so you look like a real loser";
			mes "if you go there alone. That's";
			mes "why I want a boyfriend now...";
			set rach_vice,12;
			changequest 8115,8116;
			next;
		}
		else {
			mes "[Lachellen]";
			mes "Oh, I'm sorry...";
			mes "I don't know anything";
			mes "about "+.@input$+".";
			close;
		}
		mes "[Lachellen]";
		mes "Well, I don't know if";
		mes "you learned anything";
		mes "important from me,";
		mes "but I hope I helped";
		mes "you, even if it was";
		mes "just a little bit.";
		close;
	}
	else if (rach_vice == 7) {
		mes "[Lachellen]";
		mes "Let's see... Bruspetti";
		mes "and her guy would usually";
		mes "meet at... Um, I know where";
		mes "it is by feel, but I can't really";
		mes "give you good directions";
		mes "to get there. Er, sorry!";
		next;
		mes "[Lachellen]";
		mes "Luckily, this town";
		mes "isn't that big, so I'm";
		mes "sure you'll find something";
		mes "if you just keep looking.";
		mes "Oh, and if you find her,";
		mes "tell her I said ''hi,'' okay?";
		close;
	}
	else if (rach_vice == 6) {
		mes "[Lachellen]";
		mes "Oh, Bruspetti's dad";
		mes "was talking about how";
		mes "good she smells? Yeah,";
		mes "she's kinda famous for";
		mes "that around here, so he's";
		mes "not creepy or anything.";
		next;
		mes "[Lachellen]";
		mes "I see, so you think you";
		mes "caught wind of her in some";
		mes "other town. Yeah, I heard";
		mes "that she went traveling to see";
		mes "if she could learn something,";
		mes "and she hasn't returned yet.";
		next;
		mes "[Lachellen]";
		mes "Oh, you know what?";
		mes "If she's in Lighthalzen,";
		mes "she's probably gone there to";
		mes "learn more about her boyfriend.";
		mes "Bruspetti mentioned something";
		mes "about that when I last saw her.";
		next;
		mes "[Lachellen]";
		mes "I don't know anything";
		mes "else. Hmm, maybe if you";
		mes "check the place where she";
		mes "and her boyfriend usually";
		mes "went on dates, you might";
		mes "be able to find something.";
		set rach_vice,7;
		changequest 8110,8111;
		close;
	}
	else if ((rach_vice == 2) || (rach_vice == 3)) {
		mes "[Lachellen]";
		mes "Ooh, I'm so jealous";
		mes "of Bruspetti! She's been";
		mes "spending so much time with";
		mes "her new boyfriend recently...";
		mes "But she still refuses to tell";
		mes "me what his name is.";
		next;
		mes "[Lachellen]";
		mes "She told me that she's";
		mes "serious about him, but";
		mes "she's also admitted that";
		mes "she doesn't know much about";
		mes "him. Let's see... He grew up in Lighthalzen? That's all she knows.";
		set rach_vice,3;
		changequest 8106,8107;
		close;
	}
	mes "[Lachellen]";
	mes "My friend Bruspetti";
	mes "is a really nice girl~";
	mes "Everyone loves her, and";
	mes "she's sooo beautiful. All";
	mes "the guys are jealous of";
	mes "her new boyfriend!";
	next;
	mes "[Lachellen]";
	mes "Still, she's really";
	mes "shy, and won't tell me";
	mes "who he is. There's a lot";
	mes "I don't know about him, but";
	mes "I'm sure they're happy together.";
	close;
}

rachel,196,77,3	script	Kid#1rachel	921,{
	mes "[Kid]";
	mes "Hey, have you seen";
	mes "Bruspetti? She's really";
	mes "nice and always buys me";
	mes "lots and lots of cookies!";
	next;
	mes "[Kid]";
	mes "Hmm, I haven't seen";
	mes "her in a while, though.";
	mes "I heard she went traveling";
	mes "somewhere. How long do";
	mes "you think she'll be gone, huh?";
	close;
}

rachel,151,155,3	script	Kid#2rachel	921,{
	mes "[Kid]";
	mes "Oh wow! I wanna be an";
	mes "adventurer like you when";
	mes "I grow up! Go to all sorts";
	mes "of places, visit different";
	mes "towns. It sounds so fun!";
	next;
	mes "[Kid]";
	mes "Maybe if I find a really";
	mes "nice place, maybe I'll just";
	mes "stay and then move there.";
	mes "There's somewhere here";
	mes "that did that, and moved";
	mes "from Lighthalzen to here~";
	next;
	mes "[Kid]";
	mes "Yeah, as soon as I get";
	mes "a chance, I'm gonna ditch";
	mes "this town and see as much";
	mes "of the world as I can! I need";
	mes "to grow up faster than this!";
	close;
}

rachel,266,35,3	script	Grandma#rachel	918,{
	if (rach_vice > 21) {
		mes "[Grandma]";
		mes "When you get to be my";
		mes "age, you'll cherish all";
		mes "of your memories, even if";
		mes "the experience was hurtful";
		mes "when it actually happened.";
		next;
		mes "[Grandma]";
		mes "Your memories are part";
		mes "of who you are and what";
		mes "makes you unique. I can";
		mes "appreciate living the life";
		mes "that I have, even if it's";
		mes "not particularly special.";
		close;
	}
	else if (rach_vice == 13) {
		mes "[Grandma]";
		mes "When you get to be my";
		mes "age, you appreciate life";
		mes "more and can release your";
		mes "regrets more easily. I wasted";
		mes "much of my youth in needless";
		mes "worry when I could've relaxed.";
		close;
	}
	else if (rach_vice == 12) {
		mes "[Grandma]";
		mes "Oh, back again, eh?";
		mes "I guess you must really";
		mes "like coming to this place";
		mes "too. Hm, that reminds me...";
		next;
		mes "[Grandma]";
		mes "See the edge of the spring?";
		mes "The same young man frequently";
		mes "comes to that spot, and stares";
		mes "into the water, just dripping with sadness. Someone so young";
		mes "shouldn't be feeling like that.";
		next;
		mes "[Grandma]";
		mes "You're supposed to come";
		mes "here to relax and enjoy";
		mes "the surrounding beauty,";
		mes "not wallow in your sorrow.";
		mes "I guess that boy doesn't";
		mes "agree with me on that.";
		next;
		mes "[Grandma]";
		mes "You should be able";
		mes "to let go of whatever's";
		mes "bothering you, and just";
		mes "enjoy life as it is now.";
		set rach_vice,13;
		changequest 8116,8117;
		close;
	}
	mes "[Grandma]";
	mes "I love this place,";
	mes "its beautiful scenary";
	mes "and serene atmosphere.";
	mes "It's so heavenly peaceful.";
	next;
	mes "[Grandma]";
	mes "It brings my heart joy to see";
	mes "young couples can coming";
	mes "here and relaxing together.";
	mes "Isn't love a grand thing?";
	close;
}

lhz_in02,213,207,0	script	#ratrace1	111,4,4,{
OnTouch_:
	if (rach_vice == 5) {
		mes "[" + strcharinfo(0) + "]";
		mes "This...";
		mes "This smell...";
		mes "It smells so nice!";
		mes "Like rose petals riding";
		mes "on a gentle breeze...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Wait, could this be";
		mes "the scent that Bruspetti's";
		mes "father mentioned earlier?";
		set rach_vice,6;
		changequest 8109,8110;
		close;
	}
	end;
}

rachel,265,47,0	script	#raevent1	111,2,2,{
OnTouch_:
	if (rach_vice == 23) {
		mes "[" + strcharinfo(0) + "]";
		mes "Just looking at this";
		mes "spring makes me think";
		mes "of Bruspetti. What really";
		mes "happened to her? I get";
		mes "the feeling that she";
		mes "caved in to despair.";
		next;
		mes "["+ strcharinfo(0) +"]";
		mes "The water's not that";
		mes "cold, or very deep...";
		mes "And Katinshuell mentioned";
		mes "that her body went limp...";
		mes "But she was still looking";
		mes "at him. It's haunting...";
		next;
		mes "["+ strcharinfo(0) +"]";
		mes "I suppose she was torn...";
		mes "She loved him, but couldn't";
		mes "bear to live with his secret.";
		mes "In the end, it's all so very";
		mes "tragic. Katinshuell isn't";
		mes "really a bad person...";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "He was forced to";
		mes "commit a heinous crime,";
		mes "and kept making mistakes,";
		mes "running from his guilt. Is";
		mes "anyone accountable for this?";
		mes "Who would be to blame?";
		next;
		set rach_vice,24;
		completequest 8122;
		if (checkre(3)) {
			if (BaseLevel > 90) getexp 130000,0;
			else if (BaseLevel > 75) getexp 85000,0;
			else getexp 45000,0;
		} else {
			if (BaseLevel > 90) getexp 1300000,0;
			else if (BaseLevel > 75) getexp 850000,0;
			else getexp 450000,0;
		}
		mes "[" + strcharinfo(0) + "]";
		mes "Somehow, I wish that";
		mes "Katinshuell had the";
		mes "strength to face his";
		mes "guilt, and then to";
		mes "forgive himself.";
		close;
	}
	else if (rach_vice == 22) {
		mes "[" + strcharinfo(0) + "]";
		mes "This must be where";
		mes "Bruspetti drowned...";
		next;
		mes "[Grandma]";
		mes "Oh! Excuse me,";
		mes "young adventurer,";
		mes "but you mustn't stand";
		mes "there! It's very slippery.";
		mes "What if you fall into the";
		mes "spring? It's dangerous.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Oh... Er, thank you.";
		mes "Yes, I wouldn't want";
		mes "to get myself drowned.";
		next;
		set rach_vice,23;
		mes "[Grandma]";
		mes "Drowned...? I just";
		mes "wouldn't want you to";
		mes "get your clothes wet.";
		mes "The water isn't that deep...";
		mes "Even if you can't swim, you";
		mes "can climb out, you know.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "...What?";
		close;
	}
	else if (rach_vice == 8) {
		mes "[" + strcharinfo(0) + "]";
		mes "That old woman told";
		mes "be to be careful not to";
		mes "slip and fall into the water";
		mes "around here, so I'd better";
		mes "make sure I tread carefully.";
		close;
	}
	else if (rach_vice == 7) {
		mes "[???]";
		mes "Oh, be very careful!";
		mes "You don't want to get";
		mes "too close to the water.";
		mes "What if you slip and fall?";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Huh?";
		next;
		mes "[Grandma]";
		mes "Oh, I'm sorry if";
		mes "I startled you, but the";
		mes "ground that you're standing";
		mes "on is very slippery, you know.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Ah, I see.";
		set rach_vice,8;
		changequest 8111,8112;
		close;
	}
	end;
}

ra_in01,255,25,0	script	Book#ra_in	111,{
	if (rach_vice == 15) {
		mes "^3355FFThis is where you";
		mes "found Bruspetti's diary.";
		mes "Perhaps you should take";
		mes "it with you the next time";
		mes "you talk to Katinshuell.^000000";
		close;
	}
	else if (rach_vice == 14) {
		set rach_vice,15;
		changequest 8118,8119;
		getitem 7571,1; //Diary_Of_Blue
		mes "^3355FFThis must be";
		mes "Bruspetti's diary!";
		mes "You now have permission";
		mes "to take it with you so that";
		mes "you can figure out if she and";
		mes "Katinshuell are connected...^000000";
		close;
	}
	else if ((rach_vice == 9) || (rach_vice == 10)) {
		mes "^3355FFThis must be";
		mes "Bruspetti's diary!";
		mes "But... reading it";
		mes "would make you feel";
		mes "like a real creep.";
		mes "So don't touch it.^000000";
		set rach_vice,10;
		changequest 8113,8114;
		close;
	}

}

// Ice Necklace/Summon Ktullanux Quest and Glacial Heart buyer :: rachel_tre
//============================================================ 
//iRO Changed this NPC to avoid "offending" people.
//To enable how it originally looked, uncomment the
//line below (npc header), and comment the line
//under it, and then uncomment the cutin lines.

//rachel,157,183,3	script	Sincere Follower Urstia	917,{
rachel,157,183,3	script	Sincere Follower Urstia	916,{
	cutin "ra_usti1",2;
	if (checkweight(908,200) == 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";
	}
	if (ice_necklace_q < 1) {
		mes "[Urstialla]";
		mes "Oh, are you an adventurer";
		mes "from the outside? Praise be";
		mes "to Freya! Her love and grace";
		mes "reaches all over the world,";
		mes "touching even the hearts of";
		mes "foreigners, leading them here!";
		next;
		if (select("Freya? I'd like to know more.:That's crazy talk!") == 1) {
			emotion ET_OK;
			mes "[Urstialla]";
			mes "The day is coming when";
			mes "Freya will resurrect and";
			mes "lead all of her faithful to";
			mes "Valhalla. Now she is in a";
			mes "deep sleep, but even then,";
			mes "she watches over all of us.";
			next;
			mes "[Urstialla]";
			mes "You see, Freya used up";
			mes "all of her power fighting the";
			mes "most fearsome of demons";
			mes "in the Thousand Year War.";
			mes "Now she rests and recovers";
			mes "in a pure and sacred place.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Wait...";
			mes "How do you";
			mes "know that all of";
			mes "this happened?";
			next;
			mes "[Urstialla]";
			mes "These are truths that all";
			mes "of Freya's worshippers know.";
			mes "Freya delivers her messages to";
			mes "us through her mortal vessel,";
			mes "our beautiful pope that shines";
			mes "with brilliant white light.";
			next;
			mes "[Urstialla]";
			mes "Unfortunately, even the most";
			mes "faithful experience lapses in";
			mes "judgment. It shames me to";
			mes "admit that my son Egapeo";
			mes "is... is guilty of sin.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Sin? What did he";
			mes "do, if you don't";
			mes "mind me asking?";
			next;
			mes "[Urstialla]";
			mes "I don't know, but Egapeo";
			mes "has been sick for a while";
			mes "now. I'm convinced that he";
			mes "did something to anger Freya";
			mes "Although he may deserve it,";
			mes "I'm doing my best to help him.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "...Wait. What?!";
			next;
			mes "[Urstialla]";
			mes "I know that if I pray hard";
			mes "enough and please Freya,";
			mes "she will forgive my son and";
			mes "heal him of his illness.";
			mes "But sometimes prayer isn't";
			mes "enough... I need to pay tribute.";
			next;
			mes "[Urstialla]";
			mes "I managed to acquire a";
			mes "necklace of incomparable";
			mes "beauty from the dwarves.";
			mes "However, the gems have dulled";
			mes "with age and need to be shined";
			mes "before I can offer them to Freya.";
			next;
			mes "[Urstialla]";
			mes "However, not just anyone can";
			mes "shine this special necklace";
			mes "forged by the Dwarves. I need";
			mes "someone that knows arcane magic";
			mes "to help me. I think there's only";
			mes "one mage that can polish this...";
			next;
			mes "[Urstialla]";
			mes "Maheo, the renown mage with";
			mes "access to the most powerful";
			mes "magic spells in the world,";
			mes "must be able to clean this";
			mes "necklace's gems! However";
			mes "There's no way I can reach him.";
			next;
			mes "[Urstialla]";
			mes "You see, Maheo left on a";
			mes "journey to subjugate the";
			mes "ice monsters in the ice cave";
			mes "to the north, and he hasn't";
			mes "returned yet. That place is too";
			mes "dangerous for people like me.";
			next;
			mes "[Urstialla]";
			mes "I know that you adventurers";
			mes "regularly travel through those";
			mes "kinds of areas, so would you";
			mes "please look for Maheo and ask";
			mes "him to clean this necklace on";
			mes "my behalf? Please, for my son...";
			next;
			if (select("But that's none of my business!:Alright, I'll do it.") == 1) {
				mes "[Urstialla]";
				mes "I... I see.";
				mes "I thought that Freya";
				mes "had led you to me, but";
				mes "maybe my prayers haven't";
				mes "been answered yet. Perhaps";
				mes "I need to pray more fervently?.";
				close2;
				cutin "",255;
				end;
			}
			mes "[Urstialla]";
			mes "Thank you so much!";
			mes "Please, take care of this";
			mes "necklace and ask Maheo";
			mes "to restore its luster. Then,";
			mes "it'll be a fitting tribute to";
			mes "our loving goddess Freya.";
			setquest 2109;
			getitem 7572,1; //Magic_Necklace
			set ice_necklace_q,1;
			close2;
			cutin "",255;
			end;
		}
		cutin "ra_usti2",2;
		mes "[Urstialla]";
		mes "...............................";
		mes "Are you telling me";
		mes "that you don't believe?";
		mes "Repent, and may your";
		mes "heart be opened to Freya!";
	}
	else if ((ice_necklace_q >= 1) && (ice_necklace_q < 5)) {
		mes "[Urstialla]";
		mes "Please find Maheo the";
		mes "Mage and ask him to restore";
		mes "the beauty of the necklace";
		mes "I gave you. He should be";
		mes "fighting monsters in the";
		mes "ice cave to the north.";
	}
	else if (ice_necklace_q == 5) {
		if (countitem(7573) > 0) {
			mes "[Urstialla]";
			mes "Oh! My necklace! Thank you!";
			mes "It's so beautiful! It will";
			mes "make a wonderful tribute to";
			mes "Freya! I am certain with this,";
			mes "my son will get better!";
			next;
			mes "[Urstialla]";
			mes "Here, I know it's not much,";
			mes "but please accept this as a";
			mes "token of my appreication for";
			mes " what you have done for me.";
			delitem 7573,1; //Magic_Necklace_
			getexp (checkre(3))?90000:700000,0;
			set ice_necklace_q,6;
			completequest 2113;
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Oh, let's just say it was";
			mes "a worthwhile experience";
			mes "for me.";
			next;
			mes "[Urstialla]";
			mes ".........";
			mes "............";
			mes "May Freya always protect and";
			mes "guide you and forgive you for";
			mes "that horrible joke.";
		}
		else {
			mes "["+strcharinfo(0)+"]";
			mes "Oh, no! The necklace has disappeared!";
		}
	}
	else {
		mes "[Urstialla]";
		mes "May Freya always";
		mes "protect and guide you";
		mes "with her everflowing";
		mes "grace and wisdom..";
	}
	close2;
	cutin "",255;
	end;
}

ice_dun02,120,105,3	script	Man Stuck in Ice#cave	924,5,5,{
	if (checkweight(908,200) == 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 (ice_necklace_q == 1) {
		cutin "ra_magic3",2;
		emotion ET_HUK;
		mes "[Man Stuck in Ice]";
		mes "H-hello?";
		mes "Hey! Hey, you!";
		mes "Help me break this";
		mes "ice! I need to get";
		mes "out of here!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "How did you get";
		mes "stuck in there?";
		next;
		mes "[Man Stuck in Ice]";
		mes "I'll explain everything";
		mes "later! Just... Just get";
		mes "this ice off of me!.";
		next;
		if (getskilllv("MG_FIREBOLT") > 0) {
			specialeffect EF_FIREBALL;
			mes "^3355FFYou cast Fire Bolt at";
			mes "the ice..^000000";
		}
		else {
			specialeffect EF_HIT2;
			mes "^3355FFYou hammer at the";
			mes "ice with all your might.^000000";
		}
		next;
		mes "["+strcharinfo(0)+"]";
		mes "......";
		mes "........";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I can't...";
		mes "I can't even scratch it";
		mes "Do you have any ideas?";
		next;
		emotion ET_CRY;
		mes "[Man Stuck in Ice]";
		mes "This is so humiliating...";
		mes "Me, the greatest mage";
		mes "of our age, Maheo, stuck";
		mes "in this pillar of ice.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Wait...";
		mes "You're Maheo?";
		next;
		cutin "ra_magic1",2;
		emotion ET_KIK;
		mes "[Maheo]";
		mes "It's true. You're speaking to";
		mes "Maheo, the greatest mage,";
		mes "and master of arcane spells.";
		mes "I know magic that even High";
		mes "Wizards can never hope to";
		mes "learn in their lifetimes!";
		next;
		cutin "ra_magic4",2;
		mes "[Maheo]";
		mes "Despite my greatness,";
		mes "I'm a humble man. See?";
		mes "That's why I always wear";
		mes "this Mage uniform...";
		mes "To remind myself of";
		mes "the value of humility.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "So how did you get";
		mes "stuck in all of this ice?";
		next;
		cutin "ra_magic3",2;
		mes "[Maheo]";
		mes "Actually, this happened";
		mes "because I was too humble";
		mes "You see, I underestimated";
		mes "myself, and the devastating";
		mes "force of my own magic.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "...Huh?";
		next;
		mes "[Maheo]";
		mes "Yes, this wouldn't have";
		mes "happened if I wasn't so";
		mes "humble... Humble and kind.";
		mes "It all started when I thought";
		mes "of this cave and how people";
		mes "sometimes come here to get ice.";
		next;
		mes "[Maheo]";
		mes "I then decided that";
		mes "I would exterminate these";
		mes "evil monsters for the good";
		mes "of the people! The citizens";
		mes "would feel protected, and";
		mes "I'd be recognized as a hero!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Okay... I suppose";
		mes "that sounds normal";
		mes "enough. Go on.";
		next;
		mes "[Maheo]";
		mes "I valiantly battled";
		mes "the Snowiers. They were";
		mes "no match for my magic!";
		mes "And so, I decided to just";
		mes "destroy all of them with";
		mes "one cast of a magic spell.";
		next;
		mes "[Maheo]";
		mes "You know Meteor Storm?";
		mes "I know another spell like";
		mes "that... But it's two hundred";
		mes "times more powerful! Yes...";
		mes "It has the power of a million";
		mes "exploding suns! But then...";
		next;
		emotion ET_CRY;
		mes "[Maheo]";
		mes "It was too powerful!";
		mes "There were tremors, and";
		mes "flying shards of ice, and";
		mes "all the flame caused my";
		mes "clothes to catch on fire!";
		next;
		emotion ET_SPARK, playerattached();
		mes "["+strcharinfo(0)+"]";
		mes "You...";
		mes "you set fire";
		mes "to your clothes";
		next;
		cutin "ra_magic2",2;
		mes "[Maheo]";
		mes "Yes, but not to worry.";
		mes "I quickly extinguished";
		mes "those flames with my";
		mes "powerful Frost Diver spell!";
		next;
		cutin "ra_magic3",2;
		mes "[Maheo]";
		mes "In hindsight...";
		mes "That may have";
		mes "been a mistake...";
		next;
		cutin "ra_magic3",2;
		mes "[Maheo]";
		mes "Enough about myself.";
		mes "What noble pursuit brings";
		mes "you to this place, adventurer?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I heard that you can";
		mes "polish the gems on this";
		mes "necklace with your magic,";
		mes "so I came here to find you.";
		next;
		mes "[Maheo]";
		mes "Verily, I can shine";
		mes "those gems so that they";
		mes "shine as brightly as a";
		mes "million exploding suns!";
		next;
		mes "[Maheo]";
		mes "That is, as soon";
		mes "as I can get out";
		mes "of this ice. Hmm...";
		mes "But I doubt normal";
		mes "magic will be able";
		mes "to melt all of this.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Then how are we";
		mes "supposed to get";
		mes "you out of there?";
		next;
		mes "[Maheo]";
		mes "Fear not. I'm sure";
		mes "that my master will know";
		mes "of a way to free me from";
		mes "this prison of ice. He can";
		mes "be found near Freya's Spring:";
		mes "beseech him on my behalf!";
		set ice_necklace_q,2;
		changequest 2109,2110;
		close2;
		cutin "",255;
		end;
	}
	else if ((ice_necklace_q == 2) || (ice_necklace_q == 3)) {
		mes "[Maheo]";
		mes "My master may not have";
		mes "my sheer talent, but he";
		mes "is very knowledgable in";
		mes "the ways of magic. Please...";
		mes "Ask him for help. He should";
		mes "be reading near Freya's Spring.";
		close;
	}
	else if (ice_necklace_q == 4) {
		if (countitem(7569) > 0) {
			if (countitem(7572) > 0) {
				mes "[Maheo]";
				mes "Oh, you're back!";
				mes "So did my master have";
				mes "any ideas on breaking";
				mes "this cold prison of ice?";
				next;
			}
			else {
				mes "["+strcharinfo(0)+"]";
				mes "Oh, shoot! I left the necklace in the city! I will be right back!";
				next;
				mes "[Maheo]";
				mes "Hey, hey! Can't you just release me first?";
				emotion ET_CRY;
				close;
			}
		}
		else {
			mes "[Maheo]";
			mes "My master may not have";
			mes "my sheer talent, but he";
			mes "is very knowledgable in";
			mes "the ways of magic. Please...";
			mes "Ask him for help. He should";
			mes "be reading near Freya's Spring.";
			close;
		}
		mes "["+strcharinfo(0)+"]";
		mes "Well, he made this";
		mes "magic hammer which is";
		mes "supposed to be able to";
		mes "break this magic ice.";
		next;
		mes "[Maheo]";
		mes "Of course!";
		mes "Why didn't I think of";
		mes "that? Great, now get";
		mes "me out of here please!";
		next;
		mes "^3355FFYou tightly gripped";
		mes "the Wind Hammer, and";
		mes "swung it down at the ice";
		mes "with all of your strength.^000000";
		next;
		specialeffect EF_TEIHIT3;
		specialeffect EF_FREEZE;
		specialeffect EF_ICECRASH;
		mes "^3355FF*Pzzzzz*";
		mes "*CRASH!*^000000";
		next;
		setnpcdisplay "Man Stuck in Ice#cave",937;
		emotion ET_SURPRISE;
		mes "[Maheo]";
		mes "Finally...!";
		mes "After all of this";
		mes "time! I'm free!";
		next;
		specialeffect EF_BEGINSPELL4;
		mes "[Maheo]";
		mes "Now, all of the monsters";
		mes "in this cave will taste the";
		mes "wrath of the greatest mage in";
		mes "the world! I'll have my revenge,";
		mes "and give those beasts double";
		mes "the pain that they gave me!";
		next;
		monster "ice_dun02",108,109,"Snowier",1775,1,"Man Stuck in Ice#cave::OnMyMobDead";
		monster "ice_dun02",114,112,"Snowier",1775,1,"Man Stuck in Ice#cave::OnMyMobDead";
		monster "ice_dun02",126,105,"Snowier",1775,1,"Man Stuck in Ice#cave::OnMyMobDead";
		monster "ice_dun02",121,99,"Snowier",1775,1,"Man Stuck in Ice#cave::OnMyMobDead";
		specialeffect EF_LORD;
		killmonster "ice_dun02","Man Stuck in Ice#cave::OnMyMobDead";
		mes "[Maheo]";
		mes "Muhahahahahahahaha!";
		next;
		mes "[Maheo]";
		mes "Er, but first, I need to";
		mes "use my magic to clean";
		mes "that necklace of yours.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Here...";
		next;
		mes "[Maheo]";
		mes "Oh! This was made by";
		mes "the Dwarves, wasn't it?";
		mes "It looks like they've made";
		mes "yet another masterpiece.";
		mes "Shame that this is so";
		mes "tarnished, though.";
		next;
		mes "[Maheo]";
		mes "Let's see, now...";
		next;
		specialeffect EF_FROSTWEAPON;
		mes "^3355FF*Ting*^000000";
		next;
		mes "[Maheo]";
		mes "Well, I suppose this";
		mes "is where we part ways.";
		mes "Here, take this as a gift...";
		mes "And please don't mention";
		mes "the fact that I trapped myself";
		mes "in ice to anyone else, okay?";
		set ice_necklace_q,5;
		changequest 2112,2113;
		delitem 7569,1; //Hammer_Of_Wind
		delitem 7572,1; //Magic_Necklace
		getitem 7573,1; //Magic_Necklace_
		getitem 7574,4; //Ice_Particle
		close2;
		cutin "",255;
		setnpcdisplay "Man Stuck in Ice#cave",924;
		end;
	}

OnTouch:
	end;

OnTouchNPC: 
	emotion ET_FRET;
	emotion ET_KIK, getattachedrid();
	end;

OnMyMobDead:
	end;
}

ice_dun02,120,3,0	script	#cave_vos	-1,{
OnInit:
	initnpctimer;
	end;

OnTimer3600000:
	mapannounce "ice_dun02","Go away, you animals! I'll burn you to death once I get free!",bc_map,0xFFCE00;
	end;

OnTimer7200000:
	mapannounce "ice_dun02","Hello? Can anyone hear me? I'm... I'm kind of stuck!",bc_map,0xFFCE00;
	end;

OnTimer10800000:
	stopnpctimer;
	mapannounce "ice_dun02","Please! I can't move! Hello? I think I might need help!",bc_map,0xFFCE00;
	initnpctimer;
	end;
}

rachel,265,98,3	script	Hamion#aru	930,{
	if (checkweight(908,200) == 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 (ice_necklace_q < 2) {
		mes "[Hamion]";
		mes "Hm? Did you need";
		mes "something? If it's not too";
		mes "important, then I'd like to";
		mes "get back to reading my book.";
		close;
	}
	else if (ice_necklace_q == 2) {
		mes "[Hamion]";
		mes "Hm? Did you need";
		mes "something? If it's not too";
		mes "important, then I'd like to";
		mes "get back to reading my book.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Um, would you know";
		mes "a mage by the name";
		mes "of Maheo? I'm supposed";
		mes "to go look for his master";
		mes "around this area.";
		next;
		mes "[Hamion]";
		mes "Well, you've found him";
		mes "because that would be me.";
		mes "What happened to Maheo?";
		next;
		mes "[Hamion]";
		mes "He froze himself?!";
		mes "Hahahaha! Some genius!";
		mes "Oh, well, I suppose he still";
		mes "has plenty to learn about";
		mes "character, if not magic.";
		next;
		mes "[Hamion]";
		mes "Let's see, let's see...";
		mes "This book ought to have";
		mes "the answer. Mmm... Ah!";
		mes "Page 42! I need to construct";
		mes "an artifact in order to break";
		mes "that mystical ice. Mmm.";
		next;
		mes "[Hamion]";
		mes "Would you help";
		mes "me? I need to get";
		mes "^4D4DFF5 Rough Winds^000000,";
		mes "^4D4DFF1 Hammer^000000, and";
		mes "^4D4DFF1 Blank Scroll^000000";
		next;
		mes "[Hamion]";
		mes "You can get Blank Scrolls";
		mes "in the Sage Academy in Juno.";
		mes "Ah, and the Hammer is a weapon,";
		mes "not one of those smithing tools.";
		mes "I'd help you if I could, but...";
		mes "I'm just smart, not strong.";
		set ice_necklace_q,3;
		changequest 2110,2111;
		close;
	}
	else if (ice_necklace_q == 3) {
		if ((countitem(996) < 5) || (countitem(1354) < 1) || (countitem(7433) < 1)) { 
			mes "[Hamion]";
			mes "I need to create";
			mes "a magical artifact";
			mes "to break the ice that's";
			mes "trapping Maheo. Would you";
			mes "please help me? There's no";
			mes "way I can get the items myself!";
			next;
			mes "[Hamion]";
			mes "I need to get";
			mes "^4D4DFF5 Rough Winds^000000,";
			mes "^4D4DFF1 Hammer^000000, and";
			mes "^4D4DFF1 Blank Scroll^000000";
			next;
			mes "[Hamion]";
			mes "You can get Blank Scrolls";
			mes "in the Sage Academy in Juno.";
			mes "Ah, and the Hammer is a weapon,";
			mes "not one of those smithing tools.";
			mes "I'd help you if I could, but...";
			mes "I'm just smart, not strong.";
			close;
		}
		mes "[Hamion]";
		mes "Great, you have everything";
		mes "I need! But first, would you";
		mes "make sure that you only have";
		mes "1 Hammer in your inventory?";
		mes "If you have more than one,";
		mes "I might take the wrong Hammer.";
		next;
		if (select("Let me check.:Don't worry, I checked.") == 1) {
			mes "[Hamion]";
			mes "Alright, it's always";
			mes "better to be safe than";
			mes "sorry! If only Maheo was";
			mes "a little more careful, more";
			mes "like you are, then maybe this";
			mes "wouldn't have happened.";
			close;
		}
		mes "[Hamion]";
		mes "Okay, I'll take your";
		mes "word for it. Now, let's";
		mes "bring the artifact forging";
		mes "process. Hmmm... Let me";
		mes "review it here on page 45.";
		next;
		mes "[Hamion]";
		mes "Here we go...!";
		next;
		specialeffect2 EF_CONE;
		mes "^3355FF*Pzzzz*^000000";
		next;
		mes "[Hamion]";
		mes "...Aaaand now it's done.";
		mes "Here, take this Wind Hammer";
		mes "and use it to free Maheo.";
		mes "This hammer will only work";
		mes "once, so make sure that you";
		mes "smash that ice properly!";
		delitem 1354,1; //Hammer
		delitem 996,5; //Rough_Wind
		delitem 7433,1; //Scroll
		set ice_necklace_q,4;
		changequest 2111,2112;
		getitem 7569,1; //Hammer_of_Wind
		close;
	}
	else if (ice_necklace_q >= 4) {
		mes "[Hamion]";
		mes "There are always";
		mes "singing birds and";
		mes "flitting butterflies";
		mes "all over this place";
		mes "It's so relaxing, and";
		mes "such a great place to read.";
		close;
	}
}

rachel,113,97,5	script	Mohadian	929,10,10,{
	if (ice_necklace_q == 6) {
		mes "[Mohadian]";
		mes "I work at the bar around";
		mes "here, and I've heard good";
		mes "things about you. Some of";
		mes "the customers've heard that";
		mes "you helped Urstialla by going";
		mes "into that dangerous Ice Cave.";
		next;
		mes "[Mohadian]";
		mes "Now, are you really capable";
		mes "of regularly defeating the";
		mes "snow monsters inside there?";
		mes "If you are, I've got a bit of a";
		mes "business proposition for you.";
		next;
		emotion ET_AHA;
		mes "[Mohadian]";
		mes "The weather around here";
		mes "is naturally hot and humid,";
		mes "so we need ice to make cold,";
		mes "refreshing drinks at the pub.";
		mes "And the Ice Cave is the best";
		mes "place to get that ice, right?";
		next;
		mes "[Mohadian]";
		mes "If you bring me Ice Pieces";
		mes "from the Ice Cave, I'll buy";
		mes "them from you at 375 zeny";
		mes "each. Think of it as kind of a";
		mes "freelance job. I mean, if you";
		mes "can bring me ice, I'll buy it!.";
		next;
		mes "[Mohadian]";
		mes "You can make some good";
		mes "money, my customers can";
		mes "enjoy ice cold drinks, and";
		mes "my business will definitely";
		mes "benefit. We'd kill three birds";
		mes "with one stone! What do you say?";
		next;
		if (select("No, thanks.:Sure.") == 1) {
			mes "[Mohadian]";
			mes "Aww, how disappointing.";
			mes "I was really sure that this";
			mes "would be a great deal for";
			mes "both of us. Well, if you're";
			mes "willing to change your mind";
			mes "then we can be partners!";
			close;
		}
		mes "[Mohadian]";
		mes "Great! Now, the ice that";
		mes "I need comes from Glacial";
		mes "Hearts. You can obtain those";
		mes "by hunting the snow monsters";
		mes "in the Ice Cave. Remember, I'll";
		mes "pay you 375 zeny for each one!";
		set ice_necklace_q,7;
		close;
	}
	else if (ice_necklace_q == 7) {
		if (countitem(7561) < 1) {
			mes "[Mohadian]";
			mes "Bring me some Glacial";
			mes "Hearts from the Ice Cave,";
			mes "and I'll be sure to compensate";
			mes "you with some zeny. This is a";
			mes "really good deal for the two";
			mes "of us when you think about it.";
			close;
		}
		mes "[Mohadian]";
		mes "Perfect, you brought me";
		mes "some Glacial Hearts! I can";
		mes "never get used to the beauty";
		mes "and purity of these ice crystals.";
		next;
		mes "[Mohadian]";
		mes "Yes, I think I might";
		mes "even be able to use these";
		mes "to make Arunafeltz Glacial";
		mes "Wine. Anyway, let me see";
		mes "how many you've brought me.";
		next;
		set .@hearts,countitem(7561);
		set .@totalprice,375*.@hearts;
		mes "[Mohadian]";
		mes .@hearts +" Glacial Hearts";
		mes "at 375 zeny each...";
		mes "Looks like I owe you";
		mes .@totalprice +" zeny. Here you are!";
		mes "It's always a pleasure";
		mes "doing business with you~";
		delitem 7561,.@hearts; //Glacial Hearts
		set Zeny, Zeny+.@totalprice;
		close;
	}

OnTouch_:
	if (ice_necklace_q == 6) {
		mes "[Mohadian]";
		mes "Welcome to--";
		mes "Er? Hello?";
		mes "Excuse me?";
		close;
	}
	end;
}

ice_dun03,126,126,3	script	Blazing Fire#ice1	802,{
	mes "^3355FFThe flames in this fire";
	mes "barrier crackle with magic";
	mes "power. There's no way that";
	mes "you can put this fire out";
	mes "with conventional means.^000000";
	if (ice_necklace_q > 4) {
		if ($@ktullanux_summon < 4) {
			if (countitem(7574) > 0) {
				next;
				select("Use Freezing Snow Powder.");
				mes "^3355FFYou sprinkle the Freezing Snow";
				mes "Powder onto the flame. It";
				mes "flickers before extinguising.^000000";
				delitem 7574,1; //Freezing Snow Powder
				hideonnpc "Blazing Fire#ice1";
				set $@ktullanux_summon,$@ktullanux_summon+1;
				if ($@ktullanux_summon == 4) donpcevent "ice_boss#broad::OnStart";
			}
			else if (countitem(7562) > 0) {
				next;
				select("Use Ice Scale.");
				mes "^3355FFYou throw the Ice Scale into";
				mes "the flame, it crackles before";
				mes "extinguising.^000000";
				delitem 7562,1; //Ice Scale
				hideonnpc "Blazing Fire#ice1";
				set $@ktullanux_summon,$@ktullanux_summon+1;
				if ($@ktullanux_summon == 4) donpcevent "ice_boss#broad::OnStart";
				close;
			}
		}
	}
	close;
}


ice_dun03,172,126,0	script	Blazing Fire#ice2	802,{
	mes "^3355FFThe flames in this fire";
	mes "barrier crackle with magic";
	mes "power. There's no way that";
	mes "you can put this fire out";
	mes "with conventional means.^000000";
	if (ice_necklace_q > 4) {
		if ($@ktullanux_summon < 4) {
			if (countitem(7574) > 0) {
				next;
				select("Use Freezing Snow Powder.");
				mes "^3355FFYou sprinkle the Freezing Snow";
				mes "Powder onto the flame. It";
				mes "flickers before extinguising.^000000";
				delitem 7574,1; //Freezing Snow Powder
				hideonnpc "Blazing Fire#ice2";
				set $@ktullanux_summon,$@ktullanux_summon+1;
				if ($@ktullanux_summon == 4) donpcevent "ice_boss#broad::OnStart";
			}
			else if (countitem(7562) > 0) {
				next;
				select("Use Ice Scale.");
				mes "^3355FFYou throw the Ice Scale into";
				mes "the flame, it crackles before";
				mes "extinguising.^000000";
				delitem 7562,1; //Ice Scale
				hideonnpc "Blazing Fire#ice2";
				set $@ktullanux_summon,$@ktullanux_summon+1;
				if ($@ktullanux_summon == 4) donpcevent "ice_boss#broad::OnStart";
				close;
			}
		}
	}
	close;
}

ice_dun03,172,172,0	script	Blazing Fire#ice3	802,{
	mes "^3355FFThe flames in this fire";
	mes "barrier crackle with magic";
	mes "power. There's no way that";
	mes "you can put this fire out";
	mes "with conventional means.^000000";
	if (ice_necklace_q > 4) {
		if ($@ktullanux_summon < 4) {
			if (countitem(7574) > 0) {
				next;
				select("Use Freezing Snow Powder.");
				mes "^3355FFYou sprinkle the Freezing Snow";
				mes "Powder onto the flame. It";
				mes "flickers before extinguising.^000000";
				delitem 7574,1; //Freezing Snow Powder
				hideonnpc "Blazing Fire#ice3";
				set $@ktullanux_summon,$@ktullanux_summon+1;
				if ($@ktullanux_summon == 4) donpcevent "ice_boss#broad::OnStart";
			}
			else if (countitem(7562) > 0) {
				next;
				select("Use Ice Scale.");
				mes "^3355FFYou throw the Ice Scale into";
				mes "the flame, it crackles before";
				mes "extinguising.^000000";
				delitem 7562,1; //Ice Scale
				hideonnpc "Blazing Fire#ice3";
				set $@ktullanux_summon,$@ktullanux_summon+1;
				if ($@ktullanux_summon == 4) donpcevent "ice_boss#broad::OnStart";
				close;
			}
		}
	}
	close;
}

ice_dun03,127,172,0	script	Blazing Fire#ice4	802,{
	mes "^3355FFThe flames in this fire";
	mes "barrier crackle with magic";
	mes "power. There's no way that";
	mes "you can put this fire out";
	mes "with conventional means.^000000";
	if (ice_necklace_q > 4) {
		if ($@ktullanux_summon < 4) {
			if (countitem(7574) > 0) {
				next;
				select("Use Freezing Snow Powder.");
				mes "^3355FFYou sprinkle the Freezing Snow";
				mes "Powder onto the flame. It";
				mes "flickers before extinguising.^000000";
				delitem 7574,1; //Freezing Snow Powder
				hideonnpc "Blazing Fire#ice4";
				set $@ktullanux_summon,$@ktullanux_summon+1;
				if ($@ktullanux_summon == 4) donpcevent "ice_boss#broad::OnStart";
			}
			else if (countitem(7562) > 0) {
				next;
				select("Use Ice Scale.");
				mes "^3355FFYou throw the Ice Scale into";
				mes "the flame, it crackles before";
				mes "extinguising.^000000";
				delitem 7562,1; //Ice Scale
				hideonnpc "Blazing Fire#ice4";
				set $@ktullanux_summon,$@ktullanux_summon+1;
				if ($@ktullanux_summon == 4) donpcevent "ice_boss#broad::OnStart";
				close;
			}
		}
	}
	close;
}

ice_dun03,1,173,5	script	ice_boss#broad	-1,{
OnStop:
	stopnpctimer;
	end;

OnStart:
	initnpctimer;
	end;

OnTimer2000:
	mapannounce "ice_dun03","Someone has put out Thor's flames... Infidel!",bc_map,0xFF6633;
	end;

OnTimer8000:
	mapannounce "ice_dun03","I, Ktullanux, must protect and preserve Thor's fierce flames...",bc_map,0xFF6633;
	end;

OnTimer10000:
	mapannounce "ice_dun03","As the master of this cave, I vow vengeance!",bc_map,0xFF6633;
	end;

OnTimer13000:
	mapannounce "ice_dun03","Only a human would be so foolhardy....",bc_map,0xFF6633;
	end;

OnTimer16000:
	mapannounce "ice_dun03","Your curiosity will cost you, human.",bc_map,0xFF6633;
	end;

OnTimer19000:
	mapannounce "ice_dun03","Prepare yourself for a freezing realm of pain which you cannot possibly imagine!",bc_map,0xFF6633;
	end;

OnTimer21000:
	stopnpctimer;
	donpcevent "ice_boss#on::OnStart";
	end;
}

ice_dun03,1,174,3	script	ice_boss#on	-1,{
OnStart:
	monster "ice_dun03",150,135,"Ktullanux",1779,1,"ice_boss#on::OnMyMobDead";
	end;

OnStartTimer:
	Initnpctimer;
	end;

OnStopTimer:
	stopnpctimer;
	end;

OnMyMobDead:
	mapannounce "ice_dun03","Oh, Odin! Please protect this place from Thor's fierce fire!",bc_map,0xFF6633;
	mapannounce "ice_dun03","Pzzzzz...Pzzzz...",bc_map,0x33FFFF;
	donpcevent "ice_boss#on::OnStartTimer";
	donpcevent "#ice_sec::OnStart";
	end;

OnTimer7200000:
	stopnpctimer;
	set $@ktullanux_summon,0;
	hideoffnpc "Blazing Fire#ice1";
	hideoffnpc "Blazing Fire#ice2";
	hideoffnpc "Blazing Fire#ice3";
	hideoffnpc "Blazing Fire#ice4";
	end;
}
	
ice_dun03,1,175,3	script	#ice_sec	-1,{
OnStart:
	initnpctimer;
	enablenpc "#ice_4f_1";
	enablenpc "#ice_4f_2";
	enablenpc "#ice_4f_3";
	enablenpc "#ice_4f_4";
	specialeffect EF_MAPPILLAR2,AREA,"#ice_4f_1";
	specialeffect EF_MAPPILLAR2,AREA,"#ice_4f_2";
	specialeffect EF_MAPPILLAR2,AREA,"#ice_4f_3";
	specialeffect EF_MAPPILLAR2,AREA,"#ice_4f_4";
	end;

OnTimer60000:
	stopnpctimer;
	disablenpc "#ice_4f_1";
	disablenpc "#ice_4f_2";
	disablenpc "#ice_4f_3";
	disablenpc "#ice_4f_4";
	end;
}

ice_dun03,150,137,0	script	#ice_4f_1	45,2,2,{
OnTouch_:
	warp "ice_dun04",33,144;
	end;

OnInit:
	disablenpc "#ice_4f_1";
	end;
}

ice_dun03,138,148,0	script	#ice_4f_2	45,2,2,{
OnTouch_:
	warp "ice_dun04",33,144;
	end;

OnInit:
	disablenpc "#ice_4f_2";
	end;
}

ice_dun03,161,148,0	script	#ice_4f_3	45,2,2,{
OnTouch_:
	warp "ice_dun04",33,144;
	end;

OnInit:
	disablenpc "#ice_4f_3";
	end;
}

ice_dun03,151,162,0	script	#ice_4f_4	45,2,2,{
OnTouch_:
	warp "ice_dun04",33,144;
	end;

OnInit:
	disablenpc "#ice_4f_4";
	end;
}

// Donation Lottery Quest/High Priest Quest :: rachel_oz & rachel_ma1
//============================================================ 
ra_temple,119,180,0	script	Temple Entrance#ra_tem	45,1,1,{
OnTouch:
	if ($rachel_donate >= 10000) {
		if (MISC_QUEST & 8192) { warp "ra_temin",169,23; end; }

		if (ra_tem_q < 10) {
			mes "^3355FFThe temple's";
			mes "entrance is locked.^000000";
			next;
			select("Kick Door.:Smash Door with Weapon.");
			emotion ET_HUK, getnpcid(0, "Nemma#ra_temple");
			mes "[Priestess Nemma]";
			mes "Please don't do that!";
			close;
		}
	}
	warp "ra_temin",169,23;
	end;
}

ra_temple,116,174,3	script	Nemma#ra_temple	920,{
	cutin "ra_nemma02",2;
	if ($rachel_donate < 10000) {
		if (ra_have_donated == 0) {
			cutin "ra_nemma03",2;
			mes "[Priestess Nemma]";
			mes "Good day, adventurer.";
			mes "May I ask what brings";
			mes "you to the temple today?";
			next;
			if (select("Just sight-seeing.:I came to pray.") == 1) {
				cutin "ra_nemma01",2;
				mes "[Priestess Nemma]";
				mes "I guess most foreigners";
				mes "aren't familiar with our";
				mes "faith, so I suppose they";
				mes "wouldn't come here to pray...";
				mes "Well, I hope you enjoy your";
				mes "time here, adventurer.";
				goto L_End;
			}
			mes "[Priestess Nemma]";
			mes "Oh! I'm glad to see that";
			mes "our kind of spirituality is";
			mes "practiced in other countries~";
			mes "You know, we at the Temple of";
			mes "Cheshrumnir will be hosting a";
			mes "festival here at the temple.";
			next;
			cutin "ra_nemma01",2;
			mes "[Priestess Nemma]";
			mes "We're accepting donations";
			mes "for the festival, so we'd be";
			mes "grateful if you could make";
			mes "a contribution. Regardless,";
			mes "we invite you to celebrate the";
			mes "grace of the goddess with us.";
			emotion ET_DELIGHT;
			next;
			mes "[Priestess Nemma]";
			mes "There's one High Priest that";
			mes "disagrees with collecting money";
			mes "from the temple's patrons, but";
			mes "it's up to you if you want to";
			mes "give or not. If you donate, you";
			mes "might be able to win a prize!";
			next;
			mes "[Priestess Nemma]";
			mes "You can use our Lottery Tickets";
			mes "to win something nice from our";
			mes "Temple Storage. However, you";
			mes "donate the 50,000 zeny for each";
			mes "Lottery Ticket, which also happens to be the minimum donation amount.";
			next;
			cutin "ra_nemma03",2;
			mes "[Priestess Nemma]";
			mes "The prizes that are given to";
			mes "donators are also randomly";
			mes "chosen, so I have no way of";
			mes "telling you what you'd get.";
			mes "Would you be interested";
			mes "in making a donation?";
			next;
			if (select("No, thanks.:Sure.") == 1) {
				cutin "ra_nemma01",2;
				mes "[Priestess Nemma]";
				mes "I understand. Well,";
				mes "maybe some other time.";
				mes "May Freya bless you on";
				mes "all your journeys. May the";
				mes "grace of the goddess always";
				mes "support us in all that we do~";
				goto L_End;
			}
			mes "[Priestess Nemma]";
			mes "Great! How much would you";
			mes "like to donate? We can only";
			mes "accept donations in increments";
			mes "of 50,000 zeny, and we can only";
			mes "accept up to 150,000 zeny at once. It's a bit complicated, I know...";
			next;
			switch(select("50,000z - 1 Lottery Ticket:100,000z - 2 Lottery Ticket:150,000z - 3 Lottery Ticket:Cancel")) {
			case 1:
				callsub S_Donate,1,"50,000";
				break;
			case 2:
				callsub S_Donate,2,"100,000";
				break;
			case 3:
				callsub S_Donate,3,"150,000";
				break;
			case 4:
				cutin "ra_nemma02",2;
				mes "[Priestess Nemma]";
				mes "I understand that it takes";
				mes "some thought to part with an";
				mes "amount of money like 50,000";
				mes "zeny. Even so, Freya is always";
				mes "protecting you, wherever you go~";
				break;
			}
			goto L_End;
		}
		else {
			cutin "ra_nemma03",2;
			mes "[Priestess Nemma]";
			mes "Oh, you're " + strcharinfo(0) + "!";
			mes "Welcome back! I remember";
			mes "that you donated just a little";
			mes "while ago. So what brings you";
			mes "to the temple today, hmm?";
			next;
			switch(select("I've come to donate again.:Just sight-seeing.:I came to attend the service.:I just wanted to see you again.")) {
			case 1:
				mes "[Priestess Nemma]";
				mes "You've come to make another";
				mes "donation? Splendid! How much";
				mes "would you like to donate this";
				mes "time? Remember that we can only";
				mes "accept donations in increments of";
				mes "50,000 zeny up to 150,000 zeny.";
				next;
				switch(select("50,000z - 1 Lottery Ticket:100,000z - 2 Lottery Ticket:150,000z - 3 Lottery Ticket:Cancel")) {
				case 1:
					callsub S_Donate,1,"50,000";
					break;
				case 2:
					callsub S_Donate,2,"100,000";
					break;
				case 3:
					callsub S_Donate,3,"150,000";
					break;
				case 4:
					cutin "ra_nemma02",2;
					mes "[Priestess Nemma]";
					mes "I understand that it takes";
					mes "some thought to part with an";
					mes "amount of money like 50,000";
					mes "zeny. Even so, Freya is always";
					mes "protecting you, wherever you go~";
					break;
				}
				goto L_End;
			case 2:
				mes "[Priestess Nemma]";
				mes "Oh! If you'd like some";
				mes "information about our temple,";
				mes "why don't you ask Priestess";
				mes "Pano at the Help Desk inside?";
				next;
				mes "[Priestess Nemma]";
				mes "Penno will also redeem";
				mes "your Lottery Tickets for";
				mes "prizes, although she doesn't";
				mes "really seem to enjoy that job.";
				mes "Well, anyway, she'll help";
				mes "you out. See you later!";
				break;
			case 3:
				mes "[Priestess Nemma]";
				mes "You're here for the";
				mes "service? That's great~";
				mes "I hope you find the sense";
				mes "of calm that you can only";
				mes "get from goddess Freya~";
				break;
			case 4:
				mes "[Priestess Nemma]";
				mes "Oh, how sweet of you~";
				break;
			}
			goto L_End;
		}
	}
	else {
		if (MISC_QUEST & 8192) {
			cutin "ra_nemma01",2;
			mes "[Priestess Nemma]";
			mes "Welcome to our temple!";
			goto L_End;
		}
		if (ra_tem_q < 1) {
			mes "[Priestess Nemma]";
			mes "Hello, there!";
			mes "...............................";
			mes "Um, for some reason, the";
			mes "temple gate hasn't opened yet";
			mes "But it should be open now. Well";
			mes "this happens sometimes so...";
			next;
			mes "[Priestess Nemma]";
			mes "See, there's this auto locking";
			mes "system that was added to the";
			mes "gate when this temple was";
			mes "built, but now it's more of";
			mes "an annoyance than security.";
			next;
			mes "[Priestess Nemma]";
			mes "Every time someone messes";
			mes "with the lock, or if it breaks,";
			mes "we have to wait until it auto";
			mes "resets itself before it works";
			mes "again. No one can fix it";
			mes "really quickly, you know...";
			next;
			mes "[Priestess Nemma]";
			mes "^333333*Sniff*^000000 What should I do?";
			mes "The auto reset never takes";
			mes "this long, and I really need";
			mes "to go inside. ^333333*Sob*^000000 P-Panno!";
			mes "Panno, I neeeed heeeeelp~!";
			set ra_tem_q,1;
			goto L_End;
		}
		else if ((ra_tem_q >= 1) && (ra_tem_q < 10)) {
			mes "[Priestess Nemma]";
			mes "If the gate's locked, then";
			mes "I've just got to find that";
			mes "secret entrance. Some kids";
			mes "supposedly use it to enter";
			mes "and play pranks in the temple,";
			mes "but I don't know who they are...";
			next;
			mes "[Priestess Nemma]";
			mes "Panno would know";
			mes "what to do... I think.";
			mes "Ooh, Panno, help me!";
			goto L_End;
		}
		else if (ra_tem_q == 10) {
			cutin "ra_nemma04",2;
			mes "[Priestess Nemma]";
			mes "Oh, "+strcharinfo(0)+"!";
			mes "The gate just opened and";
			mes "I was able to get inside";
			mes "the temple! ^333333*Whew*^000000 I was";
			mes "getting really worried";
			mes "about it for awhile.";
			next;
			mes "[Priestess Nemma]";
			mes "This is the first time that the";
			mes "gate locked up since Panno";
			mes "was assigned to her post in";
			mes "the temple. I thought maybe";
			mes "something happened and";
			mes "she got in trouble, you know?";
			next;
			cutin "ra_nemma02",2;
			mes "[Priestess Nemma]";
			mes "Wait, wait...";
			mes "I'm outside. What if";
			mes "the gate locks up again?";
			mes "Oooh, what should I do?!";
			goto L_End;
		}
		else if (ra_tem_q == 11) {
			emotion ET_DELIGHT;
			cutin "ra_nemma03",2;
			mes "[Priestess Nemma]";
			mes "Hey, "+strcharinfo(0)+"~!";
			mes "We reached our target!";
			mes "Isn't that great? We're no";
			mes "longer asking for donations,";
			mes "but you can still redeem your";
			mes "Lottery Tickets inside, okay?";
			goto L_End;
		}
		else if (ra_tem_q == 12) {
			mes "[Priestess Nemma]";
			mes "Mmm... I know what";
			mes "I can do! I can ask for";
			mes "Firecrackers! Yes, that'll";
			mes "be fun for the festival.";
			mes "Hey, do you know where";
			mes "those things are sold?";
			next;
			cutin "ra_nemma01",2;
			mes "[Priestess Nemma]";
			mes "I, uh, can't give you";
			mes "much... But if you would";
			mes "bring me some Firecrackers,";
			mes "then I'll pray for your good";
			mes "fortune. Sorry, but that's";
			mes "all I can really offer.";
			next;
			cutin "ra_nemma04",2;
			mes "[Priestess Nemma]";
			mes "Hey, bring me";
			mes "a lot of Firecrackers,";
			mes "like, ^FF000020 of them^000000! Thank";
			mes "you thank you thank you!";
			set ra_tem_q,13;
			goto L_End;
		}
		else if (ra_tem_q == 13) {
			mes "[Priestess Nemma]";
			mes "Hey, did you bring me";
			mes "^FF000020 Firecrackers^000000? Mmm?";
			next;
			if(select("Yes.:No, not yet.") == 1) {
				cutin "ra_nemma01",2;
				mes "[Priestess Nemma]";
				mes "Let's see...";
				next;
				if (countitem(12018) >= 20) {
					cutin "ra_nemma04",2;
					delitem 12018,20; //Fire_Cracker
					getexp (checkre(3))?50000:200000,0;
					set ra_tem_q,14;
					mes "[Priestess Nemma]";
					mes "Yay!";
					mes "Firecrackers!";
					mes "Oh, let me pray";
					mes "for your good fortune!";
					next;
					mes "^3355FFPriestess Nemma prayed";
					mes "fervently for your good";
					mes "fortune. It feels like";
					mes "it's actually working...^000000";
					next;
					cutin "ra_nemma04",2;
					mes "[Priestess Nemma]";
					mes "I'm done!";
					mes "Now it's time";
					mes "to play! Hm, maybe";
					mes "our pope would like";
					mes "to see these too?";
					goto L_End;
				}
				cutin "ra_nemma02",2;
				mes "[Priestess Nemma]";
				mes "Awww...";
				mes "This isn't enough";
				mes "Firecrackers. I mean,";
				mes "I know it's like a donation,";
				mes "but still. How much fun are";
				mes "fireworks if there isn't a lot?";
			}
			else {
				cutin "ra_nemma01",2;
				mes "[Priestess Nemma]";
				mes "Awww...";
				mes "Well, I don't really";
				mes "have much to pay you";
				mes "back with, anyway~";
			}
			goto L_End;
		}
		else {
			cutin "ra_nemma01",2;
			mes "[Priestess Nemma]";
			mes "Welcome to our temple!";
		}
		goto L_End;
	}

L_End:
	close2;
	cutin "",255;
	end;

S_Donate:
	.@num = getarg(0);
	cutin "ra_nemma01",2;
	mes "[Priestess Nemma]";
	mes "So, " + strcharinfo(0) + "...";
	mes "I just want to make sure:";
	mes "You want to donate "+getarg(1);
	mes "zeny, and receive "+ .@num +" Lottery";
	if (.@num == 1) mes "Ticket. Is that correct?";
	else mes "Tickets. Is that correct?";
	next;
	if (select("No:Yes") == 1) {
		mes "[Priestess Nemma]";
		mes "Oh, I see. Well, if you";
		mes "don't have enough zeny with";
		mes "you, then you can just come";
		mes "back and donate later. Our";
		mes "goddess Freya smiles on the";
		mes "generous and rewards the patient!";
		return;
	}
	if (Zeny >= .@num*50000) {
		if (!checkweight(7570,.@num)) {
			cutin "ra_nemma02",2;
			mes "[Priestess Nemma]";
			mes "I can scarcely believe it...";
			mes "You're carrying so much stuff,";
			mes "you don't even have enough";
			mes "room for a Lottery Ticket.";
			mes "You'd better put some of";
			mes "your things in Storage, yes?";
			next;
			cutin "ra_nemma01",2;
			mes "[Priestess Nemma]";
			mes "Don't worry, I'll still be";
			mes "here after you make more";
			mes "space available in your";
			mes "Inventory. Hurry back, and";
			mes "donate if you can, okay?";
			return;
		}
		$rachel_donate = $rachel_donate + .@num;
		getitem 7570,.@num;// Temple_Lottery_Ticket
		Zeny = Zeny - .@num *50000;
		set ra_have_donated,1;
		if ($rachel_donate > 9999) {
			cutin "ra_nemma03",2;
			mes "[Priestess Nemma]";
			mes "There you are~";
			mes "Thanks so much for";
			mes "your donation! I'm sure";
			mes "that Freya is smiling down";
			mes "upon you, and will reward";
			mes "you for your generosity~";
			return;
		}
		else {
			set .@Remaining,10000-$rachel_donate;
			cutin "ra_nemma03",2;
			mes "[Priestess Nemma]";
			mes "Thank you so much! We'll be";
			mes "continuing to accept donations";
			mes "until we reach our target. Once";
			mes "we receive "+.@Remaining+" more donations";
			mes "in increments of 50,000 zeny,";
			mes "our fundraiser will finish.";
			next;
			mes "[Priestess Nemma]";
			mes "If you're feeling so";
			mes "inclined, come back later";
			mes "and make another contribution.";
			mes "Thanks again, and may Freya";
			mes "always watch over you.";
			return;
		}
	}
	else {
		mes "[Priestess Nemma]";
		mes "I'm sorry, but you have";
		mes "less than "+ (.@num *50000) +" zeny...";
		mes "I know it's asking a lot,";
		mes "but those are the rules that";
		mes "I've been told to follow, so...";
		mes "Well, maybe another time, yes?";
		return;
	}
}

rachel,243,37,3	script	Kid#Candy Addict	921,{
	if ((ra_tem_q < 2) || (ra_tem_q > 9) || (MISC_QUEST & 8192)) {
		mes "[Kid]";
		mes "Hey! What's that";
		mes "smile for? You're not";
		mes "gonna come pat my head,";
		mes "are you? No! I hate that!";
		next;
		mes "[Kid]";
		mes "Don't come here!";
		mes "I don't want you to";
		mes "pat my head! Grrr...";
		mes "I-I'm warning you!";
		next;
		mes "[Kid]";
		mes "Hey, look at your";
		mes "clothes! Where did";
		mes "you come from, huh?";
		next;
		mes "[Kid]";
		mes "Are you from a";
		mes "different country?";
		next;
		mes "[Kid]";
		mes "Huh, huh?";
		mes "What country";
		mes "are you from?";
		next;
		mes "[Kid]";
		mes "Eh, whatever.";
		next;
		mes "[Kid]";
		mes "Oh hey, do";
		mes "you like candy?";
		if (ra_tem_q == 1) {
			next;
			switch(select("Not at all.:Yeah.:Sure, I love the stuff~:Not much.")) {
			case 1:
				mes "[Kid]";
				mes "Hmpf! Okay.";
				close;
			case 2:
				break;
			case 3:
				break;
			case 4:
				mes "[Kid]";
				mes "Oh. It's 'cause you're";
				mes "a grown-up. Why don't";
				mes "you like candies, anyway?";
				next;
				mes "[Kid]";
				mes "Why, huh?";
				mes "Tell me, tell";
				mes "me, how come?";
				close;
			}
			if (rand(1,2) != 2) {
				mes "[Kid]";
				mes "Oh yeah...?";
				next;
				mes "[Kid]";
				mes "But you're a grown-up,";
				mes "aren't you? Heh heh heh!";
				next;
				mes "[Kid]";
				mes "Candy is only for";
				mes "kids! Hahahahaah!";
				next;
				mes "[Kid]";
				mes "I tricked you!";
				mes "You big big dummy!";
			}
			else {
				mes "[Kid]";
				mes "Oh, you do?";
				mes "Does that mean";
				mes "that you have";
				mes "any candy, then?";
				next;
				mes "[Kid]";
				mes "I want one!";
				next;
				mes "[Kid]";
				mes "Hurry, give me one!";
				mes "Gimmie gimmie~!";
				next;
				if (countitem(529) > 0) {
					mes "[Kid]";
					mes "Mmm...";
					mes "If you give me";
					mes "some Candy, then I'll";
					mes "tell you something";
					mes "really cool, yeah?";
					next;
					if (select("Sure.:No.") == 1) {
						mes "[Kid]";
						mes "Yay~";
						next;
						mes "[Kid]";
						mes "Hah! Got you!";
						mes "I didn't want any";
						mes "candy anyway! Nyeh!";
						mes "But I like you, so";
						mes "I can tell you a secret!";
						next;
						mes "[Kid]";
						mes "Did you know that";
						mes "they always leave one";
						mes "of the windows to the temple";
						mes "unlocked? You spy on the";
						mes "priests inside. They're always";
						mes "fighting! Isn't that bad?";
						next;
						mes "[Kid]";
						mes "Oh well, they're adults,";
						mes "so I dunno. Maybe they...";
						mes "Mm. Well, I remember that";
						mes "fighting is supposed to be bad.";
						next;
						mes "[Kid]";
						mes "Awww, nuts!";
						mes "I just remembered!";
						mes "If you have candy, it";
						mes "must be from another";
						mes "country! I should have";
						mes "taken it from you. Dang it!";
						next;
						mes "[Kid]";
						mes "Oooh, I hate you";
						mes "now! Leave me alone!";
						set ra_tem_q,2;
						close;
					}
					mes "[Kid]";
					mes "You don't wanna";
					mes "share your candy?";
					mes "Hmpf! I guess you";
					mes "must really love it.";
					mes "...You big greedy.";
					close;
				}
				mes "[Kid]";
				mes "Wait, you don't have";
				mes "any Candy, huh? How can";
				mes "you tell me you like Candy";
				mes "when you don't carry any?";
				mes "Look at this! My pockets";
				mes "are full of candy!";
				next;
				mes "[Kid]";
				mes "See?";
				mes "Look at all";
				mes "this candy!";
				next;
				mes "[Kid]";
				mes "Yeah, you have to";
				mes "have at least this";
				mes "much candy to say";
				mes "that you like them.";
				mes "Hee hee hee hee!";
				next;
				mes "[Kid]";
				mes "Oh hey...";
				mes "Would you like to";
				mes "have some candy?";
				next;
				mes "[Kid]";
				mes "Haha! I tricked you!";
				mes "I'm not gonna share";
				mes "all this candy with you!";
				mes "All of it is for me!";
				next;
				mes "[Kid]";
				mes "...............................";
				mes "Um... Are you mad?";
				next;
				mes "[Kid]";
				mes "Oh...";
				mes "You are mad";
				mes "at me, aren't you?";
				next;
				mes "[Kid]";
				mes "Okay, okay.";
				mes "I'll tell you a really";
				mes "cool secret, so promise";
				mes "that you won't be mad anymore.";
				next;
				switch(select("No, thanks.:What's that?")) {
				case 1:
					mes "[Kid]";
					mes "Please~";
					break;
				case 2:
					mes "[Kid]";
					mes "Did you know that";
					mes "they always leave one";
					mes "of the windows to the temple";
					mes "unlocked? You spy on the";
					mes "priests inside. They're always";
					mes "fighting! Isn't that bad?";
					next;
					mes "[Kid]";
					mes "Oh well, they're adults,";
					mes "so I dunno. Maybe they...";
					mes "Mm. Well, I remember that";
					mes "fighting is supposed to be bad...";
					next;
					mes "[Kid]";
					mes "Now, I hope you";
					mes "won't be mad at";
					mes "me anymore...";
					mes "If you're not,";
					mes "then I'm gonna";
					mes "be madder at you!";
					set ra_tem_q,2;
					break;
				}
			}
		}
		close;
	}
	else if (ra_tem_q == 2) {
		mes "[Kid]";
		mes "You're leaving?";
		mes "Don't you want to";
		mes "watch me play Rock,";
		mes "Paper, Scissors?";
		next;
		mes "[Kid]";
		mes "Hey! I don't like";
		mes "the way you're looking";
		mes "at me. I don't like you";
		mes "watching me like that!";
		mes "Why don't you go away?";
		next;
		mes "[Kid]";
		mes "Gosh, I said, go away!";
		next;
		mes "[Kid]";
		mes "If you're that bored,";
		mes "why don't you peep through";
		mes "the windows in the temple,";
		mes "huh? Gosh! Some people!";
		close;
	}
}

ra_temple,67,209,0	script	zawa00	-1,3,3,{
OnTouch:
	if (ra_tem_q == 2) {
		mes "^3355FFYou notice a slightly";
		mes "open window that";
		mes "you can easily enter.^000000";
		next;
		if(select("Stay:Enter Through Window") == 2) {
			mes "^3355FFYou pull the window,";
			mes "and it smoothly opens.";
			mes "This is probably what";
			mes "those mischevious hits";
			mes "have been using to enter";
			mes "unnoticed into this temple.^000000";
			close2;
			warp "que_rachel",62,82;
			end;
		}
		mes "^3355FFYou decide that it's";
		mes "wrong to sneak into";
		mes "a place. But what if";
		mes "you don't get caught?^000000";
		close;
	}
	else if ((ra_tem_q >= 3) && (ra_tem_q < 10)) {
		mes "^3355FFWould you like to";
		mes "enter the temple";
		mes "through this window?^000000";
		next;
		if(select("Enter:Cancel") == 1) {
			close2;
			warp "que_rachel",62,82;
			end;
		}
		mes "^3355FFUsing this window is";
		mes "probably the only way";
		mes "that you can enter.^000000";
		close;
	}
	end;
}

que_rachel,63,82,0	script	Window#ra_temple	111,{
	mes "^3355FFThis window is open.^000000";
	next;
	if(select("Stay:Exit Through Window") == 2) {
		close2;
		warp "ra_temple",73,208;
		end;
	}
	close;
}

que_rachel,60,80,0	script	zawa01	-1,5,5,{
OnTouch:
	if (ra_tem_q == 2) {
		mes "^3355FFIt's strangely";
		mes "dark in here.^000000";
		set ra_tem_q,3;
		close;
	}
	end;
}

que_rachel,59,112,0	script	zawa02	-1,10,10,{
OnTouch:
	if (ra_tem_q == 3) {
		mes "^3355FFYou hear some";
		mes "noise from the hallway";
		mes "towards the chapel. It";
		mes "sounds like there are";
		mes "several other people here.^000000";
		set ra_tem_q,4;
		close;
	}
	end;
}

que_rachel,94,139,0	script	zawa03	-1,10,10,{
OnTouch:
	if (ra_tem_q == 4) {
		mes "^3355FFYou hear noises of some";
		mes "commotion from the stairs.^000000";
		set ra_tem_q,5;
		close;
	}
	end;
}

que_rachel,132,70,0	script	zawa04	-1,10,10,{
OnTouch:
	if (ra_tem_q == 5) {
		mes " ";
		mes " ";
		mes "^ff0000Crash!^000000";
		next;
		mes "^3355FFYou hear something";
		mes "fall from the stairs,";
		mes "followed by noises that";
		mes "sound like a scuffle.^000000";
		set ra_tem_q,6;
		close;
	}
	end;
}

que_rachel,28,315,0	script	Bloody Spot	-1,5,5,{
OnTouch:
	if (ra_tem_q == 6) {
		mes "^3355FFThere's a spot on the";
		mes "ground that's darker than";
		mes "the rest of the floor...^000000";
		next;
		if (select("Investigate:Ignore") == 1) {
			mes "^3355FFIt's too dark to";
			mes "really see the spot^000000";
			next;
			mes "...";
			mes "......";
			mes ".........";
			next;
			mes "^3355FFIt smells a little bit";
			mes "like copper or iron. Blood";
			mes "has probably been spilled here.^000000";
			set ra_tem_q,7;
			close;
		}
		else {
			mes "^3355FFYou decide that your";
			mes "time would be better spent";
			mes "investigating something else.^000000";
			close;
		}
	}
	else if (ra_tem_q == 7) {
		mes "^3355FFThis dark spot on the";
		mes "ground is really creepy,";
		mes "no matter how many";
		mes "times you look at it.^000000.";
		next;
		if (select("Investigate Again:Ignore") == 1) {
			mes "^3355FFThe blood on the ground";
			mes "hasn't dried up yet, but";
			mes "it's probably cold by now.^000000";
			next;
			mes "...";
			mes "......";
			mes ".........";
			next;
			mes "^3355FFThe amount of blood";
			mes "on the ground is more";
			mes "than can be contained in just";
			mes "one person. You'd better get";
			mes "out of here before it's too late.^000000";
			set ra_tem_q,8;
			close;
		}
		else {
			mes "^3355FFYou decide that your";
			mes "time would be better spent";
			mes "investigating something else.^000000";
			close;
		}
	}
	else if (ra_tem_q == 8) {
		mes "^3355FFThis blood stain on the";
		mes "ground is a pretty bad";
		mes "sign. You might have to";
		mes "escape this place before";
		mes "whatever caused this much";
		mes "bleeding does the same to you.^000000";
		close;
	}
	end;
}

que_rachel,170,37,0	script	nemma01::nemma01	-1,5,5,{
OnTouch_:
	if (ra_tem_q == 8) {
		mes "[???]";
		mes "Only the goddess exists.";
		next;
		mes "[???]";
		mes "Everyone must be";
		mes "ready for her coming.";
		next;
		mes "[???]";
		mes "Izlude, my hometown,";
		mes "I have come to this";
		mes "place to build.";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "!";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Th-that's Priestess";
		mes "Panno's voice! But isn't";
		mes "she just outside the door?";
		mes "What exactly was she saying?";
		set ra_tem_q,9;
		close;
	}
	end;
}

que_rachel,175,37,0	duplicate(nemma01)	nemma02	-1,5,5
que_rachel,180,37,0	duplicate(nemma01)	nemma03	-1,5,5
que_rachel,165,37,0	duplicate(nemma01)	nemma04	-1,5,5
que_rachel,160,37,0	duplicate(nemma01)	nemma05	-1,5,5

que_rachel,169,18,0	script	Quest Temple Exit#ra_tem	45,2,2,{
	mes "^3355FFThe gate is closed.^000000";
	next;
	switch(select("Push Gate:Examine Gate:Kick Gate:Smash Gate with Weapon")) {
	case 1:
		mes "^3355FFYou push the gate";
		mes "with all of your might...";
		if (ra_tem_q == 9) {
			close2;
			set ra_tem_q,10;
			warp "ra_temple",119,175;
			end;
		}
		mes "But it won't even budge.^000000";
		break;
	case 2:
		mes "^3355FFThere's some strange";
		mes "machinery installed on";
		mes "the gate, and a slot where";
		mes "it looks you you can insert";
		mes "a card or permit. The lights";
		mes "are on, so it must be working.^000000";
		break;
	case 3:
		mes "^3355FFYou angrily kick the gate...";
		if (ra_tem_q == 9) {
			close2;
			set ra_tem_q,10;
			warp "ra_temple",119,175;
			end;
		}
		mes "But no matter how much rage";
		mes "you put into your kick, the";
		mes "gate refuses to open for you.";
		mes "Oh, and your foot hurts too.^000000.";
		break;
	case 4:
		mes "^3355FFWait! That's not";
		mes "a good idea. You can't";
		mes "smash down the gate to";
		mes "a holy place: heroes don't";
		mes "specialize in desecration.^000000";
		break;

	}
	close;
}

ra_temin,277,159,3	script	High Priest Zhed#rachel	932,{
	if ((ra_tem_q > 14) || (MISC_QUEST&8192)) set lost_boy,14;
	if (checkweight(908,200) == 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 (lost_boy == 12) {
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "For some reason, you look";
		mes "familiar to me. Are you supposed";
		mes "to be here? Otherwise, you should";
		mes "leave this place if you don't have";
		mes "the proper authorization.";
		next;
		select("I'm here on Vincent's behalf");
		mes "[High Priest Zhed]";
		mes "Vincent sent you? I see.";
		mes "You must have been looking";
		mes "for me. I am High Priest Zhed,";
		mes "and I understand that you";
		mes "have a package for me.";
		next;
		mes "[High Priest Zhed]";
		mes "Usually, Vincent doesn't";
		mes "trust strangers to deliver";
		mes "these packages, but perhaps";
		mes "this was necessitated by some";
		mes "strange circumstance. Anyway,";
		mes "let's see what he sent me...";
		next;
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "Hm? What's this?";
		mes "Vincent sent a note?";
		mes "I suppose this must be";
		mes "important. Give me just a";
		mes "moment to read this, please...";
		next;
		mes "[High Priest Zhed]";
		mes "...............................";
		mes "...Hrrrmm. Vincent. Now";
		mes "I understand. So he was being";
		mes "intentionally cold towards Jenny";
		mes "and Phoebe so other people";
		mes "wouldn't get suspicious...";
		next;
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "Still, I don't think he";
		mes "had to do that--it might";
		mes "have been a little too";
		mes "much. Well, I really";
		mes "appreciate your help";
		mes "in this matter, adventurer.";
		next;
		mes "[High Priest Zhed]";
		mes "But tell me, did you only";
		mes "help Vincent and risk your";
		mes "life because you were being";
		mes "paid? Were you only being";
		mes "motivated by the money?";
		next;
		select("Actually... I was just curious.");
		mes "[High Priest Zhed]";
		mes "You were doing this just to";
		mes "satisfy your curiosity? Heh";
		mes "heh, that's very interesting.";
		mes "That's also the best attitude";
		mes "for a brave adventurer. I like";
		mes "that. May I have your name?";
		next;
		select("Tell him your name.");
		mes "[High Priest Zhed]";
		mes ""+strcharinfo(0)+"...";
		mes "Yes, that's a fine name.";
		mes "It suits you well. I'll be sure";
		mes "to remember that. Again, let";
		mes "me thank you for risking your";
		mes "life to retrive my belongings.";
		next;
		mes "[High Priest Zhed]";
		mes "I shall be praying for";
		mes "Freya to guide and protect";
		mes "you in your travels. Peace";
		mes "be with you, "+strcharinfo(0)+".";
		close2;
		cutin "",255;
		set lost_boy,13;
		completequest 8099;
		specialeffect2 EF_ABSORBSPIRITS;
		getexp (checkre(3))?90000:900000,0;
		end;
	}
	else if ((lost_boy == 13) && (ra_tem_q < 14)) {
		mes "[High Priest Zhed]";
		mes "Ah, "+strcharinfo(0)+"...";
		mes "I appreciate that you've";
		mes "managed to retrieve my";
		mes "belongings for me. You are";
		mes "a truly talented adventurer.";
		mes "May Freya protect you...";
	}
	else if ((lost_boy == 13) && (ra_tem_q == 14)) {
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "Ah, good, I was hoping you'd";
		mes "show up here sooner or later.";
		mes "I have a favor to ask of you";
		mes "since I'm too busy to do it";
		mes "myself, and I trust you more";
		mes "than any other adventurer.";
		next;
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "However, before I give you";
		mes "the details, you must know";
		mes "that this favor must be kept";
		mes "secret. In other words, once";
		mes "I explain the task, you must";
		mes "accept my request.";
		next;
		if (select("Let me think about it.:Yes, sure.") == 1) {
			mes "[High Priest Zhed]";
			mes "I understand, but if you";
			mes "change your mind, please";
			mes "come back and let me know.";
			mes "It's very hard for me to find";
			mes "someone that I can really";
			mes "rely on to do this for me...";
			close2;
			cutin "",255;
			end;
		}
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "Ah, I'm relieved to see";
		mes "that you accept. Don't worry,";
		mes "this task isn't complicated,";
		mes "nor will it require much";
		mes "in the way of sacrifice.";
		next;
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "As you may already know,";
		mes "our country of Arunafeltz";
		mes "worships the goddess Freya.";
		mes "There's almost no separation";
		mes "between politics, society,";
		mes "and our religion, really.";
		next;
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "Now, the leader of our";
		mes "national religion, our pope,";
		mes "is a direct servant of Freya";
		mes "and delivers her messages";
		mes "to us. As such, she must live";
		mes "by very strict guidelines.";
		next;
		mes "[High Priest Zhed]";
		mes "Our pope is curious about";
		mes "the outside world and wishes";
		mes "to learn more about what lies";
		mes "beyond Arunafeltz, but she";
		mes "cannot come easily by this";
		mes "sort of knowledge.";
		next;
		mes "[High Priest Zhed]";
		mes "Firstly, she cannot leave";
		mes "Rachel, the place where the";
		mes "spirit of goddess Freya dwells.";
		mes "Secondly, all citizens and priests are forbidden to leave the city in";
		mes "order to preserve our sanctity.";
		next;
		mes "[High Priest Zhed]";
		mes "These are implicit rules that";
		mes "normally aren't discussed openly,";
		mes "but everyone follows them to";
		mes "prevent from being stigmatized.";
		mes "Frankly, I think it's somewhat shameful, but we're working on it.";
		next;
		mes "[High Priest Zhed]";
		mes "Furthermore, our pope must";
		mes "maintain her image of aloof";
		mes "piety, so it'd be inappropriate of her to openly question outside";
		mes "world affairs. Although, such";
		mes "knowledge would benefit her...";
		next;
		mes "[High Priest Zhed]";
		mes "That is why the high priests";
		mes "decided to enlist a trustworthy";
		mes "adventurer to inform our pope";
		mes "about the outside world. Now";
		mes "you understand why I've asked";
		mes "you to keep all of this secret.";
		next;
		mes "[High Priest Zhed]";
		mes "You won't need to divulge";
		mes "outrageous secrets or anything";
		mes "like that. I presume mundane";
		mes "details would be enough to";
		mes "please her. Just let her be";
		mes "able to envision your homeland.";
		next;
		mes "[High Priest Zhed]";
		mes "Personally, I think it would";
		mes "be refreshing for our pope to";
		mes "hear a few of your stories as";
		mes "she is always worshipping";
		mes "our goddess on the behalf of";
		mes "everyone in our glorious city.";
		next;
		mes "[High Priest Zhed]";
		mes "Unfortunately, I cannot escort";
		mes "you to the priestess, but I will";
		mes "relate the means to which you";
		mes "can gain an audience with her.";
		mes "First, you will need a ^FF0000High";
		mes "Priest's Recommendation^000000.";
		next;
		mes "[High Priest Zhed]";
		mes "I will write that for you, so";
		mes "there's no need to concern";
		mes "yourself with that. Next, you";
		mes "will need to gather ^FF000040 Glacial";
		mes "Hearts^000000 as symbolic proof of";
		mes "your strength and purity.";
		next;
		mes "[High Priest Zhed]";
		mes "While I finish writing this";
		mes "recommendation, let me tell";
		mes "you how to get to the pope's";
		mes "office where you must go once";
		mes "you gather 40 Glacial Hearts.";
		next;
		mes "[High Priest Zhed]";
		mes "Head west from the chapel";
		mes "in the center of the temple,";
		mes "and then enter a door guarded";
		mes "by two soldiers. Show them your";
		mes "recommendation and Glacial Hearts, and they should grant you passage.";
		next;
		mes "[High Priest Zhed]";
		mes "Ah, here you are.";
		mes "I've finished writing";
		mes "your recommendation.";
		mes "Well then, I guess I'll";
		mes "see you after you've";
		mes "completed this task.";
		next;
		mes "^3355FFYou received a High";
		mes "Priest's recommendation.^000000";
		close2;
		cutin "",255;
		set ra_tem_q,15;
		set lost_boy,14;
		setquest 8100;
		end;
	}
	else if ((ra_tem_q == 15) || (ra_tem_q == 16)) {
		mes "[High Priest Zhed]";
		mes "Once you gather";
		mes "^FF000040 Glacial Hearts^000000,";
		mes "you can show them, along";
		mes "with the recommendation I've";
		mes "written for you, to the soldiers";
		mes "guarding the pope's office.";
		next;
		mes "[High Priest Zhed]";
		mes "When you're ready to go";
		mes "to the pope's office, just";
		mes "head west from the chapel";
		mes "to the center of the temple:";
		mes "this is where the entrance is.";
	}
	else if (ra_tem_q == 17) {
		mes "[High Priest Zhed]";
		mes "Ah, thank you so much";
		mes "for spending some time";
		mes "with the pope for me.";
		mes "I can tell that she really";
		mes "enjoyed speaking to you.";
		next;
		mes "[High Priest Zhed]";
		mes "I am curious, though...";
		mes "Our pope is unaccustomed";
		mes "to speaking with outsiders,";
		mes "so I assume that you have";
		mes "your own questions after";
		mes "your conversation with her...";
		next;
		select("Well, she did mention some Holy Ground...");
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "What...?!";
		mes "She mentioned";
		mes "the Holy Ground...?!";
		next;
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "The Holy Ground is a place";
		mes "where all humans, including";
		mes "the pope, have been forbidden.";
		mes "We used to allow people to";
		mes "visit in the past, but... ";
		next;
		mes "[High Priest Zhed]";
		mes "Only the gods can access";
		mes "that place now. Listen, if";
		mes "the other priests ask about";
		mes "your conversation with the";
		mes "pope, please do not make any";
		mes "mention of the Holy Ground.";
		next;
		mes "[High Priest Zhed]";
		mes "Please don't ask me";
		mes "why, but believe me that";
		mes "it's very important that";
		mes "you feign ignorance of the";
		mes "Holy Ground's existence!";
		next;
		mes "[????]";
		mes "Excuse me, Zhed?";
		mes "May I speak with you";
		mes "for a moment? I need";
		mes "to talk to you about";
		mes "a private matter...";
		next;
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "Er, yes, of course!";
		mes "Excuse me for a moment...";
		mes "While you're waiting for me,";
		mes "why don't you relax in the";
		mes "next room? Don't forget:";
		mes "there is no Holy Ground.";
		close2;
		cutin "",255;
		select("Okay.");
		set ra_tem_q,18;
		warp "ra_temin",297,156;
		end;
	}
	else if (ra_tem_q == 18) {
		mes "[High Priest Zhed]";
		mes "I'm sorry, but we're not";
		mes "quite finished with our";
		mes "discussion. Why don't you";
		mes "wait and relax in the next room";
		mes "over there in the meantime?";
		changequest 8101,8102;
		close2;
		cutin "",255;
		warp "ra_temin",297,156;
		end;
	}
	else if (ra_tem_q == 19) {
		mes "[High Priest Zhed]";
		mes "I apologize for making";
		mes "you wait for so long: I had";
		mes "some crucial matters to";
		mes "discuss. Now, that look";
		mes "on your face tells me that";
		mes "you have a pressing question.";
		next;
		select("Ask about Bekento");
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "Bekento? Ah, you must";
		mes "have been speaking to";
		mes "High Priestess Niren.";
		mes "She's the only one that";
		mes "calls me that. You see, my";
		mes "full name is Zhed Bekento.";
		next;
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "Speaking of which...";
		mes "Did Niren ask you anything";
		mes "or tell you something that";
		mes "was out of the ordinary?";
		next;
		mes "^3355FFAfter a little hesitation,";
		mes "you tell High Priest Zhed";
		mes "about your conversation";
		mes "with High Priestess Niren.^000000";
		next;
		mes "[High Priest Zhed]";
		mes "Hmm, I see.";
		mes "Yes. That sounds";
		mes "like something she'd do.";
		mes "I'll explain it all later, but";
		mes "right now, I need to rest.";
		mes "I'm getting old, you know.";
		next;
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "Ah, but before you go, let";
		mes "me warn you not to ^FF0000go near";
		mes "the Holy Ground^000000. I repeat,";
		mes "stay away from the Holy Ground.";
		next;
		mes "^3355FFThe Holy Ground...";
		mes "Why is High Priest Zhed";
		mes "so adamant about protecting";
		mes "the Holy Ground? Regardless...";
		mes "If you want to go there, then";
		mes "just go there. Who'll stop you?^000000";
		close2;
		cutin "",255;
		set ra_tem_q,20;
		changequest 8103,8104;
		end;
	}
	else if ((ra_tem_q >= 20) && (ra_tem_q < 22)) {
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "Whatever you do, whatever";
		mes "journeys you take, please";
		mes "make sure that you stay";
		mes "away from the Holy Ground!";
		next;
		mes "^3355FFNow, more than ever,";
		mes "you feel compelled to";
		mes "enter the Holy Ground.^000000";
	}
	else if (ra_tem_q == 23) {
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "Oh, it's you.";
		mes "Let me guess...";
		mes "After everything I said,";
		mes "you still went ahead and";
		mes "visited the Holy Ground,";
		mes "didn't you? Oh, well...";
		next;
		select("Did something happen?");
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "Well, honestly, I've been";
		mes "temporarily suspended from";
		mes "work, but no need to worry.";
		mes "It's not your fault. I've been";
		mes "in conflict with the other High";
		mes "Priests for a while, anyway.";
		next;
		mes "[High Priest Zhed]";
		mes "Please don't worry about it.";
		mes "If not this, they would have";
		mes "found some other way to attack";
		mes "me. It would only be a matter";
		mes "of time. They're exaggerating";
		mes "your intrusion for their benefit.";
		next;
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "All I want is for";
		mes "Arunafeltz to be safe";
		mes "and at peace. I hope this";
		mes "land is not twisted by the";
		mes "greedy humans. I hope all will";
		mes "work according to Freya's will.";
		next;
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "Ah, and please do not";
		mes "blame Niren. She must have";
		mes "her own reasons for her own";
		mes "actions. She has changed";
		mes "much but in the end, I think";
		mes "that we are still friends.";
		next;
		mes "[High Priest Zhed]";
		mes "One last thing:";
		mes "try not to let the";
		mes "other priests catch you";
		mes "doing anything forbidden.";
		mes "It'd be a little embarassing";
		mes "for me, you understand.";
		next;
		mes "[High Priest Zhed]";
		mes "Still, you were secretly";
		mes "invited here, so I'm sure";
		mes "that only a very few of them";
		mes "would be able to recognize";
		mes "you. In the end, you'll do";
		mes "what you will, right?";
		next;
		cutin "ra_gman2",2;
		mes "[High Priest Zhed]";
		mes "...I think I know what";
		mes "you saw in the Holy Ground.";
		mes "I'm sure that you have much";
		mes "to ask, but now isn't the time";
		mes "to seek for answers. Please,";
		mes "you must be patient.";
		next;
		mes "[High Priest Zhed]";
		mes "Until the right time";
		mes "comes, I want you not";
		mes "to tell anyone else what";
		mes "you saw in the Holy Ground.";
		next;
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "Well then, adventurer,";
		mes "thank you for coming by.";
		mes "I need to go lay down now,";
		mes "so if you'll let me rest...";
		close2;
		set MISC_QUEST,MISC_QUEST | 8192;
		set ra_tem_q,0;
		cutin "",255;
		completequest 8105;
		specialeffect2 EF_ABSORBSPIRITS;
		if (checkre(3))
			getexp 90000,60000;
		else
			getexp 900000,600000;
		end;
	}
	else if (MISC_QUEST & 8192) {
		// Start Veins "Thor Volcano Base" Quest Addition
		if (rachel_camel == 25) {
			// Start Nameless Island Access Quest Addition
			if (aru_monas == 11) {
				cutin "ra_gman",2;
				mes "[High Priest Zhed]";
				mes "Ah, it's been a while,";
				mes "hasn't it? You look well,";
				mes "and I'm doing fine as you";
				mes "can see. What can I do";
				mes "for you today, "+strcharinfo(0)+"?";
				next;
				switch(select("I just wanted to say hi.:Ask About Veins Incident")) {
				case 1:
					mes "[High Priest Zhed]";
					mes "As you well know, I'm only";
					mes "a High Priest in title, and";
					mes "lost much of my influence";
					mes "amongst many of the other";
					mes "priests for my views.";
					next;
					mes "[High Priest Zhed]";
					mes "Still, I have faith that";
					mes "justice and good will";
					mes "prevail over the corruption";
					mes "that plagues our priests,";
					mes "so long as good people";
					mes "are willing to act.";
					break;
				case 2:
					mes "[High Priest Zhed]";
					mes "Veins incident?";
					mes "I haven't heard of";
					mes "anything... Well, perhaps";
					mes "if you'd elaborate, then";
					mes "I'd understand a bit more.";
					next;
					mes "^3355FFYou told High Priest";
					mes "Zhed about the group of";
					mes "smugglers arrested in Veins.^000000";
					next;
					mes "[High Priest Zhed]";
					mes "Oh, I think I did hear";
					mes "something about that earlier.";
					mes "Let's see now... Ah, right.";
					mes "Niren mentioned something";
					mes "strange about them...";
					next;
					mes "[High Priest Zhed]";
					mes "The smugglers were with";
					mes "a high ranking official from";
					mes "the Rune-Midgarts Kingdom,";
					mes "which is why Niren was so";
					mes "hesitant to take any action";
					mes "against them for a while.";
					next;
					mes "[High Priest Zhed]";
					mes "I was too preoccupied with";
					mes "other matters, and I didn't";
					mes "think much of it at the time.";
					mes "Why don't you speak to Niren?";
					mes "I'm sure that she can tell you";
					mes "more about what happened.";
					set aru_monas,12;
					changequest 17007,17008;
					next;
					mes "[High Priest Zhed]";
					mes "If you do decide to";
					mes "visit Niren, please";
					mes "send her my regards.";
					break;
				}
			}
			// End Nameless Island Access Quest Addition.
			else if (aru_vol == 0) {
				cutin "ra_gman",2;
				mes "[High Priest Zhed]";
				mes "Ah, it does my heart to";
				mes "good to see you again.";
				mes "Adventurers willing to work";
				mes "so hard for the sake of world";
				mes "peace like yourself are fairly";
				mes "uncommon. I hope you know that.";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "Huh...?";
				mes "Please don't flatter";
				mes "me like that! Saying";
				mes "it like that is kind of";
				mes "overdoing it, isn't it?";
				emotion ET_OHNO, playerattached();
				next;
				mes "[High Priest Zhed]";
				mes "Not at all. In fact, I'm";
				mes "sure that a place in";
				mes "Valhalla has already";
				mes "been secured for you";
				mes "by the Valkyries. Now, how";
				mes "may I help you, my friend?";
				next;
				select("Mysterious Building in the Volcano");
				mes "["+strcharinfo(0)+"]";
				mes "Actually, I was wondering";
				mes "if you knew of anything about";
				mes "this facility inside Thor";
				mes "Volcano near Veins. There";
				mes "might be something big";
				mes "going on over there.";
				next;
				mes "^3131FFYou told High Priest";
				mes "Zhed about the shackled";
				mes "child in Thor Volcano, and";
				mes "how you found the building";
				mes "hidden there. High Priest Zhed";
				mes "seemed disturbed by your words.^000000";
				next;
				mes "[High Priest Zhed]";
				mes "I see. I have my suspicions";
				mes "about what is happening. Now,";
				mes "you're aware that Arunafeltz";
				mes "is governed by our church,";
				mes "and that our entire nation";
				mes "worships the goddess Freya.";
				next;
				mes "[High Priest Zhed]";
				mes "The priests that lead this";
				mes "nation are split into two main";
				mes "factions: I am considered part";
				mes "of the moderate faction, which";
				mes "usually butts heads with the";
				mes "jingoistic hard-liner faction.";
				next;
				mes "[High Priest Zhed]";
				mes "These hard-liner priests";
				mes "are more than willing to use";
				mes "violent methods if they believe";
				mes "it to be the will of Freya, and";
				mes "are the ones that established";
				mes "the military camp  at Thor Volcano.";
				next;
				mes "[High Priest Zhed]";
				mes "Of course, it's also";
				mes "considered a geology camp";
				mes "since they're always monitoring";
				mes "that place for volcanic activity,";
				mes "but for all intents and purposes,";
				mes "they are training men to fight.";
				next;
				mes "[High Priest Zhed]";
				mes "It scares me to think";
				mes "about it, but I'm sure that";
				mes "they have many military supplies";
				mes "and machines of mass destruction";
				mes "hidden over there in the camp.";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "Wait, what exactly do";
				mes "they hope to accomplish";
				mes "by fighting? How do they";
				mes "intend to help the goddess";
				mes "Freya by using violence?";
				next;
				mes "[High Priest Zhed]";
				mes "All the priests agree that";
				mes "reassembling Ymir's Heart will";
				mes "revive Freya. As you know, the";
				mes "pieces are scattered all over";
				mes "the world. Some are possessed";
				mes "by the Rune-Midgarts Kingdom.";
				next;
				mes "[High Priest Zhed]";
				mes "In the interest of avoiding";
				mes "conflict, the moderate faction";
				mes "of priests decided to hire";
				mes "scientists to reproduce Ymir's";
				mes "Heart, resulting in an";
				mes "imitation of that artifact.";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "An imitation of Ymir's";
				mes "Heart? I think I know of";
				mes "a famous scientist from the";
				mes "Schwarzwald Republic that";
				mes "was working on that! Let's";
				mes "see, his name was...";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "Isn't the scientist's name...";
				input .@input$;
				mes "^3131FF"+.@input$+"^000000?";
				next;
				if (.@input$ == "Varmunt") {
					mes "[High Priest Zhed]";
					mes "Oh, you've heard of him?";
					mes "Yes, his name was Varmunt.";
					mes "Unfortunately, he deliberately";
					mes "destroyed the Imitation of";
					mes "Ymir's Heart into pieces,";
					mes "and then disappeared.";
					next;
				}
				else {
					mes "[High Priest Zhed]";
					mes ""+.@input$+"?";
					mes "No, that wasn't him.";
					mes "The man that created the";
					mes "imitation of Ymir's Heart";
					mes "was named Varmunt.";
					mes "He was truly a genius.";
					next;
				}
				mes "[High Priest Zhed]";
				mes "I'm not sure what happened";
				mes "to Varmunt. All I know was that";
				mes "something serious happened";
				mes "in the Schwarzwald Republic,";
				mes "and that he disappeared in";
				mes "the fiasco. It's strange...";
				next;
				mes "[High Priest Zhed]";
				mes "Although the working";
				mes "Ymir's Heart imitation that";
				mes "Varmunt had created was broken";
				mes "into pieces, other scientists";
				mes "managed to mostly reproduce";
				mes "his work with unstable Ymir Hearts.";
				next;
				mes "[High Priest Zhed]";
				mes "Since our moderate faction,";
				mes "was only able to provide";
				mes "unstable Ymir Heart imitations,";
				mes "the hard-liner faction quickly";
				mes "gained more respectability than";
				mes "us in the eyes of the people.";
				next;
				mes "[High Priest Zhed]";
				mes "Despite our advanced weaponry";
				mes "and armor, I'm afraid that our";
				mes "country of Arunafeltz is not as";
				mes "civilized and peaceful as I'd";
				mes "like it to be, and the hard-liners";
				mes "control our government now.";
				next;
				mes "[High Priest Zhed]";
				mes "Although the hard-liners";
				mes "allowed us to continue";
				mes "our research in faithfully";
				mes "reproducing Ymir's Heart,";
				mes "they've been developing their";
				mes "military might unopposed.";
				next;
				mes "[High Priest Zhed]";
				mes "So basically, the moderates";
				mes "are trying to recreate Ymir's";
				mes "Heart at research centers";
				mes "in the Holy Ground and the";
				mes "Schwarzwald Republic.";
				next;
				mes "[High Priest Zhed]";
				mes "The hard-liners are";
				mes "training soldiers and";
				mes "storing up military supplies";
				mes "and weapons in their camp";
				mes "in Thor Volcano. However,";
				mes "I don't know any more details.";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "This doesn't look good.";
				mes "I mean, if they're gearing";
				mes "up to take the Ymir Heart";
				mes "Pieces by force, it'll be war";
				mes "against the Schwalzvalt Republic";
				mes "and the Rune-Midgarts Kingdom!";
				next;
				mes "[High Priest Zhed]";
				mes "Seeing as I'm part of the";
				mes "moderate faction, as well as";
				mes "recently demoted, I just don't";
				mes "have access to much information";
				mes "about the hard-liners. However,";
				mes "there may still be hope yet...";
				next;
				mes "[High Priest Zhed]";
				mes "War would be bad for all";
				mes "parties involved. That is";
				mes "why I'd like to ask you to";
				mes "sneak into the camp at";
				mes "Thor Volcano for the sake of";
				mes "protecting international peace.";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "I really want to know";
				mes "more about what they're";
				mes "planning to do, but that";
				mes "place is heavily guarded!";
				mes "How am I going to sneak in?";
				next;
				mes "[High Priest Zhed]";
				mes "You're right.";
				mes "We'll have to think";
				mes "of a really good way";
				mes "for you to infiltrate";
				mes "that place. Hmmmm...";
				set aru_vol,1;
				setquest 2114;
				close2;
				cutin "",255;
				end;
			}
			else if ((aru_vol > 0) && (aru_vol < 5)) {
				mes "[High Priest Zhed]";
				mes "Hmm...";
				next;
				switch(select("How to Sneak into the Camp :The Moderates:The Hard-Liners")) {
				case 1:
					mes "[High Priest Zhed]";
					mes "I still don't have any";
					mes "ideas for sneaking into";
					mes "the camp at Thor Volcano.";
					mes "Give me a little more time,";
					mes "and hopefully we can figure";
					mes "something out together.";
					break;
				case 2:
					mes "[High Priest Zhed]";
					mes "We priests of the moderate";
					mes "faction are opposed to war,";
					mes "so we've been trying to";
					mes "develop imitations of Ymir's";
					mes "Heart for a long time. We've";
					mes "yet to succeed, unfortunately.";
					next;
					mes "[High Priest Zhed]";
					mes "The hard-liners actually";
					mes "opposed our efforts, but";
					mes "they've let us continue since";
					mes "they think they can eventually";
					mes "use imitation Ymir Hearts for";
					mes "military purposes.";
					next;
					mes "[High Priest Zhed]";
					mes "The Ymir Heart reproduction";
					mes "project has been frustrating";
					mes "the best minds in the world,";
					mes "and some scientists have even";
					mes "resorted to using forbidden";
					mes "methods. It's a shame, really.";
					next;
					mes "[High Priest Zhed]";
					mes "Varmunt actually succeeded";
					mes "in recreating Ymir's Heart,";
					mes "but then he destroyed it and";
					mes "he disappeared. He did it to";
					mes "prevent war, but we could";
					mes "really use his help now.";
					break;
				case 3:
					mes "[High Priest Zhed]";
					mes "The hard-liners are especially";
					mes "fanatical in their devotion to";
					mes "Freya, and will use any means";
					mes "to further what they interpret";
					mes "as her will. They're willing to";
					mes "go to war for their beliefs.";
					next;
					mes "[High Priest Zhed]";
					mes "The fact that they've even";
					mes "built a military camp in Thor";
					mes "Volcano disturbs me greatly.";
					mes "It's almost certain that they";
					mes "intend to wage war against any";
					mes "nation with a Ymir's Heart piece.";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "Who is in charge of that";
					mes "camp at Thor's Volcano?";
					next;
					mes "[High Priest Zhed]";
					mes "High Priest Vildt.";
					mes "He's in charge of all";
					mes "important buildings in";
					mes "Arunafeltz. His room is at";
					mes "the other side of the building,";
					mes "but it's always heavily guarded.";
					next;
					mes "[High Priest Zhed]";
					mes "Vildt is one of the";
					mes "highest ranking members";
					mes "of the hard-liner priest";
					mes "faction. He rarely makes it";
					mes "his business to see anybody";
					mes "that he sees as beneath him.";
					break;
				}
				close2;
				cutin "",255;
				end;
			}
			else if (aru_vol == 5) {
				cutin "ra_gman",2;
				if (countitem(7342) > 0) {
					mes "["+strcharinfo(0)+"]";
					mes "Would you please";
					mes "take a look at this";
					mes "file, High Priest Zhed?";
					next;
					mes "[High Priest Zhed]";
					mes "Of course.";
					mes "Let's see, what's";
					mes "in this File Folder?";
					next;
					mes "[High Priest Zhed]";
					mes ".............";
					mes ".................";
					mes "....................!";
					next;
					mes "[High Priest Zhed]";
					mes "This is a geological";
					mes "report about Thor Volcano?";
					mes "Ah, I see. They must have";
					mes "someone regularly check";
					mes "to see if it will erupt.";
					next;
					mes "[High Priest Zhed]";
					mes "Although it's fairly dangerous";
					mes "to build a military camp there,";
					mes "some weapon materials can";
					mes "only be forged from the heat";
					mes "coming from Thor's Volcano.";
					next;
					mes "[High Priest Zhed]";
					mes "Yes, I think it's also";
					mes "likely that there are special";
					mes "weapon crafting metals and";
					mes "materials that can only be";
					mes "found on the volcano. That";
					mes "makes perfect sense.";
					next;
					mes "[High Priest Zhed]";
					mes "Although the volcano is";
					mes "dormant now, these reports";
					mes "claim that the volcano is";
					mes "either safe or ready to erupt";
					mes "at any time. The data here";
					mes "doesn't make any sense.";
					next;
					mes "[High Priest Zhed]";
					mes "Hm. This is just a hunch,";
					mes "but seeing these discrepancies";
					mes "in his reports, I really think this geologist has an agenda against";
					mes "the camp at Thor Volcano.";
					next;
					mes "[High Priest Zhed]";
					mes "You know, if that's true,";
					mes "he might be able to help";
					mes "you sneak into the camp.";
					mes "Don't you think it's worth";
					mes "checking out for now?";
					next;
					if (select("Yes:No") == 2) {
						mes "[High Priest Zhed]";
						mes "Well, you never know";
						mes "until you ask. Besides,";
						mes "I don't know if there's";
						mes "any other way to sneak";
						mes "into the Thor Volcano Camp...";
						next;
					}
					mes "[High Priest Zhed]";
					mes "I hope you'll go and talk";
					mes "to the geologist. He should";
					mes "be in Veins, the desert city";
					mes "south of Rachel. He's your";
					mes "best chance of entering the Thor";
					mes "Volcano camp without suspicion.";
					delitem 7342,1; //File01
					set aru_vol,6;
					changequest 2115,2116;
				}
				else {
					mes "["+strcharinfo(0)+"]";
					mes "Huh...?";
					mes "Where did I put";
					mes "that File Folder?";
				}
			}
			else if (aru_vol == 6) {
				cutin "ra_gman",2;
				mes "[High Priest Zhed]";
				mes "I hope you'll go and talk";
				mes "to the geologist. He should";
				mes "be in Veins, the desert city";
				mes "south of Rachel. He's your";
				mes "best chance of entering the Thor";
				mes "Volcano camp without suspicion.";
				close2;
				cutin "",255;
				end;
			}
			else if ((aru_vol > 6) && (aru_vol < 26)) {
				cutin "ra_gman",2;
				mes "[High Priest Zhed]";
				mes "I hope you'll go and talk";
				mes "to the geologist. He should";
				mes "be in Veins, the desert city";
				mes "south of Rachel. He's your";
				mes "best chance of entering the Thor";
				mes "Volcano camp without suspicion.";
				close2;
				cutin "",255;
				end;
			}
			else if (aru_vol == 26) {
				cutin "ra_gman",2;
				mes "[High Priest Zhed]";
				mes "Oh! You're back!";
				mes "Was that geologist able";
				mes "to help you sneak into";
				mes "the Thor Volcano camp?";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "More than that. We've";
				mes "convinced the camp that the";
				mes "volcano is going to explode,";
				mes "so they're scrambling to";
				mes "evacuate. They're really";
				mes "panicking over there!";
				next;
				mes "[High Priest Zhed]";
				mes "Hahaha! That's great!";
				mes "Even if they do figure";
				mes "out that they've been";
				mes "fooled, it will take them";
				mes "some time to realize it";
				mes "in all that confusion.";
				next;
				mes "[High Priest Zhed]";
				mes "Yes, it might not be the";
				mes "perfect time to bring down";
				mes "the hard-liner faction right";
				mes "now, but the opportunity";
				mes "should present itself soon.";
				mes "Thank you for all your help.";
				next;
				mes "[High Priest Zhed]";
				mes "Please relax for a while,";
				mes "and I'll take care of the rest.";
				mes "When the time to strike comes,";
				mes "I will be contacting you again.";
				mes "Together, we can protect";
				mes "peace between our nations.";
				set aru_vol,27;
				completequest 60213;
				getexp (checkre(3))?20000:200000,0;
				close2;
				cutin "",255;
				end;
			}
			else if (aru_vol > 26) {
				// Start Peace to Arunafeltz addition
				if (aru_em < 7) {
					mes "[High Priest Zhed]";
					mes "I'll be sure to contact";
					mes "you again for your help";
					mes "when the time is right.";
					mes "I'm sure there are others";
					mes "that may need you now...";
				}
				else if (aru_em == 8){
					cutin "ra_gman",2;
					mes "["+strcharinfo(0)+"]";
					mes "Welcome, adventurer.";
					mes "I'm glad to see that you're";
					mes "here. I think... I think an";
					mes "opportunity has arisen in";
					mes "which I could use your";
					mes "expert assistance.";
					next;
					cutin "ra_gman2",2;
					mes "[High Priest Zhed]";
					mes "Though, I fear that I may be";
					mes "making the wrong decision.";
					mes "After all, I no longer have";
					mes "much influence among the";
					mes "other priests... I can't help";
					mes "but think I'm in the wrong.";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "Don't lose heart,";
					mes "High Priest Zhed.";
					mes "I... I believe in you!";
					next;
					cutin "ra_gman",2;
					mes "[High Priest Zhed]";
					mes "I guess you're right.";
					next;
					mes "[High Priest Zhed]";
					mes "As you well know, the";
					mes "highest authority in";
					mes "Arunafeltz is our Pope,";
					mes "the reincarnation of";
					mes "our goddess Freya.";
					next;
					mes "[High Priest Zhed]";
					mes "Unfortunately, she is too";
					mes "young and innocent, and she";
					mes "doesn't yet have the experience";
					mes "to assert control, and stamp";
					mes "out the in-fighting and";
					mes "corruption among the priests.";
					next;
					mes "[High Priest Zhed]";
					mes "In these desperate times,";
					mes "we will need someone to";
					mes "provide strong and confident";
					mes "leadership to the people";
					mes "of Arunafeltz before all";
					mes "is lost to war and violence.";
					next;
					mes "[High Priest Zhed]";
					mes "^333333*Sigh...*^000000";
					mes "I know it may not be";
					mes "right, but someone";
					mes "must do something";
					mes "before the other High";
					mes "Priests ruin our nation.";
					next;
					emotion ET_HUK, playerattached();
					mes "["+strcharinfo(0)+"]";
					mes "Y-you're not thinking";
					mes "of overthrowing the";
					mes "pope are you? I-isn't";
					mes "that a bit extreme?";
					next;
					cutin "ra_gman2",2;
					emotion ET_SWEAT;
					mes "[High Priest Zhed]";
					mes "What? No, no!";
					mes "Don't jump to conclusions";
					mes "like that! Don't misunderstand";
					mes "me: I'm loyal to our pope.";
					next;
					cutin "ra_gman",2;
					mes "[High Priest Zhed]";
					mes "I actually want to work";
					mes "very closely with the pope,";
					mes "in essense, rule together with";
					mes "her by combining my experience";
					mes "and her wisdom. It's ambitious,";
					mes "but what else can I do?";
					next;
					mes "[High Priest Zhed]";
					mes "You remember how you";
					mes "stopped the hard-liner";
					mes "priests from carrying out";
					mes "their plans for war in the";
					mes "Thor Volcano camp? That will";
					mes "only stop them temporarily.";
					next;
					mes "[High Priest Zhed]";
					mes "They'll eventually prepare";
					mes "to act out in violence again.";
					mes "We need a permanent solution";
					mes "to ensure that this sort of";
					mes "thing doesn't happen again.";
					next;
					mes "[High Priest Zhed]";
					mes "We need to convince the";
					mes "pope to finally act, and";
					mes "give my policy of peace";
					mes "her full support. Will";
					mes "you help me to do this?";
					next;
					if (select("Yes:No") == 2) {
						mes "Well... Asking for the";
						mes "pope's support is the only";
						mes "solution I've been able to";
						mes "find. Do you have any ideas";
						mes "for protecting peace here";
						mes "in Arunafeltz?";
						next;
						input .@input$;
						mes "["+strcharinfo(0)+"]";
						mes ""+.@input$+"?";
						next;
						mes "[High Priest Zhed]";
						mes "Well, I don't know.";
						mes "It's a good idea, but";
						mes "I fear that it will only";
						mes "be effective in the short";
						mes "term. Why don't we just";
						mes "try what I've proposed first?";
						next;
					}
					mes "[High Priest Zhed]";
					mes "Hmm, now how can";
					mes "we convince the pope to";
					mes "support us? Even as Freya's";
					mes "reincarnation... She's just";
					mes "a young girl. She probably";
					mes "knows nothing of politics.";
					next;
					mes "[High Priest Zhed]";
					mes "It'd probably be best to";
					mes "tell her exactly what is";
					mes "happening. The full truth.";
					mes "In my heart, I know that";
					mes "would be best.";
					next;
					mes "[High Priest Zhed]";
					mes "But... Maybe it would";
					mes "be better if we sugar";
					mes "coated it a little bit.";
					mes "She might not be too";
					mes "receptive to us if we";
					mes "totally shock her.";
					next;
					mes "[High Priest Zhed]";
					mes "Hmm... What do you";
					mes "think? Should we stick";
					mes "with the truth, or do you";
					mes "think it'd be better if we";
					mes "exaggerate and... lie when";
					mes "we feel it's necessary?";
					next;
					switch(select("Truth:Lies")) {
					case 1:
						mes "[High Priest Zhed]";
						mes "That's what I think too.";
						mes "Although I'm worried about";
						mes "how the pope will react at";
						mes "our message, I should have";
						mes "faith. I should have faith.";
						next;
						break;
					case 2:
						mes "[High Priest Zhed]";
						mes "I suppose that you may";
						mes "have a point. It might not";
						mes "be a good idea to totally";
						mes "expose her to the ugly";
						mes "truth. I'll try to be as";
						mes "honest as I can...";
						next;
						break;
					}
					mes "[High Priest Zhed]";
					mes "Well, there's no time";
					mes "to waste. The two of us may";
					mes "not be enough to convince";
					mes "the pope to act for peace.";
					mes "I already have someone in";
					mes "mind that might help us.";
					next;
					emotion ET_SPARK, playerattached();
					mes "["+strcharinfo(0)+"]";
					mes "That sounds good.";
					mes "Who is he?";
					next;
					mes "[High Priest Zhed]";
					mes "My old friend, High Priest";
					mes "Niren. I'm not sure if she'll";
					mes "help me after all that's";
					mes "happened between us. She";
					mes "may even think I deserve";
					mes "to be excommunicated...";
					next;
					emotion ET_BEST, playerattached();
					mes "["+strcharinfo(0)+"]";
					mes "Come on, it wouldn't";
					mes "hurt to try! Besides,";
					mes "Niren isn't a bad person.";
					mes "Maybe she'll understand";
					mes "the way you see things";
					mes "if you explain them?";
					next;
					mes "[High Priest Zhed]";
					mes "You're right, of course.";
					mes "I'm just grasping at straws";
					mes "here, but she and I both used";
					mes "to believe that peace was";
					mes "possible. I don't know why";
					mes "she joined the hard-liners...";
					next;
					mes "[High Priest Zhed]";
					mes ""+strcharinfo(0)+"...";
					mes "Would you please talk to";
					mes "her, and just see how she's";
					mes "doing? It might not be a good";
					mes "time to mention our plan";
					mes "right away, though...";
					next;
					mes "[High Priest Zhed]";
					mes "If you think that you";
					mes "have a chance of convincing";
					mes "her, then feel free and offer";
					mes "my proposal. Her office is";
					mes "located across from here,";
					mes "but she's always very busy...";
					next;
					mes "[High Priest Zhed]";
					mes "There's actually";
					mes "a good chance that";
					mes "she is away somewhere";
					mes "on business. She is highly";
					mes "loved by the people, you know.";
					set aru_em,9;
					changequest 2131,2132;  // unconfirmed
				}
				else if ((aru_em == 9) || (aru_em == 10)) {
					mes "[High Priest Zhed]";
					mes "Please speak to Niren,";
					mes "and she if she'd be willing";
					mes "to help us convince the pope";
					mes "to enforce peace in our nation.";
				}
				else if (aru_em == 11) {
					cutin "ra_gman",2;
					mes "[High Priest Zhed]";
					mes "Welcome back.";
					mes "So did you get a chance";
					mes "to speak to Niren? How did";
					mes "she respond to my proposal?";
					next;
					mes "^3355FFYou explain Niren's reasons";
					mes "for her disappointment in";
					mes "the Moderate priest faction,";
					mes "and tell Zhed that she intends";
					mes "to carry out the plans for war.";
					next;
					mes "[High Priest Zhed]";
					mes "....................";
					mes "....................";
					mes "....................";
					next;
					mes "[High Priest Zhed]";
					mes "Hmm... This explains why";
					mes "she and some other high";
					mes "priests started being absent";
					mes "from their offices. Many of";
					mes "them were invited over to";
					mes "the Schwarzwald Republic...";
					next;
					mes "[High Priest Zhed]";
					mes "Regardless, I know for";
					mes "a fact that war is never";
					mes "a solution. It only brings";
					mes "death and destruction.";
					next;
					mes "[High Priest Zhed]";
					mes "Give me a moment.";
					mes "I'm going to write";
					mes "a letter that I want";
					mes "you to give to Niren.";
					set aru_em,12;
				}
				else if(aru_em == 12) {
					cutin "ra_gman",2;
					mes "[High Priest Zhed]";
					mes "Please bring this letter";
					mes "to Niren. I hope what";
					mes "I have to say will help";
					mes "her understand how I feel";
					mes "about these plans for war.";
					next;
					mes "^3355FFYou received a letter for";
					mes "Niren from High Priest Zhed.^000000";
					set aru_em,13;
					changequest 2133,2134;
				}
				else if((aru_em == 13) || (aru_em == 14)) {
					mes "[High Priest Zhed]";
					mes "Please deliver my";
					mes "letter to Niren as";
					mes "soon as you can.";
					mes "I really appreciate";
					mes "you helping me on this.";
				}
				else if ((aru_em > 14) && (aru_em < 20)) {
					mes "[High Priest Zhed]";
					mes "Great news! Niren just";
					mes "sent me a reply: I can't";
					mes "believe that she's willing";
					mes "to help me! Would you please";
					mes "give her any help that she";
					mes "may need from now on?";
				}
				else if(aru_em == 20) {
					cutin "ra_gman",2;
					mes "[High Priest Zhed]";
					mes "Ah, I've been";
					mes "waiting for you.";
					next;
					mes "["+strcharinfo(0)+"]";
					mes "High Priest Zhed,";
					mes "everything's ready!";
					mes "High Priest Niren managed";
					mes "to send away all of those";
					mes "followers that were near the";
					mes "pope. You won't be interrupted.";
					next;
					mes "[High Priest Zhed]";
					mes "I hope we can get the pope";
					mes "to understand the situation";
					mes "of our nation. I only...";
					mes "Oh, Freya help us...";
					next;
					mes "[High Priest Zhed]";
					mes "..............";
					mes "..............";
					mes "..............";
					next;
					mes "[High Priest Zhed]";
					mes "Alright, I'm ready.";
					mes "Let's receive an";
					mes "audience with the";
					mes "pope, shall we?";
					set aru_em,21;
				}
				else if(aru_em == 21) {
					mes "[High Priest Zhed]";
					mes "I'm a little nervous";
					mes "about talking so brazenly";
					mes "to the pope, but I'm";
					mes "ready to go meet her.";
				}
				else if (aru_em == 22) {
					mes "[High Priest Zhed]";
					mes "I believe that Niren";
					mes "has something important";
					mes "to tell you. Why don't";
					mes "you speak to her before";
					mes "coming back to me?";
				}
				else if (aru_em == 23) {
					cutin "ra_gman",2;
					mes "[High Priest Zhed]";
					mes "I'm glad that everything";
					mes "turned out great. Your";
					mes "help was truly a blessing.";
					mes "Although Schwarzwald will";
					mes "continue their plans without";
					mes "us, we've slowed them down.";
					next;
					mes "[High Priest Zhed]";
					mes "Yes, without our support,";
					mes "Schwarzwald won't have";
					mes "any excuse to continue";
					mes "their dangerous research";
					mes "for a little while, at least.";
					next;
					mes "[High Priest Zhed]";
					mes "Thor Volcano Camp";
					mes "should close down soon,";
					mes "now that we no longer";
					mes "have any use for it.";
					next;
					mes "[High Priest Zhed]";
					mes "I also underestimated our";
					mes "pope. She is more dignified,";
					mes "willed that I believed.";
					mes "I owe her my apologies.";
					next;
					mes "[High Priest Zhed]";
					mes "We won't give up on";
					mes "reviving our goddess Freya,";
					mes "but we will retrieve Ymir's";
					mes "Heart through diplomacy";
					mes "rather than violence.";
					mes "It won't be easy...";
					next;
					mes "[High Priest Zhed]";
					mes "You've been instrumental";
					mes "in returning peace here in";
					mes "Arunafeltz. I've even been";
					mes "reinstated, and will be very";
					mes "busy from now on, working";
					mes "closely with the pope...";
					next;
					mes "[High Priest Zhed]";
					mes "I know that the life of";
					mes "adventuring beckons you.";
					mes "I know she'd like to see";
					mes "you before you leave, but";
					mes "she's sleeping deeply after";
					mes "that exhausting speech...";
					next;
					mes "[High Priest Zhed]";
					mes "On behalf of our pope";
					mes "and all the citizens of";
					mes "Arunafeltz, I'd like to";
					mes "thank you for your heroism.";
					mes "Your place in Valhalla is";
					mes "already assured, I'm sure.";
					set aru_em,24;
					completequest 2142;
					getexp (checkre(3))?150000:1500000,0;
				}
				else {
					mes "[High Priest Zhed]";
					mes "May Freya bless you";
					mes "on all your journeys,";
					mes "my good friend.";
				}
				// End Peace to Arunafeltz addition
			}
			else {
				cutin "ra_gman",2;
				mes "[High Priest Zhed]";
				mes "Ugh...!";
				mes "I've got such";
				mes "a horrible headache!";
			}
		}
		else {
			cutin "ra_gman",2;
			mes "[High Priest Zhed]";
			mes "I should rest for now.";
			mes "Please travel in safety.";
		}
	// End Veins "Thor Volcano Base" Quest Addition.
	}
	else {
		cutin "ra_gman",2;
		mes "[High Priest Zhed]";
		mes "May Freya be with you.";
	}
	close2;
	cutin "",255;
	end;
}

ra_temin,170,46,3	script	Panno#rachel	920,{
	cutin "ra_fano03",2;
	if (ra_tem_q >= 12 || (MISC_QUEST & 8192)) {
		cutin "ra_fano03",2;
		mes "[Priestess Panno]";
		mes "Good day.";
		mes "Have you come to";
		mes "redeem Lottery Tickets?";
		next;
		if (select("Yes:No") == 1) goto L_Lottery;
		if (ra_tem_q == 12) {
			cutin "ra_fano01",2;
			mes "[Priestess Panno]";
			mes "I already told you";
			mes "everything I know.";
			mes "Remember to keep";
			mes "quiet about what I said.";
			goto L_End;
		}
	}
	else if (ra_tem_q < 2) {
		mes "[Priestess Panno]";
		mes "Greetings.";
		mes "May Freya fill";
		mes "your days with joy.";
		mes "Laughter. And prosperity.";
		next;
		switch(select("Redeem Lottery Tickets:Temple Information:Hey, what's happening?")) {
		case 1:
			cutin "ra_fano03",2;
			mes "[Priestess Panno]";
			mes "Fine. You really";
			mes "want to exchange your";
			mes "Lottery Tickets? It's my job";
			mes "to ask and make sure, you";
			mes "know, in case you were saving";
			mes "them for some weird reason.";
			next;
			if (select("Yes:No") == 1) goto L_Lottery;
			cutin "ra_fano03",2;
			mes "[Priestess Panno]";
			mes "You can redeem your";
			mes "Lottery Tickets at any";
			mes "time, so please visit";
			mes "me at your leisure.";
			mes "Go with Freya.";
			goto L_End;

		case 2:
			cutin "ra_fano01",2;
			mes "[Priestess Panno]";
			mes "The Chapel is located";
			mes "over the wall behind me.";
			mes "Our pope's office and chambers";
			mes "are upstairs. You can only go";
			mes "there if you have special";
			mes "authorization.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "......";
			mes ".........";
			next;
			mes "[Priestess Panno]";
			mes "............";
			mes ".........";
			mes "......";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "...?";
			next;
			cutin "ra_fano02",2;
			mes "[Priestess Panno]";
			mes "You come to a temple";
			mes "to pray, not to look";
			mes "around. Or chit-chat";
			mes "with the priestesses";
			mes "like me. Don't forget it.";
			next;
			cutin "ra_fano03",2;
			mes "[Priestess Panno]";
			mes "The offices for the High";
			mes "Priests are located on each";
			mes "side of the hallway. However,";
			mes "you can only enter if you've";
			mes "been permitted beforehand.";
			goto L_End;

		case 3:
			mes "[Priestess Panno]";
			mes "......................";
			mes "No chit-chat";
			mes "inside the temple.";
			goto L_End;
		}
	}
	else if (ra_tem_q == 10) {
		mes "[Priestess Panno]";
		mes "Good day.";
		next;

		switch(select("Redeem Lottery Tickets:Temple Information:Hey, did you open the gate?")) {

		case 1:
			cutin "ra_fano01",2;
			mes "[Priestess Panno]";
			mes "You... still have";
			mes "Lottery Tickets from";
			mes "making donations for";
			mes "the festival? Look up the";
			mes "word ''punctuality'' in the";
			mes "dictionary. It might help you.";
			next;
			mes "[Priestess Panno]";
			mes "Fine. You really";
			mes "want to exchange your";
			mes "Lottery Tickets? It's my job";
			mes "to ask and make sure, you";
			mes "know, in case you were saving";
			mes "them for some weird reason.";
			next;
			if (select("Yes:No") == 1) goto L_Lottery;
			mes "[Priestess Panno]";
			mes "You can redeem your";
			mes "Lottery Tickets at any";
			mes "time, so please visit";
			mes "me at your leisure.";
			mes "Go with Freya.";
			goto L_End;

		case 2:
			cutin "ra_fano01",2;
			mes "[Priestess Panno]";
			mes "The Chapel is located";
			mes "over the wall behind me";
			mes "Our pope's office and chambers";
			mes "are upstairs. You can only go";
			mes "there if you have special";
			mes "authorization.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "......";
			mes ".........";
			next;
			mes "[Priestess Panno]";
			mes "............";
			mes ".........";
			mes "......";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "...?";
			next;
			cutin "ra_fano02",2;
			mes "[Priestess Panno]";
			mes "You come to a temple";
			mes "to pray, not to look";
			mes "around. Or chit-chat";
			mes "with the priestesses";
			mes "like me. Don't forget it.";
			next;
			cutin "ra_fano02",2;
			mes "[Priestess Panno]";
			mes "The offices for the High";
			mes "Priests are located on each";
			mes "side of the hallway. However,";
			mes "you can only enter if you've";
			mes "been permitted beforehand.";
			goto L_End;

		case 3:
			cutin "ra_fano02",2;
			mes "[Priestess Panno]";
			mes "Gate...?";
			next;
			select("The locked gate to the temple!");
			mes "[Priestess Panno]";
			mes "I don't know";
			mes "what you mean.";
			next;
			select("Explain");
			mes "["+strcharinfo(0)+"]";
			mes "I think that Priestess Nemma";
			mes "has been worried about the";
			mes "gate being broken, though";
			mes "it hasn't been like that since";
			mes "you've started your position";
			mes "here at the temple.";
			next;
			mes "[Priestess Panno]";
			mes "Worried...?";
			mes "Yes, my twin sister";
			mes "has been known to";
			mes "do a lot of that, and cry";
			mes "for my help. Am I right?";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "It's weird";
			mes "...She said that the gate";
			mes "should automatically fix";
			mes "itself, but it hasn't been";
			mes "doing it lately. She was";
			mes "acting really funny..";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "She was talking about";
			mes "the temple's history and";
			mes "how the security system was";
			mes "built. Then she mentioned you,";
			mes "so I get the feeling you might";
			mes "know something about this.";
			next;
			mes "[Priestess Panno]";
			mes ".........";
			set ra_tem_q,11;
			goto L_End;
		}
	}
	else if (ra_tem_q == 11) {
		mes "["+strcharinfo(0)+"]";
		mes "I remember now...!";
		mes "I was there when the gate";
		mes "closed, and I heard someone";
		mes "with your exact voice whisper";
		mes "something to magically open";
		mes "the gate! What's that all about?";
		next;
		mes "[Priestess Panno]";
		mes "......";
		mes ".........";
		mes "............";
		next;
		mes "[Priestess Panno]";
		mes "......";
		mes ".........";
		mes "............";
		mes "We... I mean....";
		next;
		cutin "ra_fano01",2;
		mes "[Priestess Panno]";
		mes "Nemma and I are descended";
		mes "from a family of great alchemists.";
		mes "They went on a long, religious";
		mes "pilgrimage and ended up here.";
		mes "They are the ones that built";
		mes "this temple and security system.";
		next;
		mes "[Priestess Panno]";
		mes "In a sense, this temple";
		mes "is the tomb of our ancestors,";
		mes "who left Rune-Midgarts and";
		mes "built this city of Rachel about";
		mes "a thousand years ago.";
		next;
		mes "[Priestess Panno]";
		mes "Over the generations, many";
		mes "Alchemists left Rune-Midgarts";
		mes "and settled here, converting";
		mes "the desert into green fields.";
		mes "This temple was supposed";
		mes "be a shelter from intruders.";
		next;
		mes "[Priestess Panno]";
		mes "My ancestor designed the";
		mes "temple security system to";
		mes "require a special permit in";
		mes "order to access the temple";
		mes "But the invaders never came,";
		mes "and we didn't need the permits.";
		next;
		mes "[Priestess Panno]";
		mes "The special permits were";
		mes "disposed, but the automatic";
		mes "security system was left on";
		mes "the gate, just in case. Now,";
		mes "I've heard that the security";
		mes "system has been malfunctioning.";
		next;
		cutin "ra_fano03",2;
		mes "[Priestess Panno]";
		mes "However, that's not possible.";
		mes "Even by today's standards, the";
		mes "system is perfectly designed.";
		mes "While I was praying in the";
		mes "Chapel some time ago, I found";
		mes "what is causing the gate problems.";
		next;
		mes "[Priestess Panno]";
		mes "Suddenly, the lights went";
		mes "out, and I could only barely";
		mes "see distinguish my surroundings.";
		mes "I was about to go outside when";
		mes "I heard a noise from the stairs.";
		next;
		cutin "ra_fano02",2;
		mes "[Priestess Panno]";
		mes "From what I can tell,";
		mes "someone is transporting";
		mes "something out of the Holy";
		mes "Grounds. I don't know what";
		mes "they keep there, though.";
		mes "I'm not a high rank Priestess.";
		next;
		mes "[Priestess Panno]";
		mes "I'm not sure if I want";
		mes "to find out what's there";
		mes "I heard something that";
		mes "sounded like a horrible";
		mes "monster's howl. It was";
		mes "incredibly frightening.";
		next;
		mes "[Priestess Panno]";
		mes "I panicked, ran to";
		mes "my desk at the front,";
		mes "and just recited the secret";
		mes "password passed down from my";
		mes "ancestors to open the gate.";
		next;
		cutin "ra_fano01",2;
		mes "[Priestess Panno]";
		mes "You see, my ancestors";
		mes "included the secret password";
		mes "and voice recognition feature";
		mes "into the gate in case something";
		mes "after they disposed of the";
		mes "temple permits--just in case.";
		next;
		mes "[Priestess Panno]";
		mes "The real reason why the gate";
		mes "is acting strangely is not";
		mes "because the gate is broken,";
		mes "but because someone is sneaking";
		mes "in and out of the Holy Ground.";
		next;
		mes "[Priestess Panno]";
		mes "Whoever they are, they";
		mes "must be using one of the";
		mes "old temple permits in order";
		mes "to cover their tracks. Now,";
		mes "you know everything.";
		next;
		cutin "ra_fano01",2;
		mes "[Priestess Panno]";
		mes "You'd better not";
		mes "reveal what you learned";
		mes "from me. Otherwise, I'm";
		mes "sure we'll end up dead.";
		mes "Excuse me now, I need";
		mes "to get back to work.";
		set ra_tem_q,12;
		goto L_End;
	}
	cutin "ra_fano02",2;
	mes "[Priestess Panno]";
	mes "This is a holy place";
	mes "Behave yourself, and";
	mes "respect those who have";
	mes "come here just to worship.";
	goto L_End;

L_Lottery:
	if(checkweight(607,1) == 0){
		cutin "ra_fano02",2;
		mes "[Priestess Panno]";
		mes "You're carrying too much";
		mes "right now. What are you";
		mes "going to do if I give you";
		mes "something large, unwieldy";
		mes "and heavy? Put your junk";
		mes "away in Storage first.";
		goto L_End;
	}
	mes "[Priestess Panno]";
	mes "Here we go";
	mes "Excited? Mm";
	mes "I can redeem only";
	mes "1 Lottery Ticket at";
	mes "a time. Your reward";
	mes "for this ticket is...";
	next;
	cutin "ra_fano02",2;
	if (countitem(7570) > 0) {
		mes "[Priestess Panno]";
		mes "^FF0000This^000000. It's been in our";
		mes "storage for a while, but";
		mes "I hope this is acceptable";
		mes "as a token of the temple's";
		mes "gratitude. May Freya smile";
		mes "upon you for your generosity...";
		delitem 7570,1;
		set .@bonus_donate,rand(100);
		if (.@bonus_donate == 99) {
			set .@bonus_donate2,rand(100);
			if (.@bonus_donate2 > 0 && .@bonus_donate2 < 11) getitem 616,1;		//Old Card Album 0.1%
			else if (.@bonus_donate2 > 10 && .@bonus_donate2 < 31) getitem 617,1;	//Old Violet Box 0.2%
			else if (.@bonus_donate2 > 30 && .@bonus_donate2 < 61) getitem 603,1;	//Old Blue Box 0.3%
			else getitem 607,1; //Yggdrasil Berry 0.4+%
		}
		else if (.@bonus_donate > 88 && .@bonus_donate < 96) getitem 644,1;	//Gift Box 7%
		else if (.@bonus_donate > 76 && .@bonus_donate < 89) getitem 607,1;	//Yggdrasil Berry 12%
		else if (.@bonus_donate > 65 && .@bonus_donate < 77) getitem 505,1;	//Blue Potion 11%
		else if (.@bonus_donate > 57 && .@bonus_donate < 66) getitem 604,1;	//Dead Branch 8%
		else if (.@bonus_donate > 45 && .@bonus_donate < 58) getitem 608,1;	//Yggdrasil Seed 12%
		else if (.@bonus_donate > 5 && .@bonus_donate < 11) getitem 518,1;	//Honey 5%
		else if (.@bonus_donate > 0 && .@bonus_donate < 6) getitem 526,1;	//Royal Jelly 5%
		else getitem 547,1; //Condensed White Potion 39%
		goto L_End;
	}
	mes "[Priestess Panno]";
	mes "You...";
	mes "Don't have any Lottery";
	mes "Tickets to redeem.";
	if ($rachel_donate > 9999) {
		mes "We're not distributing";
		mes "them now, but maybe you";
		mes "can ask your friends for one.";
	}
	else {
		mes "You can obtain them from";
		mes "Priestess Nemma at the temple";
		mes "entrance after you donate zeny.";
	}
	next;
	cutin "ra_fano03",2;
	mes "[Priestess Panno]";
	mes "May Freya be with you.";
	goto L_End;

L_End:
	close2;
	cutin "",255;
	end;
}

ra_temin,134,128,3	script	Pope's Office Guard#rac::raofficeguard	926,{
	if ((ra_tem_q == 15) && (countitem(7561) > 39)) {
		mes "[Pope's Office Guard]";
		mes "Hm? What's that you have";
		mes "there? Oh, you've gathered";
		mes "40 Glacial Hearts and brought";
		mes "a recommendation letter from";
		mes "a High Priest? Most impressive.";
		next;
		mes "[Pope's Office Guard]";
		mes "I think I know why you're";
		mes "here. Thanks for bringing";
		mes "those to me, and I'll let you";
		mes "enter and see the pope";
		mes "Welcome, brave "+strcharinfo(0)+".";
		close2;
		set ra_tem_q,16;
		delitem 7561,40; //Ice_Heart
		end;
	}
	else if (ra_tem_q == 16) {
		mes "[Pope's Office Guard]";
		mes "The pope is inside";
		mes "expecting you, so please";
		mes "don't keep her waiting long.";
		close;
	}
	else if (MISC_QUEST & 8192) {
		if ((aru_em == 15) || (aru_em == 21)) {
			mes "- Niren told me to pay a visit to the Pope in her office... -";
			close;
		}
		else {
			mes "[Pope's Office Guard]";
			mes "I'm sorry, but outsiders";
			mes "typically aren't allowed";
			mes "to visit the pope without";
			mes "special authorization.";
			close;
		}
	}
	else {
		mes "[Pope's Office Guard]";
		mes "I'm sorry, but the pope";
		mes "is officiating a service";
		mes "now. Please come back";
		mes "after the service is ended.";
		close;
	}
}

ra_temin,134,134,3	duplicate(raofficeguard)	Pope's Office Guard#2ra	926

ra_temin,134,131,0	script	gyoin1#rachel	45,1,1,{
OnTouch:
	if (ra_tem_q == 16)
		warp "ra_temin",276,239;
	else if ((ra_tem_q > 16) || (MISC_QUEST & 8192)){
		if ((aru_em == 15) || (aru_em == 21))
			warp "ra_temin",276,239;
		else {
			mes "[Pope's Office Guard]";
			mes "I'm sorry, but the pope";
			mes "is officiating a service";
			mes "now. Please come back";
			mes "after the service is ended.";
			close;
		}
	}
	if (ra_tem_q < 16) {
		mes "^3355FFThe door is locked.^000000";
		close;
	}
	end;
}

ra_temin,275,226,0	script	#rachel33	45,1,1,{
	end;
OnTouch_:
	if (aru_em == 21)
		warp "que_temsky",99,11;
	else
		warp "ra_temsky",99,11;
	end;
}

ra_temsky,95,99,6	script	Priest#1rachel	935,{
	mes "[Priest]";
	mes "May Freya be with you.";
	close;
}

ra_temsky,93,97,6	script	Male Follower#1rachel::ramale	926,{
	mes "[Male Follower]";
	mes "May Freya be with you.";
	close;
}

ra_temsky,90,95,6	duplicate(ramale)	Male Follower#2rachel	926
ra_temsky,98,59,6	duplicate(ramale)	Male Follower#3rachel	926

ra_temsky,104,99,4	script	Priestess#1rachel	920,{
	mes "[Priestess]";
	mes "May Freya be with you.";
	close;
}

ra_temsky,106,97,4	script	Female Follower#1rachel::rafemale	916,{
	mes "[Female Follower]";
	mes "May Freya be with you.";
	close;
}

ra_temsky,108,95,4	duplicate(rafemale)	Female Follower#2rachel	916
ra_temsky,101,59,4	duplicate(rafemale)	Female Follower#3rachel	916

ra_temsky,99,99,5	script	Pope#rachel	936,{
	if (ra_tem_q == 16) {
		cutin "ra_bishop",2;
		mes "^3355FFTh-this little";
		mes "girl is the pope...?!^000000";
		next;
		mes "[Pope]";
		mes "...............................";
		mes "..........................Um...";
		mes "W-welcome. Is something";
		mes "wrong? Oh, I know, it's my";
		mes "eyes. I'm sorry if they";
		mes "scare you a little bit.";
		next;
		select("No, not at all...!");
		mes "[Pope]";
		mes "......";
		mes "......";
		mes "......You know, my appearance...";
		next;
		mes "[Pope]";
		mes "It's alright. Actually,";
		mes "I'm used to it. People";
		mes "are usually a little shocked";
		mes "the first time they see me.";
		mes "So... Um... Where do you";
		mes "come from, "+strcharinfo(0)+"?";
		next;
		input @input$;
		mes "[Pope]";
		mes @input$ +"...?";
		mes "I think I might have heard";
		mes "about that place before.";
		mes "Wow... What did you do";
		mes "when you lived there?";
		next;
		input @input$;
		mes "[Pope]";
		mes @input$ +"...?";
		mes "Wow, that sounds quite";
		mes "extraordinary. Ooh, ooh!";
		mes "Tell me, how have you come";
		mes "here to Rachel? I'm interested";
		mes "in knowing more about you~";
		next;
		mes "^3355FFYou and the pope";
		mes "continued to comfortably";
		mes "converse. As she spoke, she";
		mes "seemed more like a young,";
		mes "lonely girl than a solemn";
		mes "religious figure for a nation.^000000";
		next;
		mes "[Pope]";
		mes "...Wow, sometimes, I really";
		mes "wish I could live like you.";
		mes "You'd think being pope would";
		mes "be great, but they make me work";
		mes "all the time. And there are all";
		mes "sorts of things I can't do.";
		next;
		mes "[Pope]";
		mes "You know what's weird?";
		mes "I think I'm the head of this";
		mes "religion, but there's a sacred";
		mes "place that even I'm not allowed";
		mes "to visit. Isn't that so weird?";
		next;
		select("R-really...?");
		mes "[Pope]";
		mes "...Yeah. I don't know";
		mes "much about, and I'm not";
		mes "really supposed to talk";
		mes "about it. We just call this";
		mes "place the ''Holy Ground...''";
		next;
		select("Holy Ground?");
		mes "[Pope]";
		mes "I'm sorry... I want";
		mes "to tell you more, but...";
		mes "That's all I know. I wonder...";
		mes "I wonder what they could";
		mes "be hiding over there...";
		next;
		mes "[Priest]";
		mes "I'm sorry to interrupt";
		mes "your Excellency, but it's";
		mes "time to officiate services.";
		mes "Pardon me.";
		next;
		mes "[Pope]";
		mes "Already?! Hmpf...";
		mes "Oh, before I forget,";
		mes "I needed to tell you that";
		mes "High Priest Zhed wanted";
		mes "to talk to you, "+strcharinfo(0)+".";
		next;
		mes "[Pope]";
		mes "I really want to thank";
		mes "you for coming to speak";
		mes "to me. I had a great time";
		mes "learning. Now I have to";
		mes "go officiate services, so...";
		mes "This is goodbye for now...";
		close2;
		cutin "",255;
		set ra_tem_q,17;
		changequest 8100,8101;
		end;
	}
	else {
		if (aru_em < 15) {
			mes "[Pope]";
			mes "Oh, that's right...";
			mes "Zhed... Er, High Priest";
			mes "Zhed wanted to speak to you!";
			close2;
			cutin "",255;
			end;
		}
		else if (aru_em == 15) {
			mes "[Pope]";
			mes "Oh, hello! It's you again!";
			mes "Have you come to tell me";
			mes "interesting stories about";
			mes "the outside world again?";
			next;
			input .@input$;
			mes "[Pope]";
			mes "Mm. That sounds pretty";
			mes "strange to me. Well, it's";
			mes "good to hear it from you.";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "(^333333I can't just leave";
			mes "now. I should try to see";
			mes "if I can learn anything";
			mes "useful from the pope...^000000)";
			next;
			switch(select("Aren't you lonely?:Do you ever take a break?")) {
			case 1:
				mes "[Pope]";
				mes "Well, there are always";
				mes "some priests with me all";
				mes "the time. Some of them";
				mes "even watch me when I sleep.";
				mes "I don't think I have time";
				mes "to feel lonely, actually.";
				next;
				mes "[Pope]";
				mes "Thank you for asking.";
				mes "Sometimes... Sometimes";
				mes "I wonder if I have a real";
				mes "family. I don't even know";
				mes "who'd they be or if they";
				mes "exist. I don't know...";
				next;
				mes "[Pope]";
				mes "I... I'm sorry.";
				mes "I guess you didn't";
				mes "expect to hear something";
				mes "like that. ^666666*Sigh*^000000 I'm feeling";
				mes "pretty exhausted. I better...";
				mes "I better get some rest...";
				set aru_em,16;
				changequest 2135,2136;
				close2;
				cutin "",255;
				end;
			case 2:
				mes "[Pope]";
				mes "Well, even if I wanted";
				mes "to, I can't just go out";
				mes "and play. As pope... Well...";
				mes "Everyone and everything";
				mes "sort of needs my attention.";
				close2;
				cutin "",255;
				end;
			}
		}
		else if (aru_em == 16) {
			mes "[Follower]";
			mes "The pope said that she's";
			mes "exhausted. Please come";
			mes "back when she's feeling";
			mes "better, and she will have";
			mes "an audience with you.";
		}
	}
	close2;
	cutin "",255;
	end;
}

ra_temin,294,149,0	script	High Priestess Niren#ra	915,{
	end;

OnInit:
	hideonnpc "High Priestess Niren#ra";
	end;

OnEnable:
	initnpctimer;
	end;

OnTimer120000:
	stopnpctimer;
	hideonnpc "High Priestess Niren#ra";
	end;
}

ra_temin,293,144,0	script	out1#rachel	-1,3,3,{
OnTouch:
	if (ra_tem_q == 18) {
		mes "^3355FFIt sounds like they're";
		mes "still talking. It'd be";
		mes "best to patient and wait";
		mes "just a little while longer.";
		mes "Still... It's awfully boring.^000000";
		next;
		mes "^3355FFA little eavesdropping";
		mes "never hurt anyone. Maybe";
		mes "you can hear them a little";
		mes "better if you listen from";
		mes "the left side of the wall.^000000";
		close2;
		warp "ra_temin",300,153;
		end;
	}
	end;
}

ra_temin,288,151,0	script	hidden1#rachel	-1,1,6,{
OnTouch:
	if (ra_tem_q == 18) {
		mes "^3355FFAt this distance you";
		mes "can cleartly hear the";
		mes "voices from the other";
		mes "side of the wall...^000000";
		next;
		mes "[????]";
		mes "...Was it really";
		mes "necessary to involve";
		mes "an outsider in this";
		mes "situation? Answer me!";
		next;
		mes "[High Priest Zhed]";
		mes "Is this about the";
		mes "accident? You know that";
		mes "I've disagreed with the";
		mes "actions that have led to";
		mes "the mana leakage.";
		next;
		mes "[High Priest Zhed]";
		mes "Even though I thought";
		mes "it was a reckless decision,";
		mes "I've closed the shrine and";
		mes "did my best to cover up this";
		mes "unfortunate accident.";
		next;
		mes "[????]";
		mes "I'm not blaming you. In";
		mes "fact, I'll admit it: that was";
		mes "our mistake. We caused";
		mes "the monster infestation by";
		mes "letting the mana leak.";
		next;
		mes "[????]";
		mes "But that's not related";
		mes "to what I'm asking you!";
		mes "Do you really think it's";
		mes "alright to allow an outsider";
		mes "to speak to our pope during";
		mes "such a tumultuous time?!";
		next;
		mes "[High Priest Zhed]";
		mes "Why not? I thought it'd";
		mes "bring her great comfort.";
		mes "She is very confused as to";
		mes "why the Holy Ground has been";
		mes "closed, and she cannot know";
		mes "what is happening there.";
		next;
		mes "[High Priest Zhed]";
		mes "Again... I strongly";
		mes "disagree with what is";
		mes "secretly going on over";
		mes "there. I know that I can't";
		mes "officially oppose this";
		mes "course of action, but...";
		next;
		mes "[????]";
		mes "There's nothing to worry";
		mes "about! It'll all be over before";
		mes "you know it. Besides, it's";
		mes "too late to turn back now,";
		mes "so I warn you: don't you";
		mes "dare do anything foolish.";
		next;
		mes "^3355FFSomeone's coming!";
		mes "You'd better step away";
		mes "from the wall and feign";
		mes "ignorance as best you can!^000000";
		next;
		hideoffnpc "High Priestess Niren#ra";
		cutin "ra_gwoman",2;
		mes "[High Priestess Niren]";
		mes "Oh! You must be the one";
		mes "High Priest Be- er, Zhed,";
		mes "told me about. It's very nice";
		mes "to meet you. High Priestess";
		mes "Niren, at your service.";
		next;
		mes "[High Priestess Niren]";
		mes "I hear that you had the";
		mes "privilege of speaking with";
		mes "our pope, and that she had";
		mes "a wonderful time. What did";
		mes "you think of her, hm?";
		next;
		select("She's different than what I expected...");
		cutin "ra_gwoman2",2;
		mes "[High Priestess Niren]";
		mes "Ah, I know what you mean...";
		mes "Usually, most outsiders tell";
		mes "me that they expect our pope";
		mes "to be a wizened old man.";
		mes "But that's not the case";
		mes "here in Arunafeltz.";
		next;
		cutin "ra_gwoman",2;
		mes "[High Priestess Niren]";
		mes "Usually, our pope is chosen";
		mes "by her resemblance to our";
		mes "goddess Freya. She must";
		mes "have silvery blond hair, snowy";
		mes "skin, and divinely colored";
		mes "eyes. You saw, didn't you?";
		next;
		mes "[High Priestess Niren]";
		mes "I'm curious: what kinds";
		mes "of things did you and the";
		mes "pope talk about? As you know,";
		mes "we priests are forbidden from";
		mes "leaving Arunafeltz, so...";
		next;
		mes "^3355FFYou relate the details of";
		mes "your talk with the pope, but";
		mes "you make sure not to mention";
		mes "anything about the Holy Ground";
		mes "as High Priest Zhed had asked.^000000";
		next;
		mes "[High Priestess Niren]";
		mes "Ah, that's fairly";
		mes "interesting, your land.";
		mes "Tell me, how did you come";
		mes "to know Bekento, er, I mean,";
		mes "High Priest Zhed?";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "(^666666Bekento?^000000)";
		next;
		select("Explain how You Met High Priest Zhed");
		cutin "ra_gwoman2",2;
		mes "[High Priestess Niren]";
		mes ".........................";
		mes "That's all? Hm? That's";
		mes "pretty funny. ^333333*Sigh*^000000 I believe";
		mes "he trusts people too much...";
		mes "But that's only my opinion.";
		next;
		cutin "ra_gwoman",2;
		mes "[High Priestess Niren]";
		mes "If you don't mind...";
		mes "I want to give you a bit of";
		mes "advice. Don't get too close";
		mes "to High Priest Zhed. If you";
		mes "do, you might end up getting";
		mes "yourself in trouble.";
		next;
		cutin "",255;
		hideonnpc "High Priestess Niren#ra";
		mes "^3355FFHigh Priestess Niren left";
		mes "as soon as she said those words.";
		mes "What could she possibly mean?";
		mes "For now, you may as well";
		mes "talk to High Priest Zhed.^000000";
		set ra_tem_q,19;
		if (isbegin_quest(8102) == 1)
			changequest 8102,8103;
		else if (isbegin_quest(8101) == 1)
			changequest 8101,8103;
		close;
	}
	end;
}

ra_temin,272,143,0	script	key1#rachel	-1,3,3,{
OnTouch:
	if (ra_tem_q == 20) {
		mes "^3355FFYou find a small";
		mes "shining object laid";
		mes "on the floor.^000000";
		next;
		if (select("Ignore:Pick It Up") == 1) {
			mes "^3355FFYou decided to ignore";
			mes "the small shining object,";
			mes "no matter how important it";
			mes "may be to you in the future.^000000";
			close;
		}
		mes "^3355FFUpon picking up the";
		mes "object, you are able to";
		mes "identify it as a small key.";
		mes "Perhaps you can use it to";
		mes "open some kind of lock.";
		set ra_tem_q,21;
		close;
	}
	end;
}

ra_temin,28,319,0	script	saint1#rachel	45,4,2,{
OnTouch:
	if ((ra_tem_q > 21) || (MISC_QUEST & 8192)) { warp "ra_san01",140,135; end; }

	if (ra_tem_q == 21) {
		mes "^3355FFThis must be the";
		mes "entrance to the Holy";
		mes "Ground. However, the";
		mes "door in your way is locked.^000000.";
		next;
		if (select("Quit:Use Small Key") == 2) {
			mes "^3355FFYou insert the Small";
			mes "Key that you found in";
			mes "High Priest Zhed's room,";
			mes "and find that it is able";
			mes "to unlock this door.^000000";
			close2;
			warp "ra_san01",140,135;
			end;
		}
		close;
	}
	mes "^3355FFThe door is locked.^000000";
	close;
}

que_san04,119,115,0	script	imir1#rachel	-1,2,2,{
OnTouch:
	if (ra_tem_q == 21) {
		mes "^3355FFThis large area looks";
		mes "like it was artificially build";
		mes "for some reason-- it doesn't";
		mes "seem like an area naturally";
		mes "infested by monsters.^000000";
		next;
		mes "^3355FFPerhaps if you explore";
		mes "this place, you'll be able";
		mes "to find something interesting.^000000";
		close;
	}
	end;
}

que_san04,119,133,0	script	imir2#rachel	-1,20,5,{
OnTouch:
	if (ra_tem_q == 21) {
		mes "^3355FFThere's something here";
		mes "beneath the water. This";
		mes "may warrant a closer look.^000000";
		close;
	}
	end;
}

que_san04,119,203,0	script	imir3#rachel	-1,7,7,{
OnTouch:
	if (ra_tem_q == 21) {
		mes "^3355FFNo wonder this object";
		mes "in the water seems so";
		mes "familiar: it's a Ymir's";
		mes "Heart Piece! In fact, there's";
		mes "dozens of them just lying here.^000000";
		next;
		mes "^3355FFWhy would so many of these";
		mes "powerful artifacts be here";
		mes "in the Holy Ground? Perhaps";
		mes "this is the secret that the";
		mes "priests are trying to keep.^000000";
		next;
		hideoffnpc "High Priestess Niren#r2";
		cutin "ra_gwoman",2;
		mes "[High Priestess Niren]";
		mes "How dare you intrude";
		mes "the Holy Ground! Identify";
		mes "yourself! I'll have you tried!";
		next;
		cutin "ra_gwoman2",2;
		mes "[High Priestess Niren]";
		mes "O-oh! It's you, the";
		mes "adventurer recommended";
		mes "by Bekento. Hm. I apologize";
		mes "for snapping at you like";
		mes "that. Didn't you know that";
		mes "no one's allowed here?";
		next;
		cutin "ra_gwoman",2;
		mes "[High Priestess Niren]";
		mes "Hmm. Well, you Rune-Midgarts";
		mes "adventurers are famous for your";
		mes "skills and abilities, but this";
		mes "was not expected. I mean, we";
		mes "made sure this place was";
		mes "absolutely secure.";
		next;
		cutin "ra_gwoman2",2;
		mes "[High Priestess Niren]";
		mes "What's done is done...";
		mes "I warned Bekento that he";
		mes "might cause trouble for you,";
		mes "but it seems that you've";
		mes "caused trouble for him.";
		next;
		mes "[High Priestess Niren]";
		mes "Understand this:";
		mes "most intruders are";
		mes "severely punished, but";
		mes "because of my friendship";
		mes "with Bekento, I'm letting";
		mes "you off easy. Remember that.";
		next;
		sc_start SC_Blind,600000,0;
		mes "^3355FFNiren began to chant";
		mes "in a low voice, and your";
		mes "eyelids grow heavier as you";
		mes "grow drowsier and sleepier...^000000";
		close2;
		cutin "",255;
		hideonnpc "High Priestess Niren#r2";
		set ra_tem_q,22;
		changequest 8104,8105;
		warp "rachel",163,152;
		end;
	}
	end;
}

que_san04,122,200,4	script	High Priestess Niren#r2	915,{
	end;

OnInit:
	hideonnpc "High Priestess Niren#r2";
	end;

OnEnable:
	initnpctimer;
	end;

OnTimer120000:
	stopnpctimer;
	hideonnpc "High Priestess Niren#r2";
	end;
}

rachel,163,152,0	script	imir3#rachel2	-1,3,3,{
OnTouch:
	if (ra_tem_q == 22) {
		mes "^3355FFYou feel a slight headache";
		mes "after you recollect your senses.";
		mes "Somehow, you're been brought";
		mes "back to Rachel Town. How long";
		mes "have you been unconscious?^000000";
		next;
		sc_end SC_Blind;
		mes "^3355FFIt would be best to";
		mes "ask High Priest Zhed";
		mes "about what had happened.^000000";
		set ra_tem_q,23;
		close;
	}
	end;
}

rachel,142,167,5	script	Seeking Follower#rachel	916,6,6,{
	if ((lost_boy == 13) && (ra_tem_q == 20)) {
		L_Mes:
		mes "[Arunafeltz Follower]";
		mes "Excuse me, but";
		mes "are you "+strcharinfo(0)+"?";
		next;
		select("Yes.");
		mes "[Arunafeltz Follower]";
		mes "High Priest Zhed";
		mes "would like to see";
		mes "you right away, "+strcharinfo(0)+".";
		next;
		select("May ask why?");
		mes "[Arunafeltz Follower]";
		mes "Well, I actually have no";
		mes "idea. I'm only supposed to";
		mes "inform you that he's looking";
		mes "for you. Please visit High";
		mes "Priest Zhed in the second";
		mes "right room of the temple.";
		close;
	}
	else {
		mes "[Arunafeltz Follower]";
		mes "May Freya bless you";
		mes "on your journeys...";
		close;
	}

OnTouch:
	if ((lost_boy == 13) && (ra_tem_q == 20)) goto L_Mes;
	end;
}

//============================================================ 
// Old changelog
//============================================================ 
//= 1.0 First version, needs testing. [L0ne_W0lf]
//= 1.1 Some slight optimization. [L0ne_W0lf]
//= 1.2 Fixed Man Stuck in Ice only giving 1 Freezing Snow Powder. [L0ne_W0lf]
//= 1.3 Added the ability to redeem lottery tickets before donation max is met. [L0ne_W0lf]
//= 1.4 Removed an erroneous "case". Thanks, Jet. [L0ne_W0lf]
//= 1.5 Fixed a bug in Bruspetti quest. [SinSloth]
//= 1.5b Fixed some typos in various quests. [SinSloth]
//= 1.6 Fixed a couple bugs with the Pope's Office Guards... [L0ne_W0lf]
//= 1.7 Fixed Maheo, he will revert to his frozen state when clicked. [L0ne_W0lf]
//=     Replaced  instances of "+name+", with "+strcharinfo(0)".
//= 1.8 Various fixes: Hamion will now delete items used for Wind Hammer. [L0ne_W0lf]
//=     Fixed EXP reward in Ice Necklace quest, fixed a typo in an NPC header.
//=     Another minor fix to Hamion. "< 1" -> "< 2". Added a missing close to
//=     the ontouch "key". Thanks to Gepard for pointing them out.
//= 1.9 Fixed a misorder with variable checkings. [SinSloth]
//= 2.0 Fixed experience gains to match upcoming rate adjustments. [SinSloth]
//= 2.1 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
//= 2.2 Maheo NPC now uses "setnpcdisplay" instead of two NPCs. [L0ne_W0lf]
//= 2.2a Corrected a Typo error ";;". [Samuray22]
//= 2.3 Added Zhed's portion of Thor Volcano Base Quest. (euRO) [L0ne_W0lf]
//= 2.4 Updated Zhed's Thor Vol. Base addition dialog to iRO's. [L0ne_W0lf]
//= 2.4a Further updates to Zhed's Veins addition. [L0ne_W0lf]
//= 2.5 Added Nameless Island quest addition. [L0ne_W0lf]
//= 2.6 Uncommented ontouchNPC label for Man Stuck in Ice. [L0ne_W0lf]
//= 2.7 Corrected overlaping warp coordinates. [L0ne_W0lf]
//= 2.8 Replaced effect numerics with constants. [L0ne_W0lf]
//= 2.9 Replaced effect numerics with constants. [Samuray22]
//============================================================
