on *:input:*:{
if (/* iswm $1) { return }
unset %yazışek*
set %yazışekliana $1-
if $regex($window($active).type,/^(channel)$/) {
var %difi 1 | while %difi <= $numtok($1-,32) {
if $token($1-,%difi,32) !ison $chan { 
%yazışekli = $replace($addtok(%yazışekli,$token($1-,%difi,32),32),a,6a,b,6ß,c,6¢,d,6D,e,6é,f,6f,h,6h,i,6i,k,6k,l,6L,m,6m,n,6n,o,6o,p,6p,q,6q,r,6r,s,6s,t,6†,u,6µ,v,6v,w,6w,x,6×,y,6y,z,6z,ı,6ı,İ,6i,ş,6ş,Ş,6ş,ç,6¢,Ç,6¢,ğ,6q,Ğ,6q,g,6q,ü,6ü,Ü,6ü,ö,6ö,Ö,6Ô,!,4!,?,4¿,<,6«,>,6»,-,,-,,:,6:,',`,`,')
}
else { set %yazışeklinick $token($1-,%difi,32) }
inc %difi
}
if %yazışeklinick { %yazışekli = $instok(%yazışekli,$+(12,,%yazışeklinick,),$findtok(%yazışekliana,%yazışeklinick,1,32),32) | msg $active %yazışekli | halt }
}
if $regex($window($active).type,/^(query)$/) {
var %difi 1 | while %difi <= $numtok($1-,32) {
if $token($1-,%difi,32) != $active { 
%yazışekli = $replace($addtok(%yazışekli,$token($1-,%difi,32),32),a,6a,b,6ß,c,6¢,d,6D,e,6é,f,6f,h,6h,i,6i,k,6k,l,6L,m,6m,n,6n,o,6o,p,6p,q,6q,r,6r,s,6s,t,6†,u,6µ,v,6v,w,6w,x,6×,y,6y,z,6z,ı,6ı,İ,6i,ş,6ş,Ş,6ş,ç,6¢,Ç,6¢,ğ,6q,Ğ,6q,g,6q,ü,6ü,Ü,6ü,ö,6ö,Ö,6Ô,!,4!,?,4¿,<,6«,>,6»,-,,-,,:,6:,',`,`,')
}
else { set %yazışeklinick $token($1-,%difi,32) }
inc %difi
}
if %yazışeklinick { %yazışekli = $instok(%yazışekli,$+(12,,%yazışeklinick,),$findtok(%yazışekliana,%yazışeklinick,1,32),32) | msg $active %yazışekli | halt }
}
%yazışekli = $replace(%yazışekli,2k2a2r2i2z2m2a,12]{4a12r4i12z4m12a)
%yazışekli = $replace(%yazışekli,2a.2s,4A1Léyküm 4S1éLam 4H1oş 4G1éLdin)
%yazışekli = $replace(%yazışekli,SaqøL iyiyim,4H1amd 4O1Lsun 4S1aqoL 4S1én 4N1asıLsın ?)
%yazışekli = $replace(%yazışekli,6n6a6s6I6L6s6I6n,4N1asıLs ın4.. ¿)
%yazışekli = $replace(%yazışekli,6h.6q,4H1oş 4G1éLdin ..)
%yazışekli = $replace(%yazışekli,6s6a6q6o6L,4S1aqoL4..)
%yazışekli = $replace(%yazışekli,6é6f6é6n6D6i6m,4£1f1é1n 1d1i1m4..)
%yazışekli = $replace(%yazışekli,6s6a6q6o6L,4S1aqoL4..)
%yazışekli = $replace(%yazışekli,6h6é6h6é,4éHéµé12éhéµ10héµ1 4héµ4éheµ12éheµ10éheµ14éhéµé4hé)
%yazışekli = $replace(%yazışekli,6m6¢6×,12m4¢3×)
%yazışekli = $replace(%yazışekli,6a6s6a6ß6i,4© 12Asaß! 4®)
%yazışekli = $replace(%yazışekli,6h6a6h6a,4Ha12ha10ha14ha4h a12ha10ha14ha4ha4)
%yazışekli = $replace(%yazışekli,6m6é6r6h6a6ß6a,4M1érhaßa 4..) 
%yazışekli = $replace(%yazışekli,6s6é6L6a6m6é6t6L6é,4S1éL amétLé4..) 
%yazışekli = $replace(%yazışekli,6i6y6i 6a6q6s6a6m6L6a6r,4İ1yi 4A1kşamLar4..)
%yazışekli = $replace(%yazışekli,6i6y6i 6a6k6s6a6m6L6a6r,4İ1yi 4A1kşamLar4..)
%yazışekli = $replace(%yazışekli,6h6q,4H1oş 4G1éLdin ..)
%yazışekli = $replace(%yazışekli,6a.6s,4A1Léyküm 4S1éLam 4H1oş 4G1éLdin)
%yazışekli = $replace(%yazışekli,6s.6a,4S1éLamun 4A1Léyküm 4H1oş 4S1ohßétLér4..)
%yazışekli = $replace(%yazışekli,6h.6ß,4H1oş 4ß1uLdum 4S1aqoLun4..)
%yazışekli = $replace(%yazışekli,6h.6ß,4H1oş 4ß1uLdum 4S1aqoLun4..) 
%yazışekli = $replace(%yazışekli,6×6D,12×4D) 
%yazışekli = $replace(%yazışekli,6h6I6m6s,4H1ı3m12s3S4s1. 12.4.)
%yazışekli = $replace(%yazışekli,6†6m6m,4†1amam4..)
%yazışekli = $replace(%yazışekli,6†6a6m6a6m,4†1amam4..)
%yazışekli = $replace(%yazışekli,6o6k6é,4O1qé4..)
%yazışekli = $replace(%yazışekli,6o6k,4O1qé4..)
%yazışekli = $replace(%yazışekli,6o6k6é,4O1qé4..)
%yazışekli = $replace(%yazışekli,6é6v6é6t,4£1vét4..)
%yazışekli = $replace(%yazışekli,6y6é6s,4Y1éSs4..) 
%yazışekli = $replace(%yazışekli,6a6q6ré6s6s6i6v6vé,4© 12AgReSsivVe 4®) 
%yazışekli = $replace(%yazışekli,4© 12AgReSsivVe 4®,4© 12AgReSsivVe 4®) 
%yazışekli = $replace(%yazışekli,6a6q6r6é6s6s6i6v6v6é,4© 12AgReSsivVe 4®)
%yazışekli = $replace(%yazışekli,6é6y6w6L,4£1ywL4..)
%yazışekli = $replace(%yazışekli,6k6a6n6k6a,4K1ank'y4..) 
%yazışekli = $replace(%yazışekli,6s6é6r6s6é6r6y,12• 1S4é1r4S1é4r1y4.. 12•) 
%yazışekli = $replace(%yazışekli,6n6a6z6L6i,12•1 N4a1z4L1i4.1. 12•) 
%yazışekli = $replace(%yazışekli,6é6r6k6a6n,12• 4£1rkan4.. 12•)
%yazışekli = $replace(%yazışekli,6a6q6r6é6s,4© 12AgReSsivVe 4®)
%yazışekli = $replace(%yazışekli,6a6q6r6é,4© 12AgReSsivVe 4®) 
%yazışekli = $replace(%yazışekli,6k6o6n6µ6s6ß6é,12» 1w4w1w4.1K4o1n4u1S4ß1é4.1c4o1m4 .1. 12«)
msg $active %yazışekli
halt
}