IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 1 Toplam 3 Sayfadan 1 23
Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Tblock Remotesi (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/778603-tblock-remotesi.html)

nikotin 05 Aralık 2017 16:55
Tblock Remotesi
 
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:
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
Cevap: Tblock Remotesi
 
@[Ü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
Cevap: Tblock Remotesi
 
Alıntı:
Set Nickli Üyeden Alıntı (Mesaj 1041883576)
@[Ü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:
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:
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
Cevap: Tblock Remotesi
 
Bunu dene.

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

.Emre 23 Şubat 2018 19:14
Cevap: Tblock Remotesi
 
güzel güzel eline sağlık

LeoNHearT 04 Mart 2018 23:11
Cevap: Tblock Remotesi
 
Emektarlar Her zaman Arka planda yine desteklerini esirgemezler :)

Bilecikli 18 Nisan 2018 18:56
Cevap: Tblock Remotesi
 
Selamlar. Bu koddan !Block nick/mask şeklinde uyarlama yapabilirmisiniz acaba? Yani; !block biLecikLi dediğimde, belirtilen kanalda T:Block:*biLecikLi* banını atabilecek. Yardımcı olursanız sevinirim. :)

SaNaLStaR 18 Nisan 2018 20:16
Cevap: Tblock Remotesi
 
Kod:
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
Cevap: Tblock Remotesi
 
Alıntı:
SaNaLStaR Nickli Üyeden Alıntı (Mesaj 1041938402)
Kod:
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
Cevap: Tblock Remotesi
 
[QUOTE=Bilecikli;1041938497]
Alıntı:
SaNaLStaR Nickli Üyeden Alıntı (Mesaj 1041938402)
Kod:
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:
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:
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.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:16.
Sayfa 1 Toplam 3 Sayfadan 1 23
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net