viewing paste Unknown #33577 | Text

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68
// ---------------------------------------------- //
// Badge Exchanger for Cronus 3rd [NubDes]        //
// v1.0 not a Free Release                        //
// ---------------------------------------------- //
 
prontera,150,150,3      script  Badge Exchanger 100,{
 
// Changed the id of your desired items to exchange for points
        set .@valorid,501;
        set .@braveryid,502;
        set .@warid,502;
       
        set .@valuex,10;
 
mes "What do you want to do today?";
mes "Rates are : 1 Badge. = 10 BGP.";
 
menu "Valot to BGP",K_Valor,"Bravery to BGP",K_Bravery,"War to BGP",K_War;
 
K_Valor:
        input @amount;
        if(@amount <= 0) {
                mes "Please put greater than 0.";
                close;
        }else if(countitem(.@valorid) < @amount) {
                mes "Sorry but you do not have enough materials to exchange.";
                close;
        }else{
                delitem .@valorid,@amount
                set #BGPTS,#BGPTS+(.@valuex * @amount);
                dispbottom "You recieved = "+(.@valuex * @amount)+".";
                dispbottom "Your total BG Points = "+#BGPTS+".";
                end;
        }
 
K_Bravery:
        input @amount;
        if(@amount <= 0) {
                mes "Please put greater than 0.";
                close;
        }else if(countitem(.@braveryid) < @amount) {
                mes "Sorry but you do not have enough materials to exchange.";
                close;
        }else{
                delitem .@braveryid,@amount
                set #BGPTS,#BGPTS+(.@valuex * @amount);
                dispbottom "You recieved = "+(10 * @amount)+".";
                dispbottom "Your total BG Points = "+#BGPTS+".";
                end;
        }
 
K_War:
        input @amount;
        if(@amount <= 0) {
                mes "Please put greater than 0.";
                close;
        }else if(countitem(.@warid) < @amount) {
                mes "Sorry but you do not have enough materials to exchange.";
                close;
        }else{
                delitem .@warid,@amount
                set #BGPTS,#BGPTS+(.@valuex * @amount);
                dispbottom "You recieved = "+(.@valuex * @amount)+".";
                dispbottom "Your total BG Points = "+#BGPTS+".";
                end;
        }
 
}
Viewed 546 times, submitted by unknown.