on 1:INPUT:*: { 
if ( $left($1,1) == / ) { goto son } 
if ($ctrlenter) { goto son } 
if ($active == Status Window) { Echo -a Statusa Birşey Yazamazsınız. | goto halt } 
set %Var3 $1- 
unset %Var1 %Var2 
set %Var1 1 | set %Var2 $upper($mid(%Var3,1,1)) 
if ($mid(%Var3,1,1) == $chr(47)) { goto ServerCommand } 
if ($len(%Var3) == 1) { set %Var2 $upper(%Var2) | say %Var2 | halt } 
:Start1 
inc %Var1 1 
if ($mid(%Var3,%Var1,1) != $chr(32)) { set %Var2 %Var2 $+ $mid(%Var3,%Var1,1) | if ($len(%Var3) < %Var1) { goto Start1 } } 
if ($mid(%Var3,%Var1,1) == $chr(32)) { set %Var2 %Var2 $+ $upper($mid(%Var3,%Var1,2)) | inc %Var1 1 | if ($len(%Var3) < %Var1) { goto Start1 } } 
if ($len(%Var3) != %Var1) { goto Start1 } 
say %Var2 
halt 
:ServerCommand 
:halt 
halt 
:son 
}