lhz_in02.gat,238,272,4	script	Custom Headgears v1	803,{

		if((buquest == 1 && bequest == 1 && shquest == 1 && dequest == 1 && ghquest == 1) && (callfunc("F_HeQuests",0) == 1) && (callfunc("F_HeQuests",1) == 1) && callfunc(callfunc("F_HeQuests",2) == 1) (callfunc("F_HeQuests",3) == 1) (callfunc("F_HeQuests",4) == 1)){
				set @give_head_all, 1;
				goto L_Bu_Reward;
			}else if((buquest == 1) && (callfunc("F_HeQuests",0) == 1)){
				goto L_Bu_Reward;
			}else if((bequest == 1) && (callfunc("F_HeQuests",1) == 1)){
				goto L_Be_Reward;
			}else if((shquest == 1) && (callfunc("F_HeQuests",2) == 1)){
				goto L_Sh_Reward;
			}else if((dequest == 1) && (callfunc("F_HeQuests",3) == 1)){
				goto L_De_Reward;
			}else if((ghquest == 1) && (callfunc("F_HeQuests",4) == 1)){
				goto L_Gh_Reward;
		}else if(buquest == 1){ goto L_NO_Bu; 
		}else if(bequest == 1){ goto L_NO_Be; 
		}else if(shquest == 1){ goto L_NO_Sh;
		}else if(dequest == 1){ goto L_NO_De; 
		}else if(ghquest == 1){ goto L_NO_Gh; }
 
mes "[Custom Headgears v1]";
mes "Have you seen the Tickets?";
mes "I heard you can get them in exchange for these headgears!";
mes "I'd be willing to part with these headgears in exchange for some items.";
next;
menu "Yes!",L_Yes,"No Thank you.",L_No;
 
L_Yes:
mes "[Custom Headgears v1]";
mes "Which headgear do you prefer?";
next;
menu "Decorative Bunny",L_Bu_Quest,"Mini Berserk Helm",L_Be_Quest,"Shadow Helm",L_Sh_Quest,"Spirit of Deviling",L_De_Quest,"Spirit of Ghostring",L_Gh_Quest;
 
L_Bu_Quest:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
set buquest,1;
close;
 
L_NO_Bu:
if (callfunc("F_HeQuests",0) == 1) goto L_Bu_Reward;
mes "Oh dear. This won't do. Have you checked all your items carefully?";
next;
menu "What were the items again?",L_Forgot_Bu,"Cancel Quest",L_Cancel_Bu,"Bye",L_Bye;
close;
 
L_Forgot_Bu:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
close;

L_Bu_Reward:
mes "[Custom Headgears v1]";
mes "Here is your [Decorative Bunny].";
callfunc "F_HeQuests",2;
if (@give_head_all == 1) { goto L_Be_Reward; }
set buquest,0;
close;

L_Cancel_Bu:
mes "[Custom Headgears v1]";
mes "Oh dear, what a shame. Giving up already?";
set buquest,0;
close;
// BUNNY STOPS //

L_Be_Quest:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
set bequest,1;
close;
 
L_NO_Be:
if (callfunc("F_HeQuests",1) == 1) goto L_Be_Reward;
mes "Oh dear. This won't do. Have you checked all your items carefully?";
next;
menu "What were the items again?",L_Forgot_Be,"Cancel Quest",L_Cancel_Be,"Bye",L_Bye;
close;
 
L_Forgot_Be:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
close;
 
L_Be_Reward:
mes "[Custom Headgears v1]";
mes "Here is your [Mini Berserk Helm].";
callfunc "F_HeQuests",3;
if (@give_head_all == 1) { goto L_Sh_Reward; }
set bequest,0;
close;

L_Cancel_Be:
mes "[Custom Headgears v1]";
mes "Oh dear, what a shame. Giving up already?";
set bequest,0;
close;
// BERSERK STOPS //

L_Sh_Quest:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
set shquest,1;
close;
 
L_NO_Sh:
if (callfunc("F_HeQuests",2) == 1) goto L_Sh_Reward;
mes "Oh dear. This won't do. Have you checked all your items carefully?";
next;
menu "What were the items again?",L_Forgot_Sh,"Cancel Quest",L_Cancel_Sh,"Bye",L_Bye;
close;
 
L_Forgot_Sh:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
close;
 
L_Sh_Reward:
mes "[Custom Headgears v1]";
mes "Here is your [Shadow Helm].";
callfunc "F_HeQuests",4;
if (@give_head_all == 1) { goto L_De_Reward; }
set shquest,0;
close;

L_Cancel_Sh:
mes "[Custom Headgears v1]";
mes "Oh dear, what a shame. Giving up already?";
set shquest,0;
close;
// SHADOW STOPS //

L_De_Quest:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
set dequest,1;
close;
 
L_NO_De:
if (callfunc("F_HeQuests",3) == 1) goto L_De_Reward;
mes "Oh dear. This won't do. Have you checked all your items carefully?";
next;
menu "What were the items again?",L_Forgot_De,"Cancel Quest",L_Cancel_De,"Bye",L_Bye;
close;
 
L_Forgot_De:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
close;
 
L_De_Reward:
mes "[Custom Headgears v1]";
mes "Here is your [Spirit of Deviling].";
callfunc "F_HeQuests",5;
if (@give_head_all == 1) { goto L_Gh_Reward; }
set dequest,0;
close;

L_Cancel_De:
mes "[Custom Headgears v1]";
mes "Oh dear, what a shame. Giving up already?";
set dequest,0;
close;
// DEVILING STOPS //

L_Gh_Quest:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
set ghquest,1;
close;
 
L_NO_Gh:
if (callfunc("F_HeQuests",4) == 1) goto L_Gh_Reward;
mes "Oh dear. This won't do. Have you checked all your items carefully?";
next;
menu "What were the items again?",L_Forgot_Gh,"Cancel Quest",L_Cancel_Gh,"Bye",L_Bye;
close;
 
L_Forgot_Gh:
mes "[Custom Headgears v1]";
mes "Bring me";
mes "100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "50 [Old Blue Box]";
mes "and 5 [Old Purple Box]";
close;
 
L_Gh_Reward:
mes "[Custom Headgears v1]";
mes "Here is your [Spirit of Ghostring].;
callfunc "F_HeQuests",6;
set @give_head_all, 0;
set ghquest,0;
close;

L_Cancel_Gh:
mes "[Custom Headgears v1]";
mes "Oh dear, what a shame. Giving up already?";
set ghquest,0;
close;
// GHOSTRING STOPS //




// Bad Stuff :P //
L_Bye:
mes "[Custom Headgears v1]";
mes "Bye";
close;

L_No:
mes "[Custom Headgears v1]";
mes "WHAT?!? Do you have any idea how rare these headgears are?";
close;
// Bad Stuff ^^ //

}

function	script	F_HeQuests	{
if (getarg(0) == 0) { 
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(603)>=50) && (countitem(617)>=5)) {
		return(1);
	}
}
if (getarg(0) == 1) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(603)>=50) && (countitem(617)>=5)) {
		return(1);
	}
}
if (getarg(0) == 2) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(603)>=50) && (countitem(617)>=5)) {
		return(1);
	}
}
if (getarg(0) == 3) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(603)>=50) && (countitem(617)>=5)) {
		return(1);
	}
}
if (getarg(0) == 4) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(603)>=50) && (countitem(617)>=5)) {
		return(1);
	}
}
if (getarg(0) == 2) {
	delitem 7550,100;
	delitem 7551,100;
	delitem 603,50;
	delitem 617,5;
	getitem 20003,1;
	return;
}
if (getarg(0) == 3) {
	delitem 7550,100;
	delitem 7551,100;
	delitem 603,50;
	delitem 617,5;
	getitem 20002,1;
	return;
}
if (getarg(0) == 4) {
	delitem 7550,100;
	delitem 7551,100;
	delitem 603,50;
	delitem 617,5;
	getitem 20000,1;
	return;
}
if (getarg(0) == 5) {
	delitem 7550,100;
	delitem 7551,100;
	delitem 603,50;
	delitem 617,5;
	getitem 20001,1;
	return;
}
if (getarg(0) == 6) {
	delitem 7550,100;
	delitem 7551,100;
	delitem 603,50;
	delitem 617,5;
	getitem 20004,1;
	return;
}
return(0);
}