prontera,154,150,3      script  Emblemas por Emblemas   951,{
        mes "[ Emblemas ]";
        mes "Olá ^FF0000"+strcharinfo(0)+"^000000, cansad"+(sex > 0 ? "o" : "a")+" de gastar items";
        mes "Eu tenho uma boa notícia para você,";
        mes "eu posso vender Emblemas Campais,";
        mes "você quer ?";

        next;

        mes "[ Emblemas ]";
        mes "Assim você não precisará ficar usando só os seus";
        mes "da Guerra , Bravura ou Valor.";
        mes "O preço aqui não é Zeny";
        mes "mas sim emblemas por Emblemas.";

        next;

        mes "[ Emblemas ]";
        mes "Você pode conseguí-los lutando dentro";
        mes "das partidas de battlegroung, quando";
        mes "você ganhar essese Emblemas você pode vir";
        mes "aqui e trocá-las por outros Emblemas";

        next;

        mes "[ Emblemas ]";
        mes "Lembrando que você pode pagar com";
        mes "qualquer um dos três Emblemas.";

        next;

        mes "Qual item deseja adiquirir?";

        next;


        switch(select("25 Bravura:50 Bravura:100 Bravura:150 Bravura:200 Bravura:25 Valor:50 Valor:100 Valor:150 Valor:200 Valor:25 Guerra:50 Guerra:100 Guerra:150 guerra:200 guerra")) {
                case 1:         callsub S_Buy,7828,25,25;       //
                case 2:         callsub S_Buy,7828,50,50;       //
                case 3:         callsub S_Buy,7828,100,100;             //
                case 4:         callsub S_Buy,7828,150,150;     // E
                case 5:         callsub S_Buy,7828,200,200;     //
                case 6:         callsub S_Buy,7773,25,25;       //
                case 7:         callsub S_Buy,7773,50,50;       //
                case 8:         callsub S_Buy,7773,100,100;     //
                case 9:         callsub S_Buy,7773,150,150;     //
                case 10:        callsub S_Buy,7773,200,200;     //
                case 11:        callsub S_Buy,7829,25,25;       //
                case 12:        callsub S_Buy,7829,50,50;       //
                case 13:        callsub S_Buy,7829,100,100;     //
                case 14:        callsub S_Buy,7829,150,150;     //
                case 15:        callsub S_Buy,7829,200,200;     //
        }
        end;

S_Buy:
// getarg(0) = item_id
// getarg(1) = Quantidade de item_id que você obtenha
        mes "[BG Stuff]";
        mes "Então você quer ^0000FF"+getarg(1)+" "+getitemname(getarg(0))+"s^000000...";
        mes "Vai custar-lhe ^FF0000"+getarg(2)+" Emblemas...";
        next;


         select("Emblema de Guerra:Emblema de Bravura:Emblema de Valor");

        setarray .@medalid, 7773, 7828, 7829;

        if(countitem(.@medalid[@menu-1]) >= getarg(2)) {

                delitem .@medalid[@menu-1],getarg(2);
                getitem getarg(0),getarg(1);



        next;

                mes "[ Emblemas ]";
                mes "Troca concluída, obrigado e volte sempre.";
                        close;
        } else {

                mes "[ Emblemas ]";
                mes "Me desculpe mas você não tem a ";
                mes "quantidade necessária desse Emblema.";

                        close;
        }

        return;
        }