Someone

on *:KICK:#: if ( $nick == $me ) inc %kicks 1
}  
on *:INPUT:#: { if ( $1 == .k ) kick $chan $2 $3- ‹ $+ %kicks $+ ›
  if ( $1 == .cb ) mode $chan +b ~c: $+ $2
  if ( $1 == .-cb ) mode $chan -b ~c: $+ $2
  { if ( $1 == .kb ) mode $chan +b $address($2,2)
    if ( $1 == .kb ) kick $chan $2 $3- ‹ $+ %kicks $+ ›
    if ( $1 = .g ) mode $chan +b ~q: $+ $address($2,2)
    if ( $1 = .-g ) mode $chan -b ~q: $+ $address($2,2)
    if ( $1 = .v ) mode $chan +v $$2
    if ( $1 = .-v ) mode $chan -v $$2
    if ( $1 = .h ) mode $chan +h $$2
    if ( $1 = .-h ) mode $chan -h $$2
    if ( $1 = .o ) mode $chan +o $$2
    if ( $1 = .-o ) mode $chan -o $$2
    if ( $1 = .i ) invite $$2 $chan
    if ( $1 = .j ) join $$2
    if ( $1 = .e ) mode $chan +e $address($2,2)
    if ( $1 = .-e ) mode $chan -e $address($2,2)
    if ( $1 = .mode ) mode $chan $$2
    if ( $1 == .iv ) mode $chan +I $address($2,3)
    if ( $1 == .-iv ) mode $chan -I $mask($address($2,3),2)
    if ( $1 = .a ) mode $chan +a $$2
    if ( $1 = .-a ) mode $chan -a $$2
    if ( $1 = .add ) cs access $chan add $$2 $3
    if ( $1 = .rem ) cs access $chan del $$2
     if ( $1 = .unig ) unignore $3
  } 
}