#msg on
on +1:TEXT:*:?:{
  /timer 1 60 /close -m $nick
  /write msg.log  < $+ $adate $time $+ > < $+ $nick $+ >< $+ $address $+> - - $1-
}
on +1:open:?:{
  /timer 1 60 /close -m $nick
  if ($window(@msg) == $null) { /window @msg  5 138 605 112 @msg Arial Narrow 18 }
  /aline @msg 8,3 $time $nick $1-
}
#msg end
menu menubar { 
  Answering
  . Away:/set %gen $?"AwayReason"= | /away10,10k 5,10-= Auto-Reply =- 10,11 %gen  5,10 ( Msg On )10,10o
  .MsgOn:/enable #msg
  .MsgOff:/disable #msg | /away
}