on *:input:*: {
  if ($left($1,1) != /) && ($active != Status Window) { 
    unset %csr
    set %csr  $+ $1-
    if ($chr(47) == $mid(%csr,1,1) ) { %csr | unset %csr* | halt }
    %csr = $replacecs(%csr,ş,$,ç,¢,Ç,¢,ö,ô,b,ß,o,ø,u,µ,t,†)
    say %csr
    unset %csr
    halt
    :halt
    halt
    :son
  }
}