Tekil Mesaj gösterimi
Alt 16 Ocak 2012, 00:15   #5
Çevrimdışı
alii-zerbeststill
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: NoMercy Sorunu?




; Channel Control Bot
on *:SOCKOPEN:chancontrol*: { burayı bulucaksın
log yansıttı kanallar

if $2 == 352 {
sw NoMercy PRIVMSG #opers : $+ %reklamchan reklam botu: Clonelari: $8
sw $sockname WHOIS $8
}

if $2 == 319 {
var %c $right($5-,-1) , %i 1
while %i <= $numtok(%c,32) {
if % [ $+ [ $delprefix($gettok(%c,%i,32)) ] ] {
if $left($gettok(%c,%i,32),1) != $chr(35) {
sw NoMercy PRIVMSG #opers : $+ $delprefix($gettok(%c,%i,32)) reklam botu: Inviter clonelarindan $4 $delprefix($gettok(%c,%i,32)) kanalinda $left($gettok(%c,%i,32),1) olarak tespit edildi.
sw NoMercy PRIVMSG #opers :.kill $4
}
}

elseif *serv !iswm $botfnick($1) {
if *NoMercy* iswm $1- { halt }
if *Cosku-REKLAM* iswm $1- { halt }
sw $sockname PRIVMSG #control :Inviter blok: $botfnick($1) < $+ $4- $+ > %rk
mesajkontrol $botfnick($1) $strip($right($4-,-1))
if $chr(35) isin $strip($right($4-,-1)) && $botfnick($1) != oyun && !$oyunnick($botfnick($1)) {
var %rk $strip($right($4-,-1))
sw $sockname PRIVMSG #control :Yogun Inviter blok: < $+ $1- $+ > %rk
var %i 1
while %i <= $numtok(%rk,32) {
if $left($gettok(%rk,%i,32),1) == $chr(35) {
set -u15 % [ $+ [ $gettok(%rk,%i,32) ] ] 1
set %reklamchan $gettok(%rk,%i,32)
}
inc %i
}
set %reklamsock $sockname
sw NoMercy USERHOST $botfnick($1)
killnick $botfnick($1)
}
}
}
}
}

burdakı kodlarda yansıttı loglar kanalları kendıne gore ayarlarsın ama senın ıstedın yansıtıcak loglar neler onu tam acıklarsan

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan