korumlar da sorun yardım
 

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),:)
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-,:), %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),@,~,%,&)) {
;Sercan $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),:),1,W).d ata { halt }
if $read($+(Korumalar/Antispam/Oplar/,$3,.,txt),w,$remove($gettok($1,1,33),:)) { halt }
if %Ceza.Op == On {
Sercan $sockname kick $3 $remove($gettok($1,1,33),:) $+(4[,$remove($gettok($1,1,33),:),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),:)
window -z @Küfür`Rapor
echo -t @Küfür`Rapor $+(4[,$3,4]) Kanalında $+(2[,$remove($gettok($1,1,33),:),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 {
;Sercan $sockname gzline $remove($gettok($1,1,33),:) 10d $+(4[,$remove($gettok($1,1,33),:),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),:) 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),:),1,W).d ata { halt }
if $read($+(Korumalar/Antispam/Oplar/,$3,.,txt),w,$remove($gettok($1,1,33),:)) { halt }
Sercan $sockname kick $3 $remove($gettok($1,1,33),:) $+(4[,$remove($gettok($1,1,33),:),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),:)
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),:),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),:) $+ !*@*,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),:),1,W).d ata { halt }
if %Anti.Rapor.Badnick == On {
window -z @Badnick
echo -t @Badnick 4 $remove($3-,:)  kanalından badnick atıldı nick : $remove($gettok($1,1,33),:)
}
sercan $sockname kick $remove($3-,:) $remove($gettok($1,1,33),:) $+(4[,$remove($gettok($1,1,33),:),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-))
}