prontera,148,174,0	script	Quest Warp	45,2,2,{
OnTouch:
	if (BaseJob == Job_Alchemist){
	if(SQUEST == 0){dispbottom "You must have a permission to enter."; end;}
	warp "prontera",155,184;
	end;
		}
	else dispbottom "You must be an Alchemist Supplier to enter.";
}

prontera,153,172,3	script	Gantri	542,{

	if(SQUEST == 4){mes "Welcome to the supplier's guild."; end;}
	if(SQUEST == 3){set SQUEST,4; mes "We alchemists has the most important job, that we must not forget and they must learn. Let's show them how important we are to help our companion in wars! Welcome to the guild, ^FF0000"+strcharinfo(0)+"^000000."; close;}
	if (BaseJob == Job_Alchemist) {
		mes "[Gantri]";
		mes "Hey, my fellow alchemist..";
		mes "Do you like helping your guild mates in wars?";
		next;
		mes "[Gantri]";
		mes "Join us and be a ^0000FFSupplier^000000..";
		switch(select("Sign me up!:I will think about it..")) {
	case 1:
		next; 
		set SQUEST,1;
		mes "[Gantri]";
		mes "That's what I thought!";
		next;
		mes "To prove me you are worthy, help one of the suppliers alchemist and I will hear from you when that time comes.";
		close;
	case 2:
		next;
		mes "[Gantri]";
		mes "I'm just here..";
		close;
		}
	}
		else {
	mes "[Gantri]";
	mes "I organized a guild for us Alchemists..";
	mes "You can call us as the ^0000FFSuppliers^000000!";
	close;
	}
}

prontera,158,172,5	script	Troubled Alchemist	748,{

	mes "Where is it.. WHERE IS IT?! I can't find it!!";
	emotion 19;
	close;
	if(SQUEST == 2) {
		if(countitem(7296)){
			emotion 23;
			mes "AAAHH!! ^0000FFPyroxene^000000! You have it!";
			switch(select("Here you go!:Heh.. This one is for me..")) {
				case 1:
					set SQUEST,3; 
					mes "THANK YOU SO MUCH!! I will tell you about Gantri!";
					delitem 7296,1;
					close;
				case 2:
					mes "*SOB* Why do you have to tease me..";
					close;
			}
		close;
		}
		if(SQUEST == 1) {
			mes "Hey.. Hey you! You're an alchemist, right?";
			next;
			mes "S-so as an alchemist, y-you understand the importance of gathering the right recipe to create something, right??";
			next;
			emotion 7;
			mes "Grr! Well I am in sooo much trouble!";
			mes "I lost an important Item! It's so hard to get it too!! Arrgggh! Will you help me?";
			next;
			switch(select("I understand! I will!:Err.. I have better things to do..")) {
				case 1:
					set SQUEST,2;
					mes "Thank you! Thank you so much!";
					emotion 17;
					next;
					mes "After many many research, I found where I could get a ^0000FFPyroxene^000000..! Er.. Then after a long fight with this mutaded dragon! I got it! But, guess what! I lost it!! AAARRRGGHH! Please help me get it again!";
					close;
				case 2:
					mes "Please! Pleeease think about it!";
					close;
			}
		}	
	}					
close;
}