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

nikotin · 05 Aralık 2017, 16:55

Selam arkadaşlar.
Bu gün paylaşıcagım kodlardan biri tblock remotesi.
bundan önce ki paylaştıgım sus remotesin de oldugu gibi bunda da
prefix +/+h/@/~ /muafnick/muafkanal/muafident/muafhost mevcut.

remotenin en altında #unblok on / off aliası ise, kanal banliste ekli olan tblocklar sizin veya bir baskası tarafından acılırsa -b oto (+b) blok ekler tekrardan.
alias /unblokon
alias /unblokoff
ama buna gerek yok sadece bi kanalda tekrar ekleme yapsın derseniz aşagıdakini kullanmanız yeterli.
off *:unban:#kanal:{ if (*~T:bl* iswm $banmask) { mode # +b $banmask } }

buda F tusu ile aktif kanalda blok eklemenize yarar. (kalsın işinize yarar)
F1 mode # +b ~T:block:* $+ $+($$?="Kelime") $+ *

aşagıda ki listede yaklasık 800 e yakın blok var.
bunların cogunlugu saldırı, yazı flood girşimlerini engellemek amaçlı tarafımdan tek tek eklenen bloklar. (dileyen sil bastan yapabilir)
elimden geldigince kanalda ki normal kullanıcılar etkilenmicek sekilde eklemeye calıştım.

bu remote (#unblok aliası) acık ise ara sıra mirce bakmak zorundasınız çünkü;
1. mirci simge haline getirip oyun, film, sohbete e dalarsanız hiç birşeyden haberiniz yok iken
tarafınızdan kanaldaki tüm kullanıcılar etkilenecek sekilde +b blok alırsınız sıkıntı olur.
adamlar banı acmaya ugraşırlar siz yine +b yaparsanız nerden baksanız sorun yani.
böyle durumlarda (unblok oto +b) yi kapatmanızı öneririm.

not:
bu sekilde *))* parantez eklerseniz gecersiz format uyarısı alırsınız.
parantez ekleme örnekleri listede var ona göre ekleyebilirsiniz.
ayrıca liste icinde nikoox yazan yerler boş sayılır. yeni kelime ekleme yapacaksanız bunları silip ekleyebilirsiniz.

benim gibi saldırı engellemekten büyük haz alan arkadasların da işlerine yarıyacagını ve keyf alacaklarını umuyorum.

son olarak ileri ki günlerde oper admin iken güvenlik amaçlı kullandıgım remoteleride paylaşıp IRC mIRC sayfasını kapatarak uzaklaşacam artık inş.

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

alias bblock { mode $chan +b $replace($+(~T:block:,%block),$chr(32),_) | join $chan | .window -en  @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | aline -h 04  @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]  $chan kanalında1 $nick nickinin yazdığı1 %block kelimesi blocklandı. } 

#block off
On *:TEXT:*:#:if ($_block(#,$nick,$1-)) bblock $nick
#block end
; $_block(kanal,nick,yazi)
alias -l _block {
  if ($server == irc.sunucu.com) {
    if ($2 isop $1) || ($istok(#muafkanal #muafkanal #muafkanal,$chan,32)) return
    if ($regex($token($token($address($nick,5),2,33),1,64),/(muafident1|muafident2|muafident3)/i)) { return }
    if ($nick !isreg $chan) { return }
    if ($istok(muafnick muafnick muafnick,$nick,32)) { halt }
    if ($regex($wildsite,/(muafhost|muafhost|muafhost|Global|helper|admin|ircop|tech|server|services|network)/i)) { halt }
    if (*shiği* iswm $3-) || (*QP€R* iswm $3-) || (*bajın* iswm $3-) || (*C!KL€R* iswm $3-) || (*EYF!N* iswm $3-) || (*S€X* iswm $3-) || (*BAJIN* iswm $3-) || (*qömer* iswm $3-) goto ok 
    if (*ør4s* iswm $3-) || (*beton*döke* iswm $3-) || (*Sookar* iswm $3-) || (*orbu co* iswm $3-) || (*sk1c* iswm $3-) || (*ib-in* iswm $3-) || (*s2k* iswm $3-) || (*Hay4t* iswm $3-) goto ok
    if (*dümbük* iswm $3-) || (*s4*şiyor* iswm $3-) || (*ip- -ne* iswm $3-) || (*karın*KIZIN* iswm $3-) || (*shıge* iswm $3-) || (*SİTE*SEKS* iswm $3-) || (*kırkk*bii* iswm $3-) goto ok 
    if (*k0yaa* iswm $3-) || (*çoo-cu* iswm $3-) || (*orr*rsp* iswm $3-) || (*An_nes* iswm $3-) || (*c o m* iswm $3-) || (*ORSPU* iswm $3-) || (*BETON DOKE* iswm $3-) goto ok 
    if (*ANNENIN A* iswm $3-) || (*özelde mum* iswm $3-) || (*sülalen* iswm $3-) || (*òr0zß* iswm $3-) || (*ann-nes* iswm $3-) || (*? ibine ?* iswm $3-) || (*K-e-r-h-a-n-e* iswm $3-) goto ok
    if (*emdirice* iswm $3-) || (*yaaRaağ* iswm $3-) || (*kızlıgın* iswm $3-) || (*s3k*ceğim* iswm $3-) || (*deyyus* iswm $3-) || (*s2 ki* iswm $3-) || (*kappen* iswm $3-) goto ok 
    if (*kerhane* iswm $3-) || (*sii*ikker* iswm $3-) || (*yavv*vşak* iswm $3-) || (*ananı bac* iswm $3-) || (*baccın* iswm $3-) || (*ananı 10* iswm $3-) || (*zıkerım* iswm $3-) goto ok 
    if (*Zik3y!m* iswm $3-) || (*sikece* iswm $3-) || (*yedi cettin* iswm $3-) || (*jojuq* iswm $3-) || (*sıhıver* iswm $3-) || (*Sehnın* iswm $3-) || (*SOUKUCAM* iswm $3-) || (*P  K     K* iswm $3-) goto ok
    if (*gohtun* iswm $3-) || (*sokayım* iswm $3-) || (*anacigini* iswm $3-) || (*becerme* iswm $3-) || (*dollum* iswm $3-) || (*m+ı* iswm $3-) || (*s+k* iswm $3-) || (*d+m* iswm $3-) goto ok 
    if (*y+n* iswm $3-) || (*şarlolar* iswm $3-) || (*adhmin* iswm $3-) || (*şebbeg* iswm $3-) || (?????? :?* *D*e*r*d*o* iswm $3-) || (*qaLtah* iswm $3-) || (*sühüce* iswm $3-) || (*GaltaK* iswm $3-) goto ok 
    if (*zühmey* iswm $3-) || (*meraqL* iswm $3-) || (*NeySan* iswm $3-) || (*bæchin* iswm $3-) || (*ohrsp* iswm $3-) || (*Kehpee* iswm $3-) || (*y?havsak* iswm $3-) || (*Annnnız* iswm $3-) goto ok
    if (*KİLOD* iswm $3-) || (*annCiğ* iswm $3-) || (*annCiğ* iswm $3-) || (*amsuyu* iswm $3-) || (*gööt* iswm $3-) || (*soksam* iswm $3-) || (*ko rum* iswm $3-) goto ok 
    if (*onun bunu cocu* iswm $3-) || (*annene* iswm $3-) || (*s1hk* iswm $3-) || (*$k€r* iswm $3-) || (*SjKéR* iswm $3-) || (*ZİKER* iswm $3-) || (*Faişe* iswm $3-) || (*$iker* iswm $3-) goto ok 
    if (*Sikicem* iswm $3-) || (*Ahnnen* iswm $3-) || (*a*m!na* iswm $3-) || (*S!ker* iswm $3-) || (*A.-n.-n* iswm $3-) || (*Goytler* iswm $3-) || (*mnkeNNn* iswm $3-) || (*kukuku* iswm $3-) goto ok
    if (*$!ker* iswm $3-) || (*t0t0s* iswm $3-) || (*A..mC* iswm $3-) || (*sijece* iswm $3-) || (*ikicejjj*m* iswm $3-) || (*K.*üL.*Od* iswm $3-) || (*K.*aŞ.*ŞaR* iswm $3-) || (*Yav-$ak* iswm $3-) goto ok 
    if (*G4V4T* iswm $3-) || (*>AMINA<* iswm $3-) || (*A...na* iswm $3-) || (*S...iik* iswm $3-) || (*$okum* iswm $3-) || (*totosh* iswm $3-) || (*pıııjj* iswm $3-) || (*kajar* iswm $3-) goto ok 
    if (*G.a.y* iswm $3-) || (*Siik*tiĞ* iswm $3-) || (*KaaŞ*ŞaaR* iswm $3-) || (*AnnaSın* iswm $3-) || (*sii*ccmm* iswm $3-) || (*Bozhuk* iswm $3-) || (*? phicin ?* iswm $3-) || (*hohoho* iswm $3-) goto ok
    if (*zıggtı* iswm $3-) || (*s K ti* iswm $3-) || (*A . M . E* iswm $3-) || (*L . A . N* iswm $3-) || (*Dötüne* iswm $3-) || (*T0piŞ* iswm $3-) || (*Oprsp* iswm $3-) || (*Şii*Jee* iswm $3-) goto ok 
    if (*ŞiiJe* iswm $3-) || (*O.-ruS* iswm $3-) || (*@*(V)* iswm $3-) || (*d0maL* iswm $3-) || (*n-/-e-/-t* iswm $3-) || (*S.i.k.i.l* iswm $3-) || (*W , W , W* iswm $3-) || (*C , o , M* iswm $3-) goto ok 
    if (*--c--* iswm $3-) || (*--w--* iswm $3-) || (*C o  m* iswm $3-) || (*İMZA*HAMBURGLU* iswm $3-) || (*ya r r*rR* iswm $3-) || (*? urspo ?* iswm $3-) || (*? sterim ?* iswm $3-) || (*? ğumun bebesi ?* iswm $3-) goto ok
    if (*Huıılk* iswm $3-) || (*Jaki OnLi* iswm $3-) || (*a.n.a.n* iswm $3-) || (*//A//* iswm $3-) || (*N3N* iswm $3-) || (*4naLar* iswm $3-) || (*bajı*nız* iswm $3-) || (?????? : ?* iswm $3-) goto ok 
    if (*k-^E* iswm $3-) || (*hull*k*geld* iswm $3-) || (*[C][L]* iswm $3-) || (*[A][M]* iswm $3-) || (*M-/A-/S-/T* iswm $3-) || (*k..a...m* iswm $3-) || (*M.?.S.T.?.R* iswm $3-) || (*sgrm* iswm $3-) goto ok 
    if (*hullık* iswm $3-) || (*N*0ig*htw* iswm $3-) || (*s-o--q* iswm $3-) || (*a-n-e-n* iswm $3-) || (*K+A+T* iswm $3-) || (*? oLun uLan ?* iswm $3-) || (*Ohhhro* iswm $3-) || (*? tpbun ?* iswm $3-) goto ok
    if (*K + A + T* iswm $3-) || (*an3 nin* iswm $3-) || (*an3nin* iswm $3-) || (*|??|* iswm $3-) || (*@namı* iswm $3-) || (*zi qcem* iswm $3-) || (*Ohros* iswm $3-) || (*K~a~m* iswm $3-) goto ok 
    if (*? ad min ?* iswm $3-) || (*sii*kk*ee*cc*ee*m* iswm $3-) || (*? S.|k.?rm* iswm $3-) || (*N-e-t* iswm $3-) || (*S1z1n* iswm $3-) || (*Anha1n* iswm $3-) || (*oro*puuu* iswm $3-) || (*Mirc.t/k* iswm $3-) goto ok 
    if (*Zik1yo* iswm $3-) || (*S.-en* iswm $3-) || (*A.-na* iswm $3-) || (*.B*c.|n|*  iswm $3-) || (*s1k* iswm $3-) || (*Arka deliğine* iswm $3-) || (*Sizi Doguranın* iswm $3-) || (*Aynnene* iswm $3-) || (*ÔN€* iswm $3-) goto ok
    if (*Zıkın ben* iswm $3-) || (*sii*kk*tt*gg* iswm $3-) || (*kaaaŞŞ* iswm $3-) || (*ŞiiJe* iswm $3-) || (*Şii*Jee* iswm $3-) || (*T..o...o* iswm $3-) || (*CLL*oo*Ne* iswm $3-) || (*Oprsp* iswm $3-) goto ok 
    if (*? An_NeCigi* iswm $3-) || (*kee*ss*kk* iswm $3-) || (*€S]{in* iswm $3-) || (*kéSk* iswm $3-) || (*|{*es*qi*n* iswm $3-) || (*== ? ==* iswm $3-) || (*Annem*fahıse* iswm $3-) || (*baa h ciina* iswm $3-) goto ok 
    if (*sii ccmm* iswm $3-) || (*aL-paÇ* iswm $3-) || (*baba*hu*ı*l*k*gel*di* iswm $3-) || (*Ic''C'aM* iswm $3-) || (*Lo''N* iswm $3-) || (*Dohtun* iswm $3-) || (*? Dherim ?* iswm $3-) || (*Ghtunde* iswm $3-) goto ok
    if (*? S__i__k ?* iswm $3-) || (*s.r.f.siz* iswm $3-) || (*A..na* iswm $3-) || (*Cap Cap* iswm $3-) || (*M€z@* iswm $3-) || (*Sikerler* iswm $3-) || (*Sikerler* iswm $3-) || (*S-k_rm* iswm $3-) goto ok 
    if (*Do_gu_ra_n* iswm $3-) || (*a-Na-n-a-m* iswm $3-) || (*s-ıc-a-r* iswm $3-) || (*G0tten* iswm $3-) || (*4nn3N* iswm $3-) || (*S1k3* iswm $3-) || (*B0şal* iswm $3-) || (*B0şal* iswm $3-) goto ok 
    if (*K + A + T* iswm $3-) || (*A?h?i?s?k?a?l*i* iswm $3-) || (*Skerım* iswm $3-) || (*sedat*bucak* iswm $3-) || (*n*oo]* iswm $3-) || (*Scehirm* iswm $3-) || (*A..NN..E* iswm $3-) || (*S...İ..K* iswm $3-) goto ok
    if (*? ænan ?* iswm $3-) || (*? ? ? ½ ?* iswm $3-) || (*? ? ? ´ ?* iswm $3-) || (*IDONCER-----S-I-K* iswm $3-) || (*? ? ? ”* iswm $3-) || (*? ? ? ¤* iswm $3-) || (*? ? ? ñ* iswm $3-) || (*? ? ? ©* iswm $3-) goto ok 
    if (*R g j Ô* iswm $3-) || (*D f j § ”* iswm $3-) || (*_ ? ? é* iswm $3-) || (*? ? ? —* iswm $3-) || (*? ? ? Ê* iswm $3-) || (*K.*üL.*Od* iswm $3-) || (*!'/=?* iswm $3-) || (*mcx :$* iswm $3-) goto ok 
    if (*? Bahcın? ?* iswm $3-) || (*bbb*b*beic*ee* iswm $3-) || (*hìic* iswm $3-) || (*bßbeêh* iswm $3-) || (*ßêh* iswm $3-) || (*kopru altı* iswm $3-) || (*nkotn* iswm $3-) || (*nkotin* iswm $3-) goto ok
    if (*admiin* iswm $3-) || (*? ahdminler ?* iswm $3-) || (*Tohpun* iswm $3-) || (*Sheyim* iswm $3-) || (*Orojb* iswm $3-) || (*Bee*hii*ice* iswm $3-) || (*sohbetsevdam* iswm $3-) goto ok 
    if (*oo*rzz*bb*buu* iswm $3-) || (*? yiyistigin ?* iswm $3-) || (*Dj*|*Behice* iswm $3-) || (*GuvenLik*ciLer* iswm $3-) || (*Sherim* iswm $3-) || (*!'/=?* iswm $3-) goto ok 
    if (*mcx :$* iswm $3-) || (*? Bahcın? ?* iswm $3-) || (*? basarim ?* iswm $3-) || (*? *Skeeee*em ?* iswm $3-) || (*k@hbe* iswm $3-) || (*tblcklar* iswm $3-) || (*tblcklr* iswm $3-) || (*K..İİ.M* iswm $3-) goto ok
    if (*göğüsler* iswm $3-) || (*Shecem* iswm $3-) || (*kaltaq* iswm $3-) || (*ßehicé* iswm $3-) || (*W'*''c''0''m* iswm $3-) || (*Béhice* iswm $3-) || (*C*LòNè* iswm $3-) || (*SÊX* iswm $3-) goto ok 
    if (*yarraa* iswm $3-) || (*? zigecem?* iswm $3-) || (*? sigecem ?* iswm $3-) || (*s’k’r* iswm $3-) || (*züppe* iswm $3-) || (*s''kR* iswm $3-) || (*k''a'r* iswm $3-) || (*? g ö tü ?* iswm $3-) goto ok 
    if (*an  sı n* iswm $3-) || (*si qecem* iswm $3-) || (*? kayıtsızlar ?* iswm $3-) || (*S-ür-tüq* iswm $3-) || (*? DeLıqe ?* iswm $3-) || (*sohbette org* iswm $3-) || (*VUHALDEN* iswm $3-) || (*TÖLLİYİM* iswm $3-) goto ok
    if (*LôNÈ* iswm $3-) || (*SuiKaST* iswm $3-) || (*q öt`e* iswm $3-) || (*Mister`* iswm $3-) || (*? aqzina ?* iswm $3-) || (ßukre* iswm $3-) || (*d0m alip* iswm $3-) || (*fai sh* iswm $3-) goto ok 
    if (*S.tyL* iswm $3-) || (*ke'rh* iswm $3-) || (*gev'şe* iswm $3-) || (*ch.iLd* iswm $3-) || (*Nu''x* iswm $3-) || (*L'İ''N* iswm $3-) || (*pk'tır* iswm $3-) || (*? amına ?* iswm $3-) || (*qothun* iswm $3-) goto ok 
    if (*götünü* iswm $3-) || (*? o r g ?* iswm $3-) || (*piijjj* iswm $3-) || (*zıgg*tıg* iswm $3-) || (*STİYİM* iswm $3-) || (*URSSPOUN* iswm $3-) || (*NMUSSUĞ* iswm $3-) || (*o_c laR* iswm $3-) goto ok
    if (*.B.c|n|* iswm $3-) || (*s.|k.rm* iswm $3-) || (*scurity* iswm $3-) || (*cl'ô* iswm $3-) || (*a''b'A* iswm $3-) || (*sa''p* iswm $3-) || (*za'dir* iswm $3-) || (*D e ja wu* iswm $3-) goto ok 
    if (*cl?ô?ne* iswm $3-) || (*g0tt3n* iswm $3-) || (*k3ylm* iswm $3-) || (*F4işe* iswm $3-) || (*Ahgz?n* iswm $3-) || (*b0şal* iswm $3-) || (*SunuCuya eL Koyuyorum* iswm $3-) || (*? n e t ?* iswm $3-) || (*? g 0t ?* iswm $3-) goto ok 
    if (*? 4mlna ?* iswm $3-) || (*An/an* iswm $3-) || (*Si/kiş* iswm $3-) || (*kalthak* iswm $3-) || (*? ahmına ?* iswm $3-) || (*bet.n.e.t* iswm $3-) || (*dolusohbet* iswm $3-) || (*SHIKT* iswm $3-) || (*zıllısı*sen* iswm $3-) goto ok
    if (*Si/kic* iswm $3-) || (*Sikilce* iswm $3-) || (*n ? e [ t* iswm $3-) || (*c - o - m* iswm $3-) || (*sohbetatesi* iswm $3-) || (*mjını* iswm $3-) || (*g0t3n* iswm $3-) || (*G0tun* iswm $3-) || (*Bhşalay* iswm $3-) goto ok 
    if (*? Shikip ?* iswm $3-) || (*b....i....l* iswm $3-) || (*c...e....t* iswm $3-) || (*? SİKİM ?* iswm $3-) || (*ateslim*c*o*m iswm $3-) || (*Zİ*İ*İH*GER* iswm $3-) || (*N€R€* iswm $3-) || (*Sgisecek* iswm $3-) || (*$okum* iswm $3-) goto ok 
    if (*totosh* iswm $3-) || (*||*a*||* iswm $3-) || (*qwert* iswm $3-) || (*adm11n* iswm $3-) || (*]{* iswm $3-) || (*?*.-.*?* iswm $3-) || (*bajım* iswm $3-) || (*opoo*orrps* iswm $3-) || (*Kamı*lller* iswm $3-) goto ok
    if (*ksshar* iswm $3-) || (*T3k T3k* iswm $3-) || (*Sk-cM* iswm $3-) || (*n€n* iswm $3-) || (*PİJİN* iswm $3-) || (*{?}{?}* iswm $3-) || (*HNNNE* iswm $3-) || (*opoo*orrps* iswm $3-) || (*Kamı*lller* iswm $3-) || (*SéN* iswm $3-) goto ok
    if (*ksshar* iswm $3-) || (*? _çılqın_ ?* iswm $3-) || (*——-——* iswm $3-) || (*—————* iswm $3-) || (*c/-o/-m* iswm $3-) || (*c.o.m* iswm $3-) || (*? ? ? ” * iswm $3-) || (*? ? ? ¤ * iswm $3-) || (*? ? ? ñ * iswm $3-) || (*? ? ? © * iswm $3-) goto ok
    if (*R g j Ô * iswm $3-) || (*D f j § ” * iswm $3-) || (*_ ? ? é * iswm $3-) || (*? ? ? — * iswm $3-) || (*? ? ? Ê * iswm $3-) || (!sok ?* iswm $3-) || (! Koy ?* iswm $3-) || (*!Koy ?* iswm $3-) || (*dam.n*e*t* iswm $3-) goto ok
    if (*o----r-----g* iswm $3-) || (*? skis iswm $3-) || (*Simar OnLine* iswm $3-) || (*ßy Simar* iswm $3-) || (*? ;o ?* iswm $3-) || (!sok ?* iswm $3-) || (*KaRaBeLe* iswm $3-) || (*Sii_qer* iswm $3-) || (*? Anna_si* iswm $3-) || (*zzi_kke* iswm $3-) goto ok
    if (*vualidhen* iswm $3-) || (*o** r** g* iswm $3-) || (*m****u** s** l** u** m* iswm $3-) || (nikoox iswm $3-) || (*? zline ?* iswm $3-) || (*c _o _m* iswm $3-) || (*? ziline ?* iswm $3-) || (*? a...ğ ?* iswm $3-) || (nikoox iswm $3-) || (*yavhşak* iswm $3-) goto ok
    if (*? strom ?* iswm $3-) || (*yavşşşk* iswm $3-) || (*sana kırmızı*yakışıyor* iswm $3-) || (*züüq*qeeeR* iswm $3-) || (*karsl1* iswm $3-) || (*? s iktir* iswm $3-) || (*p0YRaZzZ* iswm $3-) || (*? katirlara ?* iswm $3-) || (*Ohh*rroos* iswm $3-) || (*zokayyym* iswm $3-) goto ok
    if (*ßeßo* iswm $3-) || (*Ghot* iswm $3-) || (*< Sah>* iswm $3-) || (nikoox iswm $3-) || (*ibbin* iswm $3-) || (*domalt* iswm $3-) || (*khevaş* iswm $3-) || (*? hamuna ?* iswm $3-) || (*s2kler* iswm $3-) || (*law*w*w*y*yer* iswm $3-) goto ok
    if (Ohhrro* iswm $3-) || (*hzl.hzl3* iswm $3-) || (*jikhec* iswm $3-) || (*Vahiledin* iswm $3-) || (*Ma?jiinal* iswm $3-) || (*vualhiden* iswm $3-) || (*AYN€T* iswm $3-) || (*VUALİDEN* iswm $3-) || (*FUHAİEŞ* iswm $3-) || (*A ZDIM YAV* iswm $3-) goto ok
    if (*g t nu* iswm $3-) || (*bet.c0m* iswm $3-) || (*@r@spu* iswm $3-) || (*@n@an* iswm $3-) || (*Sihhhger* iswm $3-) || (*Sosyetem* iswm $3-) || (*IDONCER-----S-I-K-E---R* iswm $3-) || (*AhnneC* iswm $3-) || (?* Ahnen ?* iswm $3-) || (*DehlıG* iswm $3-) goto ok
    if (*HaLiS22* iswm $3-) || (*? Pıj kurus* iswm $3-) || (*gotttun* iswm $3-) || (*? siqtimin ?* iswm $3-) || (nikoox iswm $3-) || (*Doma|* iswm $3-) || (*? GohtLü ?* iswm $3-) || (*kohca Goht* iswm $3-) || (*turkanmm* iswm $3-) || (*kIozet* iswm $3-) goto ok
    if (*D{æph* iswm $3-) || (*mæmæ* iswm $3-) || (*tæşşæ* iswm $3-) || (*S.e.d.a* iswm $3-) || (*s.__iqe* iswm $3-) || (*Eşşeoğ*leşşek* iswm $3-) || (*? bokunu ?* iswm $3-) || (*@_m_k* iswm $3-) || (*Dæncæ* iswm $3-) || (*İRC-D* iswm $3-) goto ok
    if (*L.o.k.i* iswm $3-) || (*æmIna* iswm $3-) || (*? FAİsEm ?* iswm $3-) || (*#amq* iswm $3-) || (*lvk mloz* iswm $3-) || (*K-al_ça_la* iswm $3-) || (*Ka__H_-_p__e* iswm $3-) || (*@_m_k* iswm $3-) || (*Dæncæ* iswm $3-) || (*İRC-D* iswm $3-) goto ok
    if (*S00ı-Ke* iswm $3-) || (*shaggy _K_0_c* iswm $3-) || (*İm-_Za=* iswm $3-) || (*? yar___rag* iswm $3-) || (*@__MuRaT__* iswm $3-) || (*@__MuRaa-T* iswm $3-) || (*Ma. (vi) StarS* iswm $3-) || (*? sqerim ?* iswm $3-) || (*Z !kerim* iswm $3-) || (Kasınan op Sop* iswm $3-) goto ok
    if (*Zİbidiler* iswm $3-) || (*İrc.one* iswm $3-) || (*Sohbet*Platform*Hepiniz*BekLer* iswm $3-) || (*soharim* iswm $3-) || (*? lavyer ?* iswm $3-) || (<*_*N*k*t*n>* iswm $3-) || (*sm.ok ?* iswm $3-) || (*sm.o.k ?*  iswm $3-) || (*s.m.o.k ?* iswm $3-) || (*ZİKHİM*KALKT* iswm $3-) goto ok
    if (*? AhmCuna ?* iswm $3-) || (*? Ayır bahCaklar* iswm $3-) || (*? Baban Dadas ?* iswm $3-) || (*? zokarİm iswm $3-) || (*Sénın Ahnéy* iswm $3-) || (? Soqém ? iswm $3-) || (? Orhsp* iswm $3-) || (*yuzhuné*ßo$hLsn* iswm $3-) || (*Ahnény* iswm $3-) || (*ßoşhaLsn* iswm $3-) goto ok
    if (*Orhspu* iswm $3-) || (*? ßachnın ?* iswm $3-) || (*ßoşhéLém* iswm $3-) || (? Suqcém ? iswm $3-) || (*? s2sin ?* iswm $3-) || (*KARİNİ SİKE* iswm $3-) || (*S'K'I'C'E'G* iswm $3-) || (*SD:FSD:FS* iswm $3-) || (A``h B* iswm $3-) || (nikoox iswm $3-) goto ok
    if (nikoox iswm $3-) || (*? gzline ?* iswm $3-) || (*? G Ö t ü N* iswm $3-) || (*? zherim ?* iswm $3-) || (*? Kad@R ?* iswm $3-) || (*B@B* iswm $3-) || (*2hc3m* iswm $3-) || (*DANCER* iswm $3-) || (*ÆYN€T* iswm $3-) || (*|Z|K|C|E|* iswm $3-) goto ok
    if (?* .. ?? ..??* -? ?* iswm $3-) || (*FUATTAN SELAMLAR* iswm $3-) || (*A?Y?N?E?T?O?R?G* iswm $3-) || (*Ba?*Harfleri*Birlestir*Adrese*Ula?* iswm $3-) || (*? A?* y?* s?* o?* h?* b?* e?* T?* iswm $3-) || (nikoox iswm $3-) || (*? gwznın ?* iswm $3-) goto ok
    if (*niqotin* iswm $3-) || (*? Siqer ?* iswm $3-) || (????????* -? ? ?* iswm $3-) || (?* (deneme)* iswm $3-) || (nikoox iswm $3-) || (nikoox iswm $3-) || (nikoox iswm $3-) goto ok
    return $false
    :OK
    set %block $v1
    return $true
  }
}
#block end
menu status,menubar,channel {
  .-
  .» Block Koruması   
  .-
  .Block Aç: if $group(#Block) == off { .enable #Block | echo -a 12Block Koruması 4koruması açıldı. }
  .-
  .Block Kapat: if $group(#Block) == on { disable #Block | echo -a 12Block 4Koruması kapatıldı. }
  .- 
  .Durum $+($chr(40),$iif($group(#Block) = On,Acık,Kapalı),$chr(41)):echo 3 -a *** Block Koruması $iif($group(#Block) = On,Acik,Kapalı) Durumda.
}
#Unblok off
on *:unban:#kanal:{ if (*~T:bl* iswm $banmask) && !$istok(#muafkanal #muafkanal #muafkanal,$chan,32)  { mode # +b $banmask } { echo -a 4Uyarı # kanalında4 $banmask açıldı. } }
#Unblok end
off *:unban:#kanal:{ if (*~T:bl* iswm $banmask) {  mode # +b $banmask } }
alias /unblokon { .enable #unblok  | echo -a 12Tblock Unban Koruması 4koruması açıldı. }
alias /unblokoff { .disable #unblok | echo -a 12Tblock Unban 4Koruması kapatıldı. }

Set · 08 Aralık 2017, 13:59

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ugrasmisin eline sağlıkta, bu kadar uzun codlar yazarken txt gibi parametreler kullanilmasi daha saglikli olurdu

nikotin · 08 Aralık 2017, 20:13

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

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ugrasmisin eline sağlıkta, bu kadar uzun codlar yazarken txt gibi parametreler kullanilmasi daha saglikli olurdu

Haklısınız set.
Daha önce dediginiz şekilde kullanıyordum blocklar.txt olarak.
fakat hatalı eklenen kücük bir yanlıstan dolayı sorunu bulmak zor oluyordu.
yani mirc'in {} hata satır numarasını bulamıyordum. tek care yeni eklenen blokları silip tekrar denemek oluyordu.
txt eklemeleri meşaketli oldugundan iptal edip bu sekilde eklemeyi sectim.

WingmaN arkadasın küfür hash korumasının tblock'a cevrilmiş halide var aslında ama yukarıda ki ekleme bicimi benim icin daha saglıklıydı.

block.txt olarak kullanmak isteyen arkadaslar varsa aşagıda ki kodu kullana bilirler tabiki.
bu arada hemen belirteyim, yukarıda ki kod normal cinsel arayıs remotesiydi sonradan tblock a çevrildi.
çeviriyi yapan arkadaş mIRCturk Coder'i Csop_JeunneTurC'dur.
yardımlarından dolayı kendisine bir kez daha teşekkür ediyorum.

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

on @*:text:*:#kanal:{
  if ($nick isreg $chan) {
    if !$window @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) { window -ean @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
    var %i = 1, %txt = $strip($1-)
    while (%i <= $lines(blocklar.txt)) {
      if ($read(blocklar.txt,%i) iswm %txt) { 
        var %ban = $+(~T:block:,$replace($ifmatch,$chr(32),_))
        mode $chan +b %ban
        echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] >  $chan  kanalında  $nick  nickinin yazdıgı  $ifmatch  kelimesi Tblock eklendi.
      }
      inc %i
    }
  }
}

hazır tblock başlıgı altında konu acılmış iken arşivimde bulunan farklı bi remote daha paylaşim.
aşagıda ki kod birden fazla nick'lerin random yazılarını engellemek için yazılmış bir remotedir.

[19:05:17] <sivas_mert> pvnhvvs zowmc tbxyujib : aaaa nik0 naber pvnhvvs pvnhvvs

bu tür yazı floodlar da oto-block eklemekte işe yaramıyordu ama lamer'lerin illa ki bir acıkları vardır her zaman.
remotenin çalışma mantıgı ilk harf sayısı 7, sonra ki 5,8 olup sonunda : ile bitiyorsa
noktadan sonra ne yazarsa yazsın ilk 3 satırı oto blok ekler.

<mIRC3859> pvnhvvs zowmc tbxyujib : aaaa nik0 naber pvnhvvs pvnhvvs
<MLifeUser2> mod değiştirdi:+b ~T:block:*aaaa*nik0*naber* gibi.

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

On *:text:*:#kanal: {
  if $len($1) == 7 && $len($2) == 5 && $len($3) == 8 && $left($4,1) == $chr(58) {
    mode # +b $+(~T:block:*,$remove($replace($4-7,$chr(32),*),$chr(58)),*)
    .hadd -mu60 $+(#,_555) # $addtok($hget($+(#,_555),#),$nick,32)
    if $numtok($hget($+(#,_555),#),32) >= 2 {
      set %555 $hget($+(#,_555),#)
      var %aa = 1
      while %aa <= $numtok(%555,32) {
        whilefix
        kick # $gettok(%555,%aa,32) 2Kural ihlali.
        inc %aa
      }
      hfree $+(#,_555)
    }
  }
}

Coder: Techvisor_JeunneTurC

CoCoRiCo · 11 Aralık 2017, 08:48

Bunu dene.

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

.Emre · 23 Şubat 2018, 19:14

güzel güzel eline sağlık

LeoNHearT · 04 Mart 2018, 23:11

Emektarlar Her zaman Arka planda yine desteklerini esirgemezler
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bilecikli · 18 Nisan 2018, 18:56

Selamlar. Bu koddan !Block nick/mask şeklinde uyarlama yapabilirmisiniz acaba? Yani; !block biLecikLi dediğimde, belirtilen kanalda T
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
lock:*biLecikLi* banını atabilecek. Yardımcı olursanız sevinirim.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

SaNaLStaR · 18 Nisan 2018, 20:16

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

on *:text:!tblock*:?: {
if $nick isop #abc {
var %t = 1 | while $chan(%t) { mode $v1 +b ~T:block: $+ $2- | inc %t }
}
}

#abc kanalında op olanlar yapabilir gibi olur veya
if $nick ison #abc { ; #abc kanalında bulunan bir kişi yapar

Bilecikli · 19 Nisan 2018, 10:11

SaNaLStaR 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 *:text:!tblock*:?: {
if $nick isop #abc {
var %t = 1 | while $chan(%t) { mode $v1 +b ~T:block: $+ $2- | inc %t }
}
}

#abc kanalında op olanlar yapabilir gibi olur veya
if $nick ison #abc { ; #abc kanalında bulunan bir kişi yapar

input olarak ayarlamak istersek bunu kendim kullanıcam da

Alper · 19 Nisan 2018, 10:29

[QUOTE=Bilecikli;1041938497]

SaNaLStaR 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 *:text:!tblock*:?: {
if $nick isop #abc {
var %t = 1 | while $chan(%t) { mode $v1 +b ~T:block: $+ $2- | inc %t }
}
}

#abc kanalında op olanlar yapabilir gibi olur veya
if $nick ison #abc { ; #abc kanalında bulunan bir kişi yapar
[/QUOTE

input olarak ayarlamak istersek bunu kendim kullanıcam da

Text Kanal için:

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

on $*:text:/^[.!]tblock/Si:#:{
  if ($nick isop $chan) && $2 {
    mode $chan +b ~T:block: $+ $iif($chr(42) isin $2,$2,$+($chr(42),$2,$chr(42))) 
  }
}

İnput senin için:

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

on *:input:#:{
  if ($me isop $chan) && $2 {
    if $regex($1,/^[!\.]tblock$/Si) {
      .timer -h 1 500 mode $chan +b ~T:block: $+ $iif($chr(42) isin $2,$2,$+($chr(42),$2,$chr(42))) 
    }
  }
}

Eğer $2 değerinde * işareti varsa mesela !tblock nick* yaparsan nick* olarak ekler !block nick yaparsan *nick* olarak ekleme yapar.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Çözüldü Bad Nick Remotesi	Khal	mIRC Scripting Sorunları	3	04 Şubat 2015 16:05
Tekrar korumasında Tblock	Skys	mIRC Scripting Sorunları	2	27 Eylül 2010 00:17
Tblock Hakkında.	Korkut	mIRC Scripting Sorunları	6	16 Nisan 2009 01:40

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.