on ^&*:text:*:*:{  
  var %text = $mid($rawbytes, $calc($pos($rawbytes, $chr(32), 3) + 2))  
  if (!$isutf(%text)) {  
   echo -mbflirt $iif(#, #, $nick) $+(<, $left($nick(#, $nick, a, r).pnick, 1), $nick, >) $turkish(%text)  
   haltdef  
  }  
 }  
 alias turkish $iif($isid, return, echo -a) $utfdecode($utfencode($1-, 162))  
 raw 332:*:echo -ta 7Topic is $+(',$chr(15),$turkish($3-),$chr(3),7,',) | halt   
 raw 333:*:echo -ta 7Set by $3 $asctime($4) | halt   
 raw 372:*:echo -ts $turkish($2-) | halt  
 on ^*:notice:*:*:echo 5 -tes $+(-,$nick,-) $turkish($1-) | halt