Script exchange of items for the amount indicated

[ZelosAvalon]

i need help for edit my script, i try to 

 

i need help for edit my event i when i make script for exchange one per one working, but i try to make an script where de player can put how many coins he have for exchange more coins at a time.

 

this script give for a player just 1 coin and delete all coins he put in #pas1.

 

the ratio is: 5 Silver => 1 Golden

 

 

 

case 1:

{

mes "[Event Manager]";

mes "How many Silver Coins do you want to get from Golden Coins ?:";

input #pas1;   

next;  

{ if(countitem(8032) >= #pas1)

delitem 8032,#pas1;

mes " [ Event Manager ]";

mes "Thank you for choosing ...RO that luck be with you in future events, and you can win many Coins, and exchange with beautiful items.";

getitem 8033,1;

close;

}

 

Edited May 22, 2014 by ZelosAvalon

[Skorm]

 

i need help for edit my script, i try to 

 

i need help for edit my event i when i make script for exchange one per one working, but i try to make an script where de player can put how many coins he have for exchange more coins at a time.

 

this script give for a player just 1 coin and delete all coins he put in #pas1.

 

the ratio is: 5 Silver => 1 Golden

 

	mes "[Event Manager]";
	mes "How many silver coins would you like to exchange?";
	mes "[5 Silver Coins = 1 Gold Coin]";
	next;
	switch( input( .@pas1, 5, countitem(8032) ) ) {
		case -1:
			mes "[Event Manager]";
			mes "You can't go that low; the minimum value is 5.";
			close;
			
		case 1:
			mes "[Event Manager]";
			mes "You don't have that many silver coins!";
			close;
	}
	delitem 8032, .@pas1-(.@pas1%5);
	mes " [ Event Manager ]";
	mes "Thank you for choosing ...RO that luck be with you in future events, and you can win many Coins, and exchange with beautiful items.";
	getitem 8033, .@pas1/5;
	close;