|
alias küfürekle {
if !$hget(küfür) {
hmake küfür 100
}
if !$hget(küfür,ler) {
hadd küfür ler $1
}
else {
hadd küfür ler $addtok($hget(küfür,ler),$1,32)
}
}
alias küfürsil {
if $hget(küfür,ler) {
hadd küfür ler $deltok($hget(küfür,ler),$1,32)
}
}
On 1:OPEN:?:*:{
var %. = $numtok($1-,32)
while %. {
if $istok($hget(küfür,ler),$gettok($1-,%.,32),32) {
gline $nick Reklam Koruması
close -m $nick
}
dec %.
}
}
on *:connect:hmake küfür 100 | hload küfür küfür.püf
on *:disconnect:hsave küfür küfür.püf
/küfürekle küfür
/küfürsil küfür
yazarak ekler silebilirsin.
|