Bozkurt- | 28 Aralık 2022 23:13 | İstemediğiniz kelimeleri yazan nicklerin yazdıklarını görmeyin Kod:
on *:TEXT:*:#: {
if ($nick !isreg #) return
var %l = $strip($1-)
if ($hmatch(kotusoz,%l)) {
.echo -a $nick Yasak Listenizdeki Kelimeyi Kullandığı için Yazdıkları Engellendi.
.ignore -c $nick
.write kufurcu.txt $nick
}
}
alias kotusoz {
if ($1 == ekle) && ($regex($2,[A-Za-z])) {
hadd kotusoz $2
echo -a $2 Yasak Kelime Olarak Eklendi.
}
elseif ($1 == sil) {
if ($hfind(kotusoz,$2)) {
hdel kotusoz $2
echo -a $2 Yasak Kelime Listesinden Silindi.
}
else { echo -a $2 Yasak Kelime Listesinde Yok. }
}
elseif ($1 == list) {
var %x = 1
while (%x <= $hget(kotusoz,0).item) {
set %hkotusoz $addtok(%hkotusoz,$hget(kotusoz,%x).item,1)
if ($numtok(%hkotusoz,32) >= 7) { echo -a $replace(%hkotusoz,$chr(1),$+($chr(32),-,$chr(32))) | unset %hkotusoz }
inc %x
}
if ($numtok(%hkotusoz,32) >= 1) { echo -a $replace(%hkotusoz,$chr(1),$+($chr(32),-,$chr(32))) | unset %hkotusoz }
}
}
on *:nick:{ if $read(kufurcu.txt,w,$nick) { echo -a Kufurcu $nick $newnick nickini aldığı için listeye eklendi. | .write kufurcu.txt $newnick | .ignore -c $newnick } }
on *:EXIT: hsave -o kotusoz kotusoz.rmt | ignore -r | remove kufurcu.txt
on *:start: {
hmake kotusoz 1000
if ($exists(kotusoz.rmt)) { hsave -o kotusoz kotusoz.rmt }
hload kotusoz kotusoz.rmt
} Yetkisiz olduğunuz sunucularda kötü söz kullanan kullanıcıların yazdıklarını otomatik olarak engeller. Nicki listeye alır nick değiştirip saldırıya devam ettiğinde otomatik olarak yazdıklarını görmemenizi sağlar.
Mircinizi kapattığınız da nick listesi otomatik olarak temizlenir.
Belirli kısımları düzenleyerek küfür koruması olarak yetkili olduğunuz sunucularda kullanabilirsiniz.
/kotusoz ekle *kelime*
/kotusoz sil *kelime*
/kotusoz list |