Dumbest Script Ever

#NO_INPUT off

on *:INPUT:*: {
  haltdef
  echo -gse $iif($istok(/ $readini(mirc.ini,text,commandchar),$left($1,1),32),$upper($regsubex($1,/^(\/{1,4})/,)),MSG) Unknown command
}

#NO_INPUT end

; --- :: ---

menu * {
  $replacex($inblock,on,disable,off,enable) input block:inblock
}

alias -l inblock {
  if ($isid) return $group(#NO_INPUT).status
  else {
    $replace($group(#NO_INPUT).status,on,.disable,off,.enable) #NO_INPUT
    echo -gaec i * input block $replace($group(#NO_INPUT).status,on,enabled,off,disabled)
  }
}