Anonymous

on *:TEXT:!info*:#: {
  set %w $chan
  whois $2
}
raw 319:*:{
  if (%w) {
    noop $regex($3,/\b(#.+?)\b/)
    var %in $regml(1)
    if (!$regml(1)) var %re $3 isnt in $2
  else {   
    var %s $left(%in,1)
    if (%s == #) { var %s2 Is reg }
    if (%s == +) { var %s2 Is voice }
    if (%s == %) { var $s2 Is halfop }
    if (%s == @) { var $s2 Is op }
    var %re $2 Is in $3 and %s2
}
    msg $chan %re
  }
}