Miscellany

on *:input:*:{ 
  if ($1 == .ei) {
    var %x = 1
    while %x <= 20 {
      mode $chan +eI $address($me,%x) $address($me,%x)
      inc %x
    }
  }
  elseif ($1 == -eI) { 
    var %x = 1
    while %x <= 20 {
      mode $chan -eI $address($me,%x) $address($me,%x)
      inc %x
    }
  }
}