on *:text:*:?:{
  if (%pm. [ $+ [ $nick ] ] == yes) { 
    .halt
  }
  else { 
    msg $nick If you have no real reason to PM me, Ect asking for world, I suggest you close your PM, So you do not risk getting globaly blacklisted.
  }
}
on *:INPUT:?:{
  set %pm. [ $+ [ $active ] ] yes
}
on *:CLOSE:?:{ 
  unset %pm. $+ $nick
}