// Itens Stuff BG
// Npc que troca emblemas por Itens
// Autor: Envolvents (Wellington Ferraz)
// v0.1
 
// Map,WhereX,WhereY,Posiçao<TAB>script<TAB>Nome do NPC<TAB>Sprite do NPC,{
prontera,150,150,3      script  Itens Stuff BG  77,{
 
        setarray @id_stuff[0],                  671,5340;               // ID dos Itens da Stuff
        setarray @stuff_qtd[0],                 1,1;                    // Quantidade de item que será entregue
        setarray @id_emblemas[0],               607,608;                // ID dos Emblemas
        setarray @qtd_emblemas[0],              1,1;                    // Qtd de emblemas para trocar
        set @min_emblem, 0;                                             // Contagem mínima de emblemas para ver a lista de itens
        
        set .title$,"[Itens BG Stuff]"; // Titulo do NPC
 
        mes .title$;
        mes "No momento vejo que voce possui:";
        mes " ";
        for( set .@i, 0; .@i < getarraysize(@id_emblemas); set .@i, .@i + 1 ) {
        mes ""+@qtd_emblemas[.@i]+" unidade de "+getitemname(@id_emblemas[.@i])+"";
        }
        if( @id_emblemas < @min_emblem ) {
                mes "É preciso ter pelomenos "+@min_emblem+" ou mais emblemas para trocar comigo";
                close;
        }
        if (select("Trocar meus Emblemas!","Cancela") == 2) 
                close;
 
        next;
        mes .title$;
        mes " ";
        for( set .@i, 0; .@i < getarraysize(@id_stuff); set .@i, .@i + 1 ) {
                mes "["+@stuff_qtd[.@i]+"] "+getitemname(@id_stuff[.@i])+" = "+@qtd_emblemas[.@i]+" Emblema";
                if( .@i < 1 )
                        set .@menu$, getitemname(@id_stuff[.@i]);
                else
                        set .@menu$, .@menu$+":"+getitemname(@id_stuff[.@i]);
        }
 
        next;
        select(.@menu$);
        set @setvar, @menu - 1;
 
        mes .title$;
        if( @qtd_emblemas[@setvar] > @id_emblemas ) {
                mes "Você não tem Emblemas de Guerra suficiente para trocar por "+@stuff_qtd[@setvar]+"x '"+getitemname(@id_stuff[@setvar])+"' :/";
                close;
        }
        mes "Deseja trocar "+@stuff_qtd[@setvar]+"x '"+getitemname(@id_stuff[@setvar])+"' por "+@qtd_emblemas[@setvar]+" Emblemas de Guerra?";
        if(select("Não:Sim") == 1 ) {
                mes "A troca foi cancelada";
                close;
        }
        delitem @id_emblemas[@setvar], @qtd_emblemas[@setvar];
        getitem @id_stuff[@setvar], @stuff_qtd[@setvar];
        mes "Troca realizada com sucesso!";
        close;
 
OnInit:
        waitingroom "Itens Stuff BG",0;
end;
}