|
Med Cezir Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. |
CR de bunu normal socket botlarla yapamazsın, bunu yapabilmek için önce link kurman, sonra linkli socket botlar servera sokman ve bu botlardan gelen verilere görede derlemen gerekir. Elinde bu tarz bir bot olması gerekir ve bu bota göre kodlar yazılması. Senin istediğin sanırım sıfırdan bir botki buradan bu tarz paylaşımlar kişiye özel istekle yapılmıyor. |
Hayır hocam socklink kullanıyorum şuanda zaten fakat buna istediğim kodları yaparsanız size çok minnettar olurum..
Kullandığım Socklink:
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on 1:sockopen:link: {
sockwrite -nt $sockname PASS 552507055
sockwrite -nt $sockname PROTOCTL CBURST
sockwrite -nt $sockname SERVER stats.asrin.com 2 :asrin.com
_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- ASRIN
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(@
[Ü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-
}
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
}
}
}
Kod:
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.
}
}
}