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)){
		setarray @IID[0],5,501,502,503,504,505;
                        }else if((buquest == 1) && (callfunc("F_HeQuests",0) == 1)){
                        setarray @IID[0],1,501; goto L_Reward;
                        }else if((bequest == 1) && (callfunc("F_HeQuests",1) == 1)){
                        setarray @IID[0],1,502; goto L_Reward;
                        }else if((shquest == 1) && (callfunc("F_HeQuests",2) == 1)){
                        setarray @IID[0],1,503; goto L_Reward;
                        }else if((dequest == 1) && (callfunc("F_HeQuests",3) == 1)){
                        setarray @IID[0],1,504; goto L_Reward;
                        }else if((ghquest == 1) && (callfunc("F_HeQuests",4) == 1)){
                        setarray @IID[0],1,505; goto L_Reward;
		}

	L_Reward:
		mes "[Custom Headgears v1]";
		mes "Here is your ["+getitemname(@IID[@IID[6]])+"].";
		delitem 7550,100;
		delitem 7551,100;
		delitem 603,50;
		delitem 617,5;
		getitem @IID[@IID[6]],1;
		if(@IID[6] == @IID[0]) close;
		setarray @IID[6],@IID[6]+1;
		goto L_Reward;