Bunu aynen yaptım ama sanırım bir yerde eksik bişey mi yapıyorum anlayamadım. Bu sefer koruma botum küfürlerde Gline de atmamaya başlamıştı, geçici olarak eskiye dönmüştüm. Şu şekilde yapmıştım
PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
## HeRe We Go eh!
bind pubm - "*fuck*" badword
bind pub - "orosp*" badword
bind pub - "orosb*" badword
bind pubm - "irc.*" reklam
bind pubm - "*.com" reklam
bind pubm - "*.c o m" reklam
bind pubm - "*.net" reklam
bind pubm - "*.n e t" reklam
set ZName "Kufur Korumasi]"
set ZZ "-=( ZimoZimo )=-"
set ZBan "4Kufurlu yazilar yazmayin"
set 1ST "\[1st COUNT\]"
set 2ED "\[2ed COUNT\]"
set 3ED "\[3ed COUNT\]"
set Ohh "\[Perm Ban\]"
proc badword {nick host hand chan rest} {
putlog "$nick $hand $chan $host $rest"
global repeat_last repeat_num repeat-badword channel botnick ZBan 1ST 2ED 3ED Ohh ZName ZZ text
if {$hand != "*"} {
if {([ matchattr $hand n ])} {
return 0
}}
if {([ matchattr $hand m ])} {
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :$ZBan"
return 1
} elseif {([matchattr $hand 3])} {
chattr $hand +k
set ZZReason "$ZName Detected $Ohh For $hand"
# newchanban $chan [maskhost $host] $botnick $ZZReason perm
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :$ZBan"
return 1
} elseif {([matchattr $hand 2])} {
chattr $nick +3-2
set 3EDReason "$ZName Detected $3ED For $hand"
# newchanban $chan [maskhost $host] $botnick $3EDReason perm
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :$ZBan"
return 0
} elseif {([matchattr $hand 1])} {
chattr $hand +2-1o
set 2EDReason "$ZName Detected $2ED For $hand"
# newchanban $chan [maskhost $host] $botnick $2EDReason 60
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :$ZBan"
return 1
} elseif {[ matchattr $hand o ]} {
chattr $hand +1
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :$ZBan"
return 1
} {
adduser $nick [maskhost [getchanhost $nick $chan]]
chattr $hand +1-op
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :$ZBan"
return 0
}}
proc reklam {nick host hand chan rest} {
putlog "$nick $hand $chan $host $rest"
global repeat_last repeat_num repeat-reklam channel botnick ZBan 1ST 2ED 3ED Ohh ZName ZZ text
if {$hand != "*"} {
if {([ matchattr $hand n ])} {
return 0
}}
if {([ matchattr $hand m ])} {
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :4Server reklami yasaktir"
return 1
} elseif {([matchattr $hand 3])} {
chattr $hand +k
set ZZReason "$ZName Detected $Ohh For $hand"
# newchanban $chan [maskhost $host] $botnick $ZZReason perm
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :4Server reklami yasaktir"
return 1
} elseif {([matchattr $hand 2])} {
chattr $nick +3-2
set 3EDReason "$ZName Detected $3ED For $hand"
# newchanban $chan [maskhost $host] $botnick $3EDReason perm
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :4Server reklami yasaktir"
return 0
} elseif {([matchattr $hand 1])} {
chattr $hand +2-1o
set 2EDReason "$ZName Detected $2ED For $hand"
# newchanban $chan [maskhost $host] $botnick $2EDReason 60
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :4Server reklami yasaktir"
return 1
} elseif {[ matchattr $hand o ]} {
chattr $hand +1
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :4Server reklami yasaktir"
return 1
} {
# adduser $nick [maskhost [getchanhost $nick $chan]]
# chattr $hand +1-op
PUTSERV "MODE $chan +b $nick"
putserv "GLINE $nick :4Server reklami yasaktir"
return 0
}}
putlog "\[Word|KiCk\] v3.0 By -=( ZimoZimo )=- is Loaded"
Bi yerde hata mı yaptım acaba, anlayamadım