Someone

lhz_in02.gat,240,272,4	script	Summoning Branches	847,{
 
if ((dbquest == 1) || (bbquest == 1)) {
	if ((dbquest == 1) && (bbquest == 1) && (callfunc("F_BranchQuests",0) == 1) && (callfunc("F_BranchQuests",1) == 1)) {
		set @giveboth, 1;
		goto L_DB_Reward;
	}
	if ((dbquest == 1) && (callfunc("F_BranchQuests",0) == 1)) {
			goto L_DB_Reward;
	}
	if ((bbquest == 1) && (callfunc("F_BranchQuests",1) == 1)) {
			goto L_BB_Reward;
	}
}
else {
	if (dbquest == 1) { goto L_NO_DB; }
	if (bbquest == 1) { goto L_NO_BB; }
}
 
mes "[Summoning Branches]";
mes "I risked my life stealing these branches from the legendary tree of Yggdrasil!";
mes "I'm not parting with them THAT easily! Are you willing to take on the challenge?";
next;
menu "Yes!",L_Yes,"No Thanks",L_No;
 
L_Yes:
next;
mes "[Summoning Branches]";
mes "Which branch do you prefer?";
next;
menu "30x Dead Branches Please",L_Dead,"3x Bloody Branches Please",L_Blood;
 
L_Dead:
next;
mes "[Summoning Branches]";
mes "Bring me 10 [Rotten Meat], 10 [Rusty Screw] and 20 [Zargon].";
set dbquest,1;
close;
 
L_NO_DB:
if (callfunc("F_BranchQuests",0) == 1) goto L_DB_Reward;
mes "Oh dear. This won't do. Have you checked all your items carefully?";
next;
menu "What were the items again?",L_Forgot,"Bye",L_Bye;
close;
 
L_Forgot:
next;
mes "[Summoning Branches]";
mes "Bring me 10 [Rotten Meat], 10 [Rusty Screw] and 20 [Zargon].";
close;
 
L_Bye:
mes "[Summoning Branches]";
mes "Bye";
close;
 
L_DB_Reward:
mes "[Summoning Branches]";
mes "Here is your 30 [Dead Branch].";
callfunc "F_BranchQuests",2;
if (@giveboth == 1) { goto L_BB_Reward; }
set dbquest,0;
close;
 
L_Blood:
next;
mes "[Summoning Branches]";
mes "Bring me 10 [Red Bijou], 10 [Green Bijou], 10 [Yellow Bijou] and 1 [Treasure Box].";
set bbquest,1;
close;
 
L_NO_BB:
if (callfunc("F_BranchQuests",1) == 1) goto L_BB_Reward;
mes "Oh dear. This won't do. Have you checked all your items carefully?";
next;
menu "What were the items again?",L_Forgot1,"Bye",L_Bye1;
close;
 
L_Forgot1:
next;
mes "[Summoning Branches]";
mes "Bring me 10 [Red Bijou], 10 [Green Bijou], 10 [Yellow Bijou] and 1 [Treasure Box].";
close;
 
L_Bye1:
mes "[Summoning Branches]";
mes "Bye";
close;
 
L_BB_Reward:
mes "[Summoning Branches]";
mes "Here is your 3 [Bloody Branch].";
callfunc "F_BranchQuests",3;
set @giveboth, 0;
set bbquest,0;
close;
}
 
 
function	script	F_BranchQuests	{
if (getarg(0) == 0) { 
	if((countitem(7564)>=10) && (countitem(7263)>=10) && (countitem(912)>=20)) {
		return(1);
	}
}
if (getarg(0) == 1) {
	if((countitem(7447)>=10) && (countitem(7445)>=10) && (countitem(7448)>=10) && (countitem(7444)>=1)) {
		return(1);
	}
}
if (getarg(0) == 2) {
	delitem 7564,10;
	delitem 7263,10;
	delitem 912,20;
	getitem 604,30;
	return;
}
if (getarg(0) == 3) {
	delitem 7447,10;
	delitem 7445,10;
	delitem 7448,10;
	delitem 7444,1;
	getitem 12103,3;
	return;
}
return(0);
}