anyone help with this script

[AinsLord]

ayo_in02,100,169,4	script	Sigmund	806,{
set @np$,"[ ^808080Sigmund^000000 ]";
	setarray .SReq[0],714,5,7018,5,1053,10,7297,10,710,50,984,5,985,5,968,5,989,1,1008,30,1007,30,969,25,7017,50,7023,50,949,1000,1000,5,7069,500,1059,1250,1019,150,983,5,975,5,978,5,982,5,7446,10,7445,10,7447,10,7448,10,7436,5,7437,5,7438,5,7439,5;
	setarray .Max[0],255,120,255;
	setarray .@i[0],countitem(7420);
	if(Hero_01==1) { mes @np$; mes "Greeting..Have you spoken with ^808080Blacksmith Regin^000000 at the ^0000A0Blacksmith Guild^000000 in ^0000FFEinbroch^000000 for your equipment?"; close; }
	if (BaseLevel < .Max[0]) {
	mes @np$; mes "You must be level " + .Max[0] + " to use this feature."; close; }
	if ((JobLevel < .Max[1]) || (Class == 23 && JobLevel < .Max[2])) {
	mes @np$; mes "You must master your class before using this feature."; close; }

	if(countitem(18049) < 1) goto N_noscale;	
	if(countitem(7420) > 50) goto N_req;
	mes @np$;
	mes "You have not acquired ^0000FF100^000000 human";
	mes "^FF0000Skull^000000. I can convert the";
	mes "^FF0000Skull^000000 you have collected so they are stackable.";
	menu "-View Requirements",-,"-Convert ^FF0000Skull^000000",N_skull,"-More Info",N_info;
	next;
	mes @np$;
	mes "First, you are to defeat ^0000FFLord ";
	mes "Draconus^000000 and bring me ^FF0000Draconu's Scale^000000";
	next;
	mes @np$;
	mes "^6698FFLord Draconus^000000 can be found in the";
	mes "deep caves of the ^808080Magma Dungeon.^000000";
	mes "Beware, for he is the King of";
	mes "dragons. ";
	next;
	mes @np$;
	mes "He shall bear no mercy upon your";
	mes "challenge.";
	next;
	mes @np$;
	mes "Second, you are to bring to me the";
	mes "^FF0000Skull^000000 of ^0000FF100^000000 people. Control your";
	mes "emotions, and bear your fists.";
	next;
	mes @np$;
	mes "Third, you are to gather material";
	mes "that shall later construct some";
	mes "equipment which you can use to";
	mes "your liking. ";
	next;
	mes @np$;
	if (getarraysize(.SReq)) {
	mes "Gather the following list of";
	mes "items:";
	mes " ";
		set .@i,0;
		while (.@i < getarraysize(.SReq)) {
			mes "  - ^FFA000"+getitemname(.SReq[.@i])+"^000000   ^808080"+.SReq[.@i+1]+"^000000^808080x^000000";
			set .@i, .@i+2; }
	next;
	mes @np$;
	mes "I shall give you further";
	mes "instructions upon your return with";
	mes "these tasks completed.";
	next;
	mes @np$;
	mes "Best of luck and godspeed.";
	close; 


N_noItems:
	mes @np$;
	mes "dont have req";
	close;

N_skull:
	next;
	mes @np$;
	mes "I shall now convert the ^FF0000Skull^000000.";
	next;
	mes @np$;
	mes "I have converted "+countitem(7420)+" skull Speak";
	mes "with me should you require further";
	mes "assistance.";
	delitem 7420,.@i;
	getitem 7420,.@i;
	close;

N_info:
	next;
	mes @np$;
	mes "You are about embark on the";
	mes "^808080Trials of Glory^000000, several";
	mes "extremely difficult quests that you";
	mes "are required to complete in order";
	mes "to become a ^0000FFHero.^000000 ";
	next;
	mes @np$;
	mes "As a ^0000FFHero^000000, you will be granted the";
	mes "following privileges:";
	mes " -Ability to equip ^808080Glorified Armor.^000000";
	mes " -Access to difficult ^808080quests^000000, and ^808080god equipment.^000000";
	mes "^0000FF500^000000 ^808080Stats Points^000000 and ^0000FF60^000000 ^808080skill Points^000000 boost.";
	mes " -Additional ^808080Weapon^000000 and ^808080Armor^000000 bonuses.";
	next;
	mes @np$;
	mes "However, to become a hero, you must";
	mes "give up your Base and Job levels.";
	mes "In other words, you will be reborn";
	mes "as a ^808080Lv 1/1^000000 ^0000FFplayer job^000000 after";
	mes "you`ve completed the quest. ";
	close;


N_noscale:
	mes @np$;
	mes "You have not yet acquired";
	mes "^FF0000Draconu's Scale^000000! Here are";
	mes "the trials you must complete..";
	next;
	menu "-View Requirements",-,"-More Info",N_info;
	next;
	mes @np$;
	mes "First, you are to defeat ^6698FFLord ";
	mes "Draconus^000000 and bring me ^FF0000Draconu's Scale.^000000";
	next;
	mes @np$;
	mes "^6698FFLord Draconus^000000 can be found in the";
	mes "deep caves of the ^808080Magma Dungeon.^000000";
	mes "Beware, for he is the King of";
	mes "dragons. ";
	next;
	mes @np$;
	mes "He shall bear no mercy upon your";
	mes "challenge.";
	next;
	mes @np$;
	mes "Second, you are to bring to me the";
	mes "^FF0000Skull^000000 of ^0000FF100^000000 people. Control your";
	mes "emotions, and bear your fists.";
	next;
	mes @np$;
	mes "Third, you are to gather material";
	mes "that shall later construct some";
	mes "equipment which you can use to";
	mes "your liking. ";
	next;
	mes @np$;
	if (getarraysize(.SReq)) {
	mes "Gather the following list of";
	mes "items:";
	mes " ";
		set .@i,0;
		while (.@i < getarraysize(.SReq)) {
			mes "  - ^FFA000"+getitemname(.SReq[.@i])+"^000000   ^808080"+.SReq[.@i+1]+"^000000^808080x^000000";
			set .@i, .@i+2; }
	next;
	mes @np$;
	mes "I shall give you further";
	mes "instructions upon your return with";
	mes "these tasks completed.";
	next;
	mes @np$;
	mes "Best of luck and godspeed.";
	close;

N_req:
	set .@i,0;
	if  (.@i < getarraysize(.SReq)) {
	if (countitem(.SReq[.@i]) < .SReq[.@i+1]) {
	mes @np$;
	mes "Have you completed the task? You are missing items for the third trial! Here are the trials you must complete.";
	next;
	menu "-View Requirements",-,"-More Info",N_info;
	next;
	mes @np$;
	mes "First, you are to defeat ^0000FFLord ";
	mes "Draconus^000000 and bring me ^FF0000Draconu's Scale^000000";
	next;
	mes @np$;
	mes "^6698FFLord Draconus^000000 can be found in the";
	mes "deep caves of the ^808080Magma Dungeon^000000";
	mes "Beware, for he is the King of";
	mes "dragons. ";
	next;
	mes @np$;
	mes "He shall bear no mercy upon your";
	mes "challenge.";
	next;
	mes @np$;
	mes "Second, you are to bring to me the";
	mes "^FF0000Skull^000000 of ^0000FF100^000000 people. Control your";
	mes "emotions, and bear your fists.";
	next;
	mes @np$;
	mes "Third, you are to gather material";
	mes "that shall later construct some";
	mes "equipment which you can use to";
	mes "your liking. ";
	next;
	mes @np$;
	if (getarraysize(.SReq)) {
	mes "Gather the following list of";
	mes "items:";
	mes " ";
		set .@i,0;
		while (.@i < getarraysize(.SReq)) {
			mes "  - ^FFA000"+getitemname(.SReq[.@i])+"^000000   ^808080"+.SReq[.@i+1]+"^000000^808080x^000000";
			set .@i, .@i+2; }
	next;
	mes @np$;
	mes "I shall give you further";
	mes "instructions upon your return with";
	mes "these tasks completed.";
	next;
	mes @np$;
	mes "Best of luck and godspeed.";
	close; }}}}

		set .@i, .@i+2;}
	mes @np$;
	mes "Excellent. Congratulations, warrior! You have completed the trials and acquired the items that I have asked of you";
	next;
	mes @np$;
	mes "You have redeemed yourself, by confronting and surpassing such difficult tasks.";
	next;
	mes @np$;
	mes "You have grown, I must say.. Indeed. Well then, let us begin..";
	next;
	mes @np$;
	mes "You will feel a little weak following the initiation.. bare with it..";
	close2;

function Option {
	mes "^0055ff > "+getarg(0);
		sleep2 200;
	mes "^777777 > "+getarg(1)+".";
	mes " ";
		sleep2 200;
	mes "^0055ff > "+getarg(3);
		sleep2 200;
	mes "^777777 > "+getarg(4)+".^000000";
	set @menu$,"^0055ff"+getarg(0)+":"+getarg(3)+":^777777Cancel^000000";
		sleep2 1000;
	next;
	switch(select(@menu$)) {
		case 1: set @sring,getarg(2); set @sclass$,getarg(0); goto SConfirm;
		case 2: set @sring,getarg(5); set @sclass$,getarg(3); goto SConfirm;
		case 3: goto Closing; }
}
SConfirm:
	progressbar "",5;
	specialeffect2 248;
	if (getarraysize(.SReq)) {
		set .@i,0;
		while (.@i < getarraysize(.SReq)) {
//			delitem .SReq[.@i], .SReq[.@i+1];
			set .@i, .@i+2; }
	}
	set BaseLevel,1;
	set JobLevel,1;
	ResetStatus;
	ResetSkill;
	set StatusPoint,2500; sleep2 200;
	set SkillPoint,108 ; sleep2 200;
	getitem 18061, 1;
	delitem 18049, 1;
	delitem 7420, 100;
	//getitem 7951, 1;
	set Hero_01,1;
	set Draconus_01,0;
	emotion 46;
	close;

}

it goes like this

even though my character has the draconus scale and emperium which are not the complete material for the quest still proceeds to it

usually as you can see on the script it needs several items or materials to complete the quest

i dunno whats the problem with this can anyone help me

 

thnx in advance