19 Ocak 2011 Çarşamba

1 Ocak 2011 Cumartesi

Kanala Güvenlik kodu

on *:join:#kanal:{
  
if $nick isin %nick halt }
  if 
$nick isin $me halt }
  
set %kod $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z)
  
sapart $nick #kanal
  
msg $nick Lütfen
  msg 
#kanal Verilen kod =>  2  %kod
  
msg $nick Lütfen Kanala girebilmek için 4!kode %kod 1yazınız}
 
on *:text:*:?:{
  if $
==  !kode {
    if $
==  %kod {
      
set %nick $nick
      sajoin $nick 
#kanal
    
}
  }
}


Kanala giriş için güvenlik kodu sizlere sunuyoruz..

Kelebek Proxy Korumasi indir

alias tor_ { 
  if ($1) { 
    inc %xx
    sockopen $+(tor*,%xx) rbls.org 80
    sockmark $+(tor*,%xx) $1 
  }
}
on *:sockopen:tor*:{
  var %s sockwrite -n $sockname
  %s GET / $+ $sock($sockname).mark HTTP/1.1
  %s Host: rbls.org
  %s $crlf
}
on *:sockread:tor*:{
  var %x [ $+ [ $sockname ] ]
  sockread %x [ $+ [ $sockname ] ]
  if (*<tr class="rblred">*rbl.efnetrbl* iswm %x [ $+ [ $sockname ] ]) {
    gzline $+(*@,$sock($sockname).mark) 1h  1IP adresinizde  4PROXY  1girişi tespit edilmiştir.
    if !$window(@proxy-tor) { window -neg1 @proxy-tor } | echo @proxy-tor ( $+ $time $+ ) $+( 4 $chr(32),$sock($sockname).mark),$chr(32))  1IP adresinden  4PROXY  1girişi tespit edilmiştir.
    halt
  }
}
raw 352:*:{
  tor_ $4
}
on *:snotice:*Client connecting*: {
  .who +I $9
}

h4pp3n'in yazmış olduğu kod sizlerle..