|
Tags
|
|
|
|
Author: Admin - Replies: 1 - Views: 6604
|
Güzel Koruma botu için Küfür Koruma Addonu
OPERLOG KANALINDA İŞLEV GORUR !kufur ekle !kufur sil kufur list seklinde komutları
İRCFORUM İRCFORUMLARI LAMERLER FORUM Paylaşım Platformu
[code]on *  tart:{ $iif(!$isfile(kufur.tprk),.write kufur.tprk) | .hmake kufur 100 | .hload kufur kufur.tprk }
on *:text:*:#:{
if $regex(#,/^#operlog$/i) {
if $regex($1,/^[!\.]k[uüÜ]f[uüÜ]r$/Si
|
Author: Admin - Replies: 0 - Views: 6504
|
|
küfür koruması regex|wildcard gelişmiş
Kullanımı:
REGEX eklemek için
/Bw +r (g[o0]g*[Il][e3]\sy[a4]z) zline
silmek için
/Bw -r (g[o0]g*[Il][e3]\sy[a4]z)
WILDCARD eklemek için
/Bw +w *g??gle* kickban
silmek için
/Bw -w *g??gle*
ekleyeceğiniz kelimenin eşleşebileceği bir kayıt varmı kontrol için
/bw ? google
şeklinde kontrol edebilirsiniz.
[code]on *:TEXT:*:#: {
if $me isop $chan {
if
|
Author: Admin - Replies: 0 - Views: 4706
|
|
Küfür koruma addonu küfür.txt belgesine gerekli küfürleri eklerseniz kanalda yazıldığında direk ban atıp kanalı temizler
[code]on *:text:*:#: {
var %tr = 1
var %sr = $lines(küfür.txt)
while (%tr <= %sr) {
if $regex($1-,/ $+ $read(küfür.txt,%tr) $+ /i) {
mode $chan +b $nick
kick $chan $nick Küfür Yasaktır Kullandığınız Zararlı Kelime 4,4 $regml(1-)
temsil
}
inc %tr
}
}
alias temsil {
msg $chan 7
|
Author: Admin - Replies: 0 - Views: 6519
|
İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir!
Kod: on *:TEXT:*:#:{
if ($me isop $chan) {
var %i 1
while $read(kufurler.txt,%i) {
if ($read(kufurler.txt,%i) iswm $remove($1-,$chr(32),*,/,\,.,$chr(44),-,_,!,) { /kick $chan $nick Küfür Etmek Yasaktır! | /mode $chan +b $nick }
inc %i
}
}
}
ziqerim
siqerim
gibi ekleyiniz txt dosyasına
[color=#FF4136][b]Txt Den Okutmal
|
Author: Admin - Replies: 1 - Views: 5979
|
2020 küfür koruması Kırmızı işaretlediğim yere küfürleri aralarında | işaretini kullanarak eklemeniz gerekmekte.
Aktif pencere ve @Koruma penceresinde bildirim ve yapabileceğiniz ceza seçenekleri gözükür. Kod Yazarı : PC-KOPAT
[code]alias kfrlr return (s[iİı]kt[iİı]r|p[iİı]ç(s[iİı]n)*|g[öÖo]t|amc[iİı]k)
on *:text:*:#: {
if $regex(x,$remove($1-,$chr(44),.,!,?,:,$chr(41),  ,/(^|\s) $+ $kfrlr $+ (\s|$)/Si) {
$iif(!$window(@Koruma),window -ne @Koruma)
|
Author: Admin - Replies: 0 - Views: 3789
|
|
Küfür koruma.tcl
[code]#Kick yada oper ise kill mesaji
set bansebebi "Kufur Ettiginiz icin Banlandiniz..!"
# Eger bot oper olup reklam yapanlara gline aticaksa
# bu ayari 1 yapin, aksi takdirde dokunmayin..
set botoper "0"
## Bot oper olucaksa oper username ve sifre
## Dikkat, conf dosyanizda baska bir init-server olmadigindan emin olun
set onick "opernick"
set opass "operpass"
# Kufurler - Eklemek istediginiz kufur varsa asagidan
# ekliyebilirsin
|
