elinhopp Goto Github PK

if(illusion_vampire == 0){
	setpcblock PCBLOCK_ALL, 1;
	mes "[Mojo]",
		"Just let me read it. I'll go bring them out afterward. Please?";
	next;
	npctalk "Bah!", "Mojo#illuvamp", bc_self;
	mes "[Grimm]",
		"Just leave me alone! I know you're going to run away with it if I give it to you.";
	next;
	mes "[Mojo]",
		"I swear I'll give it back to you. Just for one minute. How about thirty seconds? Ten seconds, then?";
	next;
	mes "[Grimm]",
		"No! I'm not even going to let you touch it!";
	next;
	mes "[Mojo]",
		"Come on, Don't you trust me?";
	next;
	mes "[Grimm]",
		"No, I don't I may trust Mojo, my sister in faith, but not Mojo, the mage.";
	next;
	npctalk "Boohooo! Oh, God! I'm being treated so unfairly!", "Mojo#illuvamp", bc_self;
	mes "[Mojo]",
		"Oh, come on! You're a priest! You're supposed to have faith in everyone! Why are you treating me like a theif?";
	next;
	npctalk "He's still whispering that to me.", "Grimm#illuvamp", bc_self;
	mes "[Grimm]",
		"I only have faith in Him, and He's telling me not to trust you.";
	next;
	mes "[Mojo]",
		"I'm not having anything!";
	next;
	npctalk "Wow, I smell lies and the smell coming from you.", "Mojo#illuvamp", bc_self;
	npctalk "That's blasphemy!.", "Grimm#illuvamp", bc_self;
	mes "[Grimm]",
		"Of course not. Only his servants can hear him.";
	next;
	select("Would you be so kind as to heal me?");
	specialeffect2 EF_HEAL2;
	percentheal 100,100;
	npctalk "He's such a hypocrite. I can never trust priests again, and it's his fault.", "Mojo#illuvamp", bc_self;
	mes "[Grimm]",
		"Sure thing. Any time you want.";
	next;
	mes "["+strcharinfo(0)+"]",
		"Thank you. I'm sorry, but I heard you fighting, even from far comer of this dungeon";
	next;
	mes "[Grimm]",
		"You heard that? We must have been really loud. I suppose that wasn't very smart of us.";
	next;
	mes "[Mojo]",
		"Oh, this is great! Instead of fighting, why don't we ask this adventurer who is right?";
	next;
	npctalk "If you're busy, we'll understand.", "Mojo#illuvamp", bc_self;
	// give quest
	setquest 14652;
	illusion_vampire = 1;
	setpcblock PCBLOCK_ALL, 0;
}else if(illusion_vampire == 1){
	setpcblock PCBLOCK_ALL, 1;
	mes "[Mojo]",
		"Adventurer, if you're not busy, would you hear us out?";
	next;
	if(select("Let me hear it.:I have to leave.") == 2){
		mes "[Mojo]",
			"Please, when you have time come back and help us..";
		setpcblock PCBLOCK_ALL, 0;
		close;
	}
	
	mes "["+strcharinfo(0)+"]",
		"Let me hear it.";
	next;
	mes "[Grimm]",
		"Okay, this is going to be a long story. Let me have some water first.";
	next;
	mes "[Grimm]",
		"Adventurer, did you know these catacombs under Geffen once were quiet and filled with special energy instead of monsters?";
	next;
	mes "[Grimm]",
		"Back then, only a couple of monsters showed up once every decade or so.";
	next;
	select("What changed that?");
	emotion ET_OHNO;
	mes "[Grimm]",
		"*Glances at Mojo*";
	next;
	emotion ET_QUESTION, getnpcid(0, "Mojo#illuvamp");
	npctalk "I had nothing to do with it.", "Mojo#illuvamp", bc_self;
	mes "[Mojo]",
		"Why are you looking at me?";
	next;
	mes "[Grimm]",
		"Some mages decided to erect an ivory tower of their own. They searched everywhere in the continent and settled on the ground above these catacombs.";
	next;
	npctalk "Oh geez, here it goes again.", "Mojo#illuvamp", bc_self;
	emotion ET_SWEAT, getnpcid(0, "Mojo#illuvamp");
	mes "[Grimm]",
		"That was the beginning of the tragedy.";
	next;
	npctalk "Enough with the lecturing. Get the to the point already.", "Mojo#illuvamp", bc_self;
	npctalk "Everything has a cause and effect. How can you expect an adventurer to understand what this is about without knowing the cause?", "Grimm#illuvamp", bc_self;
	mes "[Grimm]",
		"It's been said all mammals have curiosity that rivals their appetite, but mages.. are the worst";
	next;
	mes "[Grimm]",
		"Anyway, these mages, after they built the Geffen Tower, took notice of the blaspemous creatures that sometimes appeared in the catacombs.";
	next;
	npctalk "They were just studying.", "Mojo#illuvamp", bc_self;
	npctalk "Just studying? They could've turned the entire continent into an unholy breeding ground!", "Grimm#illuvamp", bc_self;
	mes "[Grimm]",
		"They conducted various experiments to understand the special energy that reanimated the dead.";
	next;
	mes "[Grimm]",
		"And as if the wasn't enough, those mages used their magic and replicated the reanimating process.";
	next;
	mes "[Grimm]",
		"That went horribly wrong. The special energy that surrounded the catacombs exploded, bringing back all the dead buried in them.";
	next;
	mes "[Grimm]",
		"Those arrogant mages crossed the line! They tried to play God!";
	next;
	emotion ET_ANGER, getnpcid(0, "Mojo#illuvamp");
	mes "[Mojo]",
		"Hey, I'm one of them and I'm not going to let you talk bad about my predecessors like that!";
	next;
	npctalk "It's not telling the truth when you're only telling it from your point of view.", "Mojo#illuvamp", bc_self;
	mes "[Grimm]",
		"How am I defarring them when I'm only telling the truth?";
	next;
	mes "[Grimm]",
		"What do you think, Adventurer?",
		"Would you trust someone so reckless with important tasks?";
	next;
	select("...No.");
	npctalk "You've got to listen to both sides before you judge!", "Mojo#illuvamp", bc_self;
	mes "[Mojo]",
		"But wait, Adventurer. You haven't heard my side of the story.";
	next;
	npctalk "Apparently, trying your best wasn't enough in this case.", "Grimm#illuvamp", bc_self;
	mes "[Mojo]",
		"We understand the things that we want to study can be dangerous, so we try our best to be careful!";
	next;
	npctalk "Why are you saying that? I'm talking about my predecessors!", "Mojo#illuvamp", bc_self;
	mes "[Mojo]",
		"My predecessors may have been too enthusiastic to study what's underneath their tower, but it was that enthusiasm the made Geffen grow into the city of magic that it is.";
	next;
	mes "[Mojo]",
		"Rune-Midgard is flanked by Arunafeltz and Schwarzwald, the two strongest nations of the continent, and it's magic power is what keeps them at bay.";
	next;
	mes "[Grimm]",
		"And that's the only reason that kept the church from further pressing this matter.";
	next;
	npctalk "Father Grimm, could you stop cutting in?", "Mojo#illuvamp", bc_self;
	mes "[Grimm]",
		"Even though it doesn't change the fact that you woke the dead.";
	next;
	npctalk "I can't. You're twisting the facts to make yourself look good.", "Grimm#illuvamp", bc_self;
	mes "[Mojo]",
		"Curiosty is what fuels our life. it's the seed of development.",
		"Adventurer, would you hesitate to go to a new world because it's dangerous?";
	next;
	select("I wouldn't be an adventurer if I did.");
	emotion ET_OK, getnpcid(0, "Mojo#illuvamp");
	mes "[Mojo]",
		"We mages are just like you adventurers in that sense. I knew you'd understand me.";
	next;
	mes "[Mojo]",
		"You heard that, Father Grimm. Now show me the notebook.";
	next;
	mes "[Grimm]",
		"No. Adventurer, you agreed with me that she's not trust worthy.";
	next;
	mes "[Mojo]",
		"You also agreed with me on value of curiosity.";
	next;
	select("So, what is this about?");
	mes "["+strcharinfo(0)+"]",
		"I've heard both of you, but neither of you told me what you were fighting for.";
	next;
	mes "[Grimm]",
		"Oh, I'm sorry. The Church of Rune-Midgard periodically sends its priests out to these catacombs to maintain peace.";
	next;
	mes "[Grimm]",
		"I'm one of them, and I happened to pick up a notebook just before you found us.";
	next;
	select("A notebook?");
	mes "[Grimm]",
		"Yes. It looks like it belongs to one of the Geffen Tower mages. It has Bomi written on its cover, which I think is the name of its owner.";
	next;
	mes "[Mojo]",
		"But none of my guildsmen has such a name. I read the book, and she did sound like she was one of us. Not anymore, though.";
	next;
	mes "["+strcharinfo(0)+"]",
		"Not anymore?";
	next;
	npctalk "And that was a long, long time ago.", "Mojo#illuvamp", bc_self;
	mes "[Mojo]",
		"You're pretty sharp, Adventurer. That's right I checked with my guild and found out there was someone named Bomi. She just disappeared one day, though.";
	next;
	mes "["+strcharinfo(0)+"]",
		"Do you think this notebook belongs to her? But why was it here?";
	next;
	mes "[Mojo]",
		"That was the same question we asked at first. That didn't matter anymore once we read what was written in the notebook.";
	next;
	mes "[Grimm]",
		"What's written in it is unsettling, but what's more serious is? You'll have to read it yourself. Just don't open the last page.";
	next;
	npctalk "You know that's discrimination, right? You should be ashamed of yourself!", "Mojo#illuvamp", bc_self;
	mes "[Mojo]",
		"So you're okay with this adventurer reading it, but not me.";
	next;
	mes "[Grimm]",
		"Please take a look.";
	// give quest
	completequest 14652;
	setquest 14653;
	setpcblock PCBLOCK_ALL, 0;
	illusion_vampire = 2;
	close;		
}else if(illusion_vampire == 2){
	setpcblock PCBLOCK_ALL, 1;
	mes "I placed my hand on the notebook Father Grimm was holding. Suddenly I felt dizzy as the air around me shimmered. Carefully, I opened the notebook.";
	next;
	mes "[Daily Journal]",
		"I fainted in the middle of learning a new spell, agian.",
		"My low stamina and insufficient mana are always the problem. I thought I could make up for my weak constitution with magic. Of course, even that required some minimal stamina, but I didn't have even that.",
		"I'm so tired";
	next;
	mes "[Daily Journal]",
		"I saw Sophia drinking a mana potion. Maybe potions are the answer to my never-ending search for physical support.",
		"I wonder if ther are special potions that could improve me physically. Then, I could become stronger at last.";
	next;
	mes "[Daily Journal]",
		"All the potions I found didn't help improve my weak constitution. All they do is boost my existing strength.",
		"Maybe I should try to formulate stamina and mana potions on my own.";
	next;
	mes "[Daily Journal]",
		"I learned about the catacombs under Geffen Tower while I was in the library, reading about the tower's history.",
		"How are the dead reanimated? What kind of vital force keeps them",
		"tomorrow.";
	next;
	mes "[Daily Journal]",
		"The dead don't talk. There's nothing I can find out from them I've found traces of experiments everywhere. Some of my peers must have been here before I have. I'm espeically tired today. I'm going to bed early tonight";
	next;
	mes "[Daily Journal]",
		"The bats in the catacombs drink blood from the zombies, probably because there's nothing else to eat.",
		"Every day I spend most of my energy keeping the bloodthirsty bats at bay. I'd get killed if I didn't stay near the exit.",
		"I'm tired.";
	next;
	mes "[Daily Journal]",
		"Today, I heared some strange noise in the catacombs. The zombies and bats were strangely quiet.",
		"Maybe I should explore deeper into the catacombs tomorrow, while the monsters hide from whatever that noise is.";
	next;
	mes "That was the last entry. I took my hand off the notebook. Father Grimm closed the notebook.";
	//change quest?
	completequest 14653;
	setquest 14654;
	setpcblock PCBLOCK_ALL, 0;
	illusion_vampire = 3;
	close;
}else if(illusion_vampire == 3){
	setpcblock PCBLOCK_ALL, 1;
	mes "["+strcharinfo(0)+"]",
		"This notebook is both a diary and research journal.";
	next;
	mes "[Grimm]",
		"Indeed. It shows how its owner studied those blaspemous creatures to create stamina and mana echancers.";
	next;
	select("Intresting.");
	npctalk "I'd love to read it myself as well.", "Mojo#illuvamp", bc_self;
	emotion ET_OK, getnpcid(0, "Mojo#illuvamp");
	mes "[Mojo]",
		"Yes, it is. My guild would love to study this notebook. Most records from the same era have been lost.";
	next;
	mes "[Grimm]",
		"The content of this notebook isn't what causes me alarm. Didn't you detect some strange energy when you touch it?";
	next;
	mes "[Grimm]",
		"This notebook is sustained with its owner's spirtual energy, and it's pulling those who gaze upon it into the world inside it.";
	next;
	npctalk "So please let me have it. I'll give it back to you after I figure that all out.", "Mojo#illuvamp", bc_self;
	mes "[Mojo]",
		"And that's why I want to see the notebook so badly. I want to know how it contains a world inside it and why it was only discovered now.";
	next;
	npctalk "Oh, you don't even bother calling me by name anymore.", "Mojo#illuvamp", bc_self;
	mes "[Grimm]",
		"Mage, you stay out of this! This notebook is taking people to some place we don't know. And the gateway is in the last page.";
	next;
	mes "[Grimm]",
		"I scanned it for any malicious intent, but I didn't sense any. I think it's owner just needs help with some unfinished business.";
	next;
	mes "["+strcharinfo(0)+"]",
		"So were you arguing about which one of you should go to that place?";
	next;
	npctalk "So I told you, I'll go bring them back. I'm stronger than I look. I can do this on my own.", "Mojo#illuvamp", bc_self;
	npctalk "No. I'd rather wait until they return.", "Grimm#illuvamp", bc_self;
	mes "[Grimm]",
		"No. The other members of my group and two mages are already there. They just haven't returned yet.";
	next;
	select("How about I go?");
	mes "[Grimm]",
		"You? Well, you're more reliable than this sister here, but are you sure?";
	next;
	mes "["+strcharinfo(0)+"]",
		"I want to repay you for healing me. Also after listening to you both, I think it's better I go. Do you want me to bring your collegues?";
	next;
	npctalk "Take me with you!", "Mojo#illuvamp", bc_self;
	mes "[Grimm]",
		"No. I just want you to find them and make sure they're okay. If they need help, please provide it to them. If they have a message for me, then please let me know.";
	next;
	npctalk "*Stares at Mojo*", "Grimm#illuvamp", bc_self;
	npctalk "Why are you staring at me?", "Mojo#illuvamp", bc_self;
	mes "[Grimm]",
		"I wish I could go with you, but my group needs me here.";
	next;
	mes "[Grimm]",
		"I can't trust her with the notebook. If something happens to it, the people inside it might not be able to come back.";
	next;
	npctalk "*Snort* Why would I do that? You're just going to run away with it.", "Grimm#illuvamp", bc_self;
	mes "[Mojo]",
		"That does it Father Grimm, put that book down. Let's fight!";
	next;
	mes "[Mojo]",
		"Then I'm going to go with the Adventurer!";
	next;
	mes "[Grimm]",
		"No. You're staying with me. Don't you dare touch the notebook.";
	next;
	emotion ET_CRY, getnpcid(0, "Mojo#illuvamp");
	mes "[Mojo]",
		"Why are you doing this to me? What have I done to you?";
	next;
	npctalk "I am worried about you.", "Grimm#illuvamp", bc_self;
	mes "[Grimm]",
		"Bother Jojo asked me to never let you touch the notebook. Do you not remember that?";
	next;
	npctalk "Go ahead.", "Grimm#illuvamp", bc_self;
	mes "[Mojo]",
		"No. I don't remember. When Sister Gem returns, I'm going to tell on you!";
	next;
	mes "[Grimm]",
		"Now, Adventurer. Let me know when you're ready.";
	
	completequest 14654;
	setquest 14655;
	illusion_vampire = 4;
	setpcblock PCBLOCK_ALL, 0;
	close;
}else if(illusion_vampire == 13){
	if(!checkweight(25271,5)){
		mes "[Grimm]",
			"Adventurer, you seem to be carrying a lot of stuff to be talking right now..";
		next;
		mes "[Grimm]",
			"Please clear some space in your inventory.";
		close;
	}
	setpcblock PCBLOCK_ALL, 1;
	mes "[Grimm]",
		"Listen to me, or you can always go back to the Tower.";
	next;
	mes "[Mojo]",
		"No!";
	emotion ET_MERONG,getnpcid(0,"Mojo#illuvamp");
	next;
	select("Are you two still fighting?");
	mes "[Mojo]",
		"Ah, there you are! How was that place?";
	next;
	mes "[Grimm]",
		"I'm glad you came back safely, is everyone there okay?";
	npctalk "Please tell us already! I'm dying to know!","Mojo#illuvamp",bc_self;
	next;
	mes "I relayed what happened in the notebook to Father Grimm and Mojo, and told them that the others decided to keep an eye on the vampires.";
	next;
	mes "[Mojo]",
		"Wow, the same place in another plane of existence! I've never heared of this before! How does it work? This notebook has got to have something to do with it.";
	emotion ET_SPARK,getnpcid(0,"Mojo#illuvamp");
	next;
	mes "[Mojo]",
		"And vampires who understand humans? My goodness!";
	next;
	mes "[Mojo]",
		"I can't stay here. Father Grimm I have to go there. Let me go, please!";
	npctalk "Let me have the notebook.","Mojo#illuvamp",bc_self;
	next;
	mes "[Grimm]",
		"No. Never. Keep your hands to yourself.";
	npctalk "Argh! Why are you being so stubborn? I don't deserve this!";
	next;
	mes "[Grimm]",
		"Adventurer, thank you for venturing into that mysterious place for us. It'll be greatly appreciated if you visit my colleagues there bring news of them from time to time.";
	next;
	mes "[Mojo]",
		"I can do that too, you know. You just have to give me a chance!";
	npctalk "Sister Mojo, please stay out of this.","Grimm#illuvamp",bc_self;
	next;
	mes "[Grimm]",
		"Adventurer, thank you. Feel free to come to me if you want to enter the notebook again.";
	completequest 14666;
	getitem 25271,5;
	getexp 2000000,2000000;
	setpcblock PCBLOCK_ALL, 0;
	illusion_vampire = 14;
	close;	
}else if(illusion_vampire >= 4){
	setpcblock PCBLOCK_ALL, 1;
	mes "[Grimm]",
		"Do you want to enter the notebook? Are you ready?";
	next;
	if(select("Yes, send me there.", "No.") == 2){
		mes "[Grimm]",
			"Not a problem. Just let me know when you are ready.";
		setpcblock PCBLOCK_ALL, 0;
		close;
	}
	
	mes "[Grimm]",
		"Then let me open it.";
	close2;
	
	if(checkquest(14655) != 2){
		completequest 14655;
		setquest 14656;
	}
	mes "I placed my hand on the notebook and Father Grimm opened it to the last page. Suddenly my vision got blurry as I felt my body being transported to some place.";
	sleep2 750;
	setpcblock PCBLOCK_ALL, 0;
	warp "gef_d01_i",115,217;
}
end;

		if(!checkweight(25271,1)){
			mes "- Please clear some weight before handing the quest -";
			close;
		}
		setpcblock PCBLOCK_ALL, 1;
		mes "[Mojo]",
			"Wow, these are so old and fragile, I'm afraid they might crumble in my hands.";
		next;
		mes "[Grimm]",
			"Are you happy now? They don't look any different from the ones you're using, though.";
		next;
		mes "[Mojo]",
			"You priests are the least curious kind I know. I asked for these because I wanted to compare them to the ones I have, and it takes a keen eye to catch minute differences.";
		next;
		mes "[Mojo]",
			"Adventurer, could you bring me some more tomorrow? I'm worrid I might end up damaging all these you brought today. Even if I don't, I can always use more samples.";
		next;
		mes "[Mojo]",
			"Thank you so much. See you tomorrow!";
		delitem 25266,10;
		delitem 25267,10;
		erasequest 14679;
		setquest 14680;
		getitem 25271,1;
		getexp 500000,500000;
		setpcblock PCBLOCK_ALL, 0;
		close;
	}
			
	switch(checkquest(14680,PLAYTIME)){
		case -1:
		break;
		case 0:
		case 1:
		mes "[Mojo]",
			"Hello, Adventurer.";
		next;
		mes "[Mojo]",
			"Oh, I'm sorry, but I can't talk",
			"right now. I'm too busy examining",
			"the things you brought me.";
		next;
		mes "[Mojo]",
			"Could you come back ^0000FFafer dawn^000000?";
		close;
		case 2:
		mes "[Mojo]",
			"Hello, Adventurer. How are you?";
		next;
		mes "[Mojo]",
			"Whew, I stayed up all night.",
			"examining the dried Yggdrasil leaves and the suspicious pentacles. I wouldn't have to, if Father Grimm left me alone.";
		next;
		mes "[Mojo]",
			"Anyway, they're so old and poorly",
			"preserved that they easily crumble",
			"to dust. I couldn't finish my research.";
		next;
		mes "[Mojo]",
			"So I'm thinking... Could you bring me some more today? I need ^0000FF10 Dried Yggdrasil Leaves and Suspicious Pentacles^000000.";
		next;
		mes "[Mojo]",
			"Also, please hunt 5 zombies of each kind for that priest.";
		next;
		mes "[Mojo]",
			"In the meantime, I'll catch some Z's.";
		
		setquest 14679;
		erasequest 14680;
		close;
		break;
	}
	
	mes "[Mojo]",
		"Adventurer, how did you feel when you touched the notebook? How do you think it works?";
	next;
	mes "[Mojo]",
		"I've got so many questions, but that mean priest wouldn't let me touch it.";
	next;
	mes "[Mojo]",
		"Adventurer, could you take me with you the next time you enter the notebook? I swear I'm not going to steal the notebook. I'm just really curious abou it.";
	next;
	mes "[Grimm]",
		"I can hear you. Give up your obsession with it. That would be best for you.";
	next;
	mes "[Mojo]",
		"Who says I'm obsessed with it?";
	next;
	mes "[Mojo]",
		"Adventurer, please? Don't I look pitiful?";
	next;
	if(select("What do you want to know the most?", "I don't want to get between you two.") == 2){
		mes "["+strcharinfo(0)+"]",
			"Sorry, but I don't want to get between you two. You both have a point, and I can't side with either one of you.";
		next;
		mes "[Mojo]",
			"Hmpf, alright, but if you ever feel pity for me, then come back and help me. Promise?";
		close;
	}
	mes "[Mojo]",
		"About those walking corpses, of course!";
	next;
	mes "[Mojo]",
		"I really want to know what keeps them moving, what kind of experiments my predecessors did on them, and what kind of state they're in.";
	next;
	mes "[Mojo]",
		"Such experiments are prohibited now, and all the old records were destroyed.";
	next;
	mes "[Grimm]",
		"They were destroyed for good reason. So stop wondering about them.";
	next;
	mes "[Mojo]",
		"Oh, that's right Adventurer, could you capture a zombie for me? Alive, that is.";
	npctalk "Wait, it can't be alive. It's already dead.","Mojo#illuvamp",bc_self;
	next;
	mes "[Grimm]",
		"No. Don't even think about it.",
		"Mojo, you're so close to crossing the line.";
	next;
	mes "[Mojo]",
		"I wasn't asking you! Unless you're going to let me touch the notebook, stay out of my hair!";
	next;
	mes "[Grimm]",
		"You just asked this adventurer to capture a zombie alive.";
	next;
	mes "[Grimm]",
		"You're not thinking about what kind of danger it might pose when it arrives here. You just want it because you're curious about it.";
	next;
	mes "[Grimm]",
		"Did you forget why Brother Jojo wanted you to stay here and stay away from the notebook?";
	next;
	mes "[Mojo]",
		"So I'm asking this adventurer. You keep telling me don't do this, don't do that. Is there anything I can do without you saying no?";
	npctalk "You just want me to stand here, breathing...Is that it?","Mojo#illuvamp",bc_self;
	sleep2 1000;
	npctalk "Sure, why not?","Grimm#illuvamp",bc_self;
	next;
	mes "[Grimm]",
		"You can't bring anything from the world inside the book. If you do, I'll get rid of them.";
	next;
	mes "[Grimm]",
		"If you really want to experiment on those blaspemous creatures, then I suggest you talk with Brother Jojo and the others first.";
	next;
	mes "[Mojo]",
		"When are they coming back?";
	next;
	mes "[Grimm]",
		"Beats me.";
	npctalk "You should've became a politician. You would've been more successful at that.","Mojo#illuvamp",bc_self;
	sleep2 2000;
	npctalk "I'll take that as a compliment.","Grimm#illuvamp",bc_self;
	next;
	mes "[Mojo]",
		"Adventurer, I read in the notebook that the owner used some materials to experiment on zombies. I think they're Yggdrasil leaves and some drawings.";
	next;
	select("You mean dried Yggdrasil leaves and some pentacles?");
	mes "[Mojo]",
		"Yes. Could you at least procure them for me?";
	next;
	mes "[Mojo]",
		"Maybe I can use them to figure out the experiment she did and the force that reanimates the dead.";
	npctalk "Secretly from that priest, of course","Mojo#illuvamp",bc_self;
	sleep2 3000;
	npctalk "I still can hear you.","Grimm#illuvamp",bc_self;
	sleep2 1000;
	npctalk "Stop eavesdropping on people.","Mojo#illuvamp",bc_self;
	next;
	mes "[Grimm]",
		"Why are you obsessed with this? Do you really want to let these unholy creatures loose on the continent? Do you not understand why the Tower has banned the experiments?";
	next;
	mes "[Mojo]",
		"Look, I'm not going to experiment on the zombies. I just want to take a look at the materials she used.";
	next;
	mes "[Mojo]",
		"And who knows? I might find out a way to exterminate these zombies at once.";
	npctalk "I may not look like it, but I'm pretty smart.","Mojo#illuvamp",bc_self;
	next;
	mes "[Mojo]",
		"You agreed that our enthusiasm for magic has contributed to the development of our country.";
	next;
	mes "[Grimm]",
		"...";
	npctalk "I'll take that as a yes.","Mojo#illuvamp",bc_self;
	next;
	mes "[Mojo]",
		"I promise I'm not going to do anything dangerous. I'll just take a look at the materials.";
	next;
	mes "[Grimm]",
		"I'm going to watch you.";
	next;
	mes "[Mojo]",
		"Sure, be my guest.";
	npctalk "Ooh, I'm going to be studying with you breating down my neck? How exciting!","Mojo#illuvamp",bc_self;
	next;
	mes "[Grimm]",
		"And you will stop asking me for this notebook, yes?";
	next;
	mes "[Mojo]",
		"Huh? But that's... I'd love to take a look at it.";
	npctalk "Do you think you can?","Grimm#illuvamp",bc_self;
	sleep2 1000;
	npctalk "Maybe one day, yes.","Mojo#illuvamp",bc_self;
	sleep2 1000;
	npctalk "I swear to Odin that day will never come.","Grimm#illuvamp",bc_self;
	sleep2 1000;
	npctalk "Bah!","Mojo#illuvamp",bc_self;
	next;
	select("So have you come to an agreement?");
	mes "[Mojo]",
		"Yes, we have. Please bring me some dried Yggdrasil leaves and pentacles. 10 each sounds good.";
	next;
	mes "[Grimm]",
		"Are you sure that's enough?";
	next;
	mes "[Mojo]",
		"Mm, I'm not sure yet. Do you mind if I ask for more later? Okay, then please bring me ^0000FF10 Dried Yggdrasil Leaves and 10 Suspicious Pentacles^000000.";
	next;
	mes "[Mojo]",
		"Oh, and while you're at it, could you hunt some zombies for that scowling priest as well? Just 5 of each kind. I don't want to burden you.";
	npctalk "You're already burdering him.","Grimm#illuvamp",bc_self;
	sleep2 1500;
	npctalk "Yeah, but look at you? You face lit up when I offered.";
	next;
	mes "[Mojo]",
		"Adventurer, thank you for doing this for us.";
	setquest 14679;
	close;
}
mes "[Mojo]",
	"The notebook... I want to see the notebook... If you enter the notebook, then you should talk to Father Grimm. If you want, I can go with you.";
close;
end;

		if(!checkweight(25271,1)){
			mes "- Please clear some weight before handing the quest -";
			close;
		}
		setpcblock PCBLOCK_ALL, 1;
		mes "[Antoine]",
			"You brought all of them. I hope I can find something out from them.";
		next;
		mes "[Antoine]",
			"These are found only inside this",
			"place. Please bring them to me",
			"whenever you can. Dreams disappear when you wake up, you know";
		next;
		mes "[Antoine]",
			"Thank you so much. You should get some rest now.";
		delitem 25270,20;
		sc_start SC_ITEMBOOST,120000,200;
		specialeffect2 EF_INCAGILITY; sc_start SC_INCREASEAGI,120000,10;
		erasequest 14669;
		setquest 14670;
		getitem 25271,1;
		getexp 500000,500000;
		setpcblock PCBLOCK_ALL, 0;
		close;
	}
	
	switch(checkquest(14670,PLAYTIME)){
		case -1:
		break;
		case 0:
		case 1:
		mes "[Antoine]",
			"Adventurer, I don't want you to strain yourself. Why don't you go get some rest?";
		next;
		mes "[Antoine]",
			"Have a good night's sleep, and come back ^0000FFafer dawn^000000.";
		close;
		case 2:
		mes "[Antoine]",
			"Adventurer. Did you have good",
			"dreams last night? I had",
			"nightmares, probably from looking at those manes all day.";
		next;
		mes "[Antoine]",
			"But I'm not about to give up!",
			"Please bring me 20 Wavy Manes as usual.";
		next;
		mes "[Antoine]",
			"Oh, and it'll be great if you also",
			"can get rid of 10 Sweet Nightmares.",
			"I want to know how that'll affect",
			"dreams. Thank you!";
			
		setquest 14669;
		erasequest 14670;
		close;
		break;
	}
	
	mes "[Antoine]",
		"Adventurer, can I talk to you for a second? I want your opinion on something.";
	next;
	if(select("Sure thing.", "I'm kind of busy") == 2){
		mes "[Antoine]",
			"Oh, are you? No problem. I can wait until you have some time for me.";
		close;
	}
	mes "[Antoine]",
		"You've seen those Nightmares and Drainliars, right? Did you notice how they look different from the kinds outside this place? Why do you think that?";
	next;
	mes "["+strcharinfo(0)+"]",
		"I don't know.";
	next;
	mes "[Antoine]",
		"Everything in this place is",
		"interesting. Especially those Sweet Nightmares. They're full of",
		"Contradictions.";
	next;
	emotion ET_SPARK,getnpcid(0,"Mojo#illuvamp");
	mes "[Antoine]",
		"Have you taken a look at their wavy mane? Look at it long enough, and you'll see flashes of images, which I belive are from other people's dreams.";
	next;
	mes "[Antoine]",
		"Sweet Nightmares... Even their name is a contradiction. Maybe their mane is the source of all nightmares.";
	next;
	mes "[Antoine]",
		"Or it could just reflect the dreams of the dead.";
	next;
	mes "[Antoine]",
		"Those two ladies may not agree, but I don't have to stay here. I'm only staying because of Sweet Nightmares.";
	next;
	mes "[Antoine]",
		"I want to get rid of their names and see if it affects our dreams.";
	next;
	mes "[Antoine]",
		"And I want to do that without",
		"having to leave my colleagues to fend for themselves. Do you know what I mean.";
	next;
	mes "["+strcharinfo(0)+"]",
		"Do you want me to ^0000FFget their manes for you^000000?";
	next;
	mes "[Antoine]",
		"Yes, please! ^0000FF20^000000 should suffice!";
	next;
	mes "[Antoine]",
		"And while you're at it, please hunt ^0000FF10 Sweet Nightmares^000000 as well. I want to know how that affects dreams.";
	next;
	mes "["+strcharinfo(0)+"]",
		"I'll do that.";
	next;
	mes "[Antoine]",
		"Thank you. In return, I'll give you some stones I've picked up from this place.";
	emotion ET_THANKS;
	next;
	mes "[Antoine]",
		"I don't know if they have any purpose, but they sure look beatiful and mysterious. Maybe someone outside this place can recognize its value.";
	next;
	mes "[Antoine]",
		"Anyway, thank you for doing this for me!";
	setquest 14669;
	close;
}

mes "[Antoine]",
	"Sister Grem, please listen to me!";
close;

	mes "[Gem]",
		"If you have to leave, let Sister Marina know. She'll send you back to where you came from.";
	close;
}else if(illusion_vampire == 12){
	setpcblock PCBLOCK_ALL, 1;
	mes "[Gem]",
		"Adventurer. are you leaving now?";
	next;
	select("Father Grimm must be getting anixous by now.");
	mes "["+strcharinfo(0)+"]",
		"Yes. Now that I know you're safe, it's time I return to Father Grimm.";
	next;
	mes "[Gem]",
		"According to our assessment, what happens inside this place doesn't seem to affect the outside world.";
	next;
	mes "[Gem]",
		"That's good, but someone still has to stay here to keep an eye on them. You understand us, right? Please let Brother Grimm know.";
	next;
	select("I was surprised.");
	mes "["+strcharinfo(0)+"]",
		"You're from the Church. I didn't think you'd let those vampires live.";
	next;
	mes "[Marina]",
		"If we play by the rules, then we shouldn't allow them to live.";
	next;
	mes "[Gem]",
		"She's right. We shouldn't. But looking at them... I wasn't sure if they deserved to die.";
	next;
	mes "[Gem]",
		"It's something we need to think about.";
	next;
	mes "[Marina]",
		"But if they make even the slightest mistake, we'll get rid of them!";
	emotion ET_STARE,getnpcid(0,"Marina#illuvamp");
	next;
	mes "[Antoine]",
		"If that happens, I'll let you take care of them yourself.";
	emotion ET_OK,getnpcid(0,"Antoine#illuvamp");
	next;
	mes "[Gem]",
		"Please tell Brother Grimm that we've decided to stay to keep an eye of them.";
	next;
	mes "["+strcharinfo(0)+"]",
		"I will. Stay safe.";
	//give quest 
	completequest 14665;
	setquest 14666;
	illusion_vampire = 13;
	setpcblock PCBLOCK_ALL, 0;
	close2;
	//warp to enterace
	warp "gef_dun01",133,219;
	end;
}else if(illusion_vampire == 14){
	.@q = checkquest(14667,HUNTING);
	disable_items;
	if(.@q > -1){
		if(.@q != 2){
			mes "[Gem]",
				"Adventurer, did you take care of what I asked?";
			next;
			mes "[Gem]",
				"Or did you forget what I asked you to do?";
			next;
			mes "[Gem]",
				"Please exterminate Restless Dead.",
				"There are three different kinds",
				"Small, Fast, and Big. ^0000FFPlease",
				"exterminate 10 each^000000.";
			next;
			mes "[Gem]",
				"All the dead must return to the earth.";
			close;
		}
		
		if(!checkweight(25271,1)){
			mes "- Please clear some weight before handing the quest -";
			close;
		}
		setpcblock PCBLOCK_ALL, 1;
		mes "[Gem]",
			"Adventurer, you took care of them",
			"all. Thank you. They will also",
			"thank you from heaven.";
		next;
		mes "[Gem]",
			"Why don't you go get some reast and come back ^0000FFafer dawn^000000?";
		erasequest 14667;
		setquest 14668;
		getitem 25271,1;
		getexp 500000,500000;
		setpcblock PCBLOCK_ALL, 0;
		close;
	}
	
	switch(checkquest(14668,PLAYTIME)){
		case -1:
		break;
		case 0:
		case 1:
		mes "[Gem]",
			"Adventurer, not enough time has",
			"passed since you hunted last time.",
			"You need rest.";
		next;
		mes "[Gem]",
			"Please come back ^0000FFafer dawn^000000",
			"tomorrow.";
		close;
		case 2:
		mes "[Gem]",
			"Adventurer, welcome back.";
		next;
		mes "[Gem]",
			"As usual, I'd like you to",
			"exterminate Restless Dead.",
			"There are three different kinds",
			"Small, Fast, and Big. Please",
			"exterminate 10 each.";
		setquest 14667;
		erasequest 14668;
		close;
		break;
	}
	
	mes "[Gem]",
		"Adventurer, are you busy?";
	next;
	mes "[Gem]",
		"Even if you are busy, please spare",
		"me a moment of your time.";
	next;
	if(select("Sure, why not?", "But I'm too busy.") == 2){
		mes "[Gem]",
			"Okay, then I'll wait until you have some time for me.";
		close;
	}
	
	mes "[Gem]",
		"As you know, we're here to keep an eye on them.";
	next;
	mes "["+strcharinfo(0)+"]",
		"Yes.";
	next;
	mes "[Gem]",
		"Now, that's interfering with our",
		"original mission, which is to keep",
		"this place clear of the unholy.";
	next;
	mes "[Gem]",
		"We've been trying to do both, and",
		"it's hard to do that between just",
		"the three of us.";
	next;
	mes "[Gem]",
		"The dead belong in the ground. We",
		"and here to put the undead back to",
		"eternal sleep.";
	next;
	mes "["+strcharinfo(0)+"]",
		"You mean you need help.";
	next;
	mes "[Gem]",
		"Yes, we do.";
	next;
	mes "["+strcharinfo(0)+"]",
		"What kinds of monsters do you want",
		"me to take care of?";
	next;
	mes "[Gem]",
		"Please exterminate ^0000FFRestless Dead^000000.",
		"There are ^0000FFthree different kinds",
		"Small, Fast, and Big. Please",
		"exterminate 10 each^000000.";
	next;
	mes "["+strcharinfo(0)+"]",
		"Got it. I was thinking, now that",
		"I'm here, I might as well help you",
		"while I can. I'm glad that I can.",
		"I'll be back.";
	
	setquest 14667;
	close;
}

end;

questinfo 14667,QTYPE_QUEST,1;
setquestinfo_req 14667,14666,2,14668,0;

setpcblock PCBLOCK_ALL, 1;
addtimer 1000,strnpcinfo(0)+"::OnDeattach";
mes "[Priest]",
	"What do I do? I can't walk because of my leg. I can't teleport because I don't have enough energy left.";
next;
emotion ET_CRY, getnpcid(0, "Priest#illuvamp");
mes "[Priest]",
	"*Gasp* Am I going to die? Am I? I can't believe I'm going to die in a place like this!";
next;
classchange 3752,"Undead#illuvamp",bc_self;//TODO NPC
npctalk "Grr...", "Undead#illuvamp",bc_self;
classchange 3753,"Undead#illuvamp1",bc_self;//TODO NPC
npctalk "Grrgghh...", "Undead#illuvamp1",bc_self;
mes "[Priest]",
	"Aaa! Not again! Help!";
next;
select("A priest... Wait, is that him?");
classchange 746,"Marina#illuvamp4",bc_self;
npctalk "What are you doing here?","Marina#illuvamp4",bc_self;
mes "["+strcharinfo(0)+"]",
	"Could he be Father Jubilee?",
	"Marina, I think we've found him!";
next;
mes "[Marina]",
	"Brother Jubilee?";
next;
npctalk "Let's secure this place first.","Marina#illuvamp4",bc_self;
sleep2 1000;
//npcskilleffect "MG_SAFETYWALL",0,250,164;
specialeffect 315,SELF;
sleep2 1500;
npctalk "Adventurer?","Marina#illuvamp4",bc_self;
mes "[Jubilee]",
	"Ah, Sister Marina! Help! You've got to help me if you don't want to feel guilt over my death later!";
next;
unittalk getcharid(3), strcharinfo(0) + " : Yes, I'm ready!",bc_self;
mes "[Marina]",
	"The dead shall return to the earth!";
next;
npctalk "Turn undead!","Marina#illuvamp4",bc_self;
sleep2 1000;
npctalk "GRRRR!", "Undead#illuvamp",bc_self;
npctalk "RAWR!", "Undead#illuvamp1",bc_self;		
sleep2 2000;
specialeffect 372,AREA,"Undead#illuvamp";
specialeffect 372,AREA,"Undead#illuvamp1";
sleep2 3250;
classchange HIDDEN_WARP_NPC,"Undead#illuvamp",bc_self;
classchange HIDDEN_WARP_NPC,"Undead#illuvamp1",bc_self;
next;
mes "[Marina]",
	"The dead shall return to the earth!";
npctalk "Brother, are you all right?","Marina#illuvamp4",bc_self;
sleep2 1500;
npctalk "Whew, I am now. Thank you.","Priest#illuvamp",bc_self;
next;
mes "[Marina]",
	"What happened? Where's brother Jojo?";
next;
npctalk "*Shakes her head* Wizards.","Marina#illuvamp4",bc_self;
mes "[Jubilee]",
	"He and I were checking this place when we found some fluorescent mushrooms. Brother Jojo's eyes gleamed and...";
next;
npctalk "What? A mushroom exploded? And?","Marina#illuvamp4",bc_self;
mes "[Jubilee]",
	"He touched one of the mushrooms, and it exploded.";
next;
mes "[Jubilee]",
	"When I came back to my senses, he was gone and I couldn't move my leg.";
next;
mes "[Marina]",
	"Oh no, were you hit by the shrapnel?";
next;
mes "[Jubilee]",
	"Sister Marina, have you seen the mushrooms in this place? They're not like the mushrooms we know. They're miniature bombs that blow up when touched.";
next;
select("I'm glad they only grow here.");
mes "[Marina]",
	"Brother Jubilee, do you think you can move?";
next;
mes "[Jubilee]",
	"If I could, I would've found my way back to you already.";
next;
select("I thought priests could heal themselves.");
mes "[Jubilee]",
	"We take basic training to be servant of God, but what each one of us can do depends on our natural ability.";
next;
mes "[Jubilee]",
	"I specialize in singing. It's my purpose in life. I feel my greatest joy when I sing Odin's praises.";
next;
npctalk "I've been singing since I found Brother Jojo was missing.","Priest#illuvamp",bc_self;
npctalk "You should've wasted your precious voice on these unholy creatures.","Marina#illuvamp4",bc_self;
mes "[Marina]",
	"Don't be surprised. His singing voice really inspires courage and gives strength. He's here with us for a reason.";
next;
mes "[Marina]",
	"Adventurer, I'm going to take Brother Jubilee to Sister Gem. Could you take a look around this place? I'll be back as soon as I can.";
next;
mes "[Jubilee]",
	"Watch for illusions. The notebook's owner memories manifest themselves sporadically around here.";
next;
mes "[Jubilee]",
	"Also, I've sensed an evil presence. Please be careful.";
next;
mes "[Marina]",
	"Let's go.";
close2;
unittalk getcharid(3), strcharinfo(0) + " : I'd better look for Jojo.",bc_self;
specialeffect 304,SELF;
specialeffect 304,AREA,"Marina#illuvamp4";
classchange HIDDEN_WARP_NPC,"Priest#illuvamp",bc_self;
classchange HIDDEN_WARP_NPC,"Marina#illuvamp4",bc_self;
completequest 14658;
setquest 14657;
setpcblock PCBLOCK_ALL, 0;
illusion_vampire = 6;
deltimer strnpcinfo(0)+"::OnDeattach";
end;

setpcblock PCBLOCK_ALL, 0;
// give quest
completequest 14659;
setquest 14660;
illusion_vampire = 8;
close;

		if(!checkweight(25271,1)){
			mes "- Please clear some weight before handing the quest -";
			close;
		}
		setpcblock PCBLOCK_ALL, 1;
		mes "[Bomi]",
			"Adventurer, thank you for bringing these to me.";
		next;
		mes "[Bomi]",
			"If I drink this toxic blood about thirty times, I might turn? Oh, never mind.";
		next;
		mes "[Bomi]",
			"Then please come back ^0000FFafer dawn^000000.";
		delitem 25269,10;
		delitem 25268,10;
		erasequest 14671;
		setquest 14674;
		getitem 25271,1;
		getexp 500000,500000;
		setpcblock PCBLOCK_ALL, 0;
		$bomi_quest_temp++;
		if($bomi_quest_temp >= 30){
			$bomi_quest_temp = 0;
			$illuvamp_bomiSpawned = true;
			close2;
			setpcblock PCBLOCK_ALL, 0;
			npctalk "O-oh, my..";
			mapannounce "gef_d01_i","O-oh, my..",bc_map;
			sleep2 1000;
			npctalk "H-have I drank.. too much?";
			mapannounce "gef_d01_i","H-have I drank.. too much?",bc_map;
			sleep2 1000;
			npctalk "Please.. S-stay away from me!";
			mapannounce "gef_d01_i","Please.. S-stay away from me!",bc_map;
			sleep2 5100;
			classchange HIDDEN_WARP_NPC,"Wizard#illuvamp",bc_self;
			monster "gef_d01_i",81,135,"Bomi",3756,1,strnpcinfo(0)+"::OnSummonDrac";
			end;
		}
		dispbottom (30 - $bomi_quest_temp) + " Quests left until Bomi turns.";
		close;
	}
	
	switch(checkquest(14674,PLAYTIME)){
		case -1:
		break;
		case 0:
		case 1:
		mes "[Bomi]",
			"Adventurer, thank you for trying to help me, but I don't want you to strain yourself. Why don't you rest for now?";
		next;
		mes "[Bomi]",
			"You can come back ^0000FFafer dawn^000000.";
		close;
		case 2:
		mes "[Bomi]",
			"Adventurer, weclome back. Could you help me today as usual?";
		next;
		mes "[Bomi]",
			"I need ^0000FF10 Sticky bloods from Matte Drainliars and 10 Mushroom Saps from Illusion Black Mushrooms^000000.",
			"You can get them if you hunt at least 5 Matte Drainliars amd 5 Illusion Black Mushrooms.";
		next;
		mes "[Bomi]",
			"Thank you for your help.";
		
		setquest 14671;
		erasequest 14674;
		close;
		break;
	}
	
	
mes "[Bomi]",
	"Adventurer, did you report already? Do you have something else to do here?";
next;
mes "[Bomi]",
	"If you're not busy, could you help",
	"me with something?";
next;
if(select("Sure thing.", "I'm kind of busy at the moment.") == 2){
	mes "[Bomi]",
		"Oh, are you? I'm sorry. Maybe you could come back later? No, never mind.";
	close;
}

mes "[Bomi]",
	"As you kmow, I live on that fake blood that I make with the ingredients I find around here. I'm thinking I'll make some more for Dracula as well.";
next;
mes "[Bomi]",
	"But since this fake blood is not pure, drinking it regularly causes your body to accumulate toxins, which drive you insane until they are completely purged from your system.";
next;
mes "[Bomi]",
	"But maybe that only happens to me. I'm a new vampire, and I'm weak. Dracula has lived for a long time, and he's anything but weak.";
next;
mes "[Bomi]",
	"Anyway, I need ^0000FF10 Sticky bloods from Matte Drainliars and 10 Mushroom Saps from Illusion Black Mushrooms^000000.";
next;
mes "[Bomi]",
	"You can find them if you want at least 5 Matte Drainliars and 5 Illusion Black Mushrooms.";
setquest 14671;
close;

questinfo 14671,QTYPE_QUEST,1;
setquestinfo_req 14671,14666,2,14674,0;

	classchange 4_DRACULA,"Dracula#illuvamp2",bc_self;
}

		if(!checkweight(25271,1)){
			mes "- Please clear some weight before handing the quest -";
			close;
		}
		setpcblock PCBLOCK_ALL, 1;
		mes "[King]",
			"Wizard! The adventurer has brought",
			"the hair.";
		next;
		mes "[Jojo]",
			"What am I supposed to do now?";
		next;
		mes "[King]",
			"That's for you to figure out. I'm",
			"not a cape maker, am I? But I know",
			"you would need more than that.";
		next;
		mes "[Jojo]",
			"Um... Adventurer?";
		next;
		mes "[King]",
			"He just came back from hunting. You should let him rest, at least for the rest of the day.";
		next;
		mes "[King]",
			"Adventurer, come back tomorrow and",
			"hunt more Matte Drainliars for me,",
			"will you? It's so quiet without them.";
		next;
		mes "[King]",
			"The-then see you tomoorow, Adventurer...";
		delitem 25263,20;
		erasequest 14675;
		setquest 14676;
		getitem 25271,1;
		getexp 500000,500000;
		setpcblock PCBLOCK_ALL, 0;
		close;
	}
	
	switch(checkquest(14676,PLAYTIME)){
		case -1:
		break;
		case 0:
		case 1:
		mes "[Jojo]",
			"Adventurer, you're back already.";
		next;
		mes "[King]",
			"Yes, why did you come back so",
			"quickly? I don't want to be",
			"disturbed right now. Come back later.";
		close;
		case 2: //TODO
		mes "[King]",
			"The adventurer is here!";
		next;
		mes "[Jojo]",
			"The adventurer is here!";
		next;
		select("Why are you so excited to see me?");
		mes "[King]",
			"You'll take care of those Matte Drainliars like you did the last time, right? They're too loud.";
		next;
		mes "[Jojo]",
			"And you'll get some short bat hair too, right? I need a lot more than what you brought last time.";
		next;
		mes "[King]",
			"10 Matte Drainliars!";
		next;
		mes "[Jojo]",
			"Thank you in advance!";
		setquest 14675;
		erasequest 14676;
		close;
		break;
	}

mes "[Jojo]",
	"Ah, Adventurer. Good to see you",
	"again! Dracula is doing better,",
	"though he sleeps all day.";
next;
mes "[King]",
	"He's fully recovered, be he still",
	"doesn't want to leave. I don't know why he's so infatuated with that turned human.";
next;
mes "[Jojo]",
	"Oh, do you mean Bomi? I thought she was a vampire like Dracula.";
next;
mes "[King]",
	"Not all vampires are the same.",
	"We're different from her. By the",
	"way, why are you still here?",
	"Dracula doesn't need you anymore.";
next;
mes "[Jojo]",
	"Well, there are things around here",
	"that I want to study, and...";
next;
mes "[King]",
	"Do you have a death wish? Haven't",
	"you noticed how hungry and",
	"ferocious these bats are? They",
	"latch into anything that moves,",
	"these creeps! Take care of them for me, will you?";
next;
if(select("They're annoying.", "Um, I'm kind of busy.") == 2){
	mes "[King]",
		"Oh, are you? Then go. Go away.";
	next;
	mes "[Jojo]",
		"King, you have to be so mean.";
	next;
	mes "[King]",
		"He was mean to me first! And he",
		"said he's busy. That's why I said",
		"go. Go!";
	close;
}

mes "[Jojo]",
	"Well, they don't bother me as long",
	"as I stay close to Dracula and King.";
next;
mes "[King]",
	"But they drink zombie blood! Yuck!",
	"I'll never drink dead blood, no",
	"matter how hungry I am. That's",
	"disgraceful!";
next;
mes "[Jojo]",
	"So you're hating your own kind.";
npctalk "What? You, human.","King#illuvamp",bc_self;
sleep2 2000;
npctalk "Yes...?","Wizard#illuvamp3",bc_self;
sleep2 1000;
npctalk "Am I a bat?","King#illuvamp",bc_self;
sleep2 1000;
npctalk "...No.","Wizard#illuvamp3",bc_self;
next;
mes "[King]",
	"In case you have forgotten, do you",
	"know how you're still standing",
	"there, breathing?";
next;
mes "[Jojo]",
	"...How?";
next;
mes "[King]",
	"Because I let you. And I'm letting",
	"you breathe not because you're",
	"worth living, but because I'm too",
	"lazy to kill you.";
next;
mes "[Jojo]",
	"...Oh. Thank you for everything.",
	"Um, I think it's time I should",
	"rejoin my group.";
emotion ET_SWEAT,getnpcid(0, "Wizard#illuvamp3");
next;
mes "[King]",
	"I'm still talking to you. You're",
	"not afraid of me because I'm in bat form, are you? You humans are so stupid, you can't get past what you see.";
npctalk "No, no, that's not true.","Wizard#illuvamp3",bc_self;
next;
mes "[Jojo]",
	"I agree that these bats are",
	"disgraceful, shameless, and ",
	"disgusting animals.";
next;
mes "[King]",
	"Did you just call me a disgusting animal?";
next;
mes "[Jojo]",
	"No, no. Not you. I'm talking about Matte Drainliars.";
npctalk "Good, because you don't want to make me angry.","King#illuvamp",bc_self;
sleep2 2000;
npctalk "It seems you already identify yourself as a bat.","Wizard#illuvamp3",bc_self;
sleep2 2000;
npctalk "What?","King#illuvamp",bc_self;
next;
select("I have question for you, King.");
mes "[King]",
	"What is it?";
next;
select("Why are you in bat form?");
mes "[Jojo]",
	"Yes. If you hate them so much, then why don't you go back to your original form?";
next;
mes "[King]",
	"That's because this form is more efficient. I don't have to drink a lot to get full, I'm inconspicuous, and people? Like that numskull over there? Let their guard down around me.";
next;
mes "[Jojo]",
	"I'm not a numskull. I wouldn't have become a wizard if I was. And don't forget, I saved Dracula!";
next;
mes "["+strcharinfo(0)+"]",
	"But why a bat? There are other",
	"small animals.";
next;
mes "[King]",
	"Because bats are stealthy, and they can fly. Oh, speaking of which, did you know the short hair of Matte Drainliars is used for making cloaking capes?";
next;
select("Huh? No, I've never heared that.");
mes "[Jojo]",
	"Cloaking capes? Thieves and their",
	"ilk must love those.";
next;
mes "[King]",
	"I can't believe how simple-minded",
	"you are.";
next;
mes "[Jojo]",
	"Erm, how can I get the hair? By",
	"hunting Matte Drainliars?";
next;
mes "[King]",
	"Why, do you want to quit magic and",
	"turn to thievery?";
next;
mes "[Jojo]",
	"No. But it's always been my dream",
	"to conquer all the dungeons on the",
	"continent and become the greatest mage.";
next;
mes "[King]",
	"...That's a big dream, an",
	"impossible dream. Well, anyone can",
	"dream big.";
npctalk "Argh, come one!","Wizard#illuvamp3",bc_self;
sleep2 1500;
npctalk "Come on, What?","King#illuvamp",bc_self;
next;
mes "[Jojo]",
	"Even if it's not for my dream, a",
	"cloaking cape will come in handy in various situations.";
next;
mes "[King]",
	"I didn't know there was an aspiring theif among us. Huh.";
next;
mes "[Jojo]",
	"I said not what I want.",
	"Adventurer, are you busy?";
next;
mes "[King]",
	"What, you're going to ask him? Do",
	"it yourself!";
next;
mes "[Jojo]",
	"I have other things to do.";
next;
mes "[King]",
	"Like what? Eating, sleeping, and pooping?";
next;
mes "[Jojo]",
	"Oh, oome on! You know I've been",
	"busy studying things!";
next;
mes "[King]",
	"You mean, studying me and Dracula.";
next;
mes "[Jojo]",
	"...How did you... ?";
next;
mes "[King]",
	"I've known that from the beginning. Your face is so transparent, you can't hide anything. I just didn't say anything because I found it funny that you nervously kept glancing at us.";
next;
mes "[Jojo]",
	"...Oh, Then can I ask you",
	"questions?";
npctalk "No.","King#illuvamp",bc_self;
sleep2 1000;
npctalk "Why not?!","Wizard#illuvamp3",bc_self;
sleep2 1000;
next;
mes "[King]",
	"Adventurer, are you going to get the bat hair for him? Good, that means you'll take care of those Matte Drainliars. Their flapping their wings keep me awake at night.";
next;
mes "[Jojo]",
	"Why can't you do it yourself? All you have to do is just flick your finger.";
next;
mes "[King]",
	"I can flick my finger at you if you want.";
next;
mes "[Jojo]",
	"Adventurer, please bring me the bat hair. King? I mean, Mr. King? How much bat hair do I need?";
next;
mes "[King]",
	"That depends on what kind of cape",
	"you want. Just know that it's tough to make stuff with hair.";
next;
mes "[Jojo]",
	"Um, okay, then please bring me 20",
	"Short Bat Haris for starters.";
next;
mes "[King]",
	"While you're at it, hunt the Matte",
	"Drainliars around us. They are at",
	"least 10.";
next;
mes "[Jojo]",
	"Happy hunting, Adventurer!";

setquest 14675;
close;

questinfo 14675,QTYPE_QUEST,1;
setquestinfo_req 14675,14666,2,14676,0;

		if(!checkweight(25271,1)){
			mes "- Please clear some weight before handing the quest -";
			close;
		}
		setpcblock PCBLOCK_ALL, 1;
		mes "[King]",
			"I can tell he brought everything",
			"you asked. Come on, make a paste",
			"and apply it to the wall already.";
		next;
		mes "[Jojo]",
			"Adventurer, thank you for helping",
			"me study. These glowing spores",
			"don't last long. Could you come",
			"back tomorrow and get more of them?";
		delitem 25264,10;
		delitem 25265,10;
		erasequest 14677;
		setquest 14678;
		getitem 25271,1;
		getexp 500000,500000;
		setpcblock PCBLOCK_ALL, 0;
		close;
	}
			
	switch(checkquest(14678,PLAYTIME)){
		case -1:
		break;
		case 0:
		case 1:
		mes "[Jojo]",
			"Adventurer, see this luminous glow over there? It's from the shining spores you brought to me.";
		next;
		mes "[Jojo]",
			"I feel as if I traveled back in time, studying by this dim light.";
		next;
		mes "[Jojo]",
			"I still have enough light left in these shining spores. Please come back ^0000FFafer dawn^000000.";
		close;
		case 2: //TODO
		mes "[Jojo]",
			"Adventurer! You're the light of my life!";
		next;
		mes "[King]",
			"You're scaring him.";
		next;
		mes "[Jojo]",
			"Could you get me shining spores again today?";
		next;
		mes "[Jojo]",
			"Please bring me 10 Shining Spores from Illusion Black Mushrooms and 10 Clusters of Nightmares from Sweet Nightmares. Thank you.";
		setquest 14677;
		erasequest 14678;
		close;
		break;
	}
	
mes "[Jojo]",
	"Adventurer, wait!";
next;
mes "[King]",
	"You misspelled that.";
next;
mes "[Jojo]",
	"Where? Oh, I did it again.";
next;
mes "[King]",
	"Tsk, tsk. I don't know how you've",
	"become a wizard when you can't even spell correctly.";
next;
mes "[Jojo]",
	"This is only because it's too dark",
	"to see. And stop peeking at what",
	"I'm doing.";
next;
mes "[King]",
	"It's not like you're writing",
	"something important.";
next;
select("You two get along aw well as I remember.");
mes "[King]",
	"What are you doing here? Don't you",
	"have things to do?";
next;
if(select("Jojo wanted to see me.", "Actually I'm busy.") == 2){
	mes "[Jojo]",
		"Are you? I was going to ask you a favor, but I can wait.";
	next;
	mes "[King]",
		"Then you'd better go attend your business.";
	close;
}

mes "[King]",
	"Why?";
next;
mes "[Jojo]",
	"Since we're underground, it's too",
	"dark for me to write and read. I",
	"have a lot of information that I",
	"want to catalog, but I keep",
	"misspelling words because I can't",
	"see them clearly.";
next;
mes "[King]",
	"You should be able to do that with",
	"your eyes closed. You're a wizard.",
	"Didn't you learn how to summon light? But of course, if you use magic in front of me, I'll burn you to ashes.";
npctalk "I... I'm still a wizard!","Wizard#illuvamp3",bc_self;
sleep2 1500;
npctalk "What? I can't hear you.","King#illuvamp",bc_self;
next;
mes "[Jojo]",
	"I completed my guild's official wizard training program. I'm strong enough to have a contest with you!";
next;
mes "[King]",
	"Oh, really? Good for you!";
next;
mes "[King]",
	"Be honet, though. Did you really study hard? Did you attend every class, study all night, and practice hard? You'd better tell me the truth.";
next;
mes "[King]",
	"Can you honestly say that you tried to push past your limits?";
next;
mes "[Jojo]",
	"...";
next;
mes "[King]",
	"No, you didn't. That's why you had",
	"your butt handed to you by those",
	"mushrooms.";
next;
mes "[Jojo]",
	"I said they were zombies, not mushrooms!";
next;
mes "[King]",
	"Zombies and mushrooms. Same difference to me.";
next;
mes "[King]",
	"You're not good enough to earn your keep. I can't believe your guild actually invested in you.";
npctalk "I've been earning my keep just fine.","Wizard#illuvamp3",bc_self;
sleep2 1500;
npctalk "Yeah, right.","King#illuvamp",bc_self;
next;
mes "[Jojo]",
	"Then what about you? I know you can transform. But what else can you do?";
npctalk "Do you really want me to show you? Right now?","King#illuvamp",bc_self;
sleep2 2000;
npctalk "...No.","Wizard#illuvamp3",bc_self;
next;
mes "[King]",
	"Maybe you keep questioning me",
	"because you can't trust me. How",
	"about I teach you to be the",
	"greatest mage among humans? would",
	"you trust me, then?";
next;
mes "[Jojo]",
	"Erm, you want to teach me?";
next;
mes "[King]",
	"Sure.";
next;
mes "[Jojo]",
	"Why?";
next;
mes "[King]",
	"I've studied a lot. Why do you think I have?";
next;
mes "[Jojo]",
	"To become smarter?";
next;
mes "[King]",
	"No. Because I was bored to death!";
next;
mes "[Jojo]",
	"You have all the time in the world. I'm envious of that.";
next;
mes "[King]",
	"If you don't want me to teach you, that's fine by me.";
next;
mes "[Jojo]",
	"No, no! I'd love to! But... erm...",
	"you're not going to ask my blood in return, are you?";
next;
mes "[King]",
	"If I drank anything because I'm thirsty, I wouldn't be any better than those Matter Drainliars now, would I?";
npctalk "Did you just compare me to zombies?","Wizard#illuvamp3",bc_self;
sleep2 2000;
npctalk "So you're not as stupid as I thought.","King#illuvamp",bc_self;
next;
select("Jojo?");
mes "[Jojo]",
	"Oh, I'm sorry, I didn't mean to",
	"keep you standing there. Could you",
	"get me some spores from Illusion",
	"black mushrooms? I need some light",
	"to see what I'm writing.";
npctalk "Why those?","King#illuvamp",bc_self;
next;
mes "[Jojo]",
	"Oh, you know how those spores glow? I want to use them to illuminate this place.";
next;
mes "[King]",
	"Well, then go get them yourself.",
	"Don't dump things on this adventurer.";
next;
mes "[Jojo]",
	"Oh, well... I'm... Illusion Black",
	"Mushrooms are... You know.";
npctalk "You said you were attacked by zombies.","King#illuvamp",bc_self;
sleep2 2000;
npctalk "I was.","Wizard#illuvamp3",bc_self;
next;
mes "[King]",
	"Where are you going to put the",
	"spores, anyway?";
next;
mes "[Jojo]",
	"I have an empty bottle- oh,I",
	"forgot I lost my bag when I was",
	"attacked.";
next;
mes "[Jojo]",
	"Adventurer, could you get me some",
	"Cluster of Nightmares as well? I",
	"can mix them with the spores to",
	"make a paste and apply it on the wall.";
next;
mes "[King]",
	"What? That's so tacky.";
next;
mes "[Jojo]",
	"But effective nonetheless. You didn't know you could use them like that, did you?";
next;
mes "[King]",
	"Because I didn't need to.";
next;
mes "[Jojo]",
	"Then, Adventurer, please bring me",
	"10 Shining Spores from Illusion",
	"Black Mushrooms and 10 Clusters of",
	"Nightmares from Sweet Nightmares.";

setquest 14677;
close;

mes "[Jojo]",
	"Wh-who are you?";
sleep2 500;
npctalk "See, I told you! One of his friends already showed up! This is why I don't trust humans!","King#illuvamp",bc_self;
sleep2 500;
npctalk "A human?","Dracula#illuvamp2",bc_self;
sleep2 500;
next;
mes "[Jojo]",
	"No, no! He's not my friend! I've never seen him before in my life, I swear!";
next;
mes "[King]",
	"He could be sent by your friends. Human, answer me!";
next;
select("Jojo's colleagues are looking for him.");
npctalk "No! They're going to put us in danger!","King#illuvamp",bc_self;
mes "[Stranger]",
	"I see. We found him injured and uncnscious, so we took him here and treated him. He's well enough to leave now.";
next;
select("You saved Jojo");
mes "["+strcharinfo(0)+"]",
	"Let me thank you on behalf of his colleagues. May I ask your name?";
next;
mes "[King]",
	"You're here, and yet you don't know who he is. He's Dracula. Didn't you come to challenge him to battle?";
next;
mes "["+strcharinfo(0)+"]",
	"Dracula? You mean the Dracula?";
next;
mes "[Dracula]",
	"You have a familiar smell about you, Adventurer, I've yearned for this smell for a long time.";
npctalk "Are you saying he smells delicious? Can I drink from him?","King#illuvamp",bc_self;
next;
mes "[Dracula]",
	"I mean he smells like a friend, Little One.";
npctalk "What friend? I thought I was the only friend you had.","King#illuvamp",bc_self;
next;
select("I met Bomi before I came here.");
mes "[Dracula]",
	"...I see. How is she?";
sleep2 1000;
npctalk "What? Bomi?","King#illuvamp",bc_self;
sleep2 1000;
npctalk "You mean the owner of the notebook?","Wizard#illuvamp3",bc_self;
sleep2 1000;
npctalk "Did she tell you anything about... me?","Dracula#illuvamp2",bc_self;
next;
mes "[King]",
	"Wow, so you've been hanging around here all this time because of that ungreatful girl. Is that it?";
npctalk "She's not ungreatful. She never wanted what I gave her.","Dracula#illuvamp2",bc_self;
next;
mes "[Jojo]",
	"What did you give her?";
next;
mes "[King]",
	"Eternal life.";
next;
mes "[Jojo]",
	"Eternal life..!";
next;
mes "[King]",
	"That's the normal reaction from humans! She's ungreatful!";
npctalk "Why, do you want it? I can give it to you.","King#illuvamp",bc_self;
next;
select("She said Dracula betrayed her.");
mes "[King]",
	"Betrayed her? Hah? Where is she? He should've just let her die!";
emotion ET_FRET,getnpcid(0,"King#illuvamp");
next;
mes "[Dracula]",
	"She still hasn't forgiven me. But I did what I had to do.";
next;
select("There must be some misunderstanding.");
mes "[Dracula]",
	"I needed some humans to survive. I hid among them and hunted with them whenever I needed.";
next;
mes "[Dracula]",
	"One day, people from the Church found me. They were bent on killing me in the name of justice.";
npctalk "They were presistent.","King#illuvamp",bc_self;
next;
mes "[Dracula]",
	"I was gravely injured by them, and somehow I ended in this place full of death and mysterious energy.";
next;
mes "[Dracula]",
	"I thought I was going to die here, but then Lady Luck finally turned her gaze upon me.";
npctalk "Somebody please shut him up. I hate this story.","King#illuvamp",bc_self;
next;
mes "[Dracula]",
	"Bomi saved me. She fed me her blood, so I could regain my strength. I'm not a living being, but that day, she gave me new life.";
next;
mes "[Jojo]",
	"Why didn't you leave afterward?";
next;
mes "[Dracula]",
	"Even though Bomi was a strong woman, her body was failing her. It pained me to see her waste away day by day. I offered her eternal life, and she rejected it.";
next;
mes "[Dracula]",
	"I stayed because I wanted to be there for her when she died as a human.";
next;
mes "[Dracula]",
	"For the first time in my long existence, I really thought about humans, and what made them who they were. They also have this impulse to help others, expecting nothing in return.";
next;
mes "[Dracula]",
	"I'd learned about them through Bomi. What I'd learned didn't make sense, and I didn't really understand it.";
next;
mes "[Dracula]",
	"But it was different from the I previously thought of humans. I was starting to understand them.";
npctalk "Why? What good would understanding them do you?","King#illuvamp",bc_self;
next;
mes "[Jojo]",
	"Then why did you turn her against her wish?";
next;
mes "[Dracula]",
	"There was an accident. The people who almost killed me found me again.";
npctalk "The people from the Church?","Wizard#illuvamp3",bc_self;
next;
mes "[Dracula]",
	"Bad luck follows me wherever I go. Bomi even made me a lucky charm, but it didn't work.";
next;
mes "[Dracula]",
	"By then, I'd fully regained my strength, and those humans weren't a match for me. But Bomi... she didn't want anyone to get hurt.";
next;
mes "[Dracula]",
	"Long story short, she got caught in the crossfire. She was dying and I panicked.";
next;
mes "[Dracula]",
	"I wasn't ready to let her go. Before I had time to think about what I was doing, I turned her.";
next;
mes "[Jojo]",
	"You did it because you didn't want to lose her. I would've done the same in that situation.";
npctalk "Why?","King#illuvamp",bc_self;
sleep2 500;
npctalk "That's what people do, to protect those they love.","Wizard#illuvamp3",bc_self;
sleep2 500;
next;
mes "[King]",
	"But, that stubborn girl refuses to ackowldge that!";
next;
mes "[King]",
	"I don't understand her logic. How could she possibly want to die as a human than to live as a vampire? How could she think the gift of eternal life is betrayal?";
next;
mes "[Jojo]",
	"I think I know. People tend to take things for granted. If I could live forever, I think I'd lose all my motivation. I mean, you have nothing but time.";
next;
mes "[Jojo]",
	"I think you guys need to talk it out with each other. Have you tried to talk to her?";
next;
mes "[Dracula]",
	"When she was brought back to life, she was so shocked and angry that she wouldn't listen to me.";
next;
mes "[Dracula]",
	"I did what I did to save her, and I understand she resents me for it.";
npctalk "You need to stop hanging with humans. You sound like one of them now.","King#illuvamp",bc_self;
next;
mes "[King]",
	"Dracula, what's that human to you? Why, do you insist on staying in a place like this?";
npctalk "When she won't even talk to you?","King#illuvamp",bc_self;
next;
mes "[Dracula]",
	"I'm not?";
next;
mes "[King]",
	"Everyone, hush. I smell something.";
emotion ET_SURPRISE,getnpcid(0,"King#illuvamp");
//give quest
completequest 14661;
setquest 14662;
illusion_vampire = 10;
setpcblock PCBLOCK_ALL, 0;
close;

		explode(.@data$,.illuWeaponsReq2$[.@o],",");
		for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
			explode(.@citem$,.@data$[.@i],":");
			if(countitem(atoi(.@citem$[0])) < atoi(.@citem$[1])){ 
				.@missing += 1;
				mes "^0000FF"+.@citem$[1]+ " " +getitemname(atoi(.@citem$[0]))+"^000000";
			}
		}
		
		if(.@missing > 0){
			mes "You're missing these items..";
			close;
		}
		
		mes "Let me warn you kid. You will lose all cards equipped on your weapon once I exchange it. Do you agree with that?";
		next;
		if(select("I agree.:I decline.") == 2){
			mes .@npc$,
				"Alright kid, come once you changed your mind.";
			close;
		}
		delitem2 @inventorylist_id[.@index],1,@inventorylist_identify[.@index],@inventorylist_refine[.@index],@inventorylist_attribute[.@index],@inventorylist_card1[.@index],@inventorylist_card2[.@index],@inventorylist_card3[.@index],@inventorylist_card4[.@index]; 
		for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
			explode(.@citem$,.@data$[.@i],":");
			delitem atoi(.@citem$[0]),atoi(.@citem$[1]);
		}
		mes .@npc$,
			"Here is your Weapon.";
		getitem .illuWeapons[.@o],1;
		close;
		
	case 2: // Armor Exchange
		for(.@i=0;.@i<getarraysize(.illuArmor);.@i++)
			.@menu$ += getitemname(.illuArmor[.@i]) + ":";
		.@o = select(.@menu$) - 1;
		mes .@npc$,
			getitemname(.illuArmor[.@o]) + .illuArDesc$[.@o] + " Let's see what you've got.";
		next;
		getinventorylist();
		for(.@i = 0; .@i < @inventorylist_count; .@i++){
			if(@inventorylist_id[.@i] != .illuArmorReq[.@o] || .reqRefine > @inventorylist_refine[.@i]){ 
				continue;
			}
			.@index = .@i;
			.@weapon_check = 1;
		}
		mes .@npc$;
		if(!.@weapon_check){
			mes "Let's see... Mm? What did you bring? Come back equipped with a +" + .reqRefine + "<ITEM> " + getitemname(.illuArmorReq[.@o]) + "<INFO>" + .illuArmorReq[.@o] + "</INFO></ITEM>";
			close;
		}
		
		explode(.@data$,.illuArmorReq2$[.@o],",");
		for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
			explode(.@citem$,.@data$[.@i],":");
			if(countitem(atoi(.@citem$[0])) < atoi(.@citem$[1])){ 
				.@missing += 1;
				mes "^0000FF"+.@citem$[1]+ " " +getitemname(atoi(.@citem$[0]))+"^000000";
			}
		}
		
		if(.@missing > 0){
			mes "You're missing these items..";
			close;
		}
		
		mes "Let me warn you kid. You will lose all cards equipped on your armor once I exchange it. Do you agree with that?";
		next;
		if(select("I agree.:I decline.") == 2){
			mes .@npc$,
				"Alright kid, come once you changed your mind.";
			close;
		}
		delitem2 @inventorylist_id[.@index],1,@inventorylist_identify[.@index],@inventorylist_refine[.@index],@inventorylist_attribute[.@index],@inventorylist_card1[.@index],@inventorylist_card2[.@index],@inventorylist_card3[.@index],@inventorylist_card4[.@index]; 
		for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
			explode(.@citem$,.@data$[.@i],":");
			delitem atoi(.@citem$[0]),atoi(.@citem$[1]);
		}
		mes .@npc$,
			"Here is your armor.";
		getitem .illuArmor[.@o],1;
		close;
		
	case 3: // Accessory Exchange
		for(.@i=0;.@i<getarraysize(.illuAccessory);.@i++)
			.@menu$ += getitemname(.illuAccessory[.@i]) + ":";
		.@o = select(.@menu$) - 1;
		mes .@npc$,
			getitemname(.illuAccessory[.@o]) + .illuAcDesc$[.@o] + " Let's see what you've got.";
		next;
		getinventorylist();
		for(.@i = 0; .@i < @inventorylist_count; .@i++){
			if(@inventorylist_id[.@i] != .illuAccessoryReq[.@o]){ 
				continue;
			}
			.@index = .@i;
			.@weapon_check = 1;
		}
		mes .@npc$;
		if(!.@weapon_check){
			mes "Let's see... Mm? What did you bring? Come back equipped with a <ITEM> " + getitemname(.illuAccessoryReq[.@o]) + "<INFO>" + .illuAccessoryReq[.@o] + "</INFO></ITEM>";
			close;
		}
		
		explode(.@data$,.illuAccessoryReq2$[.@o],",");
		for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
			explode(.@citem$,.@data$[.@i],":");
			if(countitem(atoi(.@citem$[0])) < atoi(.@citem$[1])){ 
				.@missing += 1;
				mes "^0000FF"+.@citem$[1]+ " " +getitemname(atoi(.@citem$[0]))+"^000000";
			}
		}
		
		if(.@missing > 0){
			mes "You're missing these items..";
			close;
		}
		
		mes "Let me warn you kid. You will lose all cards equipped on your accessory once I exchange it. Do you agree with that?";
		next;
		if(select("I agree.:I decline.") == 2){
			mes .@npc$,
				"Alright kid, come once you changed your mind.";
			close;
		}
		delitem2 @inventorylist_id[.@index],1,@inventorylist_identify[.@index],@inventorylist_refine[.@index],@inventorylist_attribute[.@index],@inventorylist_card1[.@index],@inventorylist_card2[.@index],@inventorylist_card3[.@index],@inventorylist_card4[.@index]; 
		for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
			explode(.@citem$,.@data$[.@i],":");
			delitem atoi(.@citem$[0]),atoi(.@citem$[1]);
		}
		mes .@npc$,
			"Here is your accessory.";
		getitem .illuAccessory[.@o],1;
		close;
	
	case 4: // Check the catalog
		mes .@npc$,
			"Do you want to see my catalog? Sure thing.";
		next;
		switch(select("Weapons (5 kinds)", "Armor (1 kind)", "Accessory (2 kinds)")){
			case 1: // Weapons
				for(.@i=0;.@i<getarraysize(.illuWeapons);.@i++)
					.@menu$ += getitemname(.illuWeapons[.@i]) + ":";
				.@o = select(.@menu$) - 1;
				mes "<ITEM> " + getitemname(.illuWeapons[.@o]) + "<INFO>" + .illuWeapons[.@o] + "</INFO></ITEM>",
					"*****************",
					"Necessary items",
					"+"+.reqRefine+" or higher "+.illuWeaponsReq[.@o]+"x1";
				explode(.@data$,.illuWeaponsReq2$[.@o],",");
				for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
					explode(.@citem$,.@data$[.@i],":");
					if(countitem(atoi(.@citem$[0])) < atoi(.@citem$[1])){ 
						.@missing += 1;
						mes .@citem$[1] + " " + getitemname(atoi(.@citem$[0]));
					}
				}
				close;
			
			case 2: // Armor
				for(.@i=0;.@i<getarraysize(.illuArmor);.@i++)
					.@menu$ += getitemname(.illuArmor[.@i]) + ":";
				.@o = select(.@menu$) - 1;
				mes "<ITEM> " + getitemname(.illuArmor[.@o]) + "<INFO>" + .illuArmor[.@o] + "</INFO></ITEM>",
					"*****************",
					"Necessary items",
					"+"+.reqRefine+" or higher "+.illuArmorReq[.@o]+"x1";
				explode(.@data$,.illuArmorReq2$[.@o],",");
				for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
					explode(.@citem$,.@data$[.@i],":");
					if(countitem(atoi(.@citem$[0])) < atoi(.@citem$[1])){ 
						.@missing += 1;
						mes .@citem$[1] + " " + getitemname(atoi(.@citem$[0]));
					}
				}
				close;
			
			case 3: // Accessory
				for(.@i=0;.@i<getarraysize(.illuAccessory);.@i++)
					.@menu$ += getitemname(.illuAccessory[.@i]) + ":";
				.@o = select(.@menu$) - 1;
				mes "<ITEM> " + getitemname(.illuAccessory[.@o]) + "<INFO>" + .illuAccessory[.@o] + "</INFO></ITEM>",
					"*****************",
					"Necessary items",
					"Socketed "+.illuAccessoryReq[.@o]+"x1";
				explode(.@data$,.illuAccessoryReq2$[.@o],",");
				for(.@i = 0; .@i < getarraysize(.@data$); .@i++){
					explode(.@citem$,.@data$[.@i],":");
					if(countitem(atoi(.@citem$[0])) < atoi(.@citem$[1])){ 
						.@missing += 1;
						mes .@citem$[1] + " " + getitemname(atoi(.@citem$[0]));
					}
				}
				close;
		}
	
	case 5: //What are Illusion Stones?
		mes .@npc$,
			"What are Illusion Stone, you ask? Well... I don't think anyone knows exactly what they are.";
		next;
		mes .@npc$,
			"I only know they're rare and can only be found in some special places, and I'm here to collect them for my clients.";
		next;
		mes .@npc$,
			"My clients want to figure out what these stones are. They're paying me a lot of money.";
		next;
		mes .@npc$,
			"So I could offer adventurers like you ^0000FFexpensive equipment in exchange for the stones^000000, and still fetch a profit.";
		next;
		mes .@npc$,
			"Bring ^0000FFa piece of refined equipment, Illusion Stones^000000, and various materials that are only found in this place. ^0000FFI'll upgrade the equipment - weapon, armor or accessory^000000 - for you.";
		next;
		mes .@npc$,
			"This benefits both of us. Let me know if you're interested in my proposition.";
		close;
		
	case 6: // Can I refine the equipment I get in exchange?
		mes .@npc$,
			"So you want t reinforce the equipment you get. You're thorough. I like that!";
		next;
		mes .@npc$,
			"A while ago, an adventurer who passed through this place told me that a chemist in Prontera refines the Illusion equipment in exchange for Illusion Stones.";
		next;
		mes .@npc$,
			"It seems Illusion Stones are a popular topic everywhere. Everyone wants to know about what they are.";
		next;
		mes .@npc$,
			"If you want refine your equipment, then go to the Illusion Echanter.";
		close;
}

setarray .illuArmor,20840;
setarray .illuArmorReq,2525;
setarray .illuArmorReq2$,"25271:30,25263:200";
setarray .illuArDesc$,	". Someone in this place? *Ahem*";

setarray .illuAccessory,28508,28509;
setarray .illuAccessoryReq,2715,2715;
setarray .illuAccessoryReq2$,"25271:50,25266:400","25271:50,25267:400";
setarray .illuAcDesc$,	". *Chuckle* I remember when I was young, my friends and I wore this ring and played pranks? Hah, hah, never mind. That was a long time ago. Anyway,",
						"... It may not look like much, but it has an important meaning to me. Anyway,";