Miscellany

lhz_in02.gat,244,272,4	script	Custom Headgears v2	816,{

if(angel == 1) goto L_Check; 
if(berserk == 1) goto L_Check; 
if(bunny == 1) goto L_Check; 
if(fin == 1) goto L_Check; 
if(hokage == 1) goto L_Check;
if(sushi == 1) goto L_Check; 
if(sky == 1) goto L_Check; 
if(spring == 1) goto L_Check; 

mes "[Custom Headgears v2]";
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!",-,"No Thank you.",L_No;
next;
mes "[Custom Headgears v2]";
mes "Which headgear do you prefer?";
next;
menu "Angelic Evil Band",L_Angel,"Berserk Helm",L_Berserk,"Decorative Twin Bunnies",L_Bunny,"Fin Crown",L_Fin,"Hokage Helm",L_Hokage,"Real Sushi Hat",L_Sushi,"Sky Helm",L_Sky,"Spring Rabbit Band",L_Spring;

L_Angel:
mes "[Custom Headgears v2]";
mes "Bring me 100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "1 [Hot Sand Steamed Scorpion]";
mes "and 1 [Stew of Immortality]."; 
set angel,1; 
close;

L_Berserk:
mes "[Custom Headgears v2]";
mes "Bring me 100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "1 [Wine of Bergelmir]";
mes "and 1 [Hot Sand Steamed Scorpion]."; 
set berserk,1; 
close;

L_Bunny:
mes "[Custom Headgears v2]";
mes "Bring me 100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "1 [Tongue Dish]";
mes "and 1 [Wine of Bergelmir].";
set bunny,1;
close;

L_Fin:
mes "[Custom Headgears v2]";
mes "Bring me 100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "1 [Stew of Immortality]";
mes "and 1 [Nine Tail Dish].";
set fin,1;
close;

L_Hokage:
mes "[Custom Headgears v2]";
mes "Bring me 100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "1 [Tongue Dish]";
mes "and 1 [Dragon Breath Cocktail].";
set hokage,1;
close;
 
L_Sushi:
mes "[Custom Headgears v2]";
mes "Bring me 100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "1 [Nine Tail Dish]";
mes "and 1 [Tongue Dish]."; 
set sushi,1; 
close;

L_Sky:
mes "[Custom Headgears v2]";
mes "Bring me 100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "1 [Dragon Breath Cocktail]";
mes "and 1 [Wine of Bergelmir]."; 
set sky,1;
close;

L_Spring:
mes "[Custom Headgears v2]";
mes "Bring me 100 [Red Ticket]";
mes "100 [Blue Ticket]";
mes "1 [Dragon Breath Cocktail]";
mes "and 1 [Hot Sand Steamed Scorpion]."; 
set spring,1;
close;

L_Check:
if((angel== 1) && (callfunc("F_HeadgearQuests",0) == 1)) callfunc "HeadgearQuests",9;
if((berserk== 1) && (callfunc("F_HeadgearQuests",1) == 1)) callfunc "HeadgearQuests",10;
if((bunny== 1) && (callfunc("F_HeadgearQuests",2) == 1)) callfunc "HeadgearQuests",11;
if((fin== 1) && (callfunc("F_HeadgearQuests",3) == 1)) callfunc "HeadgearQuests",12;
if((hokage== 1) && (callfunc("F_HeadgearQuests",4) == 1)) callfunc "HeadgearQuests",13;
if((sushi== 1) && (callfunc("F_HeadgearQuests",5) == 1)) callfunc "HeadgearQuests",14;
if((sky== 1) && (callfunc("F_HeadgearQuests",6) == 1)) callfunc "HeadgearQuests",15;
if((spring== 1) && (callfunc("F_HeadgearQuests",7) == 1)) callfunc "HeadgearQuests",16;
mes "[Custom Headgears v2]";
mes "Oh dear. This won't do. Have you checked all your items carefully?";
next;
switch(select("What were the items again?:What quest am I currently doing?:Cancel Quest:Bye")){
case 1: 
break;
case 2: goto L_Quest_Check;
break;
case 3: goto L_Cancel;
break;
case 4: mes "Bye"; close;
}
end;

L_Quest_Check:
if(angel == 1) mes "You are currently doing Angelic Evil Band Quest"; close;
if(berserk == 1) mes "You are currently doing Berserk Helm Quest"; close;
if(bunny == 1) mes "You are currently doing Decorative Twin Bunnies Quest"; close; 
if(fin == 1) mes "You are currently doing Fin Crown Quest"; close;
if(hokage == 1) mes "You are currently doing Hokage Helm Quest"; close;
if(sushi == 1) mes "You are currently doing Real Sushi Hat Quest"; close;
if(sky == 1) mes "You are currently doing Sky Helm Quest"; close; 
if(spring == 1) mes "You are currently doing Angelic Evil Band Quest"; close; 
close;

L_Reward:
mes "[Custom Headgears v2]";
mes "Would you like to make the item now?";
next;
switch(select("Yes","No Cancel Quest")){
case 1: goto L_Make;
break;
case 2: goto L_Cancel;
break;
}
end;

L_Cancel:
mes "[Custom Headgears v2]"; 
mes "Oh dear, what a shame. Giving up already?"; 
if(angel == 1) set angel,0;
if(berserk == 1) set berserk,0; 
if(bunny == 1) set bunny,0; 
if(fin == 1) set fin,0; 
if(hokage == 1) set hokage,0;
if(sushi == 1) set sushi,0;
if(sky == 1) set sky,0;
if(spring == 1) set spring,0;
close;

L_Make:
if(angel == 1) callfunc "F_HeadgearQuests",9;
if(berserk == 1) callfunc "F_HeadgearQuests",10; 
if(bunny == 1) callfunc "F_HeadgearQuests",11; 
if(fin == 1) callfunc "F_HeadgearQuests",12;
if(hokage == 1) callfunc "F_HeadgearQuests",13;
if(sushi == 1) callfunc "F_HeadgearQuests",14;
if(sky == 1) callfunc "F_HeadgearQuests",15;
if(spring == 1) callfunc "F_HeadgearQuests",16;
close;

L_No:
next;
mes "[Custom Headgears v2]";
mes "WHAT?!? Do you have any idea how rare these headgears are?";
close;
}

function	script	F_HeadgearQuests	{
if (getarg(0) == 0) { 
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(12090)>=1) && (countitem(12085)>=1) {
		return(1);
	}
}
if (getarg(0) == 1) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(12095)>=1) && (countitem(12090)>=1)) {
		return(1);
	}
}
if (getarg(0) == 2) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(12075)>=1) && (countitem(12095)>=1)) {
		return(1);
	}
}
if (getarg(0) == 3) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(12085)>=1) && (countitem(12100)>=1)) {
		return(1);
	}
}
if (getarg(0) == 4) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(12075)>=1) && (countitem(12080)>=1)) {
		return(1);
	}
}
if (getarg(0) == 5) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(12100)>=1) && (countitem(12075)>=1)) {
		return(1);
	}
}
if (getarg(0) == 6) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(12080)>=1) && (countitem(12095)>=1)) {
		return(1);
	}
}
if (getarg(0) == 7) {
	if((countitem(7550)>=100) && (countitem(7551)>=100) && (countitem(12080)>=1) && (countitem(12090)>=1)) {
		return(1);
	}
}
if (getarg(0) == 9) {
	delitem 1098,5;
	delitem 7121,5;
	delitem 7265,5;
	delitem 7070,5;
	delitem 7220,5;
	delitem 7319,5;
	delitem 7202,5;
	delitem 1095,5;
	delitem 7561,5;
	delitem 7171,5;
	getitem 7550,3;
	set angel,0;
	return;
}
if (getarg(0) == 10) {
	delitem 7065,5;
	delitem 7194,5;
	delitem 7032,5;
	delitem 1034,5;
	delitem 931,5;
	delitem 1028,5;
	delitem 7003,5;
	delitem 1042,5;
	delitem 7119,5;
	delitem 7149,5;
	getitem 7551,3;
	set berserk,0;
	return;
}
if (getarg(0) == 11) {
	delitem 7065,5;
	delitem 7194,5;
	delitem 7032,5;
	delitem 1034,5;
	delitem 931,5;
	delitem 1028,5;
	delitem 7003,5;
	delitem 1042,5;
	delitem 7119,5;
	delitem 7149,5;
	getitem 7551,3;
	set bunny,0;
	return;
}
if (getarg(0) == 12) {
	delitem 7065,5;
	delitem 7194,5;
	delitem 7032,5;
	delitem 1034,5;
	delitem 931,5;
	delitem 1028,5;
	delitem 7003,5;
	delitem 1042,5;
	delitem 7119,5;
	delitem 7149,5;
	getitem 7551,3;
	set fin,0;
	return;
}
if (getarg(0) == 13) {
	delitem 7065,5;
	delitem 7194,5;
	delitem 7032,5;
	delitem 1034,5;
	delitem 931,5;
	delitem 1028,5;
	delitem 7003,5;
	delitem 1042,5;
	delitem 7119,5;
	delitem 7149,5;
	getitem 7551,3;
	set hokage,0;
	return;
}
if (getarg(0) == 14) {
	delitem 7065,5;
	delitem 7194,5;
	delitem 7032,5;
	delitem 1034,5;
	delitem 931,5;
	delitem 1028,5;
	delitem 7003,5;
	delitem 1042,5;
	delitem 7119,5;
	delitem 7149,5;
	getitem 7551,3;
	set sushi,0;
	return;
}
if (getarg(0) == 15) {
	delitem 7065,5;
	delitem 7194,5;
	delitem 7032,5;
	delitem 1034,5;
	delitem 931,5;
	delitem 1028,5;
	delitem 7003,5;
	delitem 1042,5;
	delitem 7119,5;
	delitem 7149,5;
	getitem 7551,3;
	set sky,0;
	return;
}
if (getarg(0) == 16) {
	delitem 7065,5;
	delitem 7194,5;
	delitem 7032,5;
	delitem 1034,5;
	delitem 931,5;
	delitem 1028,5;
	delitem 7003,5;
	delitem 1042,5;
	delitem 7119,5;
	delitem 7149,5;
	getitem 7551,3;
	set spring,0;
	return;
}
return(0);
}