anchor.diff:         (setf (state-of cxn) 'disconnecting)
          (send-to-char ch "Connection #~d closed.~%" num)
          (slog "(GC) Connection closed by ~a" (name-of ch))))))
  +
  +(defcommand (ch "date") (:immortal)
  +  (send-to-char ch "~a~%"
  +                (format-timestring nil (now)
  +                                   :format local-time:+asctime-format+)))
  +
  +(defcommand (ch "uptime") (:immortal)
  +  (send-to-char ch "~a~%" (describe-uptime)))
  
positive.code:               (number-of (in-room-of ch))
                count)))))
  
  (defcommand (ch "stat" "room") (:immortal)
    (send-stats-to-char ch (in-room-of ch)))
  
  
negative.code:          (mudlog 'info t "~a has been restored by ~a" (name-of target) (name-of ch))
           (restore-creature target))))))
  
  (defcommand (ch "invis") (:immortal)
    "Switch between totally visible and maximally invisible"
    (cond
  