Tekil Mesaj gösterimi
Alt 29 Şubat 2012, 15:27   #1
Çevrimdışı
GeceAktif
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Bu Kodu SockBot dan Çıkartabilirmisiniz ?




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..

 

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet