IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Text to Regex Alias (Kelimeyi Regexe Çevirmek)

- mIRC Parça Kodlar (https://www.ircforumlari.net/mirc-parca-kodlar/)

- - Text to Regex Alias (Kelimeyi Regexe Çevirmek) (https://www.ircforumlari.net/mirc-parca-kodlar/816060-text-regex-alias-kelimeyi-regexe-cevirmek.html)

Text to Regex Alias (Kelimeyi Regexe Çevirmek)

merhabalar değerli forum kullanıcıları. daha önce paylaşmış olduğum [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]nda bahsetmiş olduğum FnX botunun auto spam kodundan bir parçayı sizlerle paylaşma kararı aldım. daha da gelişmiş halini de ilerleyen zamanlarda paylaşmayı düşünüyorum. regexe çevirmek istediğiniz kelimenin boyutu 338 byte/karakterden büyük ise regex çevirme işlemini yapmıyor. bunun sebebi bu kodu kulanmış olduğum sunucuda bu boyutu aşan verilerin (açıklama dahil) spamfilter olarak eklenememesiydi. kullanımıyla ilgili örnekleri aşağıda vereceğim.

öncelikle kodumuz:

Kod:

;yardımcılar

alias _reg { return $replace($1-,a,[àáâãäåæÆÀÁÂÃÄÅÆaª@4],e,[æèéêëe£â‚¬ÈÉÊ3],i,ı,ı,İ,İ,[ÌÍÎÏìíîïİıi\!1j],b,ß,ß,[bß],k,[kq],o,ö,ö,Ö,Ö,0,0,[òóôõoöÖøÒØÔº0],u,ü,ü,Ü,Ü,[ùúûÙÚÛuÜüÙµ],[:p[ùúûÙÚÛuÜüÙµ]nct:],[:punct:],ğ,Ğ,Ğ,g,g,q,q,[ğĞgq],c,ç,ç,Ç,Ç,[©¢cçÇ],[k[ğĞgq]],([kq]|(\|\{)),[:pun[©¢cçÇ]t:],[:punct:],[:[©¢cçÇ]ntrl:],[:cntrl:],r,[r\®],[:cnt[r\®]l:],[:cntrl:],ş,s,s,Ş,Ş,$,$,[Å¡Å*sŞş§\$5],\[Å¡Å*sŞş§\$5],\s,v,w,w,[wv]) }

alias c {

  if $regex($prop,/^b$/) { return $+($chr(3),$regsubex($1,/(x)/g,$chr(44)),$chr(2),$chr(2),$chr(2),$2-,$chr(3),$chr(2)) } 

  if $regex($prop,/^u$/) { return $+($chr(3),$regsubex($1,/(x)/g,$chr(44)),$chr(31),$chr(2),$chr(2),$2-,$chr(3),$chr(31)) }

  if $regex($prop,/^(bu)|(ub)$/) { return $+($chr(3),$regsubex($1,/(x)/g,$chr(44)),$chr(31),$chr(2),$chr(2),$chr(2),$2-,$chr(3),$chr(31),$chr(2)) }

  else { return $+($chr(3),$regsubex($1,/(x)/g,$chr(44)),$chr(2),$chr(2),$2-,$chr(3))) }

}

;olay

alias çevir3 {

  var %breglen (?i) $+ $regsubex($_reg($regsubex($regsubex($regsubex($strip($1),/(.)/g,\1+([[:punct:][:cntrl:] ]|\d)*),/\Q([[:punct:][:cntrl:] ]|\d)*\E$/g,),/\+$/g,)),/(\[bß\]|n|m|z|h|f|x|d|p|y|t|l|\[wv\]|\Q([kq]|(\|\{))\E|\[wv\]|\[©¢cçÇ\]|\Q[Å¡Å*sŞş§\$5]\E|\[ğĞgq\]|\Q[r\®]\E)\+\Q([[:punct:][:cntrl:] ]|\d)*\E/gi,\1+([[:punct:][:cntrl:] ]|\d|h)*)

  if $len(%breglen) > 338 { 

    echo -a $c(4,<Hata Mesajı>) Çevirdiğiniz regex spamfilter için $c(4,$calc($+($len(%breglen),-,338))) BYTE kadar büyük. Lütfen kelimenizi $c(4,sondan birer harf silerek).b çevirme işlemini yineleyin.

    echo -a -

    return

  }

  echo -a $c(2,Kelime:) $1

  echo -a $c(2,Regex:) %breglen

  echo -a $c(2,Boyut:) $len(%breglen) BYTE

  echo -a - 

}

yaptığımız testler:

uygulama: /çevir3 Xenophanes
cevap:
<Hata Mesajı> Çevirdiğiniz regex spamfilter için 8 BYTE kadar büyük. Lütfen kelimenizi sondan birer harf silerek çevirme işlemini yineleyin.
-
uygulama: /çevir3 Xenop
cevap:
Kelime: Xenop
Regex: (?i)X+([[:punct:][:cntrl:] ]|\d|h)*[æèéêëe£â‚¬ÈÉÊ3]+([[:punct:][:cntrl:] ]|\d)*n+([[:punct:][:cntrl:] ]|\d|h)*[òóôõoöÖøÒØÔº0]+([[:punct:][:cntrl:] ]|\d)*p
Boyut: 152 BYTE
-
uygulama: /çevir3 trsohbet
cevap:
Kelime: trsohbet
Regex: (?i)t+([[:punct:][:cntrl:] ]|\d|h)*[r\®]+([[:punct:][:cntrl:] ]|\d|h)*[Å¡Å*sŞş§\$5]+([[:punct:][:cntrl:] ]|\d|h)*[òóôõoöÖøÒØÔº0]+([[:punct:][:cntrl:] ]|\d)*h+([[:punct:][:cntrl:] ]|\d|h)*[bß]+([[:punct:][:cntrl:] ]|\d|h)*[æèéêëe£â‚¬ÈÉÊ3]+([[:punct:][:cntrl:] ]|\d)*t
Boyut: 262 BYTE
-

bu arada şu c aliası kodlarda renk,bold,altı çizili gibi olayları kodlamalarda kullanabilmek için azıcık ta can sıkıntısından yapmış olduğum bir şey. onun da olayı:
kırmızı font, beyaz yazı ile Xenophanes yazmak için: $c(0x4,Xenophanes)
kırmızı font, beyaz yazı, kalın harfler ile Xenophanes yazmak için: $c(0x4,Xenophanes).b
kırmızı font, beyaz yazı, altı çizili harfler ile Xenophanes yazmak için: $c(0x4,Xenophanes).u
kırmızı font, beyaz yazı, altı çizili, kalın harfler ile Xenophanes yazmak için: $c(0x4,Xenophanes).ub veya $c(0x4,Xenophanes).bu
kırmızı yazı ile Xenophanes yazmak için: $c(4,Xenophanes)
-

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

Eline Sağlık Xenophanes kardesim arıyordum böyle bişeyler tşk

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

Adamsın @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :)

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

The real slim @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :cokcool:

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

harikasın, teşekkür ederiz :cokcool:

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

emegınıze saglık guzel bır kodlama olmus. sımdı bunu sunucuda spam eklemek ıcın yapılacak komut nedır. bunuda acıkalama sansınız varmı tskler.

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

Nice code >>> elinize sağlık

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

Alıntı:

Tunne Nickli Üyeden Alıntı (Mesaj 1042740682)

emegınıze saglık guzel bır kodlama olmus. sımdı bunu sunucuda spam eklemek ıcın yapılacak komut nedır. bunuda acıkalama sansınız varmı tskler.

Kod:

/spamfilter add [Tip] [Eylem] [Süre] [Sebep] [Kelime]
 

Tipler
 

c ›› Kanal mesajları 

p ›› Özel mesajlar

n ›› Özel notice 

N ›› Kanal notice

p ›› Part Sebebi

q ›› Quit Sebebi

d ›› DCC Dosya adı

a ›› Away Mesajı

t ›› Kanal topici
 

Eylemler

Zline,Gline,Shun,Kill =Sunucudan atmak için

Block= kullanıcı sunucudan atılmaz ama yazdığı mesaj da karşıya iletilmez.

Süre

0 yapabilirsiniz.

Sebep

Kullandığınız_Kelime_Sunucu_Güvenliği_Tarafından_Yasaklanmıştır.

Reklam_Yasak

Yasak_Kelime_Kullandınız vb.
 

Sonuç olarak /spamfilter add cpnNa block 0 Yasak_Kelime_Kullandınız Kelime

Not: add ekler del siler.
Not: Sebep yazarken örnekte verdiğim şekilde yazmalısın.
Not: Kelime kısmına regex çevirisini yaptığın kelimeyi yazmalısın.

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

çok güzel hareketler..

Cevap: Text to Regex Alias (Kelimeyi Regexe Çevirmek)

mIRC, regular expression kutuphanesi icin PCRE 8 bit versiyonu kullandigi icin, “RECURSIVE PATTERNS” i ‘de destekledigini snaiyorum. Algortimada ufak bir degisiklik ile, tekrarlayan su pattern ‘i, bir kere kullanabilirsin.

Kod:

([[:punct:][:cntrl:] ]|\d|h)*

Ornek:

Kod:

([a-z]+)-123-(?1)

Kod:

tester-123-faster // match

tester-123-423   // no-match