Rast geLe fullname Ve identler'e gzLine - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

High · 18 Ocak 2015, 12:41

CesuryureK Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

1. identler nasıl sadece harfmi yoksa harf ve rakam mı ve büyük küçük olarakmı yazılmış?
2. aynı şekilde fullname

şimdi vereceğim kod sadece "aklsjksjal" gibi identler için geçerli olacaktır ve sadece hepsi ufak olursa çalışacaktır

ident için;

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

/spamfilter add u gzline +5m Rasgele_Ident_Tespit_Edildi_Identinizi_Değiştirip_5_Dakika_Sonra_Tekrar_Bağlanın! (?-i)^(.+![a-z]@.+:.+)$

Fullname için;

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

/spamfilter add u gzline +5m Rasgele_Ident_Tespit_Edildi_Identinizi_Değiştirip_5_Dakika_Sonra_Tekrar_Bağlanın! (?-i)^(.+!.+@.+:[a-z])$

yukarıda verdiğim bilgileri detaylı şekilde bana anlatırsan sana daha iyi yardım edebilirim.

Selam hocam konu eski lakin ihtiyaç duyulan bir ekleme bence. Örnek istemişsiniz.
Fullname ; fFyYLnmoHWyVDbLeAgEWQVdtHsGKdVmbiiqWujNbNTeQWLL
gibi.Şimdiden teşekkürler aynı şekilde benzer nickler de oluyor tabiki yani bu vermiş olduğum örneğe göre ident, nick ve fullname üzerine bi spam eklenebilirse güzel olur Spam bilgim var ama yanlış bir şey yapmaktan çekindiğim için sizden yardım istiyorum

IRC-Dancer · 28 Ocak 2015, 23:44

Fullname kısmını : (?-i)^(.+!.+@.+:^[A-Za-z]{20,35}$ yaptın mı coğunu engellersin

Feragat · 29 Ocak 2015, 01:02

High Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Selam hocam konu eski lakin ihtiyaç duyulan bir ekleme bence. Örnek istemişsiniz.
Fullname ; fFyYLnmoHWyVDbLeAgEWQVdtHsGKdVmbiiqWujNbNTeQWLL
gibi.Şimdiden teşekkürler aynı şekilde benzer nickler de oluyor tabiki yani bu vermiş olduğum örneğe göre ident, nick ve fullname üzerine bi spam eklenebilirse güzel olur Spam bilgim var ama yanlış bir şey yapmaktan çekindiğim için sizden yardım istiyorum

Belirli bir kalıbı yoksa eğer, rastgele fullname engelleme diye düzgün çalışan bir kod/komut/filtre yapamazsın. Mutlaka bir kalıbı baz alman gerek. (Yalnızca sesli harf tekrarı, yalnızca sessiz harf tekrarı, Sessiz harf-Rakam tekrarı, kombinasyonel girilmiş fullname'lar vb vb gibi..)
Bunun dışında kullanacakların user'ları etkileyecektir. O yüzden spamfilter eklerken özelliklede regex mantığını kullanacaksan özenli ve dikkatli olman gerekiyor.

IRC-Dancer Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Fullname kısmını : (?-i)^(.+!.+@.+:^[A-Za-z]{20,35}$ yaptın mı coğunu engellersin

Kodda 2 göze çarpan hata yapmışsın.
1- Eşleşileni yakalamaya çalıştığın kalıpta(back reference), ( parantez açmışsın fakat kapatmamışsın.

2- ^ "Cümle Başı" nı temsil eden operatörü kalıp içinde kullanmışsın. Yapmaya çalıştığın kalıptaki filtre zaten (:) bu karakterden sonra A-Z a-z ile başlayacak, yani fullname alfabetik karakterler ile başlayacak.

Alper · 19 Ocak 2017, 01:40

AfraN Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

random ident 3 sessiz harf yanyana gelirse gzline atar.
3 rakamını kendinize göre ayarlayabilir, ve sessiz harfleri sesli harfler ile değişebilirsiniz.

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

on *:join:#: { 
if (o isin $usermode) {
  if ($regex($gettok($gettok($address($nick,5),2,33),1,64),/[bcdfghjklmnprstvyz]{3}/i)) { gzline $nick süre sebep }
  } 
}

Random Fullname 3 sessiz harf yanyana gelirse zline atar.

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

on *:join:#: { 
  if (o isin $usermode) { 
    who $nick
  } 
}
raw 352:*: {
  if ($regex($9,/[bcdfghjklmnprstvyz]{3}/i)) { gzline $6 süre sebep }
}

Merhaba,

Bu kodu snotice olarak nasıl yapabiliriz ?

Teşekkürler

cashmare · 19 Ocak 2017, 07:51

pckopat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhaba,

Bu kodu snotice olarak nasıl yapabiliriz ?

Teşekkürler

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

on *:snotice:*Client*connecting*: {
who $9
}
raw 352:*: {
  if ($regex($9,/[bcdfghjklmnprstvyz]{3}/i)) { gzline $6 süre sebep }
}

CoCoRiCo · 19 Ocak 2017, 08:50

bu kodla random kontrol edilirse sorun çıkar..

//echo :: $regex(SkyFaiL,/[bcdfghjklmnprstvyz]{3}/i)
//rand? SkyFaiL

Detaylar burada.. > [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
/testrand yada //rand? $left($encode($md5($+($r(a,z),$ticks)),m),$r(5,25) ) test için
/rand? username yada nick

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

alias rand? {
  var %t = $remove($1,1,2,3,4,5,6,7,8,9,0,\,`,^,|,-,_),%s+ $regex(%t,/([aeoöuüıi])/ig),%s- $regex(%t,/([^aeoöuüıi])/ig)
  echo  Toplam: $len(%t) Sesli: %s+ Sessiz: %s-
  if $len(%t) > 4 { gr $len(%t) %s- $1 }
}
alias -l gr {
  ;oran buraya % cinsinden
  var %rate 73
  ;Grafik çubuk uzunlugu buraya 
  var %line 10
  var %% $round($iif($round($calc(($2 * 100) / $1),1) > 100, 100, $round($calc(($2 * 100) / $1),1)),0),$&
    %n $iif($2 > $1, $1, $2),%g %line,%go $+($chr(3),4,$chr(44),4) $chr(160),$& 
    %goc $+($chr(3),14,$chr(44),14) $chr(160),%t= $round($calc((%n * %line) / $1),0) 
  echo  $str(%go,%t=) $+ $str(%goc,$ceil($calc(%g - %t=))) $chr(15) $chr(37) $+ %% $3 $iif(%% > %rate,RANDOM)
}
alias testrand {
  :r | if $len(%r)  <= 50 { var %r $addtok(%r,$gettok($r(a,z) $r(A,Z),$r(1,2),32),32) | goto r }
  else {  var %r $remove(%r,$chr(32)) |  Rand? $left(%r,$r(5,$len(%r))) }
}

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

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

Alper · 19 Ocak 2017, 14:16

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

on *:snotice:*: {  
  if $regex($1-,Client connecting on port) && ($regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($11,/[bcdfghjklmnprstvyz]{3}/i)) { kill $9 sebep } 
}

Bendeki Unreal girişte fullnameyide gösteriyor aynı mantıkla gittim $11 olarak denedim çalıştı.Kodu bu şekilde yapınca çalışıyor. Hem ident hemde fullname olarak 3 ve üzeri sessiz harf yanyana olunca atıyor ama ne gibi sorun yaşarım.

[ 14:10:33 ] [ Giriş ] *** Notice -- Client connecting on port 6667: Pisipisi (Dark@xxx) (asdfd) [clients]
[ 14:10:33 ] [ Çıkış ] *** Notice -- Client exiting: Pisipisi (Dark@xxx) (asdfd) [[irc.xxxx.Com] Local kill by pC`kOpAt (sebep)]

[ 14:08:24 ] [ Giriş ] *** Notice -- Client connecting on port 6667: Pisipisi (fgh@xxx) (x+y=100) [clients]
[ 14:08:25 ] [ Çıkış ] *** Notice -- Client exiting: Pisipisi (fgh@xxx) (x+y=100) [[irc.xxxx.Com] Local kill by pC`kOpAt (sebep)]

YellowLine · 19 Ocak 2017, 17:37

merhaba,
peki bunu spama nasıl alırız , oto girişte atılsın varmıdır bir yolu

CoCoRiCo · 20 Ocak 2017, 09:20

YellowLine Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

merhaba,
peki bunu spama nasıl alırız , oto girişte atılsın varmıdır bir yolu

yeşil kısma hassaslık oranı yazarak kullanabilirsin (önerilen %73)
kırmızı satırları devre dışı bıraktım ekrana çubukları yansıtmaz.
/rand? kontrol_edilecek_kelime Nick

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

alias rand? {
  var %t = $remove($1,1,2,3,4,5,6,7,8,9,0,\,`,^,|,-,_), %s+ $regex(%t,/([aeoöuüıiI])/gi),%s- $regex(%t,/([^aeoöuüıiI])/gi)
  ; echo  Toplam: $len(%t) Sesli: %s+ Sessiz: %s-
  ;if $len(%t) > 4 { gr $len(%t) %s- $1  }

  if $len(%t) > 4 && $gr($len(%t),%s-,$1,$2) { gzline $2 | hdel rand? $2  }
}
alias -l gr {
  ;oran buraya % cinsinden
  var %rate 73
  ;Grafik çubuk uzunlugu buraya 
  var %line 10
  var %% $round($iif($round($calc(($2 * 100) / $1),1) > 100, 100, $round($calc(($2 * 100) / $1),1)),0),$&
    %n $iif($2 > $1, $1, $2),%g %line,%go $+($chr(3),4,$chr(44),4) $chr(160),$& 
    %goc $+($chr(3),14,$chr(44),14) $chr(160),%t= $round($calc((%n * %line) / $1),0) 

 ; echo  $str(%go,%t=) $+ $str(%goc,$ceil($calc(%g - %t=))) $chr(15) $chr(37) $+ %% $3 $iif(%% > %rate,RANDOM $4 )
  $iif(%% > %rate,return $true)
}
on *:snotice:*Client*connecting*: hadd -m rand? $4 $4
raw 311:*: if ($hget(rand?,$2)) rand? $remove($6-,$chr(32)) $2

elhale · 08 Mart 2017, 17:26

pckopat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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

on *:snotice:*: {  
  if $regex($1-,Client connecting on port) && ($regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($11,/[bcdfghjklmnprstvyz]{3}/i)) { kill $9 sebep } 
}

Bendeki Unreal girişte fullnameyide gösteriyor aynı mantıkla gittim $11 olarak denedim çalıştı.Kodu bu şekilde yapınca çalışıyor. Hem ident hemde fullname olarak 3 ve üzeri sessiz harf yanyana olunca atıyor ama ne gibi sorun yaşarım.

[ 14:10:33 ] [ Giriş ] *** Notice -- Client connecting on port 6667: Pisipisi (Dark@xxx) (asdfd) [clients]
[ 14:10:33 ] [ Çıkış ] *** Notice -- Client exiting: Pisipisi (Dark@xxx) (asdfd) [[irc.xxxx.Com] Local kill by pC`kOpAt (sebep)]

[ 14:08:24 ] [ Giriş ] *** Notice -- Client connecting on port 6667: Pisipisi (fgh@xxx) (x+y=100) [clients]
[ 14:08:25 ] [ Çıkış ] *** Notice -- Client exiting: Pisipisi (fgh@xxx) (x+y=100) [[irc.xxxx.Com] Local kill by pC`kOpAt (sebep)]

Djrina!jzpzv@106.46.136.172:yiha

Vindar!qzdun@58.23.181.42:adoyo

Nedin!oxlmx@179.91.62.130:gxeqc

Premt!nymi@211.143.22.11:trf

Mirdrit!xzue@119.40.106.136:mlt

Blega!olah@60.0.79.215:viyr

HacKBo[]Y]]]!brmgh@119.40.106.147:zgyj

Butar!qikm@125.94.0.254:ninje

Lucinda!oij@122.189.26.92:fklz

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

on *:snotice:*: {  
  if $regex($1-,Client connecting on port) && $regex($6,/^([A-Z]{1,})([a-z]{1,})$/) || ($regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($11,/[bcdfghjklmnprstvyz]{3}/i)) { echo -as kill $9 sebep } 
}

Ancak normal kullanıcılar için yankılar alıyorum.

Eğer ben yanlış değilim

Nick - $6

ident - $10

fullname - $9

Bu yüzden böyle olmalı

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

on *:snotice:*Client*connecting*:
raw 352:*: {
  if ($regex($6,/^([A-Z]{1,})([a-z]{1,})$/) || $regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($9,/[bcdfghjklmnprstvyz]{3}/i)) { echo -as kill $6 sebep }
}

Neyi yanlış yapıyorum?

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

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Rast	Sarya	Sözlük	1	11 Ocak 2022 21:10
Zara - Gele Gele Geldik Şarkı Sözleri	KarakıZ	U, Ü, V, Y, Z	0	16 Temmuz 2021 18:56
Laf Ola Beri Gele: Aklın Ölçüsü veya Safsata	Kalemzede	Felsefe	0	20 Eylül 2011 01:40
Aze yüreğime dokundu../..dost gele..	Aze	Şiir, Hikaye ve Güzel Sözler	0	24 Mayıs 2010 15:06
Farklı Setnameler Aynı Identler	KutsaL	mIRC Scripting Sorunları	4	08 Temmuz 2007 15:25

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

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.