;;;;;; First, gag annoying redef messages.  To turn them back on for debugging,
;;;;;; /undef redef_gag.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
/def -i -ag -p100000 -h'REDEF' redef_gag
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;; Load the other files.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
/load -q local/vmode_echo.tf
/load -q local/alias.tf
/load -q local/loop.tf
/load -q local/dot.tf
/load -q local/watch.tf
/load -q local/kbbind.tf
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;; Some general purpose shortcuts.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
/def -i co = /color_on
/def -i cf = /color_off
/def -i mo = /more on
/def -i mf = /more off
/def -i qo = /lpquote on
/def -i qf = /lpquote off
/def -i vo = /visual on
/def -i vf = /visual off
/def -i lsock = /listsockets
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;; Improved /addworld.
;;;;;;; /addworld2 <-T[type]> [name]<:shortname]> <char> <pass> [address] <port>
;;;;;;; This sets up the world, as well as macros '/co[shortname]' to connect
;;;;;;; and '/fg[shortname]' to foreground the world.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
/def -i addworld2 = \
   /test getopts("T:")%; \
   /test regmatch("([A-Za-z0-9_-]*):([a-z0-9]*)", {1})%; \
   /addworld -T%{opt_T} %{P1} %{-1}%; \
   /def -i co%{P2} = /connect %P1%; \
   /def -i %P2 = /fg %P1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;; Improved MAIL hook.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
/def -i -F -hMAIL mail_hook = \
   /sys mail -H | egrep "N( )+[0-9]+"%; \
   /sys frm -S | egrep "You have+"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;; Standard settings.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
/lpquote off
/more on
/quitdone off
/visual on
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;