Realban

on *:TEXT:!real *:#:{
  if ($nick isop $chan || $nick ishop $chan) {
    set %realchan $chan
    set %banreason $iif($3,$3-,Banned)
    .enable #real
    whois $2
  }
}

#real off
raw *:*:{
  haltdef
  if ($numeric == 311) {
    mode %realchan +b ~r: $+ $replace($6-,$chr(32),_)
    kick %realchan $2 %banreason
  }
  elseif ($numeric == 318) {
    .disable #real
  }
}
#real end

on *:TEXT:!dereal *:#:{
  if ($nick isop $chan || $nick ishop $chan) {
    set %derealchan $chan
    .enable #dereal
    whois $2
  }
}
#dereal off
raw *:*:{
  haltdef
  if ($numeric == 311) {
    mode %realchan -b ~r: $+ $replace($6-,$chr(32),_)
  }
  elseif ($numeric == 318) {
    .disable #dereal
  }
}
#dereal end