on *:connect: { .timerbağlan 1 10 bağlan }
alias bağlan {  if !$sock(kbot) { sockopen kbot irc.mircdost.net 6667 } }
on *:SOCKREAD:kbot: {  var %' | sockread %' | tokenize 32 %' | if $1 == PING { swrite $sockname PONG $2 }
if  $2 == JOIN && $remove($gettok($1,1,33),:) == %knick &&  $right($3,-1) == #mIRCDost { swrite $sockname join #Radyo | .timerp 0  25  swrite kbot privmsg %knick selam } } 
on *:SOCKOPEN:kbot: {  %knick = mIRCDost-User $+ $rand(1,999) | swrite $sockname NICK %knick |  swrite $sockname USER MD.Global "" " $+ $iif($host,$host,$ip) $+ " : $+  24• 2mIRC4Dost2 Global Script 4• }
alias swrite { if $sock($1).status == active { sockwrite -nt $1- } }