## Module for sysfail.irc to have OperView windows. Hopefully it works ok.

assign OPVIEW 0

alias opview {
 if ([$0]==[on]) {
  if ([$OPVIEW]==[0]) {
   ^window new
   ^window size 4
   ^window skip on
   ^window fixed on
   ^window double off
   ^window status "OperView %S "
   ^window level none
   ^window level walls,wallops,opnotes,snotes,userlog1
   ^window goto 2
   ^window level all,-walls,-wallops,-opnotes,-snotes,-userlog1
   secho The OperView Window is on
   ^assign OPVIEW 1
  }{
   secho The OperView Window is already on!
  }
 }{
  if ([$OPVIEW]==[0]) {
   xecho -banner The OperView Window is already off!
  }{
   ^window goto 1
   ^window kill
   ^assign OPVIEW 0
   window level all
   xecho -banner The OperView Window is off
  }
 }
}

xecho -banner Type /opview on to turn on the operview window
xecho -banner Type /opview off to turn off the operview window