prontera,150,150,4	script	Exchanger	100,{

	// hello guys
	// Is it possible to make a script with the following conditions?
	// this script like skull exchanger
	// -poring coin to TCG
	// -its will give random amount 1k-4k poring coin to exchanger 1 TCG
	// -and this npc will only showup on 13:00,18:00,And 22:00, server time
	///7539 (Poring_Coin)
	///7227 (TCG_Card)

OnClock0214: callsub createCoinRandom;	set .npcStart,1; end;
OnClock1400: set .npcStart,0; end;
OnClock1800: callsub createCoinRandom;	set .npcStart,1; end;
OnClock1900: set .npcStart,0; end;
OnClock2200: callsub createCoinRandom;	set .npcStart,1; end;
OnClock2300: set .npcStart,0; end;

	//=====================================================================
	createCoinRandom:
		set .coinAmount, rand(1000,4000); //Set Random Coin Amount;
		return;
	//====================================================================

	if (.npcStart) //IF OPEN
	{
		mes "[Exhanger]";
		mes "I am exchanging " + .coinAmount + " Poring coins right now for 1 TCG Card.";
		mes "I am exchanging " + .coinAmount + " Right now for 1 TCG Card.";
		next;
		if(select("Make the trade:Walk away")==2)
			close;
		mes "[Exchanger]";
		if(countitem(7539)<.coinAmount)
		{
			mes "You need to bring me " + (.coinAmount - countitem(7538)) + " more Poring Coins before I complete this trade";
			close;
		}
		mes "Here you go, Enjoy";
		delitem 7538,.coinAmount;
		getitem 7227,1;
		close;
	}
	//IF CLOSED.
	mes "[Exchanger]";
	mes "Sorry, I am currently restocking items for opening later.";
	close;
}