RAWR!

menu nicklist {
  -
  [PM Blocker] %pmblockstatus
  ;  .[Status] %pmblockstatus
  ;  .-
  .Accept PMs: unset %pmblock | set %pmblockstatus Accepting PMs | echo -a 9,1  $+(-,$me,-) Now accepting PMs
  .Block PMs: set %pmblock 1 | set %pmblockstatus Blocking PMs | echo -a 4,1  $+(-,$me,-) Now blocking PMs
}
on *:TEXT:!OPEN*:#: {
  if (%pmblock) { 
    .msg $nick I am currently not accepting private messages. Please try again later or use ingame ticket system.
    echo -a 4,1 &#8226;&#8226;&#8226; $timestamp < $+ $nick $+ > tried to PM you. Attempt blocked.
    halt 
  } 
}
on TEXT:exit:{
  unset %pmblock
  set %pmblockstatus Accepting PMs
}