set @Menu$,"";
for( set .@a,1; .@a < getarraysize( .Coins ); set .@a,.@a+1 ){
set @Menu$,@Menu$ + getitemname( .Coins[.@a] )+":";
}
while( 1 ){
mes "[CashPoint Trader]";
mes "You can trade ^0000ffItems^000000 to ^0000ffCashPoint^000000 here.";
next;
switch(select("[Coin to CashPoint]")){
case 1:
mes "[CashPoint Trader]";
mes "Current Rates";
for( set .@a,1; .@a < getarraysize( .Coins ); set .@a,.@a+1 ){
mes "^0000FF"+getitemname( .Coins[.@a] )+" = ^FF0000"+.CashPoint[.@a]+"^000000 CashPoint.";
}
next;
set .@a,select( @Menu$ );
mes "Select the Amount of Coins you want to trade into CashPoint.";
mes "You have "+countitem( .Coins[.@a] )+" "+getitemname( .Coins[.@a] )+".";
input @Amount,0,countitem( .Coins[.@a] );
if( @Amount < 1 ){
mes "You cancelled.";
} else{
set #CASHPOINTS,#CASHPOINTS + ( @Amount * .CashPoint[.@a] );
delitem .Coins[.@a],@Amount;
mes "Done, you have traded "+@Amount+" of "+getitemname(.Coins[.@a])+" into "+( @Amount * .CashPoint[.@a] )+" CashPoint.";
}
close;
}
}
}
Question
Quesooo
Hi good day i would like to ask how to make 1 gold coins = 5 cash points
to
20 gold coins to 5 cash points
heres the script
btw the gold coin id is 30052
thank you so much
Link to comment
Share on other sites
1 answer to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.