tekrar koruması sorun nerede - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

XcLusive · 29 Nisan 2008, 19:13

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

düzgün bir şekilde okusanız?
en ufak birşeyde sıkışınca yardım istemeyin az çaba gösterin..
kod çalışıyor..

sniper · 29 Nisan 2008, 19:52

valla haklısın halil üstat gözlerim ağrıdı okumaktan yinede bulamadım hatamızın nerede olduğuna tiyo ver bari
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
inan çok aradım adam satır satır anlatmış çok süper ama nereyi eksik yapıyoz anlayamadım valla
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Dependent · 29 Nisan 2008, 22:01

Senin yazdığın ile biz ancak kurt kuranı okuruz burada,
sen yaptıklarını sırası ile ayrıntılı bir yaz bakalım hatan nerede ona göre bulunsun?
zira kod gayet düzgün.

Sinbat · 30 Nisan 2008, 11:26

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

 
alias prot {
  if !$istok(repeat flood caps long ctrlcode bword spam punc,$1,32) { return $false }
  goto $1
  :repeat
  var %÷ = $+(%,repeat.,$2,.,$3,.,$encode($4,m))
  inc $(%÷,1)
  if (!$timer($gettok(%÷,1,37))) { $+(.timer,$gettok(%÷,1,37)) 1 $6 unset $(%÷,1) }
  if ($(%÷,2) >= $5) { unset $(%÷,1) | return $true }
  else { return $false }
  :flood
  var %µ = $+(%,flood.,$2,.,$3)
  inc $(%µ,1)
  if (!$timer($gettok(%µ,1,37))) { $+(.timer,$gettok(%µ,1,37)) 1 $5 unset $(%µ,1) }
  if ($(%µ,2) >= $4) { unset $(%µ,1) | return $true }
  else { return $false }
  :caps
  var %e = $remove($strip($2),$chr(32))
  return $iif($iif($len(%e) >= 10,$calc($regex(%e,/[A-ZÄÖÜĞÇİ]/g)/$len(%e)*100),0) >= $3,$true,$false)
  :long
  return $iif($len($strip($2)) >= $3,$true,$false)
  :ctrlcode
  return $iif($regex($2,/[[:cntrl:]]/g) >= $3,$true,$false)
  :bword
  var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false
  :spam
  var %º = 1 | while $read($3,%º) { if $v1 iswm $2 { return $true } | inc %º } | return $false
  :punc
  return $iif($regex($2,/([?!:;,\.])/g) >= $3,$true,$false)
}
on *:text:*:#:{
  if $prot(repeat,#,$nick,$1-,2,5) { .ban -k # $nick 2 Tekrar etme! }
  elseif $prot(flood,#,$nick,3,4) { .ban -k # $nick 2 Flood yapma }
  elseif $prot(caps,$1-,80) { .ban -k # $nick 2 Büyük harf kullanma! }
  elseif $prot(long,$1-,20) { .ban -k # $nick 2 Uzun yazı yazma! }
  elseif $prot(bword,$1-,kufur.txt) { .ban -k # $nick 2 Kufur etme! }
}

bu şekilde çalışıyo denedim sniper hatayı buldum yaptığımız sende gör
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

sniper · 30 Nisan 2008, 11:49

yavaş yavaş anlıyorum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
evet;oki

Sinbat · 30 Nisan 2008, 12:20

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

 
alias prot {
  if !$istok(flood punc,$1,32) { return $false }
  goto $1
  :flood
  var %µ = $+(%,flood.,$2,.,$3)
  inc $(%µ,1)
  if (!$timer($gettok(%µ,1,37))) { $+(.timer,$gettok(%µ,1,37)) 1 $5 unset $(%µ,1) }
  if ($(%µ,2) >= $4) { unset $(%µ,1) | return $true }
  else { return $false }
}
on *:text:*:#:{
  if $prot(flood,#,$nick,3,4) { .ban -k # $nick 2 Flood yapma }
}

Buda sadece istediğin flood koruması
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Dependent · 30 Nisan 2008, 12:57

sadece flood korumasında goto ya gerek yok onu

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

alias prot {
  var %µ = $+(%,flood.,$1,.,$2)
  inc $(%µ,1)
  if (!$timer($gettok(%µ,1,37))) { $+(.timer,$gettok(%µ,1,37)) 1 $4 unset $(%µ,1) }
  if ($(%µ,2) >= $3) { unset $(%µ,1) | return $true }
  else { return $false }
}
on *:text:*:#:{
  if $prot(#,$nick,3,4) { .ban -k # $nick 2 Flood yapma }
}

şeklinde değiştirirsek daha mantıklı olur ;oki

sniper · 30 Nisan 2008, 14:30

tamam ben bu işi anladım 1 sorum daha olacak renk kontrol kodu çalışmıyor denedim olmuyo diğer korumaların hepsi çalışıyor tek tek denedim
şöyle yaptım örnek:
deneme bilemem ne falan filan gibi

15 den fazla oluyo ama hiç bir tepki vermiyor neden acaba

sniper · 03 Mayıs 2008, 12:06

el33t ustamdan özür diliyorum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
renk korumasıda çalışıyormuş

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Tekrar koruması	Darnasus	mIRC Scripting Sorunları	2	15 Kasım 2013 09:56
Tekrar Koruması	moonman	mIRC Scripting Sorunları	7	28 Haziran 2013 13:17
Tekrar Koruması	moonman	mIRC Scripting Sorunları	1	18 Şubat 2012 22:16
Tekrar koruması	Cyptm	mIRC Scripting Sorunları	1	25 Nisan 2008 16:21

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.