//===== eAthena Script ======================================= 
//= X-Shaped Hairpin, Bandage & Flower Hairpin Quests
//===== By: ================================================== 
//= Halca (1.0)
//= Mass Zero (1.1)
//===== Current Version: ===================================== 
//= 1.1
//===== Compatible With: ===================================== 
//= Any eAthena Version.
//===== Description: ========================================= 
//= Seperate quests for these items.
//===== Additional Comments: ================================= 
//=
//============================================================

gef_tower.gat,128,148,6	script	Arjen	807,{
 mes "[Arjen]";
 mes "What item information do you require?";
	next;
	 menu "X-Shaped Hairpin.",M1,"Bandage",M2,"Flower Hairpin.",M3;
M1:
 mes "[Arjen]";
 mes "Hyaaaaaaaa!";
	next;
 mes "[Arjen]";
 mes "Ooops, sorry. I was practicing my balance.";
 mes "Good that I have my hairpin to stop my hair getting in my eyes.";
	next;
 mes "[Arjen]";
 mes "Im not much of a craftsman, but If you bring me some items I can make you";
 mes "my ^660000X-Shaped Hairpin^000000.";
	next;
	 menu "Make me the hairpin.",-,"What are the requirements?",X_REQ,"No, thanks.",EXT;
		If ((countitem(10011) < 1) || (countitem(7219) < 400)) GOTO X_NM;
 mes "[Arjen]";
 mes "Yes, that's just what I require!";
 mes "Nayayayaaaaaa!";
	next;
		delitem 10011,1;
		delitem 7219,400;
 mes "[Arjen]";
 mes "Hmm... okay, thanks for the items.";
 mes "Let me make it for you.";
	next;
		getitem 5079,1;
 mes "[Arjen]";
 mes "Thanks very much, you look cool now.";
	close;
X_NM:
 mes "[Arjen]";
 mes "Come on man, gimme a break.";
 mes "This is hot property!";
	next;
	 GOTO X_REQ;
X_REQ:
	next;
 mes "[Arjen]";
 mes "Hmm, it's a very rare Item.";
 mes "I need 1 Stellar Hairpin for its spacial properties.";
 mes "And I need 400 Ectoiplasm to give it its special powers.";
	next;
 mes "[Arjen]";
 mes "You need to have travelled well to get these items...";
	close;
M2:
 mes "[Arjen]";
 mes "Ouch, have you ever gotten an injury after doing too much exercise?";
 mes "It sucks, especially when you excercise so much.";
	next;
 mes "[Arjen]";
 mes "What is that you say? you have just the problem?";
 mes "Well, I can make you a ^660000Bandage^000000 to heal your wounds!";
	next;
	 menu "Yes, please make me one!",-,"What are the requirements?",B_REQ,"No, thanks.",EXT;
		If ((countitem(930) < 500) || (countitem(970) < 1)) GOTO B_NM;
 mes "[Arjen]";
 mes "Wow! You have the stuff I need! Thanks!";
 mes "Lemme do a swap, your stuff for the bandage";
	next;
		delitem 930,500;
		delitem 970,1;
		getitem 5070,1;
 mes "[Arjen]";
 mes "Thanks! Hope that cures your aches!";
	close;
B_NM:
 mes "[Arjen]";
 mes "Argh, please, If you want the item, bring me what I asked for.";
	next;
	 GOTO B_REQ;
B_REQ:
 mes "[Arjen]";
 mes "I need 500 Rotten Bandages to make the actual cast.";
 mes "Then I need 1 Alcohol so I can get the stains out of the bandages.";
	close;
EXT:
 mes "[Arjen]";
 mes "Okay, have a nice day!";
	close;
M3:
 mes "[Arjen]";
 mes "Ahh, don't you love the romance in the air?";
 mes "Isn't it great to look good, and also, keep your girl or boy pretty?";
	next;
	 menu "Yes, of course!",-,"No, not quite.",EXT;
 mes "[Arjen]";
 mes "Well, I'm sure you would like me to make you a ^660000Flower Hairpin^000000.";
	next;
	 menu "Yes, please.",RL,"No, thanks.",EXT;
RL:
 mes "[Arjen]";
 mes "Well, I need...";
 mes "1 Romantic Leaf, for the element of love,";
 mes "10 Steels for the pin part,";
 mes "And 20,000 Zeny for the forging costs.";
	next;
 mes "[Arjen]";
 mes "Would you like to make this item?";
	next;
	 menu "Yes.",-,"No.",EXT;
		If ((countitem(2269) < 1) || (countitem(999) < 10) || (Zeny < 20000)) GOTO FH_NM;
 mes "[Arjen]";
 mes "Thanks!";
	next;
		delitem 2269,1;
		delitem 999,10;
		set Zeny,Zeny-20000;
		getitem 5061,1;
 mes "[Arjen]";
 mes "Enjoy!";
	close;
FH_NM:
 mes "[Arjen]";
 mes "Sorry, but you don't have the correct items.";
	next;
	 GOTO RL;
End;
}