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