//armamento:

//El npc te pedira que hagas las armas y tus municiones

prontera,100,100,3	script	Armamento	689,{
set .@name$,"^2AF7EA ~ claus ^000000";
setarray .@item[0],501,10,501,10,501,10,501,10,501,10;
setarray .@text$[0],"","","","","";
setarray .@item2[0],501,10,501,10;
setarray .@text2$[0],"","";
mes .@name$;
if (armas >= 1) && (municiones >= 1){
mes "Felicidades!, ahora ve a donde wein para que te de otra misiones";
completequest 1051;
setquest 1052;
set armas,0;
set municiones,0;
close;

}

/*if (isquest_begin(1052) == 2){//Si ya la termino
	mes "Habla con wein para que pases a la proxima mision";
	close;
}

if(isquest_begin(1050) == 0){// Si no la a comenzado
	mes "Que haces aqui?";
	mes "No tengo tiempo para lidiar con personal no autorizado";
	close;
}
if(isquest_begin(1051) == 1){
	goto next2;
}*/
	mes "Parece que wein te envio aqui para la prueba de armamento";
	next;
	mes .@name$;
	mes "Lo primero que debes de hacer es tu nueva arma y luego tus municiones";
	next;
	mes .@name$;
	mes "para hacer tu nueva arma necesitas estas cosas";
	set .@r,0;
	for(set .@i,0; .@i < getarraysize (.@item); set .@i,.@i+2){
		do {set .@r,.@r+1;} 
			while (.@i <= getarraysize (.@item));
	mes "Traeme unos "+.@item2[.@r]+" "+getitemname(.@item[.@i])+" "+.@text$[.@i]+" ";
	break;
	}
	next;
	mes .@name$;
	mes "Para hacer tus municiones necesitas estas cosas";
	set .@r,0;
	for(set .@i,0; .@i < getarraysize (.@item2); set .@i,.@i+2){
		do {set .@r,.@r+1;} 
			while (.@i <= getarraysize (.@item2));
	mes "Traeme unos "+.@item2[.@r]+" "+getitemname(.@item2[.@i])+" "+.@text2$[.@i]+" ";
	break;
	}
	completequest 1050;
	setquest 1051;
	close;
	
next2:
	mes .@name$;
	mes "Que quieres hacer primero las armas o las municiones?";
		switch(select("~ Las armas primero:~ Las municiones primero")){
		case 1:
			mes .@name$;
			mes "Vamos haber si tienes todo lo que te pedi..";
			next;
			mes .@name$;
			set .@r,0;
			for(set .@i,0; .@i < getarraysize (.@item); set .@i,.@i+2){
				do {set .@r,.@r+1;} 
					while (.@i <= getarraysize (.@item));
						if (countitem(.@item[.@i]) < .@item[.@r]){
							set .@r,0;
							for(set .@i,0; .@i < getarraysize (.@item); set .@i,.@i+2){
								do {set .@r,.@r+1;} 
									while (.@i <= getarraysize (.@item));
										mes " "+getitemname(.@item[.@i])+" ["+counitem(.@item[.@i])+"] / ["+.@item[.@r]+"]";
											if(.@i == getarraysize (.@item){close;}
			}
		}
	}
				mes "";
				mes "";
				next;
				mes "";
				mes "";
				next;
				mes "";
				set armas,1;
				close;
				
			case 2:
				mes .@name$;
					mes "Vamos haber si tienes todo lo que te pedi..";
					next;
					mes .@name$
			for(set .@i,0; .@i < getarraysize (.@item2); set .@i,.@i+2){
				do {set .@r,.@r+1;} 
					while (.@i <= getarraysize (.@item2))
						if (countitem(.@item2[.@i]) < .@item2[.@r]){
							set .@r,0;
							for(set .@i,0; .@i < getarraysize (.@item2); set .@i,.@i+2){
								do {set .@r,.@r+1;} 
									while (.@i <= getarraysize (.@item2))
										mes " "+getitemname(.@item2[.@i])+" ["+counitem(.@item2[.@i])+"] / ["+.@item2[.@r]+"]";
											if(.@i == getarraysize (.@item2){close;}
			}
		}
	}
				mes "";
				mes "";
				next;
				mes "";
				mes "";
				next;
				mes "";
				set municiones,1;
		}
}