Çevrimdışı

merhaba arkadaşlar ben mümkünse sizden iki kod isteyecektim.

ilki kanalda biri küfür edince onun direk banlanması. Bu küfürleri küfür.txt dosyasından okuyacak bunu ilk seferinde banlıcak
ikincisi ise argo koruması. Bunda da biri argo.txt deki kelimelerden birini kullanınca ilk önce kanalda ona uyarı verecek eğer 10 dakika içinde o kişi tekrar argo.txt deki herhangi bir kelime kullanırsa bu sefer kanaldan banlayacak. Bir de arkadaşlar argo.txt e ve küfür.txt te bota komut vererek kelime eklemek istiyorum. Yardımcı olursanız çok teşekkür ederim. iyi çalışmalar

 

Çevrimdışı

$read(xxxx.txt) ile okutursun;

reklam-küfür-kelime yasaklama konusunu incele lütfen
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

eğer yetersiz gelirse event derslerini incele ;
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

eğer daha fazlasını istersen while döngüsünü incele ve uğraş üzerinde
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

event başlangıcın , on *:text:*:#: {

uğraş ama ciddi anlamda uğraş , yapamadığın yönleri sor.

 

Çevrimdışı

on *:text:*:#: {
if $nick !isop $chan && $nick !ishop $chan && $nick !ison #opers {
if $read(küfür.txt) iswm $1- {
mode # +b $nick
}
}
}


bunu yaptım ama olmadı
------------------------
pardon oldu

 

Çevrimdışı

peki mesela ben eğer opers kanalındayken !kufurekle kufur yazdığım zaman bot bunu kufur.txt dosyasına nasıl ekleyebilir satır olarak? yada ekleyebilirmi?

 

Çevrimdışı

Ekleyebilir.

 

Çevrimdışı

Hımm mIRC scripting için bişiler yapman güzel olmuş, biraz daha dersleri takip etmen gerekiyor.
Txt içindeki kelimeleri eşleştirebilmek için while loop'a ihtiyaç vardır.
Yani, alias içinde bir while döngüsü kurmak istersek;

alias whl { var %< = 1 | while (%< <= $lines(küfür.txt)) {
if $read(küfür.txt,%<) iswm $1- { return $true } | inc %< } }

Şimdi bunu bir text event içinde kullanalım
on *:text:*:#: { if $whl($1-) { ban -ku900 # $nick 2 küfür ettin 5 dakika ban } }

not: whlie döngüsünü merak ediyorsan LeadeR'in while dögüsü için hazırladığı dersi forumumuzun mIRC dersleri bölümünden bakarak öğrenebilirsin.

kodum tamamı:




alias içinde değilde direkt event içinde kullanmak istersek

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on *:text:*:#: {
var %< = 1 | while (%< <= $lines(küfür.txt)) { 
if $read(küfür.txt,%<) iswm $1- {
ban -ku900 # $nick 2 küfür ettin 5 dakika ban  }
inc %< 
} 
}

Bu şekilde oluşuyor
umarım işine yarar.

__________________
TurkSohbet.NET | #XPass

 

Çevrimdışı

ben hala bu kufur.txt icine nasıl kelime eklenir satır satır onu bulamadım write diye bir komut varmış gibi hatırlıyorum ama tam nasıl kullanılıyordu onu çıkaramadım yani nasıl satır ekleyebiliriz?

 

Çevrimdışı

arkadaşlar gözlerimden uykusuzluktan yaş geldi en iyisi sabah erkenden sakin kafayla iş yerinden devam etmek hadi iyi geceler

 

Çevrimdışı

on *:text:!k.ekle &:#opers:write kufur.txt $2

Kullanımı opers kanalında biri !k.ekle salak yazdığı zaman
kufur.txt dosyasına salak kelimesini ekler.
Not: wildcard (*) kullamak isterseniz.
!k.elke *salak* şeklinde yazmanız yeterlidir.

Bu konu hakkında yapman gerekenlerin hepsini ayrıntılı bir biçimde anlattık.
Umarım birazda kendin çabalar birşeyler yapabilirsin.
Kolay gelsin, başarılar.

__________________
TurkSohbet.NET | #XPass

 

Çevrimdışı

hala bulamadım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.