Code:
on *:TEXT:*:?:if ($away) { write messages.txt From: $nick - $1- | close -m $nick }