//--------------------------------------------------------
//-          ._._____    _    _   _ ___ __  __           -
//-          | |____ |  / \  | | | |_ _|  \/  |          -
//-          | | |_  | / _ \ | |_| || || |\/| |          -
//-       ___| |___| |/ ___ \|  _  || || |  | |          -
//-      |_____|_____/_/   \_\_| |_|___|_|  |_|          -
//-           www.forum.cronus-emulator.com              -
//--------------------------------------------------------
prontera,143,176,5	script	Velho Ferreiro	2_M_OLDBLSMITH,{

//---------------------------------------------------------------------
//--- Nome do NPC.
set .n$,"[^FF0000 "+strnpcinfo(1)+" ^000000]";
//--- Level da Conta VIP.
set .@vip,1;
//---------------------------------------------------------------------

mes .n$;
mes "Olá, eu sou um Mestre Ferreiro e posso refinar seus equipamentos +10.";
mes " ";
mes "- ^FF0000Caso você seja um jogador VIP poderá ter seus equipamentos refinados até +20^000000 !";
next;
switch(select("Refinar Equipamentos:Cancelar")){

	case 1:
		if (getgroupid() < .@vip){
		if ( getequiprefinerycnt(EQI_HEAD_TOP) == 10 || getequiprefinerycnt(EQI_ARMOR) == 10 || getequiprefinerycnt(EQI_HAND_L) == 10 || getequiprefinerycnt(EQI_HAND_R) == 10 || getequiprefinerycnt(EQI_GARMENT) == 10 || getequiprefinerycnt(EQI_SHOES) == 10 || getequiprefinerycnt(EQI_ACC_R) == 10 || getequiprefinerycnt(EQI_ACC_L) == 10 || getequiprefinerycnt(EQI_HEAD_MID) == 10 || getequiprefinerycnt(EQI_HEAD_LOW) == 10) {
			mes .n$;
			mes "Sinto muito mas seus equipamentos já estão refinados ao Máximo !";
			close;
			}
				mes .n$;
				mes "Certo, vamos lá !";
				next;
				atcommand "@refine 0 10";
				mes .n$;
				mes "Clang, clang!!!";
				next;
				mes .n$;
				mes "Pronto, seus equipamentos foram refinados até +10 com sucesso !";
				close;
			}
			if ( getequiprefinerycnt(EQI_HEAD_TOP) == 20 || getequiprefinerycnt(EQI_ARMOR) == 20 || getequiprefinerycnt(EQI_HAND_L) == 20 || getequiprefinerycnt(EQI_HAND_R) == 20 || getequiprefinerycnt(EQI_GARMENT) == 20 || getequiprefinerycnt(EQI_SHOES) == 20 || getequiprefinerycnt(EQI_ACC_R) == 20 || getequiprefinerycnt(EQI_ACC_L) == 20 || getequiprefinerycnt(EQI_HEAD_MID) == 20 || getequiprefinerycnt(EQI_HEAD_LOW) == 20) {
				mes .n$;
				mes "Sinto muito mas seus equipamentos já estão refinados ao Máximo !";
				close;
			}
			mes .n$;
			mes "Parece que você é um jogador VIP... Certo, vamos lá !";
			next;
			atcommand "@refine 0 20";
			mes .n$;
			mes "Clang, clang!!!";
			next;
			mes .n$;
			mes "Pronto, seus equipamentos foram refinados até +20 com sucesso !";
			close;
		
	case 2:
		mes .n$;
		mes "Ok, volte quando precisar de meus serviços...";
		close;

	}
}