- script Credit Exchanger#2 903,{
mes "[Credit Exchanger]";
mes "What do you want?";
switch(select("[Credits to Super Credits]","[Credits to Zeny]","[Zeny to Credits]")){
case 1:
if(!countitem(20234)){
mes "You don't have any credit";
close;
}
mes "How many you want to exchange?";
input @u;
if(countitem(20234)<@u || @u < 100){
mes "You don't have enough credit.";
close;
}
set @realu, @u / 100; //report to nearest 100 multiplier
mes "Ok~!";
delitem 20234,@realu * 100;
getitem "supercoinid", @realu;
close;
case 2:
if(!countitem(20234)){
mes "You don't have any credit";
close;
}
mes "How many you want to exchange?";
input @u;
if(countitem(20234)<@u){
mes "You don't have enough credit.";
close;
}
mes "Ok~!";
delitem 20234,@u;
set Zeny,Zeny+10000000*@u;
set @u,0;
close;
case 3:
if(zeny<10000000){
mes "You don't have enough Zeny.";
close;
}
mes "How many you want to exchange?";
input @u;
if(10000000*@u>Zeny){
mes "You don't have enough Zeny.";
close;
}
set ztc_player,gettimetick(2);
mes "Ok~!";
getitem 20234,@u;
set Zeny,Zeny-10000000*@u;
close;
}
OnInit:
waitingroom "Credit Exchanger",0;
end;
}
prontera,164,168,5 duplicate(Credit Exchanger#2) Credit Exchanger#3 903
geffen,116,62,5 duplicate(Credit Exchanger#2) Credit Exchanger#4 903
turbo_room,93,117,5 duplicate(Credit Exchanger#2) Credit Exchanger#3 903
You just have to replace the "supercoinid" by the real id.