on *:start:boty
alias boty $iif(!$sock(bot),sockopen bot serverismi 6667)
on *:sockopen:bot:{
  if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. }
  else {
    swbot nick botnicki
    swbot USER botiden* * :botfullname
    sockmark $sockname botnick
  }
}
on *:sockread:bot:{
  if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. }
  else {
    var %; | sockread %; | tokenize 32 %;
    $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]bug),window -k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]bug)
    aline -p @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]bug $timestamp < $1-
    swalias $1-
  }
}
alias swbot { if $sock(bot) { sockwrite -n bot $1- } }
alias swalias {
  if $sock(bot) {
    var %: = echo $color(info) -st > Socket bot:
    if :
VERSION
 iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION mIRC v6.17 Khaled Mardam-Bey $+ $chr(1) }
    elseif :
FINGER
 iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER guARdiANof[THE]Light $+ $chr(1) }
    elseif $1 == PING { swbot PONG $2- }
    elseif $2 == 474 { %: $4 kanalında banlı. }
    elseif $2 == 366 { %: $4 kanalına girdi.  }
    elseif $2 == JOIN {
      if $read(badnick.txt,w,$gettok($gettok($1,1,33),1,58)) {
        swbot kick $right($3,-1) $gettok($gettok($1,1,33),1,58) Badnick
        swbot mode $right($3,-1) +b $gettok($gettok($1,1,33),1,58)
      }
    }
    elseif $2 == KICK && $4 == $sock(bot).mark { %: $3 kanalından %n tarafından kicklendi. $+($chr(40),$right($5-,-1),$chr(41)) | swbot JOIN $3 }
    elseif $2 == PRIVMSG {
      var %n = $gettok($gettok($1,1,33),1,58), %m = $right($4-,-1), %k = $3
      if $istok(nick1 nick2 nick3,%n,32) {
        if .hop == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< | swbot JOIN %< }
        elseif .part == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< }
        elseif .join #* iswm %m { swbot JOIN $gettok(%m,2-,32) }
      }
    }
  }
}