buy Poring Coin

[FuiJin1998]

Hi guys...i want to ask for a request...

help me make

(Zeny buy poring coin) price 50m each coin...

(poring coin sale back to the shop) price 25m each coin...

mean if i buy the poring coin is 50m,

then i if i sale it back is half of the price...

thx you

[Sanasol]

prontera,160,180,5	script	TCG Trader	757,{
	
	set .max_zeny,1000000000;
	set .@price,500000000;
	
	mes "[^0000FFTrader^000000]";
	mes "I can change ur TCG <> Zeny";
	//mes "or Zeny to TCG";
	mes "1 TCG = 500kk Zeny";
	//mes "I see u have: ^00FF00 "+countitem(7227)+"^000000 TCG";
	//mes "and Zeny: ^FF0000"+Zeny+"^000000";
	mes "So what do u want?";
	
	switch( select("^00FF00TCG^000000 > ^FF0000Zeny^000000","^FF0000Zeny^000000 > ^00FF00TCG^000000","Quit"))
	{
		case 1:
			set .@maximum,(( .max_zeny - Zeny ) / .@price );
			mes "You can change maximum "+.@maximum+" x ^00FF00TCG^000000";
			next;
			mes "[^0000FFTrader^000000]";
			mes "What count of ^00FF00TCG^000000 u wanna change?(It cant be more than 2 at a time)";
			input @count,0,.@maximum;
			if(@count > .@maximum || @count <= 0)
			{
				mes "Sorry I cant do that, u've too many Zeny or dont have TCG";
				close;
			}
			else
			{
					if(countitem(7227) < @count)
					{
						mes "You scammer, wanted to deceive me? GTFO";
						close;
					}
					else
					{
						delitem 7227,@count;
						set Zeny,Zeny+(.@price*@count);
						mes "Ok, get ur ^FF0000Zeny^000000. Bye!";
						close;
					}
			}
			close;
		break;
		
		case 2:
			set .@maximum,(Zeny / .@price );
			mes "You can get maximum "+.@maximum+" x ^00FF00TCG^000000";
			next;
			mes "[^0000FFTrader^000000]";
			mes "What count of ^00FF00TCG^000000 u wanna get?";
			input @count,0,.@maximum;
			if(@count > .@maximum || @count <= 0)
			{
				mes "Sorry I cant do that, U dont have enough ^FF0000Zeny^000000";
				close;
			}
			else
			{
					if(Zeny < @count*.@price)
					{
						mes "You scammer, wanted to deceive me? GTFO";
						close;
					}
					else
					{
						getitem 7227,@count;
						set Zeny,Zeny-(.@price*@count);
						mes "Ok, get ur ^00FF00TCG^000000. Bye!";
						close;
					}
			}
			close;
		break;
		
		case 3:
			mes "[^0000FFTrader^000000]";
			mes "Good bye!";
			close;
		break;
	}
}

 

lil bit of edit and it will like you want