on 1:INPUT:*: { 
  if ($left($1,1) == / ) || ($ctrlenter) || ($active == @Bot) { return }
  if ($active == Status Window) { Echo -a %logo2 12 Statusa Birşey Yazamazsınız. | return }
  say $regsubex($1-,/(^| )(.)/g,\1 $replace($upper(\2),e,£)) 
  halt
}

on 1:INPUT:*: { 
  if ($left($1,1) == / ) || ($ctrlenter) || ($active == @Bot) { return }
  if ($active == Status Window) { Echo -a %logo2 12 Statusa Birşey Yazamazsınız. | return }
  say $regsubex($1-,/(^| )(.)/g,\1 $replace($upper(\2),e,£,Q,q)) 
  halt
}