Unnamed

on ^*:BAN:#: {
  if (%shitlistban) && ($nick == $me) {
    .writeini Sh1tlist.ini shitlist $banmask yes
    //set %shitlistaddress. [ $+ [ %shitlistnick ] ] $banmask
    unset %shitlistban
    unset %shitlistnick
    echo -at 7 $+ $banmask 14is now a Shitlisted host. $Dline
  } 
  var %Chanclean = 1
  var %Chanclean.people = $nick($chan,0)
  while (%Chanclean <= %Chanclean.people) {
    if ($banmask iswm $address($nick($chan, %Chanclean),5)) {
      .timer 1 1 kick $chan $nick Host matches ban $banmask $+ . $kcount
    }
    inc %Chanclean
  }
  if ($nick isop $chan) {
    /echo -t $chan 12¤7 4@7 $+ $nick 12¤ has banned:7 $banmask 
    haltdef
  }
  else { 
    if ($nick ishop $chan) {
      /echo -t $chan 12¤7 3%7 $+ $nick 12¤ has banned:7 $banmask 
      haltdef
    }
    else { 
      if ($nick isvoice $chan) {
        /echo -t $chan 12¤7 10+7 $+ $nick 12¤ has banned:7 $banmask 
        haltdef
      }
      else { 
        if ($nick isreg $chan) {
          /echo -t $chan 12«7 $nick 12» has banned:7 $banmask 
          haltdef
        }
      }
    }
  }
}