alias _replet { return $replace($1-,a,$+(a,$chr(32)),b,$+(b,$chr(32)),c,$+(c,$chr(32)),d,$+(d,$chr(32)),e,$+(e,$chr(32)),f,$+(f,$chr(32)),g,$+(g,$chr(32)),ç,$+(ç,$chr(32)),ğ,$+(ğ,$chr(32)),h,$+(h,$chr(32)),ı,$+(ı,$chr(32)),i,$+(i,$chr(32)),j,$+(j,$chr(32)),k,$+(k,$chr(32)),l,$+(l,$chr(32)),m,$+(m,$chr(32)),n,$+(n,$chr(32)),o,$+(o,$chr(32)),ö,$+(ö,$chr(32)),p,$+(p,$chr(32)),r,$+(r,$chr(32)),s,$+(s,$chr(32)),ş,$+(ş,$chr(32)),t,$+(t,$chr(32)),u,$+(u,$chr(32)),ü,$+(ü,$chr(32)),v,$+(v,$chr(32)),y,$+(y,$chr(32)),z,$+(z,$chr(32)),x,$+(x,$chr(32)),w,$+(w,$chr(32)),q,$+(q,$chr(32))) }
on *:input:*: {
  msg $active $_replet($1-)
  halt
}