Stuff

on *:INPUT:#: { 
  if ($left($1,1) != $readini(mirc.ini, text, commandchar)) {
    msg $target $upper($left($1,1)) $+ $right($1,$calc($len($1)-1)) $2- | haltdef 
    %chk = $1-
    %chk = $replace(%chk,<3,4<3)
    %chk = $replace(%chk,xd,xD)
    say %chk | unset %chk | halt  
  }
  elseif ($1 = .i) { invite $$2 # }
  elseif ($1 = +Q) { mode $chan +Q }
  elseif ($1 = -Q) { mode $chan -Q }
  elseif ($1 = +m) { mode $chan +m }
  elseif ($1 = -m) { mode $chan -m }
  elseif ($1 = .k) { kick $chan $2 }
  elseif ($1 = .kb) { 
    mode # -o-a-h $2 $2 $2  
    mode # -eI $address($2,2) $address($2,3) 
    mode # +bb-Q $address($2,2) $2 
    inc %kbs
    kick $chan $2 $3- ( %kbs )  
  }
  elseif ($1 = .ub) { mode $chan -b $address($me,2) }
  elseif ($1 = +i) { mode $chan +i }
  elseif ($1 = -i) { mode $chan -i }
  elseif ($1 == .add) && ($3 isnum) { 
    cs access # add $2 $3   
  mode # $iif($3 == 3,+v) $iif($3 == 4,+h-v) $iif($3 isnum 5-9,+o-hv) $iif($3 > 9,+ao-hv) $str($2 $+ $chr(32),5) }
  elseif ($1 = .del) {
  cs access # del $2 | mode $chan -a-h-v-o $2 $2 $2 $2 }
  elseif ($1 == .ign) { ignore $address($2,3) | msg $2 2[14Ignore2] $address($2,2) 14added to Auto-Ignore list. }
  elseif ($1 == .-ign) { ignore -r $address($2,3) | msg $2 2[14Ignore2] $address($2,2) 14removed from Auto-Ignore list. }
  elseif ($1 == .ignl) { ignore -l }
  elseif ($1 == .load) { /run www.tribalwars.nl }
  elseif ($left($1,1) == ~) { nick Bazjah $+ $1 }

}