stop ();
function lineAdapt () {
	message_send = message;
	while (msg_count<length(message)) {
		msg_count = msg_count+1;
		if ((substring(message_send, msg_count, 2)) eq "\r") {
			message_send = (substring(message_send, 1, msg_count-2)) add "\n" add (substring(message_send, msg_count+2, (length(message_send))-msg_count+2));
		}
	}
	message = message_send;
	delete msg_count;
	delete message_send;
}