Koruma DeopKen opa Çıkıp BanLama.. - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

sahte_dusler · 20 Ekim 2007, 21:18

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

on *:TEXT:*sie*:#: {
if $nick !isop $chan { 
if $me !isop $chan { goto islemoto }
ban -u $+ 900 # $nick 2 | kick # $nick 4# Kanal?nda 4Argo veya küfürlu konu?tu?unuz tespit edildi. | halt
:islemoto 
/msg chanserv op $chan $me
timer 1 2 /ban -u $+ 900 # $nick 2 | kick # $nick kanalinda argo veya kufurlu konustugunuz tespit edildi
timer 1 5 /msg chanserv deop $chan $me
}
}

Bu Kodu Burdan bir arkadaşımız Vermişdi. biriSi kanaLa Sie yazınCa deopKen opa çıkıyor banLıyor ve geri deop oLuyor.
Ben mirc klosörüne bir küfür dosyası hazırlamak istiyorum ve burdaKı küfürLer SöyLenınCede koruma aktif olSun. Yardımcı oLurmuSunuz.

21 Ekim 2007, 17:26

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

on *:TEXT:*sie*:#: {
on *:text:*:#: { var %: $lines(kufur.txt)
  while (%: > 0) { if $read(kufur.txt,%:) iswm $strip($1-) {
      if (desk isin $address) { halt }
      if (admin isin $address) { halt }
      if (oper isin $address) { halt }
      if $nick isop $chan { halt }
      if $me !isop $chan { halt } | | (dmin isin $address($nick,0))  { halt }ban -u $+ 900 # $nick 2 | kick # $nick 4# Kanal?nda 4Argo veya küfürlu konu?tu?unuz tespit edildi. | halt
:islemoto 
/msg chanserv op $chan $me
timer 1 2 /ban -u $+ 900 # $nick 2 | kick # $nick kanalinda argo veya kufurlu konustugunuz tespit edildi
timer 1 5 /msg chanserv deop $chan $me
}
}

sanırım bu çalışır

L4roXyL · 21 Ekim 2007, 17:58

Verdiğim kod'da eğer kanal'da op değilsen ve bir nick bad.txt dosyasındaki kelimelerden herhangi birisini içeren bir cümle kurar ise, kanal'da op olup kullanıcıyı kanaldan banlar ve tekrar deop olursun.
Yalnız eklediğin kelimeler'de dikkatli olmasın wildcards kullandık gördüğün gibi.
Yani; $+(*,$read(bad.txt,%1),*) iswm $1-
Bu kısımda, mesela bad.txt isimli dosyaya ******** kelimesini ekledin diyelim.
Eğer kanal'da ********ler yazılırsa işlev yapıcaktır.
*Kelime* olarak algılar. Tabi bunu kendine göre düzeltebilirsin.
*Kelime[$+(*,$read(bad.txt,%1))] veya Kelime*[$+($read(bad.txt,%1),*)] şeklinde yapabilirsin.

on *:text:*:#: { if $me !isop # { var %1 = 1,%2 = $lines(bad.txt) | while %1 <= %2 { if $+(*,$read(bad.txt,%1),*) iswm $1- { .cs op # $me | ban -k # $nick 2 kullandığınız cümlede yasak kelime: $+($chr(2),$v1,$chr(2)) algılandı. | .cs deop # $me } | inc %1 } } }

İşini görecektir.

sahte_dusler · 22 Ekim 2007, 08:44

L4roXyL *KeLime* ŞekLinde ekLedim. Dosyayıda Mirce Tanıttım Çalışmadın
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

L4roXyL · 22 Ekim 2007, 13:26

*Kelime* şeklinde eklemiyeceksin.
Bad.txt dosyasının içerisine kelimeleri alt alta normal bir şekilde yazıcaksın.

sahte_dusler · 23 Ekim 2007, 14:46

dediğin Şekilde Yapdım Opa Çıkdı Sadece Başka Bir Şey Yapmadı;huh

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

on *:text:*:#: { if $me !isop # { var %1 = 1,%2 = $lines(bad.txt) | while %1 <= %2 { if $+(*,$read(bad.txt,%1),*) iswm $1- { .cs op # $me | /timer 1 1 /mode # +b $nick | /timer 1 2 .cs deop # $me } | inc %1 } } }

Bu ŞekiLe Çevirdim. SaoL.;oki

sahte_dusler · 23 Ekim 2007, 14:48

L4roXyL Peki Bunu Bad nick Veya Flood Korumasına Çevirmemiz Mümkünmü

L4roXyL · 23 Ekim 2007, 18:54

Timer niye kullanıyorsun?
Sana diyorumki, bad.txt içine kelimeleri alt alta ekle başka birşey yapmana gerek yok.

Badnick için;

on *:join:#: { if $me !isop # { var %1 = 1,%2 = $lines(badnick.txt) | while %1 <= %2 { if $+(*,$read(badnick.txt,%1),*) iswm $nick { .cs op # $me | ban -k # $nick 2 rumuzunuz'da $+($chr(2),$v1,$chr(2)) algılandı. | .cs deop # $me } | inc %1 } } }

Flood'dan kastın nedir?
Text flood'mu yoksa, hızlı giriş çıkış gibi birşeymi?

sahte_dusler · 24 Ekim 2007, 14:40

Dediğin Gibi Yapdım. alt alta yazdım. Kelimeyi yazınCa SadeCe opa Çıkdı. aynı anda oLduğu içindir Diye timer kodum;boggled
Flood DerKen mesela 2Sn de alt alta 3CümLe yazarSa BanLaSın Gibi Bir Şey.

L4roXyL · 24 Ekim 2007, 20:25

Verdiğim kod kusursuz çalışmakta.
İkinci sorunun içinse;

on *:text:*:#: { if !$hget(falan) { hmake falan 100 } | else { hinc -mu2 falan $+(#,½,$nick) } | if $hget(falan,$+(#,½,$nick)) >= 3 { ban -k # $nick 2 sebebin } }

Şeklinde bir kod işini görecektir.
Lacivert olarak belirttiğim yer, limit sayısı.
Kırmızı olarak belirttiğim yer ise, saniye sayısı.
Bu kod'a göre 2 saniye içerisinde 3 satır text yazılırsa, işlev yapıcaktır.

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
deopken !op !voice sistemini Çalıştırmak	DenperaS	mIRC Scripting Sorunları	7	23 Haziran 2009 14:32
Deopken !kick Uygulatmak	Muhabbed	mIRC Scripting Sorunları	5	13 Kasım 2007 12:18

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.