#!/bin/csh

while 1
   set u=bbs
   foreach i ( `finger -s $u|grep $u|awk '{print "tty"$3}'` )
     write $u $i < MESGFILE
   end
   sleep 10
end
