Çevrimdışı

söyle bir sorum olacak inş. dogruı yere konuyu acmışmdır benim korumalarım opa cıkmadan calışmıyor acaba op da olmadanda calışabilirmi ve nasıl tşkler bir örnek kod vereyim örnek bu kodda opa cıkmadan korumalar calışmıyor bunu nasıl opa cıkmadanda nasıl aktif edebiirim tşkler kolay gelsin
alias bağlat if !$sock(Antispam) { sockopen Antispam %Anti.server %Anti.port }
alias kop if $sock(Antispam) { sockclose Anti* | set %Anti.Connect off }
alias Sercan if $sock($1).status == active { sockwrite -nt $1- }
on *:SOCKOPEN:Antispam: {
Sercan $sockname NICK %Anti.nick
Sercan $sockname USER $decode("=C0`) "" " $+ $iif($host,$host,$ip) $+ " : $+ $decode("0GD`) $+(4[,$me,4])
}
var %Text $right($strip($4-),-1)
var %Nick $remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

var %Chan $3
on *:SOCKREAD:Antispam: {
var %IrCbaStarD
sockread %IrCbaStarD
tokenize 32 %IrCbaStarD
if %Anti.Koruma.rapor == ON {
window -z @Anti
echo @Anti %IrCbaStarD
}
if $1 == PING {
Sercan $sockname PONG $2
}
if $2 == 353 {
var %i 1, %x $remove($6-,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
, %t $+(Korumalar/Antispam/Oplar/,$5,.,txt)
while %i <= $numtok(%x,32) {
if *@* iswm $gettok(%x,%i,32) || *%* iswm $gettok(%x,%i,32) || *&* iswm $gettok(%x,%i,32) || *~* iswm $gettok(%x,%i,32) && !$read(%t,w,$remove($gettok(%x,%i,32),@,~,%,&)) {

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ercan $sockname Privmsg #X : $remove($gettok(%x,%i,32),@,~,%,&)
write %t $remove($gettok(%x,%i,32),@,~,%,&)
}
inc %i
}
}
if $2 == 376 {
if $dialog(Korumlar) {
did -b Korumalar 22,23
}
set %Anti.bağlantı On
did -b Korumalar 22,23,24,25,26,27,29,30,31,32,51,52
if %Operconnect == On { Sercan $sockname Oper %Anti.oper %Anti.oper.pass | Sercan $sockname identify %Anti.nick.pass }
if %Opconnect == On { Sercan $sockname identify %Anti.nick.pass }
set %Anti.Connect on
did -ra Korumalar 29 Durum : Anti spam bot bağlandı
if (%Anti.part.p == On) { Sercan $sockname join %Anti.join }
}
if $2 == Privmsg {
if (%Anti.Koruma.Küfür == On) && $hfind(küfür,$right($strip($4-),-1),1,W).data {
if $hfind(Küfürmuaf,$3,1,W).data { halt }
if $hfind(Kanalmuaf,$3,1,W).data { halt }
if $hfind(Muafnick,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,1,W).d ata { halt }
if $read($+(Korumalar/Antispam/Oplar/,$3,.,txt),w,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) { halt }
if %Ceza.Op == On {
Sercan $sockname kick $3 $remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
$+(4[,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,4]) %Küfürsebeb 4[ $time 4] 4[ $date 4] $+(12[,%Anti.nick,12]) 14[ %bansay 14] 2[Anti spam bot!2]
sercan $sockname mode $3 +b $remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

window -z @Küfür`Rapor
echo -t @Küfür`Rapor $+(4[,$3,4]) Kanalında $+(2[,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,2]) Küfürden kanaldan atıldı.
echo -t @Küfür`Rapor Ettiği küfür $+(4[,$right($strip($4-),-1),4]) Takılan kelimesi : $+(4[,$hget(küfür,$hfind(küfür,$right($strip($4-),-1),1,W).data),4])
}
if %Ceza.Oper == On {

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ercan $sockname gzline $remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
10d $+(4[,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,4]) %Küfürsebeb 4[ $time 4] 4[ $date 4] $+(12[,%Anti.nick,12]) 14[ %bansay 14] 2[Anti spam bot!2]
window -z @Gzline
echo -t @Gzline Nick : $remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Ceza : Gzline Sebeb : $+(4[,$hget(küfür,$hfind(küfür,$right($strip($4-),-1),1,W).data),4])
}
}
if (%Anti.Koruma.Reklam == On) && $hfind(Reklam,$right($strip($4-),-1),1,W).data {
if $hfind(Reklammuaf,$3,1,W).data { halt }
if $hfind(Kanalmuaf,$3,1,W).data { halt }
if $hfind(Muafnick,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,1,W).d ata { halt }
if $read($+(Korumalar/Antispam/Oplar/,$3,.,txt),w,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) { halt }
Sercan $sockname kick $3 $remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
$+(4[,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,4]) %Reklamsebeb 4[ $time 4] 4[ $date 4] $+(12[,%Anti.nick,12]) 14[ %bansay 14] 2[Anti spam bot!2]
sercan $sockname mode $3 +b $remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

if %Anti.Koruma.reklam.rapor == on {
window -z @Reklam`Rapor
echo -t @Reklam`Rapor $+(4[,$3,4]) Kanalında $+(2[,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,2]) Reklamdan kanaldan atıldı.
echo -t @Reklam`Rapor Yaptıgı reklam $+(4[,$right($strip($4-),-1),4]) Takılan kelimesi : $+(4[,$hget(Reklam,$hfind(Reklam,$right($strip($4-),-1),1,W).data),4])
}
}
}
if $2 == Join {
if (%Anti.Koruma.badnick == On) $hfind(Badnick,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
$+ !*@*,1,W).data {
if $hfind(Kanalmuaf,$3,1,W).data { halt }
if $hfind(Badnickmuaf,$3,1,W).data { halt }
if $hfind(Muafnick,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,1,W).d ata { halt }
if %Anti.Rapor.Badnick == On {
window -z @Badnick
echo -t @Badnick 4 $remove($3-,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 kanalından badnick atıldı nick : $remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

}
sercan $sockname kick $remove($3-,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
$+(4[,$remove($gettok($1,1,33),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,4]) %badnicksebeb 4[ $time 4] 4[ $date 4] $+(12[,%Anti.nick,12]) 14[ %bansay 14] 2[Anti spam bot!2]
}
}
}
on *:Exit:{
.echo $findfile(Korumalar\Antispam\Oplar,*.txt,0,remove $shortfn($1-))
}