//===== eAthena Script ======================================= 
//= Item Quest NPCs located in Prontera
//===== By: ================================================== 
//= kobra_k88
//===== Current Version: ===================================== 
//= 1.2
//===== Compatible With: ===================================== 
//= eAthena 7.15 +
//===== Description: ========================================= 
//= Ph.D Hat Quest
//===== Additional Comments: ================================= 
//= Fixed flower name Dreamy -> Illusion
//= 1.2 Fixed exploit [Lupus]
//============================================================ 


// Ph.D Hat Quest-------------------------------------------------------
prt_in.gat,38,108,4	script	Teacher	53,{
	if(countitem(710) >= 1 && countitem(703) >= 1 && countitem(704) >= 1 && countitem(708) >= 1) goto L_Start;//Items: Illusion Flower, Hinalle, Aloe, Ment,
	mes "Don't you think.... ^4444FF'flowers'^000000 are pretty?";
	next;
	menu "Talk.",-, "End Conversation.",M_End;
	
		mes "[Teacher]";
		mes "When I was young, I didn't play with friends like the other children.  Instead, I spent time studing by myself.";
		next;
		mes "[Teacher]";
		mes "Sometimes I regret that decision.... but it doesn't really matter now.  Through hard work, I was able to finish school earlier than my classmates.";
		next;
		mes "[Teacher]";
		mes "I was very lonely however..... when things got rough I had no one to talk to about my feelings.";
		next;
		mes "[Teacher]";
		mes "Then one day, I found my best friend.";
		next;
		mes "[Teacher]";
		mes "It was when I saw this pretty flower blooming in an abandoned garden.... I realised that it was just like me and in it, I found my best friend.";
		next;
		mes "[Teacher]";
		mes "Even though, to others it was just a common flower.... for me this flower meant much more.  This flower gave me the strength to continue my studies.";
		mes "I could achieve my goals because of her.";
		next;
		mes "[Teacher]";
		mes "So.. now... I am trying to repay to her.  I have started studying Flowers, and It is my goal to cover the whole world in Flowers!";
		next;
		mes "[Teacher]";
		mes "To accomplish my work.. I need a great deal of flowers. Unfortunately because of my studies, I can rarely go outside.";
		mes "It is really hard to find as many flowers as I need.";
		next;
		mes "[Teacher]";
		mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000...";
		mes "If you can bring these flowers to me, I would be willing to give you a special item...";
		close;
	
	M_End:
		mes "[Teacher]";
		mes "One of these days I will cover whole world in Flowers!.....";
		close;

L_Start:
	mes "[Teacher]";
	mes "Oh... Those Flowers in your hand are....";
	M_Menu:
	next;
	menu "Show Flowers",-, "Give Flowers",M_Give, "Cancel",M_End;

		mes "[Teacher]";
		mes "Ah... How wonderful!! These are definately the 4 kinds of Flowers I was looking for ..";
		mes "The ^3355FFIllusion Flower, Hinalle, Aloe, and Ment^000000.  Would you give them to me?...";
		next;
		mes "[Teacher]";
		mes "If you do I'd be willing to give you a special item.....";
		goto M_Menu;

	M_Give:
		if(countitem(710) < 1 || countitem(703) < 1 || countitem(704) < 1 || countitem(708) < 1) goto L_Cheater;//Items: Illusion Flower, Hinalle, Aloe, Ment,
		delitem 710,1;//Items: Illusion Flower,
		delitem 703,1;//Items: Hinalle,
		delitem 704,1;//Items: Aloe,
		delitem 708,1;//Items: Ment,
		mes "[Teacher]";
		mes "I really, really appreciate what you've done for me!! I trully am grateful! I will give you a very special item as I promised.";
		emotion e_thx;
		next;
		mes "[Teacher]";
		mes "This is the hat I wore at my Graduation Ceremony.  It is a reminder of my joyfull school days at the University.";
		mes "Please take it...";
		getitem 5012,1;//Items: Ph.D Hat,
		close;

	L_Cheater:
		mes "[Teacher]";
		mes "I won't give a special item to a cheater...";
		mes "Now go away!";
		emotion e_bzz;
		close;
}
