prontera,108,235,6	script	Exchange NPC	94,{
	if(countitem($@token) < 1) goto no_token;
	mes "[Exchange NPC]";
	mes "Hello, I see you have a Token. Would you";
	mes "like to exchange it for 10,000 Cash Points?";
	next;
	if (select("Yes Please:Nah") == 2) {
		no_token:
		mes "[Exchange NPC]";
		mes "Have a nice day... >.>";
		close;
	}
	mes "[Exchange NPC]";
	if(countitem($@token) < 1) goto no_token;
	mes "There you go!";
	delitem $@token, 1;
	set #CASHPOINTS, #CASHPOINTS + $@cash;
	close;
	
OnInit:
set $@token, 501;
set $@cash, 10000;
}