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

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

- - Flood (https://www.ircforumlari.net/mirc-scripting-sorunlari/45862-flood.html)

Flood da Kanalı 20 Saniyelik +m Yapacak Icindeki Temizleyi Uygulayacak Ve Kanal Guvenlik Amacli 20 Saniyeline +m ye alinmistir diye Yazip 20 Saniye Sonra -m Ye Alip Kanal Konusmaya acilmistir.. Diye ßir Cod Arkadaslar Varmi Sizde ?

Bendeki Kod a Ufak Bir Değişiklik Yaptım Umarım İşini Görür..

PHP- Kodu:

   #text on
on @*:text:*:#: {  
  if *admin* iswm $address($nick,5) { halt }
  if *global* iswm $address($nick,5) { halt }
  if *helper* iswm $address($nick,5) { halt }
  if $nick isop $chan { halt }
  if $nick ishop $chan { halt }  
  set -u3 %fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] $calc( %fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] + 1) 
  if (%fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] == 2)  { 
    .notice $nick 14,1 UYARI! :1,0 Çok Hızlı Yazıyorsun 4 2 14Saniyede4 %fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] 14  satır kullandınız.    
  }    
  if (%fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] >= 3)  {
    kick # $nick Flood Yapma!!  
    /mode  #  +m 
    /msg # Kanal Güvenlik Amacıyla 20 Saniye Konusmaya Kapatılmıstır.. 
    /timer 10 1 /msg # . 
    /timer 1 20 /mode # -m 
    /timer 1 21 /msg # Kanal Konuşmaya Açılmıştır Hoş Sohbetler..       
    /timer 1 22 /timers off
  }
}  
#text end

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

istediğin buysa tamamdır..

Kodda Sorun Yok demi ?

Alıntı:

MoRtaL_ Nickli Üyeden Alıntı (Mesaj 318072)

Kodda Sorun Yok demi ?

Kod'u dene sorun varsa söyle.
Denemeden bilemezsin değilmi?

Denedim Hata Var Ondan Sordum ßirde ßuna ßendeki Temizle.mrc'yi Okutabilirmiyiz ?

Şöyle birşey işini görür.

alias -l fld { hinc $+(-mu,$1) fld $+($3,½,$4,$encode($5)) 1 | if ($hget(fld,$+($3,½,$4,$encode($5))) >= $2) return $true | else return $false }
alias temizle var %t 1 | while %t <= $lines(temizle.mrc) { msg $1 $read(temizle.mrc,%t) | inc %t }
on @*:text:*:#: { if $nick isreg # && $fld(10,3,#,$nick,$1-) { ban -k # $nick 2 sebeb. | mode # +m | temizle # | msg # Kanal güvenlik amaçlı 20 sn vs. | if !$timer($+(#,½,fld)) { $+(.timer,½,#) 1 20 mode # -m | .timer 1 21 msg # Kanal açıldı. } } }

/fld alias'ının kullanımı; $fld(saniye,limit,#kanal,text-own,mesaj)
Ben örnek olarak; 10 saniye içerisin'de, aynı text 3 defa tekrar edilirse, gördüğün işlevleri sırası ile gerçekleştirir.

Eğer aynı yazının tekrar'ı değilde, belirlediğim saniye içerisin'de belirlediğim satır limit'i aşılırsa(hızlı text) işlev yapmak istiyorum diyorsan;
/fld alias'ını aşşağıdaki şekilde değiştir;

alias -l fld { hinc $+(-mu,$1) fld $+($3,½,$4) 1 | if ($hget(fld,$+($3,½,$4)) >= $2) return $true | else return $false }

Ve kullanım şeklini verdiğim şekilde yap; $fld(saniye,limit,#kanal,text-own)
Örneğin; $fld(10,5,#,$nick)
10 saniye içerisinde, 5 satır text gönderen'e işlev yapar. Kanal'ı temizler vs.

<bLack> aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
<bLack> aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
<bLack> aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
*** Security mode değiştirdi:+b [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
<Security> Kanal güvenlik amaçlı 20 Saniye +m ye Alinmistir...
*** Security mode değiştirdi:-m
<Security> Kanal Konusmaya açılmıstır...

Ama Temizlemedi

//echo -a $isfile(temizle.mrc) yap, eğer $false cevabı geliyorsa;
mIRC ana klasöründe, temizle.mrc dosyası yoktur.
Dolayısı ile görmediği için temizlemez.

Ana Dosyasina attim ama

<Security> on *:text:*:#:{
<Security> if !temizle isin #sahil
<Security> if bLack !isop #sahil
<Security> on *:text:*:#:{
<Security> if !temizle isin #sahil
<Security> if bLack !isop #sahil

ßoyle Temizlio :)

E temizle.mrc dosyası içerisin'de ne varsa, onu yansıtıcak kanal'a.
Gayet normal yani.