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
