;
; (c) Blue Lady <noname@virtual.dyc.edu>, 10/11/99
; All Rights Reserved.  No part of this document can be copied in
; whole or in part without the expressed permission of the author
; in writing.
;

ON INCHAT {
;
;  ********************* Alignment INCHAT part  ********************* 
;
   {
   	"$1" GREPSUB " " & "$2" GREPSUB & " SETPOS" & STRTOATOM EXEC
   } CHATSTR "^;xal ([0-9]+) ([0-9]+)$" GREPSTR IF
}

ON OUTCHAT {
;
;  ********************* Alignment OUTCHAT part  ********************* 
;
   {
   	";xal " POSX ITOA & " " & POSY ITOA & SAY
   	"" CHATSTR =
   } CHATSTR "align" == IF
}