Çevrimdışı

alias opers return opernick şifre
alias botnick return GLOBAL
alias botpass return 142536
alias sunucu return 84.16.253.235 6667

alias bagla {
sockclose botnet
sockopen botnet $sunucu
}
alias kopar {
sockclose botnet
}
alias sw {
if $sock($1).status == active {
sockwrite -nt $1-
}
}
on *:SOCKOPEN:botnet: {
sw $sockname nick $+(Guard,$r(0,999))
sw $sockname USER X " " : $+ $+([,,$botnick,,]) Channel Information System GeceAktif
}
on *:sockread:botnet: {
if !$sock($sockname) { echo -a Baglanti Koptu! | halt }
var %q
sockread %q
tokenize 32 %q
if $1 == PING {
sw $sockname PONG $2
}
if $2 == 376 {
sw $sockname oper $opers
sw $sockname join 0,
sw $sockname nick $botnick
sw $sockname nick $botpass
sw $sockname umode +c
timer 0 1 sw $sockname list
}
if ($2 == 322) {
if ($5 >= 2) { sw $sockname sajoin $4 }
if ($5 == 1) { sw $sockname part $4 }
}
if ($2 == join) {
var %nick $right($token($1,1,33),-1), %chan $right($3,-1)
set %nick [ $+ [ %chan ] ] %nick | sw $sockname privmsg chanserv info %chan
}
if ($2 == notice) {
var %nick $right($token($1,1,33),-1)
if ($regex(%nick,/ChanServ/i)) {
if (*** isin $4) { set %chans $remove($5,) }
if (Kanal Sahibi isin $4-) {
sw $sockname notice %nick [ $+ [ %chans ] ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Kanal Sahibi: $6
}
if (kayıt Tarihi isin $4-) {
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Kayit Tarihi: $6
sw $sockname notice %nick [ $+ [ %chans ] ] %chans
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Kanal Güvenlik Botu : Guard Server Security & Control Socket System v1.0
sw $sockname notice %nick [ $+ [ %chans ] ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
}
if (The channel isin $4-) {
var %chans $remove($6,)
sw $sockname notice %nick [ $+ [ %chans ] ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Girdiginiz %chans Kanali Sunucuya Kayıtlı Degildir.
sw $sockname notice %nick [ $+ [ %chans ] ] %chans
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Kanal Güvenlik Botu : Guard Server Security & Control Socket System v1.0
sw $sockname notice %nick [ $+ [ %chans ] ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
}
}
}
}


Bu Kodun SockBot dan Çıkmasını İstiyorum Yapan Arkadaşa Teşekkür Ederim..

 

Çevrimdışı

cıkmasını istediğin kısım hangisi burada bağlantıdana tut sajoin part oto oper girmeye dek bısuru işlem var socket botun kensını almıssın koymussun buraya cıkacak olan kısım hangisi yada şöyle soralım sana lazım olan nedir

 

Çevrimdışı

if ($2 == 322) {
if ($5 >= 2) { sw $sockname sajoin $4 }
if ($5 == 1) { sw $sockname part $4 }
}
if ($2 == join) {
var %nick $right($token($1,1,33),-1), %chan $right($3,-1)
set %nick [ $+ [ %chan ] ] %nick | sw $sockname privmsg chanserv info %chan
}
if ($2 == notice) {
var %nick $right($token($1,1,33),-1)
if ($regex(%nick,/ChanServ/i)) {
if (*** isin $4) { set %chans $remove($5,) }
if (Kanal Sahibi isin $4-) {
sw $sockname notice %nick [ $+ [ %chans ] ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Kanal Sahibi: $6
}
if (kayıt Tarihi isin $4-) {
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Kayit Tarihi: $6
sw $sockname notice %nick [ $+ [ %chans ] ] %chans
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Kanal Güvenlik Botu : Guard Server Security & Control Socket System v1.0
sw $sockname notice %nick [ $+ [ %chans ] ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
}
if (The channel isin $4-) {
var %chans $remove($6,)
sw $sockname notice %nick [ $+ [ %chans ] ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Girdiginiz %chans Kanali Sunucuya Kayıtlı Degildir.
sw $sockname notice %nick [ $+ [ %chans ] ] %chans
sw $sockname notice %nick [ $+ [ %chans ] ] %chans Kanal Güvenlik Botu : Guard Server Security & Control Socket System v1.0
sw $sockname notice %nick [ $+ [ %chans ] ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
}
}
}
}



Kanal Bilgi Sistemi Lazım Bana

 

Çevrimdışı

/info #kanal yazdığında gelen noticeleri görebilirmiyiz bir örnek oradaki $1 $2 sıralamasını bulmamız lazım socket verileri farklı kod çalışmaz

 

Çevrimdışı

 

Çevrimdışı

Arkadasım SockBot İstemiyorum. Bune Allah Aşkına
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

Bu Kodun SockBot dan Çıkmasını İstiyorum Yapan Arkadaşa Teşekkür Ederim..

Diyince bende yukardaki kod unreal Cr ye göre düzenlenecek sandım.Cr socket kanal bilgi sistemi yazdığım.

 

Çevrimdışı

Ben O Kodu CR De Çalıştırıyorum KOnuyu Nerden Nereye Çektiniz Yapamıyorsanız Hiç Msj Yazmayın


Konu Kapanabilir IF den Hiç Bişe OLmaz Yönetim Denilen Brşey Bile Yok

 

Çevrimdışı

GeceAktif Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Ben O Kodu CR De Çalıştırıyorum KOnuyu Nerden Nereye Çektiniz Yapamıyorsanız Hiç Msj Yazmayın Konu Kapanabilir IF den Hiç Bişe OLmaz Yönetim Denilen Brşey Bile Yok

Derdinizi Açıkça İfade edemiyorsanız Yönetimi veya size Yardım etmeye Çalışan Herhangi birini Suçlamaya Hakkınız Yok.

Daha Önce Açılan Sorunlara Bakarsanız,yönetim varmı yokmu Yardım ediliyormu Edilmiyormu Görürsünüz.Bundan Sonraki Sorununuzda Açık Bir ifade kullanmanızı Tavsiye ederim.
Konu kapatılmıştır.