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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   random koruma (https://www.ircforumlari.net/mirc-scripting-sorunlari/6993-random-koruma.html)

NeLix 26 Ağustos 2005 18:57

random koruma
 
Arkadaşlar bana cs den ban atacak ßir random koruma lazım yardımcı olur musunuz site de bakdım ama çok karma karışık ßu çözemedim açıkcası :(

goXXip 26 Ağustos 2005 19:01

Random Nickler için koruma yapmak imkansız... Yalnızca bu indirgenebilir. Örneğin 4 tane sesli harf yanyana gelirse at gibi...

goXXip 26 Ağustos 2005 19:03

n867=randmi {
n868= if $1 isalpha {
n869= if $1 islower || $1 isupper {
n870= if $len($1) == 5 && $_ss($1-) <= 0 {
n871= return evet
n872= }
n873= if $len($1) >= 6 && $_ss($1-) <= 1 {
n874= return evet
n875= }
n876= }
n877= }
n878=}
n879=_ss {
n880= return $count($1-,a,e,i,o,u)
n881=}

Bu DefauLt un kendi kodu :) Bu da işe yaramıyor :D

CoCoRiCo 26 Ağustos 2005 19:22

Ahhh Random ahh en sonunda bende cileden cıkıcam random degil orjinal nicklerle yazıcam bi trojan kendini kurtarana ask olsun iyiden iyiye gerildim.

NeLix 26 Ağustos 2005 19:39

SouL senin verdiğin ilk code i denedim oldu mükemmel ama guestleri de atıor ßunu if ($nick = Guest*) { haLt } mantığı ile düzelteßilir miyiz yani guest51646 gißi herhangi ßir guest girince banlamıyacak yapaßilir miyiz ßunu ?

NeLix 27 Ağustos 2005 09:43

Arkadaşlar ßu random Korumaya çözüm yok mu yaw djinn de felan gördüm veya yozgatlı da yapmışlar :(

erdem55 27 Ağustos 2005 09:53

alias grr2 {
var %s = $mid($4,1,$3)
if (($($+($,regex,$chr(40),%s,$chr(44),/[^aeiou],$chr(123),$2,$chr(125),/i,$chr(41)),2)) || ($($+($,regex,$chr(40),%s,$chr(44),/[aeiou],$chr(123),$1,$chr(125),/i,$chr(41)),2))) { return $true } | else { return $false }
}
on @!*:join:#:{ if $grr2(3,6,6,$nick) { cs akick # add $address($nick,2) 0,4Random Nick | cs akick # enforce | cs akick # del $address($nick,2) } }

Birde bunu dene nelix buda sanırım asii_genc in koduydu yanılmıyorsam

NeLix 27 Ağustos 2005 21:47

alias grr2 {
var %s = $mid($4,1,$3)
if (($($+($,regex,$chr(40),%s,$chr(44),/[^aeiou],$chr(123),$2,$chr(125),/i,$chr(41)),2)) || ($($+($,regex,$chr(40),%s,$chr(44),/[aeiou],$chr(123),$1,$chr(125),/i,$chr(41)),2))) { return $true } | else { return $false }
}
on @!*:join:#:{ if $grr2(3,6,6,$nick) { cs akick # add $address($nick,2) 0,4Random Nick | cs akick # enforce | cs akick # del $address($nick,2) } }Arkadaşlar ßu code ident i spy güvenlik olanlara kanalda ban atmicak onu ayarlayaßilir miyiz?

NeLix 28 Ağustos 2005 08:46

Arkadaşlar yanıt yokmidir yaw :(

MaeLStrOm 28 Ağustos 2005 11:06

on @!*:join:#: {
if (spy isin $address($nick,5)) || (guvenlik isin $address($nick,5)) { halt }
if $grr2(3,6,6,$nick) { cs akick # add $address($nick,2) 0,4Random Nick | cs akick # enforce | cs akick # del $address($nick,2) } }
}

NeLix 28 Ağustos 2005 12:48

on @!*:join:#: {
if (spy isin $address($nick,5)) || (guvenlik isin $address($nick,5)) { halt }
if $grr2(3,6,6,$nick) { cs akick # add $address($nick,2) 0,4Random Nick | cs akick # enforce | cs akick # del $address($nick,2) } }
}

valla ßu çalışmadı mealstrom denedim ama tık yok :(

MaeLStrOm 28 Ağustos 2005 12:54

;calısması gerekirdi ama bide bunu dene bakalım
on @!*:join:#: {
if $grr2(3,6,6,$nick) && (spy !isin $address($nick,5)) && (guvenlik !isin $address($nick,5)) { cs akick # add $address($nick,2) 0,4Random Nick | cs akick # enforce | cs akick # del $address($nick,2) } }
}

NeLix 28 Ağustos 2005 13:04

maresef :( çalışmıor çok denedim ama tık yok

MaeLStrOm 29 Ağustos 2005 13:13

nelix dogru olarak eklediğine eminmisin sen kod sorunsuz gorunuyo

NeLix 26 Mayıs 2006 05:12

Yanıt: random koruma
 
alias grr2 {
var %s = $mid($4,1,$3)
if (($($+($,regex,$chr(40),%s,$chr(44),/[^aeiou],$chr(123),$2,$chr(125),/i,$chr(41)),2)) || ($($+($,regex,$chr(40),%s,$chr(44),/[aeiou],$chr(123),$1,$chr(125),/i,$chr(41)),2))) { return $true } | else { return $false }
}
on @!*:join:#:{
if (spy isin $address($nick,5)) || (iSo0o0 isin $address($nick,5)) { halt }
if (KeIebek isin $address($nick,5)) || (Sonya isin $address($nick,5)) { halt }
if $grr2(3,6,6,$remove($gettok($gettok($address($nick ,5),2,33),1,64),~)) { /cs akick # add $address($nick,2) 14,1R12a14,1nd12o14,1m N12i14,1ck12`14,1Id12e14,1nt pr12o14,1h12i14,1b12i14,1t12i14,1on 12i14,1n0 # 12-[-0 $me 12-]- 14,1B12a14,1nn12e14,1d=>>0 %kick | inc %kick | /cs akick # enforce | /cs akick # del $address($nick,2)
}
}


Arkadaşlar Bu Addon Mirc'imde /auser koruma nick Şeklinde eklediğim nickleri banlamıyacak.. yardımcı olur musunuz..





yozgatli6644 26 Mayıs 2006 19:35

Yanıt: random koruma
 
Şöle Yap

Alias Olarak;
randomdegil /auser randomdegil.txt $1

alias grr2 {
var %s = $mid($4,1,$3)
if (($($+($,regex,$chr(40),%s,$chr(44),/[^aeiou],$chr(123),$2,$chr(125),/i,$chr(41)),2)) || ($($+($,regex,$chr(40),%s,$chr(44),/[aeiou],$chr(123),$1,$chr(125),/i,$chr(41)),2))) { return $true } | else { return $false }
}
on @!*:join:#:{

if ($read(randomdegil.txt,w,$nick)) { halt }
if (spy isin $address($nick,5)) || (iSo0o0 isin $address($nick,5)) { halt }
if (KeIebek isin $address($nick,5)) || (Sonya isin $address($nick,5)) { halt }
if $grr2(3,6,6,$remove($gettok($gettok($address($nick ,5),2,33),1,64),~)) { /cs akick # add $address($nick,2) 14,1R12a14,1nd12o14,1m N12i14,1ck12`14,1Id12e14,1nt pr12o14,1h12i14,1b12i14,1t12i14,1on 12i14,1n0 # 12-[-0 $me 12-]- 14,1B12a14,1nn12e14,1d=>>0 %kick | inc %kick | /cs akick # enforce | /cs akick # del $address($nick,2)
}
}

/randomdegil banlanmayacak.nick
yazarsan
o nicki .txt ye atar ve koddaki if şartı atmaz onu
TŞKLER.

Biricik123 26 Mayıs 2006 22:18

Yanıt: random koruma
 
Random Addonu
on @Random:join:#: { cs akick # add $nick $+ !*@* 0,4×·Random·× 0,12 Nick¹/Ident² Detected  0,3 Yardim Icin /q $me   | cs akick # enforce | cs akick # del $nick $+ !*@* }
Bu Kodu Alt+r ye basarak Remote Bölümünde Boş bir yere Yapistirin..

Users Bölümü
Random Identler

Random:*!*cx*@*
Random:*!*aui*@*
Random:*!*euo*@*
Random:*!*eoa*@*
Random:*!*uiu*@*
Random:*!*oa*@*
Random:*!*oei*@*
Random:*!*oio*@*
Random:*!*uie*@*
Random:*!*jx*@*
Random:*!*qz*@*
Random:*!*aou*@*
Random:*!*oua*@*
Random:*!*iio*@*
Random:*!*eii*@*
Random:*!*eoe*@*
Random:*!*qz*@*
Random:*!*wv*@*
Random:*!*yj*@*
Random:*!*dlk*@*
Random:*!*czn*@*
Random:*!*tbh*@*
Random:*!*dz*@*
Random:*!*wf*@*
Random:*!*qu*@*
Random:*!*iiu*@*
Random:*!*qz*@*
Random:*!*xf*@*
Random:*!*jc*@*

Random Nickler
Random:*jx*!*@*
Random:*uai*!*@*
Random:*uoe*!*@*
Random:*aio*!*@*
Random:*ouo*!*@*
Random:*aea*!*@*
Random:*aei*!*@*
Random:*oae*!*@*
Random:*oea*!*@*
Random:*oii*!*@*
Random:*iao*!*@*
Random:*ooe*!*@*
Random:*ooi*!*@*
Random:*ooa*!*@*
Random:*eio*!*@*
Random:*eoo*!*@*
Random:*oia*!*@*
Random:*ioa*!*@*
Random:*qx*!*@*
Random:*eio*!*@*
Random:*tkk*!*@*
Random:*zj*!*@*
Random:*ckp*!*@*
Random:*gzj*!*@*
Random:*qf*!*@*
Random:*bw*!*@*
Random:*uop*!*@*
Random:*uuj*!*@*
Random:*xq*!*@*
Random:*iib*!*@*
Random:*cuu*!*@*
Random:*eeg*!*@*
Random:*cow*!*@*
Random:*yx*!*@*
Random:*ioj*!*@*
Random:*iix*!*@*
Random:*****!*@*
Random:*xuz*!*@*
Random:*sikici*!*@*
Random:*sokucu*!*@*
Random:*porn*!*@*
Random:*tecavuz*!*@*
Random:siki_*!*@*
Random:am_*!*@*
Random:*yar?ak*!*@*
Random:********!*@*
Random:*beceren*!*@*
Random:*alet20*!*@*
Random:*sikim*!*@*
Random:*seks*!*@*
Random:*siker*!*@*

Random Ipler

Random:*!*@*.jp
Random:*!*@*.py
Random:*!*@*.by
Random:*!*@*.ua
Random:*!*@*.vn
Random:*!*@*.se
Random:*!*@*.lt
Random:*!*@*.no
Random:*!*@*.th
Random:*!*@*.gr
Random:*!*@*.lv
Random:*!*@*.hu
Random:*!*@*.ch
Random:*!*@*.ca
Random:*!*@*.ac.uk
Random:*!*@*.cox.net
Random:*!*@*swbell*.*
Random:*!*@*kasserver*.*
Random:*!*@*verizon*.*
Random:*!*@*.aol.com
Random:*!*@*superonline*.*
Random:*!*@*ameritech*.*
Random:*!*@*qualitynet*.*
Random:*!*@*sbcglobal*.*
Random:*!*@*vapor*.*

Random Identler yazan yerden itibaren hepsini kopyalayip alt+r ye basip User Bolumune Yapistirin.


Alıntıdır.

Black 02 Haziran 2006 13:19

Yanıt: random koruma
 
Bu kod el33t in yazdığı bir kod. iyi çalışıyor. ($nick,/neslisah|vaybe diye başlayan satır atılmamasını istediğin nickler kısmıdır. kodun sonundaki /i ise nicklerin büyük küçük harf duyarlılığıdır. nick ahmet sede AhMeT sede AHMET sede atılmaz.

on @!*:JOIN:#:{
if (!$regex($nick,/neslisah|vaybe|tuqce|qozlem|zeyna|jotif|ciqsgirl|w awe|sema^^|extrem|companero|uyuz|selamm|xcomely|Sc arlett1|doktor|zxcourse|yokum|kerem|sahilci|demier en|nonamef|haziran|murat|doruk|karayel|mydream|naz l|smarties|meliz|yagmur|zpam|selda|ilke|kurabiye|b ade|bachelor|gezegen|nehrr|amele|erdem|plasser|ast racoupe|joelle|denizyildizi|serman|slmss|gamze|bil lur|hurols|gizemm|gambler|clkcoupe|syler|zeynaa|po yraz|yelis|kuram|myra|lapin|sleepp|yuppii|suistima l|shule|antuanet|zeynoo/i)) {
tokenize 33 $gettok($fulladdress,1,64)
if (!$hget($+($chan,$cid,drone),$nick)) && (($len($1) > 4) || ($len($2) > 4)) && ($regex($1,/^[a-z]+$) && $regex($2,/^~?[a-z]+$)) {
if ($regex($1,/^[^aeiou]{4}/)) || ($regex($2,/^(~?)[^aeiou]{4}/)) { goto end }
elseif ($regex($1,/([a-z])\1{2}/)) || ($regex($2,/([a-z])\1{2}/)) { goto end }
elseif ($regex($1,/[aeiou]{4/)) || ($regex($2,/[aeiou]{4}/)) { goto end }
elseif ($regex($1,q[^u]) || $regex($2,q[^])) { goto end }
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) || ($regex($2,/[^aeioux]x[^aeiouyx]/)) { goto end }
else { halt }
:end
if ($nick ison $chan) { ban $chan $nick 2 | .timer 1 600 mode $chan -b $address($nick,2) | kick $chan $nick (Random (Rastgele) Nick ve/veya Ident..)[Drones Kicked: $+(%d.k,]) | inc %d.k }
hadd -mu60 $+($chan,$cid,drone) $replace($fulladdress,!,$chr(32))
halt
}
;elseif ($regex($nick,/^[A-Z][a-z]+[^0-9][0-9]{2}$/)) && (Guest* !iswm $nick) { echo 4 -s ban -ku600 $chan $nick 2 autokicked: [exp/ma] You are infected with an IRC trojan/virus. Visit [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
}


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 05:25.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk