İnternet Hizmetleri,Hosting Çözümleri
Hazır Kodlar
Nick Degisenleri Ayri Pencerede Görmek
20 Ara
Bu kod ile Nick de?i?en kullan?c?lari @Nickler diye pencerede görmenizi saglicaktir. Kodu Remotelere ekleyiniz. ( ALT+R )
on ^*:snotice:*his/her*: {
 window -e @Nickler
 echo @Nickler $time 9,1 Nick 4 4 $4 1nickini, 4,1 $11 1olarak de?i?tirdi.
 halt
}
Clone Proxy Korumasi
20 Ara
Kod sayesinde kanal?n?za giren clone ve proxy’leri istedi?iniz komut ile atman?z? sa?l?yor.
alias randomnick if ($randn2($1)) || ($randn($1)) { return $true } | else { return $false }
alias randn2 {
if $1- isalpha && $1- islower {
if (($count($1,a,e,i,o,u) >= 4)) { return $false }
if ($regex($1-,/([[:print:]])\\\\1\\\\1/gi) >= 1) { return $false }
if ($len($1) >= 4) && ($regex($1,/^[a-z]+$)) {
if ($regex($1,/^[^aeiou]{3}/)) { return $true }
elseif ($regex($1,/([a-z])\\\\1{2}/)) { return $true }
elseif ($regex($1,/[aeiou]{3/)) { return $true }
elseif ($regex($1,q[^u])) { return $true }
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true }
else { return $false }
}
}
}
alias randn {
if $1- isalpha && $1- islower {
if ($regex($1-,/([[:print:]])\\\\1\\\\1/gi) >= 1) { return $false }
if ($len($1) == 7) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
} Bu yazının devamını okuyun »
Join part saldirilarina önlem
20 Ara
Join/part sald?r?lar?na önlem Kodu
Kod:
alias ipkick {
var %c 1
var %chan $1
var %ip $2
var %sebep $3-
; degi?kenlerimizi atad?k
while %c <= $nick(%chan,0) {
; while dongusune soktum
if %ip == $remove($address($nick(%chan,%c),2),*!*@) {
; %ip degi?keni while dongusunun sonuçu olan nick ise
mode %chan +b *!*@ $+ $ifmatch
; sebebi banla
kick $chan $nick(%chan,%c) %sebep
; sebepli ki?iyi kanalda salla.
}
inc %c
; her seferinde %c yi 1 artt?r
}
}
on *:join:#: {
Bu yazının devamını okuyun »Ozele gelen botnet mesajlarina oto spam
20 Ara
Ozele gelen botnet mesajlarina oto spam Kodu
Kod:
}
%yi = $replace($1-,$chr(42),%y,$chr(36),%y,$chr(91),%y,$chr(93),%y,$ chr(92),%y,$chr(47),%y,$chr(43),%y,$chr(63),%y,$ch r(94),%y,$chr(124),%y,$chr(40),%y,$chr(41),%y,$chr (164),%y,$chr(33),%y,$chr(123),%y,$chr(125),%y,$ch r(189),%y,$chr(188),%y,$chr(39),%y,$chr(46),%y,$ch r(44),%y,$chr(60),%y,$chr(61),%y,$chr(62),%y,$chr( 34),%y,$chr(199),%y,$chr(221),%y,$chr(58),%y,$chr( 45),%y,$chr(254),%y,$chr(222),%y,$chr(32),%y)
if %1kelime {
%yi = $+(^,%yi,$chr(36))
}
return $iif($len($remove(%yi,.,*)) > 5,%yi,SPAMKONTROLUNDEGECERSIZ aslolan mesaj: $1- )
}
on *:open:?:{
set -u5 %nickw. [ $+ [ $nick ] ] warn
}
alias spch {
if (!$window(@Spams)) window -ne @Spams
spamekle $yildiztemizle($2-)
echo -t @Spams $1 : $yildiztemizle($2-) Bu yazının devamını okuyun »
Mirchane- Fullname Takip Kodu
20 Ara
on *:join:#:{
.enable #kgwc
who $nick
}
#kgwc off
raw 352:*:{
if !$window(@Fullname) { .window @Fullname }
echo @Fullname 12&#8226;4 [ $6 ] [4 Fullnamesi ] $9-
.haltdef
.halt
}
#kgwc off
raw 315:*:{
if $group(#kgwc) == on {
.disable #kgwc
.haltdef
.halt
}Â
Yorumlar