;### Link Conf.
alias -l linkname return sercan.ConferenceRoom.com
alias -l linkpass return sercan
alias -l irchost return irc.sizinserveriniz.com
alias -l ircport return 6667


alias SockServ {
  sockclose SockServ
  sockopen SockServ $irchost $ircport
  echo $color(info) -a :SockServ Açıldı
}
alias SetNick {
  if $sock(SockServ) {
    sockwrite -nt SockServ  $+(:,$1) NICK $2
  }
  else {
    echo $color(info) -at Socket bağlantı hatası
  }
}
;## Sock Code
on *:sockopen:SockServ:{
  sockwrite -tn $sockname PASS $linkpass $+ $crlf $+ $&
    server $linkname  1 Bot Services Agent 
}
on *:sockread:SockServ:{
  if ($sockerr) { echo $color(info) -at Socket botun bağlantısı kesildi. | return }
  sockread %data 
  if PING* iswm %data { sockwrite -tn $sockname PONG $gettok(%data,2,32) | echo -a :pong }

  ;### Gelen verileri echo için. Aktif etmek için aşağı satır başındaki ';' işaretini kaldırın
  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Serv) { window -k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Serv } | aline -p @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Serv $timestamp < %data
}

on 1:sockopen:link: {
sockwrite -nt $sockname PASS (linkpass)
sockwrite -nt $sockname PROTOCTL CBURST
sockwrite -nt $sockname SERVER (server name ) 2 :Fantasy Server
}
on 1:sockread:link: {
var %t
sockread %t
tokenize 32 %t
if $1 == PING {
sockwrite -nt $sockname PONG $2-
}
}
alias baglan { sockopen link irc.serveradı.com port }

on *:text:*:#kontrol:{
if !sockserv isin $1 {
.msg #kontrol 12SockServ Yeniden Sisteme Alınıyor ..
.sockserv
}
}

;### Link Conf.
alias -l linkname return DaDaS.ConferenceRoom.com
alias -l linkpass return Halil
alias -l irchost return irc.Siteadı.Com
alias -l ircport return 6667
 
alias SockServ {
sockclose SockServ
sockopen SockServ $irchost $ircport
echo $color(info) -a :SockServ Açıldı
}
alias SetNick {
if $sock(SockServ) {
sockwrite -nt SockServ $+(:,$1) NICK $2
}
else {
echo $color(info) -at Socket bağlantı hatası
}
}
;## Sock Code
on *:sockopen:SockServ:{
sockwrite -tn $sockname PASS $linkpass $+ $crlf $+ $&
server $linkname 1 Bot Services Agent 
}
on *:sockread:SockServ:{
if ($sockerr) { echo $color(info) -at Socket botun bağlantısı kesildi. | return }
sockread %data 
if PING* iswm %data { sockwrite -tn $sockname PONG $gettok(%data,2,32) | echo -a :pong }
;### Gelen verileri echo için. Aktif etmek için aşağı satır başındaki ';' işaretini kaldırın
;if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Serv) { window -k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Serv } | aline -p @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Serv $timestamp < %data
}

on *:text:!nickdegis*:#kontrol:{ if (!$read(rootlar.txt,w,$nick)) { msg $chan 7 $nick 7Bu Komutu 14Kullanmaya 7Yetkili 14Değilsiniz | return } 
.set %rnick $3 | .ns id $2 | .enable #nickr | .msg $chan $2 12Nick'i 1 %rnick 12Nicki'ne Dönüştürülüyor.. Bekleyiniz... }
#nickr
on *:notice:*:?: { if ($nick == NickServ) { .setnick $2 %rnick | .disable #nickr } }
#nickr off

on *:text:*:#yönetim:{
  if !rootekle isin $1 {
    if $nick == DaDaS {
      .write rootlar.txt $2 | msg #yönetim $2 $+ : 2 Server root administrator yönetici listesine eklendi.
    }
    else { .msg # $nick $+ , Bu komutu yalnızca özel bir client kullanabilir.
    }
  }
}

on *:text:*:#yönetim:{
  if !rootsil isin $1 { 
    if $nick == DaDaS { 
      if $read(rootlar.txt,w,$+($2,*)) { write -dl $+ $readn rootlar.txt
        .msg # $2 $+ : 2 Server root administrator yönetici listesinden cikartildi.
      }
      else {
        .msg # 2Silme işleminde hata! Siz 4 Server Sahibi 2 değilsiniz ya da, 4 $2 2 zaten root listesinde bulunmuyor.
      }
    }
  }
}

on 1:sockopen:link: {
sockwrite -nt $sockname PASS şifre
sockwrite -nt $sockname PROTOCTL CBURST
sockwrite -nt $sockname SERVER stats.sunucuismi.com 2 :Fantasy Server
}
on 1:sockread:link: {
var %t
sockread %t
tokenize 32 %t
if $1 == PING {
sockwrite -nt $sockname PONG $2-
}
if $1 == NICK {
if %nick == $2 {
sockwrite -nt $sockname : $+ $8 NICK %yeninick
unset %yeninick %nick
sockclose $sockname
}
}
}
alias nickdegis {
%nick = $1
%yeninick = $2
sockopen link irc.sunucuismi.com port
}

on 1:sockopen:goemonrenk: {
sockwrite -nt $sockname PASS inadınagoemon 
sockwrite -nt $sockname protoctl cburst 
sockwrite -nt $sockname server stats.goemon.com 2 :Goemon 
echo -a 5Sockserv ile Bağlantı sağlanmaya Çalışılıyor. 
echo -a 5SokcServ e Başarıyla Bağlanıldı.
}
on 1:sockread:goemonrenk: { 
var %t 
sockread %t 
tokenize 32 %t 
if $1 == ping {
sockwrite -nt $sockname pong $2- 
}
}
alias baglan { 
sockopen goemonrenk $sunucu 
}
alias nickal { 
sockwrite -nt goemonrenk svsnick $1 $2
}
alias pasver { 
sockwrite -nt goemonrenk svsmode $1 +osac
}
alias pasal { 
sockwrite -nt goemonrenk svsmode $1 -osach
}
alias kapat { 
sockclose goemonrenk 
echo -a Sockserv RenkLi Nick Kapanmışdır.
}