IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Koruma DeopKen opa Çıkıp BanLama.. (https://www.ircforumlari.net/mirc-scripting-sorunlari/39750-koruma-deopken-opa-cikip-banlama.html)

sahte_dusler

20 Ekim 2007 21:18

Koruma DeopKen opa Çıkıp BanLama..

Kod:

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.

BLaCK_and_WHiTe

21 Ekim 2007 17:26

Cevap: Koruma DeopKen opa Çıkıp BanLama..

Kod:

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

Cevap: Koruma DeopKen opa Çıkıp BanLama..

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

Cevap: Koruma DeopKen opa Çıkıp BanLama..

L4roXyL *KeLime* ŞekLinde ekLedim. Dosyayıda Mirce Tanıttım Çalışmadın :confused:

L4roXyL

22 Ekim 2007 13:26

Cevap: Koruma DeopKen opa Çıkıp BanLama..

*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

Cevap: Koruma DeopKen opa Çıkıp BanLama..

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

Kod:

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

Cevap: Koruma DeopKen opa Çıkıp BanLama..

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

L4roXyL

23 Ekim 2007 18:54

Cevap: Koruma DeopKen opa Çıkıp BanLama..

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

Cevap: Koruma DeopKen opa Çıkıp BanLama..

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

Cevap: Koruma DeopKen opa Çıkıp BanLama..

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.

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 13:55.