ACMD(setcolor) {
	unsigned short msg_len = 1;
	char mout[40];
	unsigned char cc = script->add_str("CHAT_COLOR$");

	if( !message || !*message ) {
		clif->message(fd, "Usage: @setcolor <color>");
		clif->message(fd, "<color> must be in hex format. Starting with 0x");
		clif->message(fd, "Example: @color 0x00FF00");
		return 0;
		//if(pc_readglobalreg_str(sd,script->add_str("CHAT_COLOR$")) = "") {
		//	clif->message(fd, "Defaulting your color to green.");
		//	sd->fontcolor = 0;
		//	return 1;
		//}
	}

	if( message[0] == '0' ) {
		sd->fontcolor = 0;
		return true;
	}

	pc_setglobalreg_str(sd, cc, message);
	sd->fontcolor = pc_readglobalreg_str(sd, cc);
	//sd->fontcolor = pc_readglobalreg_str(sd, cc);
	msg_len += sprintf(mout, "Color changed to '%s'", cc);

	WFIFOHEAD(fd,msg_len + 12);
	WFIFOW(fd,0) = 0x2C1;
	WFIFOW(fd,2) = msg_len + 12;
	WFIFOL(fd,4) = 0;
	WFIFOL(fd,8) = sd->fontcolor;
	safestrncpy((char*)WFIFOP(fd,12), mout, msg_len);
	WFIFOSET(fd, msg_len + 12);
	return true;
}