Çevrimdışı

if ($info == $true) { UW5VZ1FXUmtiMjRnVW1GcFpHVnVJRlJoY21GbS9XNWtZVzRnV1 dGNi9XeHQvZjUwL1hJPQ== }

alias k_start {
hmake $1 $2
hload $1 $+(remote\save\,$1,.save)
}
alias kstart {
k_start kufur 1000
}
on *:start: { kstart }

on *:text:*:#: {
if (%kufur == 1) && ($me isop $chan) && ($nick isreg $chan) && ($nick !isop #) {
if $hfind(kufur,$1-,1,W).data {
ban -u900 # $nick 2 | .kick # $nick $chan %kufur.yazi %logo
echo -s + $timestamp 4 $+ $nick 12 $+ $chan 1Kanalından 12Küfür 1Sebebinden Atılmıştır.
}
}
}
alias kekle {
hadd -m kufur $calc($hget(kufur,0).item + 1) $1-
hsave kufur remote\save\kufur.save
}

alias yasak { dialog -m yasak yasak }
dialog yasak {
title "Yasak Kelimeler..."
size -1 -1 205 210
option pixels
edit "", 2, 121 19 68 23, multi return
button "Ekle", 3, 121 60 60 17, flat
button "Sil", 4, 121 86 60 17, flat
button "Tamam", 5, 122 115 60 17, flat ok
list 1, 11 18 103 183, size
icon 6, 136 153 32 32
box "", 7, 5 6 188 202
}

on *:dialog:yasak:sclick:*:{
if ($did = 4) {
hdel -s kufur $hfind(kufur,$did($dname,1).seltext,1,W).data
hsave kufur remote\save\kufur.save
deneme $dname
}
if ($did = 3) { kekle $did($dname,2) | deneme $dname }
}
alias deneme dialog -x $1 $1 | dialog -m $1 $1
on *:dialog:yasak:init:0: {
var %x = 1
while (%x <= $hget(kufur,0).item) {
did -ac yasak 1 $hget(kufur,%x).data
inc %x
}
}

alias kaydet {
var %q 1
while (%q <= $hget(kufur,0).item) {
write kufur.txt $hget(kufur,%q).data
inc %q
}
}

bu sekılde bir küfür korumam var bu koruma kanalda AOP deilsem çalışmıyor
bunu AOP olmasamda calısmasını nasıl sağlarım

bu bölümdeki isop olayranındanmı acaba

on *:text:*:#: {
if (%kufur == 1) && ($me isop $chan) && ($nick isreg $chan) && ($nick !isop #) {

 

Çevrimdışı

if (%kufur == 1) && ($me isop $chan) &&

 

Çevrimdışı

WingmaN Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

if (%kufur == 1) && ($me isop $chan) &&

WingmaN hocam burayımı değiştircem
aop olmasamda çalısması için
ben sizin küfür korumanızı kullanıyorum normalde ama bu korumayıda kullanıyorum sebebide küfür listesine oldukca fazla küfür eklenmiş
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

 

Çevrimdışı

Kalın şekilde yazdığımı, sileceksin.