prontera,142,175,5 script Cash Converter 116,{ set .@name$,"[^FF0000Converter^000000]"; mes .@name$; mes "Hello."; mes "What would you like to do?"; next; switch( select("Cash to POD","POD to Cash") ) { case 1: mes .@name$; mes "How many POD(s) do you want?"; input .@num; next; if( .@num <= 0 || #CASHPOINTS < .@num ) { mes .@name$; mes "Sorry, you don't have enough cashpoints!"; close; } mes .@name$; mes "This will cost ^FF0000" +(.@num )+ " cashpoints^000000."; next; if( select("Proceed:Nevermind") -1 ) { mes .@name$; mes "Goodbye!"; close; } set #CASHPOINTS, #CASHPOINTS - .@num; dispbottom "Lost: " +(.@num)+ " cashpoints. Total: " +#CASHPOINTS+" cashpoints."; getitem 7179, .@num; break; case 2: mes .@name$; mes "How many POD(s) will you give?"; input .@num; next; if( .@num <= 0 || countitem(7179) < .@num ) { mes .@name$; mes "Sorry, you don't have enough POD!"; close; } mes .@name$; mes "I can give you ^FF0000" +(.@num)+ " cashpoints^000000 for this."; next; if( select("Proceed:Nevermind") -1 ) { mes .@name$; mes "Goodbye!"; close; } set #CASHPOINTS, #CASHPOINTS + .@num; dispbottom "Gained: " +(.@num)+ " cashpoints. Total: " +#CASHPOINTS+" cashpoints."; delitem 7179,.@num; } close; }