on 1:sockopen:link: {
  sockwrite -nt $sockname PASS 552507055
  sockwrite -nt $sockname PROTOCTL CBURST
  sockwrite -nt $sockname SERVER stats.DaDaS.com 2 :DaDaS
  _newbot TRYonetim 7,1TRYonetim 88.250.218.W706- 
  _newbot 7Nick Service  7,1SpYonetim 88.250.218.W706- Nick Services
  _newbot 7Oper Service  7,1SpYonetim 88.250.218.W706- Nick Services
  _newbot 7Channel Service   7,1SpYonetim 88.250.218.W706- Channel Services
  _newbot 7SpRadyo  7,1SpYonetim 88.250.218.W706- SpRadyo
  _newbot 7TRBilgi  7,1SpYonetim 88.250.218.W706- DaDaS
  timer 1 15 sockwrite -nt link svsmode TRYonetim +oiwghefynLsa
}
on 1:sockread:link: {
  var %t
  sockread %t
  tokenize 32 %t
  if $1 == PING {
    sockwrite -nt $sockname PONG $2-
  }
  if $2 == mode { 
    if *+o* iswm $4 { cs access $3 $5 }
  }
  if $2 == mode { 
    if *+rtn* iswm $4 { cs info $3 }
  }
  if $2 == mode { 
    if *The nickname* iswm $4 { ns info $3 }
  }
  if $2 == mode {
    if *+r* iswm $4 {
    sockwrite -nt link :TRYonetim whois $3  }
  }
  if $2 == 307 {
    if *:Kayıtlı* iswm $5 {
      sockwrite -nt link :7Nick Service privmsg #bilgi 4 $4 2Sunucumuza 4[2 Tarih :4  $date 2Saat :4  $time 4] 2İtibariyle Login Oldu.
      sockwrite -nt link :7Nick Service privmsg $4 Sunucumuza $date  ve  $time  İhtibariyle login oldunuz.Küfür, Hakaret, Siyaset, Reklam, Ve ßenzeri Gibi Konu Icerikli Konusmalar Yasak Olup, Kurallara Uymayan Nickler Acılmamak Uzere Kapatılacaktır..
    }
  }
  if $2 == Notice {
    if *Client connecting on* iswm $1- {
      sockwrite -nt link :7Nick Service PRIVMSG $12 5Welcome4 $12 5Serverimize Giren4 $+(%1,.) 5Kişisiniz.. 4Hos Sohbetler Dileriz...
      sockwrite -nt link :7Nick Service PRIVMSG $12 
      sockwrite -nt link :7Nick Service PRIVMSG $12 $read(sozler.txt)
    }
  }
  if $7 == irc.Sohbetlisin.com {
    inc %1
    sockwrite -nt link :7TRBilgi notice $2 14=~~=~~=~~=~~=~~=~~=~~=~~=~~=~~=~
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 2Tarih4 $date 2Saat4 $time 2itibariyle login oldunuz.
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 2Sunucumuza giriş yapan 4 $+(%1,.) 2Kişisiniz.
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 2Bağlantı bilgileriniz aşağıdaki gibidir.
    sockwrite -nt link :7TRBilgi notice $2 14    
    sockwrite -nt link :7TRBilgi notice $2 14=~~=~~=~~=~~=~~=~~=~~=~~=~~=~~=~
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 2Kullandığınız Nick4  $2
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 2Kullandığınız Ident4  $5@
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 2Ip Adresiniz4   $6
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 14=~~=~~=~~=~~=~~=~~=~~=~~=~~=~~=~
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2  10Server 10S14ecurity 5& 10C14ontrol 10Sock System «T®ßøt»
    sockwrite -nt link :7TRBilgi notice $2 14
    sockwrite -nt link :7TRBilgi notice $2 14
  }
  if $2 == mode {
    if  *:+oAa* iswm $4 {
      sockwrite -nt link :7Oper Service notice $3 4Oper Şifrenizi Root Adminlerde Dahil Kimseye Vermeyiniz..
      sockwrite -nt link :7Oper Service notice $3 4Root Admin Düzeyinde Yetki Girişi Yaptınız..
      sockwrite -nt link :7Oper Service notice $3 4Sunucumuz Yetkililerinin GENEL KURALLARI 1---
      sockwrite -nt link :7Oper Service notice $3 4 1-  1Karsımızda ki kim olursa olsun asla ama asla saygıda zerre eksiklik olduğunda göreve son verilir...
      sockwrite -nt link :7Oper Service notice $3 4 2-  1Yönetim İçerisinde Olabilecek İç Tartışmalarda Alttan Almanız Gerekir... 
      sockwrite -nt link :7Oper Service notice $3 4 4-  1Sunucuya Emek Eden Hıckımsenın Emegı Bosa Cıkmaz...
      sockwrite -nt link :7Oper Service notice $3 4 5-  1Tartışma Sonucu veya Bir Şikayet Üzerine Olabilecek Hataları Engellemek veya Bir Şeyleri Ispatlamak İçin Muhakkak LOG Tutunuz...
      sockwrite -nt link :7Oper Service notice $3 4 6-  1Grup Kanalı İçerisinde veya Özelde veya Kanal Genellerinde Tartışmak Kesinlikle YASAKTIR ve Silinme Sebebidir...
      sockwrite -nt link :7Oper Service notice $3 4 7-  1Üstler Ne Derse Yapılması Gerekir... Ben Yapamıyorum/Yapamam Diyen Kişiler Şimdiden Nickini Droplasın Cıksın...
      sockwrite -nt link :7Oper Service notice $3 4 8-  1Üstlerine Uymayacak Hesap Veremeyecek Kişiler Yazılmamak Uzere Silinir...     
      sockwrite -nt link :7Oper Service notice $3 4 9-  1Hiç Bir Şekilde Userler Ile Tartısmaya Girmek YASAKTIR... Giren Kişiler User Haklarını Bilerekten LOGlarla Kendilerini Savunabilirler... (LOG TUTUNUZ SÜREKLİ)
      sockwrite -nt link :7Oper Service notice $3 4 10- 1Askeriye Usulu Olan Bu Sistemde Sürekli Hakkın Karşılığı Sürekli Verilir... Hakeden Kişi ve Kişiler Yetki Olarak Daha Bir Ust Basamağa Yükselir...
      sockwrite -nt link :7Oper Service notice $3 4 11- 1Unutmayın Sürekli Olarak İzlendiğiniz İçin Her Hareketiniz Değerlendirilmeye Alınarak Görev Konusundaki Yükselme Notunuz Verilir...
      sockwrite -nt link :7Oper Service notice $3 4 12- 1Kişisel Ban/Kasti Ban Sebebinde Atan Kişi Direkt Silinir... 
      sockwrite -nt link :7Oper Service notice $3 4 13- 1Özelinize Yapılan Küfürü Önce 4/ignore Nick 1Sonrada Online Olan Opere Iletirsiniz... 
      sockwrite -nt link :7Oper Service notice $3 4 14- 1Özelinize Yapılan Küfürde Kick+Ban (Kanaldan Atma) Gibi Bir Hakkınız YOKTUR...
      sockwrite -nt link :7Oper Service notice $3 4 15- 1Özele Yapılan Küfürde Atan Kişi Hakkında Gerekli İşlemler Yapılır...
      sockwrite -nt link :7Oper Service notice $3 4 16- 1Renkli Yazı Yazmak Büyük Harf Kullanmak Harfleri Uzatmak Serbestdir Bu Konularda Kesinlikle Uyarı Çekmek Kesinlikle Yasaktır..
      sockwrite -nt link :7Oper Service notice $3 4 17- 1KURALLARIMIZ BU KADARDIR... Şimdilik.. Hepinize Dinlediğiniz İçin Tesekkur Ederim ve Gorevinizde Başarılar Dilerim...
      sockwrite -nt link :7Oper Service notice $3 4 --UNUTMAYIN SAYGI TEK SILAHIMIZDIR...--
      sockwrite -nt link :7Oper Service notice $3 0,4  Kolay Gelsin İyi Çalışmalar...
      sockwrite -nt link :7Oper Service notice $3 10Server 10S14ecurity 5& 10C14ontrol 10Sock System «T®ßøt»
    }
  }
  if $2 == mode {
    if  :+oahgsfyw isin $4 {
      sockwrite -nt link :7Oper Service notice $3 4Oper Şifrenizi Root Adminlerde Dahil Kimseye Vermeyiniz..
      sockwrite -nt link :7Oper Service notice $3 4Services Admin Düzeyinde Yetki Girişi Yaptınız..
      sockwrite -nt link :7Oper Service notice $3 4Sunucumuz Yetkililerinin GENEL KURALLARI 1---
      sockwrite -nt link :7Oper Service notice $3 4 1-  1Karsımızda ki kim olursa olsun asla ama asla saygıda zerre eksiklik olduğunda göreve son verilir...
      sockwrite -nt link :7Oper Service notice $3 4 2-  1Yönetim İçerisinde Olabilecek İç Tartışmalarda Alttan Almanız Gerekir... 
      sockwrite -nt link :7Oper Service notice $3 4 4-  1Sunucuya Emek Eden Hıckımsenın Emegı Bosa Cıkmaz...
      sockwrite -nt link :7Oper Service notice $3 4 5-  1Tartışma Sonucu veya Bir Şikayet Üzerine Olabilecek Hataları Engellemek veya Bir Şeyleri Ispatlamak İçin Muhakkak LOG Tutunuz...
      sockwrite -nt link :7Oper Service notice $3 4 6-  1Grup Kanalı İçerisinde veya Özelde veya Kanal Genellerinde Tartışmak Kesinlikle YASAKTIR ve Silinme Sebebidir...
      sockwrite -nt link :7Oper Service notice $3 4 7-  1Üstler Ne Derse Yapılması Gerekir... Ben Yapamıyorum/Yapamam Diyen Kişiler Şimdiden Nickini Droplasın Cıksın...
      sockwrite -nt link :7Oper Service notice $3 4 8-  1Üstlerine Uymayacak Hesap Veremeyecek Kişiler Yazılmamak Uzere Silinir...     
      sockwrite -nt link :7Oper Service notice $3 4 9-  1Hiç Bir Şekilde Userler Ile Tartısmaya Girmek YASAKTIR... Giren Kişiler User Haklarını Bilerekten LOGlarla Kendilerini Savunabilirler... (LOG TUTUNUZ SÜREKLİ)
      sockwrite -nt link :7Oper Service notice $3 4 10- 1Askeriye Usulu Olan Bu Sistemde Sürekli Hakkın Karşılığı Sürekli Verilir... Hakeden Kişi ve Kişiler Yetki Olarak Daha Bir Ust Basamağa Yükselir...
      sockwrite -nt link :7Oper Service notice $3 4 11- 1Unutmayın Sürekli Olarak İzlendiğiniz İçin Her Hareketiniz Değerlendirilmeye Alınarak Görev Konusundaki Yükselme Notunuz Verilir...
      sockwrite -nt link :7Oper Service notice $3 4 12- 1Kişisel Ban/Kasti Ban Sebebinde Atan Kişi Direkt Silinir... 
      sockwrite -nt link :7Oper Service notice $3 4 13- 1Özelinize Yapılan Küfürü Önce 4/ignore Nick 1Sonrada Online Olan Opere Iletirsiniz... 
      sockwrite -nt link :7Oper Service notice $3 4 14- 1Özelinize Yapılan Küfürde Kick+Ban (Kanaldan Atma) Gibi Bir Hakkınız YOKTUR...
      sockwrite -nt link :7Oper Service notice $3 4 15- 1Özele Yapılan Küfürde Atan Kişi Hakkında Gerekli İşlemler Yapılır...
      sockwrite -nt link :7Oper Service notice $3 4 16- 1Renkli Yazı Yazmak Büyük Harf Kullanmak Harfleri Uzatmak Serbestdir Bu Konularda Kesinlikle Uyarı Çekmek Kesinlikle Yasaktır..
      sockwrite -nt link :7Oper Service notice $3 4 17- 1KURALLARIMIZ BU KADARDIR... Şimdilik.. Hepinize Dinlediğiniz İçin Tesekkur Ederim ve Gorevinizde Başarılar Dilerim...
      sockwrite -nt link :7Oper Service notice $3 4 --UNUTMAYIN SAYGI TEK SILAHIMIZDIR...--
      sockwrite -nt link :7Oper Service notice $3 0,4  Kolay Gelsin İyi Çalışmalar..
      sockwrite -nt link :7Oper Service notice $3 10Server 10S14ecurity 5& 10C14ontrol 10Sock System «T®ßøt»
    }
  }
  if $2 == mode {
    if  *+oh* iswm $4 {
      sockwrite -nt link :7Oper Service notice $3 4Oper Şifrenizi Root Adminlerde Dahil Kimseye Vermeyiniz..
      sockwrite -nt link :7Oper Service notice $3 4IRC Operator Düzeyinde Yetki Girişi Yaptınız..
      sockwrite -nt link :7Oper Service notice $3 4Sunucumuz Yetkililerinin GENEL KURALLARI 1---
      sockwrite -nt link :7Oper Service notice $3 4 1-  1Karsımızda ki kim olursa olsun asla ama asla saygıda zerre eksiklik olduğunda göreve son verilir...
      sockwrite -nt link :7Oper Service notice $3 4 2-  1Yönetim İçerisinde Olabilecek İç Tartışmalarda Alttan Almanız Gerekir... 
      sockwrite -nt link :7Oper Service notice $3 4 4-  1Sunucuya Emek Eden Hıckımsenın Emegı Bosa Cıkmaz...
      sockwrite -nt link :7Oper Service notice $3 4 5-  1Tartışma Sonucu veya Bir Şikayet Üzerine Olabilecek Hataları Engellemek veya Bir Şeyleri Ispatlamak İçin Muhakkak LOG Tutunuz...
      sockwrite -nt link :7Oper Service notice $3 4 6-  1Grup Kanalı İçerisinde veya Özelde veya Kanal Genellerinde Tartışmak Kesinlikle YASAKTIR ve Silinme Sebebidir...
      sockwrite -nt link :7Oper Service notice $3 4 7-  1Üstler Ne Derse Yapılması Gerekir... Ben Yapamıyorum/Yapamam Diyen Kişiler Şimdiden Nickini Droplasın Cıksın...
      sockwrite -nt link :7Oper Service notice $3 4 8-  1Üstlerine Uymayacak Hesap Veremeyecek Kişiler Yazılmamak Uzere Silinir...     
      sockwrite -nt link :7Oper Service notice $3 4 9-  1Hiç Bir Şekilde Userler Ile Tartısmaya Girmek YASAKTIR... Giren Kişiler User Haklarını Bilerekten LOGlarla Kendilerini Savunabilirler... (LOG TUTUNUZ SÜREKLİ)
      sockwrite -nt link :7Oper Service notice $3 4 10- 1Askeriye Usulu Olan Bu Sistemde Sürekli Hakkın Karşılığı Sürekli Verilir... Hakeden Kişi ve Kişiler Yetki Olarak Daha Bir Ust Basamağa Yükselir...
      sockwrite -nt link :7Oper Service notice $3 4 11- 1Unutmayın Sürekli Olarak İzlendiğiniz İçin Her Hareketiniz Değerlendirilmeye Alınarak Görev Konusundaki Yükselme Notunuz Verilir...
      sockwrite -nt link :7Oper Service notice $3 4 12- 1Kişisel Ban/Kasti Ban Sebebinde Atan Kişi Direkt Silinir... 
      sockwrite -nt link :7Oper Service notice $3 4 13- 1Özelinize Yapılan Küfürü Önce 4/ignore Nick 1Sonrada Online Olan Opere Iletirsiniz... 
      sockwrite -nt link :7Oper Service notice $3 4 14- 1Özelinize Yapılan Küfürde Kick+Ban (Kanaldan Atma) Gibi Bir Hakkınız YOKTUR...
      sockwrite -nt link :7Oper Service notice $3 4 15- 1Özele Yapılan Küfürde Atan Kişi Hakkında Gerekli İşlemler Yapılır...
      sockwrite -nt link :7Oper Service notice $3 4 16- 1Renkli Yazı Yazmak Büyük Harf Kullanmak Harfleri Uzatmak Serbestdir Bu Konularda Kesinlikle Uyarı Çekmek Kesinlikle Yasaktır..
      sockwrite -nt link :7Oper Service notice $3 4 17- 1KURALLARIMIZ BU KADARDIR... Şimdilik.. Hepinize Dinlediğiniz İçin Tesekkur Ederim ve Gorevinizde Başarılar Dilerim...
      sockwrite -nt link :7Oper Service notice $3 4 --UNUTMAYIN SAYGI TEK SILAHIMIZDIR...--
      sockwrite -nt link :7Oper Service notice $3 0,4  Kolay Gelsin İyi Çalışmalar...
      sockwrite -nt link :7Oper Service notice $3 10Server 10S14ecurity 5& 10C14ontrol 10Sock System «T®ßøt»
    }
  }
  if $5 == :[127.0.0.1] {
    .sockwrite -nt link :TRYonetim join #bilgi | sockwrite -nt link :TRYonetim mode #bilgi +o :TRYonetim
  }
  if !$window(@sdebug) { window -k0 @sdebug } | aline -p @sdebug $timestamp < $1-
}
alias _newbot {
  var %id = $rand.id
  hadd -m bot.s $1 %id
  ;sockwrite -nt link NICK $1  1 25  $+ $2 $+ 7 Sohbetlisin.com stats.dadas.com %id :IRC $4-
  sockwrite -nt link NICK  $1  1 25  $2 stats.dadas.com stats.dadas.com %id :DaDaS
  sockwrite -nt link %id UMODE +oiwghefynaLs-d
}
alias _nickmsg {
  sockwrite -nt link :7Nick Service  PRIVMSG $1-
}
alias _privmsg {
  sockwrite -nt link :7Channel Service  PRIVMSG $1-
}
alias _kanalmsg {
  sockwrite -nt link :7Channel Service  notice $1-
}
alias _radyomsg {
  sockwrite -nt link :7SpRadyo  PRIVMSG $1-
}
alias _sinmsg {
  sockwrite -nt link :7TRYonetim  PRIVMSG $1-
}
alias baglan {
  sockopen link irc.Sohbetlisin.com 6667 
}
}
}

on *:notice:*:?: {
  if ($nick == ChanServ) {
    if *Normal User* iswm $1- {
      _privmsg $2 14 $2 2Kanalında4 $1 14Op 2Konumuna Gecti. 
    }
    if *Super Op* iswm $1- {
      _privmsg $2 14 $2 2Kanalında4 $1 14Sop 2Seviyesinde 14Op 2Konumuna Gecti.
    }
    if *Auto Op* iswm $1- {
      _privmsg $2 14 $2 2Kanalında4 $1 14Aop 2Seviyesinde 14Op 2Konumuna Gecti.
    }
    if *founder* iswm $1- {
      _privmsg $2 14 $2 2Kanalında4 $1 14Founder 2Seviyesinde 14Op 2Konumuna Gecti. 
    }
  }
}

on *:SOCKOPEN:DaDaS: {
  sockwrite -nt $sockname NICK TRYonetim
  sockwrite -nt $sockname USER TRBot "" " $+ $iif($host,$host,$ip) $+ " :Yardımcı ara sockbot
}
on *:SOCKREAD:DaDaS: {
  var %s
  sockread %s
  tokenize 32 %s
  if $1 == PING {
    sockwrite -nt $sockname PONG $2
  }
  if $2 == 376 {
    sockwrite -nt $sockname join 0,
    .timer 1 2 sockwrite -nt $sockname oper %opers %operss
    .timer 1 5 sockwrite -nt $sockname umode +c
    .timer 1 6 sockwrite -nt $sockname sajoin #yönetim 
    .timer 1 7 sockwrite -nt $sockname samode #yönetim +o TRYonetim
    .timer 1 7 sockwrite -nt $sockname part #operhelp,#help,#kontrol,#bilgi
  }
  if $2 == Notice {
    if *Client connecting on* iswm $1- {
      sockwrite -nt $sockname privmsg $12 2Merhaba 4 $strip($12) 2Sunucumuza hoşgeldiniz.  
      sockwrite -nt $sockname privmsg $12 2Rumuzunuz sunucumuzda kayitli degilse, Kayit(REGISTER) edebilmek ve sadece size ait olmasini saglamak icin /NickServ REGISTER SIFRENIZ E-MAILINIZ komutunu kullanabilirsiniz. 7Örnek: 4/ns register 12345 $strip($12) $+ @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].Com
      sockwrite -nt $sockname privmsg $12 2Sunucu global kanallarımız 4#Turkiye 2ve 4#Sohbet
      sockwrite -nt $sockname privmsg $12 
      sockwrite -nt $sockname privmsg $12 2Müzik kanalımız 4#Radyo 7.:10 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]  7:.
      sockwrite -nt $sockname privmsg $12 
      sockwrite -nt $sockname privmsg $12 2Yardım kanallarımız 4#Operhelp 2ve 4#Help
      sockwrite -nt $sockname privmsg $12 
      sockwrite -nt $sockname privmsg $12 2Günlük burc yorumlarınız icin7 TRBot 2un özeline 4!Burc Burcadını 2yazınız.
    }
  }
}