TCG Card Exchanger

[xryuji]

prontera,138,196,5	script	TCG Exchanger	75,{
	.@max = Zeny/.rates;
	mes "[ Exchanger ]";
	mes "Do you want to exchange your ^33CC33" + .rates + "^000000 Zeny to a TCG?";
	next;
	if(select("Exchange:Quit") == 2)
		end;
	if(!.@max){
		mes "[ Exchanger ]";
		mes "You don't have enough zeny for the exchange.";
		close;
	}
OnExchange:
	mes "[ Exchanger ]";
	mes "You can exchange up to ^0000FF"+.@max+"^000000 TCG.";
	mes "How many would you like to exchange?";
	next;
	input .@count;
	if(.@count == 0 || .@count > .@max){
		mes "[ Exchanger ]";
		mes "You can't enter 0 or you can only exchange up to ^0000FF"+.@max+"^000000 TCG.";
		mes "Please try again.";
		next;
		goto OnExchange;
	}
	mes "[ Exchanger ]";
	mes "Are you sure you want to exchange ^33CC33" + (.rates*.@count) + "^000000 Zeny for " + .@count + "TCG?";
	next;
	if(select("Yes:No") == 2)
		end;
	mes "[ Exchanger ]";
	mes "Okay, Here you go!, Thank you for using my services.";
	Zeny -= (.rates*.@count);
	getitem .item_id,.@count;
	end;
	
OnInit:
	.item_id = 7227;
	.rates = 1000000;
	end;
}

Hi can somebody help me? I would like to add an option if they want to convert their TCG Card to Zeny OR Zeny to TCG Card. Thank you