My inputs from a while ago

on *:INPUT:#: {
  if ($1 == .minv) {
    haltdef  
    set %nicks 1 
    while ( %nicks <= $nick($chan,0) ) { 
      invite $nick($chan,%nicks) $2 
      inc %nicks 
    } 
    unset %nicks 
    halt 
  }
  if ($1 == .calc) {
    haltdef
    set %numbers $iif($left($2,1) == $null, No numbers given., $2-)
    echo -ta ** [CALCULATOR]: %numbers = $bytes($calc($replace(%numbers,k,*1000,m,*1000000,pi,$pi)),bd)
    unset %numbers
  }
  if ($1 == @calc) {
    haltdef
    set %numbers $iif($left($2,1) == $null, No numbers given., $2-)
    msg # ** [CALCULATOR]: %numbers = $bytes($calc($replace(%numbers,k,*1000,m,*1000000,pi,$pi)),bd)
    unset %numbers
  }
  if ($1 == .bad) && ($2 == add) {
    haltdef
    bs badwords $active add $3-
  }
  if ($1 == .bad) && ($2 == del) {
    haltdef
    bs badwords $active del $3-
  }
  if ($1 == .bad) && ($2 == clear) {
    haltdef
    bs badwords $active clear
  }
  if ($1 == .enforce) {
    haltdef
    cs enforce $active $2-
  }
  if ($1 == .amsg) {  
    var %x = 1 
    while (%x <= $chan(0)) { 
      if (($chan(%x) != #svclan)) && (($me isop $chan(%x)) || ($me ishop $chan(%x)))  msg $chan(%x) 4>2>4>2amsg4<2<4<12 $2- 
    inc %x } 
  } 
  if ($1 == .aka) {
    haltdef
    if ($2 ison $active) {
      cs akick # add $address($2,2)
    } 
    else {
      cs akick # add $eval($2-,2)
    } 
  }
  if ($1 == .info) {
    haltdef
    cs info $active $2
  }
  if ($1 == .entrymsg) {
    cs set # entrymsg $2-
  }
  if ($1 == .eI) && (!$2) {
    haltdef
    mode $chan +eeeIII $address($me,9) $me $address($me,2) $address($me,9) $me $address($me,2)
  } 
  if ($2) && ($1 == .eI) {
    haltdef
    mode $chan +eeeIII $address($2,9) $2 $address($2,2) $address($2,9) $2 $address($2,2)
  } 
  if ($2) && ($1 == ,eI) {
    mode $chan -eeeIII $address($2,9) $2 $address($2,2) $address($2,9) $2 $address($2,2)
  }
  if ($1 == .add) || ($1 == .del) || ($1 == .list) {
    haltdef
    cs access $chan $remove($1,.) $2-
  }
  if ($1 == .add) && ($$3 isnum) {
    haltdef
    $iif($3 > 2,    mode $chan $iif($3 == 2,+v-oha) $iif($3 == 3,+v-oha) $iif($3 == 4,+h-voa) $iif($3 isnum 5-9,+o-hva) $iif($3 > 9,+ao-hv) $str($2 $+ $chr(32),5))
  }
  if ($1 == .del) && ($2 ison $chan) {
    haltdef
    mode # -aohv $2 $2 $2 $2
  }
  if ($left($1,1) == + || $left($1,1) == -) {
    haltdef
    mode $chan $eval($1-,2) $iif($2,$2-,$me)
  }
  if ($1 == .u) {
    haltdef
    ns update
  }
  if ($1 == .inv) {
    haltdef
    invite $2 $chan
  }
  if ($1 == .unban) {
    haltdef
    whois $2
    /mode $chan -b $2
    /mode $chan -b $address($2,2)
    ban -r $chan $2
  }
  if ($1 == .topic) {
    haltdef
    msg $chan The topic is: $chan($chan).topic
  }
  if ($1 == .assign) {
    haltdef
    bs assign # $2 
  }
  if ($1 == .unassign) {
    haltdef
    bs unassign #
  }
  if ($1 == .topiclock) {
    haltdef
    cs set # topiclock $2
  }
  if ($1 == .cs) {
    haltdef
    cs $2 # $3-
  }
  if ($1 == .bs) {
    haltdef
    bs $2 # $3-
  }
  if ($1 == .sp) {
    haltdef
    mode # +RntjfmV 2:99 [8j#i10]:10
  }
  if ($1 == .spoff) {
    haltdef
    mode # -RjfmV 2:99 [8j#i10]:10
  }
  if ($1 == .Qkb) {
    haltdef
    mode # +bbb-vhoQ  $2 $address($2,2) $address($2,1) $2 $2 $2
    mode # -Q 
    kick # $2 $3- 
    mode # -Q 
    kick # $2 $3-
  }
  if ($1 == .Qk) {
    mode # -oQ $2
    mode # -Q
    kick # $2 $3-
  }
  if ($1 == .levels) {
    haltdef
    cs levels # set $$2-3
  }
  if ($1 == .ucount) {
    haltdef
    say The user count for $iif($2,$2,#) is $nick($iif($2,$2,#),0)
  }
  if ($1 == .m) {
    haltdef
    mode $chan $eval($2,2)
  }
  if ($1 == .cb) {
    haltdef
    mode $chan +b ~c: $+ $2
  }
  if ($1 == .-cb) {
    haltdef
    mode $chan -b ~c: $+ $2
  }
  if ($1 == .g) {
    haltdef
    mode $chan +b ~q: $+ $eval($2-,2)
  }
  if ($1 == .-g) {
    haltdef
    mode $chan -b ~q: $+ $eval($2-,2)
  }
  if ($1 == .mute) {
    haltdef
    mode $chan -b-vho ~q: $+ $address($2,3) $2 $2 $2
  }
  if ($1 == .unmute) {
    haltdef
    mode $chan -b ~q: $+ $address($2,3)
  }
  if ($1 == .ba) {
    haltdef
    bs bot add $2 $2 $3- $3
  }
  if ($1 == .clear) {
    haltdef
    cs clear # $2-
  }
  if ($1 == .set) {
    haltdef
    cs set # $2-
  } 
  if ($1 == .sj) {
    haltdef
    sajoin $2 # $3-
  }
}