alias bilgi {
if !$1- {
echo -a 2Lütfen botun bilgilerini girin.
echo -a 2Örnek: 10/bilgi serverip serverport botnick botnicksifre botoper botopersifre botlogkanal
}
else {
set %serverip $1 | set %serverport $2 | set %botnick $3 | set %botnicksifre $4 | set %botopernick $5 | set %botopersifre $6 | set %botlogkanal $7
echo -a 2Botun bilgileri girildi.
echo -a 2Botu sunucuya sokmak için : 10/bot12 yazınız
}
}
on *:sockopen:bot1:{
if ($sockerr) { echo $color(info) -st Bağlantı kesildi.Lütfen Scripti Kapatıp Tekrar Açın. | return }
swbot1 NICK %botnick
swbot1 USER FAT * * :Bilinen en tehlikeli proxy katili ¦:)
}
on *:sockread:bot1:{
if ($sockerr) { echo $color(info) -st Bağlantı kesildi.Lütfen Scripti Kapatıp Tekrar Açın. | return }
var %:; | sockread %:; | tokenize 32 %:;
if !$window(@Bot1) { window -ne @Bot1 %:; }
echo @Bot1 %:;
swalias1 $1-
}
alias swbot1 { if $sock(bot1) { sockwrite -n bot1 $1- } }
alias swalias1 {
if $sock(bot1) {
var %: = echo $color(info) -st > Socket bot:
if *:VERSION* iswm $4- { swbot1 NOTICE $bnick($1) VERSION mIRC v6.21 Khaled Mardam-Bey }
if $1 == PING { swbot1 PONG $2- }
if $2 == NOTICE && $3 == %botnick && *Bu kayitli ve sifre korumali bir nick* iswm $4- {
swbot1 JOIN 0,
swbot1 PRIVMSG nickserv identify %botnicksifre
swbot1 oper %botopernick %botopersifre
swbot1 JOIN 0,
swbot1 JOIN %botlogkanal
swbot1 PRIVMSG %botlogkanal Krouma botu aktif.
}
if $3 == %botlogkanal && $4 == :.guncelle {
if $5 == oto {
swbot1 PRIVMSG $3 Otomatik güncelleme sistemi 1800ms. olarak ayarlandı.
guncelle oto
}
else {
swbot1 PRIVMSG $3 Güncelleme başlatıldı. Tahmini süre 1800ms.
guncelle
}
}
if $2 == 352 {
tor_ $6
madgir $6
}
if *Client connecting* iswm $7- {
inc %mad
if $read(tor.txt,w,$remove($gettok($13,2,64),$chr(41))) {
swbot1 gline *@ $+ $remove($gettok($13,2,64),$chr(41)) +1d 2Proxy yasaktır.
}
else {
swbot1 who +I $12
}
var %ipcik = $remove($gettok($13,2,64),$chr(41))
hinc -mu2 pp %ipcik 1
if ($hget(pp,%ipcik) >= 3) {
swbot1 gzline $+(*@,%ipcik) +15m 2Kurallara aykırı davranış yüzünden banlandınız.
if $gettok(%ipcik,1,45) == adsl || $gettok(%ipcik,1,45) == dslb {
write tor.txt $replace($gettok(%ipcik,2-4,45),-,.)
.halt
}
if !$read(tor.txt,w,$remove($gettok($13,2,64),$chr(41))) {
write tor.txt $remove($gettok($13,2,64),$chr(41))
swbot1 PRIVMSG %botlogkanal $remove($gettok($13,2,64),$chr(41)) karalisteme eklendi.
}
}
}
}
}
alias bot1 {
if !$sock(bot1) {
sockopen bot1 %serverip %serverport
}
}
alias bnick return $gettok($remove($1,:),1,33)
#------- on
on *:Sockopen:proxy2:{
sockwrite -n $sockname GET
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Host:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:Sockread:proxy2:{
var %proxy2
sockread %proxy2
.tokenize 32 %proxy2
if !$read(tor.txt,w,%proxy2) && $1 != HTTP/1.1 && $1 != Date: && $1 != Server: && $1 != X-Powered-By: && $1 != Location: && $1 != Content-Length: && $1 != Keep-Alive: && $1 != Connection: && $1 != Content-Type: {
write tor.txt %proxy2
}
}
on *:Sockopen:proxy3:{
sockwrite -n $sockname GET
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Host: proxy.org $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:Sockread:proxy3:{
var %proxy
sockread %proxy
.tokenize 32 %proxy
if *^* iswm $1- && $+(*,$chr(36),*) iswm $1- && *\* iswm $1- {
if !$read(tor.txt,w,$remove($3,^,\,$)) {
write tor.txt $remove($3,^,\,$)
}
}
}
on *:Sockopen:proxy4:{
sockwrite -n $sockname GET
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Host: multiproxy.org $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:Sockread:proxy4:{
var %proxy
sockread %proxy
.tokenize 32 %proxy
if *:* iswm $1- && *.* iswm $1- {
if !$read(tor.txt,w,$gettok($1,1,58)) {
write tor.txt $gettok($1,1,58)
}
}
}
on *:Sockopen:proxy5:{
sockwrite -n $sockname GET /proxylist.txt HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Host: tubeincreaser.com $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:Sockread:proxy5:{
var %proxy5
sockread %proxy5
.tokenize 32 %proxy5
if *:* iswm $1- && *.* iswm $1- && *Server* !iswm $1- {
if !$read(tor.txt,w,$gettok($1,1,58)) {
write tor.txt $gettok($1,1,58)
}
}
}
on *:Sockopen:proxy6:{
sockwrite -n $sockname GET /tor.shtml HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Host:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:Sockread:proxy6:{
var %proxy6
sockread %proxy6
.tokenize 32 %proxy6
if $1 == HTTP/1.1 { goto end }
if $1 == Date: { goto end }
if $1 == Server: { goto end }
if $1 == Last-Modified: { goto end }
if $1 == ETag: { goto end }
if $1 == Accept-Ranges: { goto end }
if $1 == Content-Length: { goto end }
if $1 == Content-Type: { goto end }
if *-* iswm $1- { goto end }
if *Connection* iswm $1- { goto end }
if */* iswm $1- { goto end }
if $1 == 0 { goto end }
if $regex($1-,[a-z]) { goto end }
if $read(tor.txt,w,$gettok($remove($1,$chr(42)),1,58)) { goto end }
else {
write tor.txt $gettok($remove($1,$chr(42)),1,58)
}
:end
}
on *:Sockopen:proxy7:{
sockwrite -n $sockname GET /socks4.txt HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Host:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:Sockopen:tor:{
sockwrite -n $sockname GET /?list=tor HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Host: list.iblocklist.com $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:Sockread:tor:{
var %'
sockread %'
if *The Onion Router:* iswm %' {
if !$read(tor.txt,w,$gettok(%',2,45)) {
write tor.txt $gettok(%',2,45)
}
}
}
on *:Sockread:proxy7:{
var %proxy7
sockread %proxy7
.tokenize 32 %proxy7
if *:* iswm $1- && *.* iswm $1- && !$read(tor.txt,w,$gettok($1,1,58)) && $gettok($1,1,58) != proxy.cjb.net {
write tor.txt $gettok($1,1,58)
}
}
on *:Sockopen:proxy8:{
sockwrite -n $sockname GET /socks5.txt HTTP/1.1
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Host:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:Sockread:proxy8:{
var %proxy8
sockread %proxy8
.tokenize 32 %proxy8
if *:* iswm $1- && *.* iswm $1- && !$read(tor.txt,w,$gettok($1,1,58)) && $gettok($1,1,58) != proxy.cjb.net {
write tor.txt $gettok($1,1,58)
}
}
alias proxy8 { sockopen proxy8
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
alias proxy7 { sockopen proxy7
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
alias proxy6 { sockopen proxy6
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
alias proxy5 { sockopen proxy5
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
alias proxy4 { sockopen proxy4
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
alias proxy3 { sockopen proxy3
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
alias proxy2 { sockopen proxy2
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
alias guncelle {
if $1 == oto {
timer 0 1800 guncelle
}
else {
sockopen tor list.iblocklist.com 80
}
}
on *:sockclose:proxy8:{
swbot1 PRIVMSG %botlogkanal 10 8.Proxy listesinin2 güncellemesi yapıldı.
pbn
}
on *:sockclose:proxy7:{ swbot1 PRIVMSG %botlogkanal 10 7.Proxy listesinin2 güncellemesi yapıldı. | proxy8 }
on *:sockclose:proxy6:{ swbot1 PRIVMSG %botlogkanal 10 6.Proxy listesinin2 güncellemesi yapıldı. | proxy7 }
on *:sockclose:proxy5:{ swbot1 PRIVMSG %botlogkanal 10 5.Proxy listesinin2 güncellemesi yapıldı. | proxy6 }
on *:sockclose:proxy4:{ swbot1 PRIVMSG %botlogkanal 10 4.Proxy listesinin2 güncellemesi yapıldı. | proxy5 }
on *:sockclose:proxy3:{ swbot1 PRIVMSG %botlogkanal 10 3.Proxy listesinin2 güncellemesi yapıldı. | proxy4 }
on *:sockclose:proxy2:{ swbot1 PRIVMSG %botlogkanal 10 2.Proxy listesinin2 güncellemesi yapıldı. | proxy3 }
on *:sockclose:tor:{ swbot1 PRIVMSG %botlogkanal 10 1.TOR/Proxy listesinin2 güncellemesi yapıldı. | proxy2 }
#------- end
alias tor_ { if ($1) { inc %tor | sockopen $+(tor-*,%tor)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 | sockmark $+(tor-*,%tor) $1 } }
on *:sockopen:tor-*:{
var %s sockwrite -n $sockname
%s GET /tor.php?ip= $+ $sock($sockname).mark HTTP/1.1
%s host:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
%s $crlf
}
on *:sockread:tor-*:{
var %> [ $+ [ $sockname ] ]
sockread %> [ $+ [ $sockname ] ]
$+(.timer,%mad,$md5($rand($rand(A,Z),$rand(A,Z)))) 1 60 sockclose $sockname
if (*IP is LISTED* iswm %> [ $+ [ $sockname ] ]) {
swbot1 gzline $+(*@,$sock($sockname).mark) 2h Proxy/TOR/Wingate/SC5 Alert.
sockclose $sockname
}
}
on *:sockopen:hppn:{
var %s sockwrite -n $sockname
if %sira == 0 { %s GET /proxy/socks.htm HTTP/1.1 }
if %sira == 1 { %s GET /proxy/socks2.htm HTTP/1.1 }
if %sira == 2 { %s GET /proxy/socks3.htm HTTP/1.1 }
if %sira == 3 { %s GET /proxy/socks4.htm HTTP/1.1 }
if %sira == 4 { %s GET /proxy/socks5.htm HTTP/1.1 }
if %sira == 5 { %s GET /proxy/socks6.htm HTTP/1.1 }
if %sira == 6 { %s GET /proxy/socks7.htm HTTP/1.1 }
if %sira == 7 { %s GET /proxy/socks8.htm HTTP/1.1 }
if %sira == 8 { %s GET /proxy/socks9.htm HTTP/1.1 }
if %sira == 9 { %s GET /proxy/socks10.htm HTTP/1.1 }
if %sira == 10 { %s GET /proxy/socks11.htm HTTP/1.1 }
if %sira == 11 { %s GET /proxy/socks12.htm HTTP/1.1 }
if %sira == 12 { %s GET /proxy/socks13.htm HTTP/1.1 }
if %sira == 13 { %s GET /proxy/socks14.htm HTTP/1.1 }
if %sira == 14 { %s GET /proxy/socks15.htm HTTP/1.1 }
if %sira == 15 { %s GET /proxy/socks16.htm HTTP/1.1 }
if %sira == 16 { %s GET /proxy/socks17.htm HTTP/1.1 }
if %sira == 17 { %s GET /proxy/socks18.htm HTTP/1.1 }
if %sira == 18 { %s GET /proxy/socks19.htm HTTP/1.1 }
if %sira == 19 { %s GET /proxy/socks20.htm HTTP/1.1 }
%s Host: samair.ru $+ $crlf $+ $crlf
}
/*
;h4pp3n yazdığı kod satırıdır. Sadece ekleme ve düzenleme yapılmıştır
*/
on *:sockread:hppn:{
sockread %hppn
if $gettok($gettok(%hppn,1,32),2,58) == 1080 {
var %hp $gettok(%hppn,1,58)
if !$read(tor.txt,w,%hp) {
write tor.txt %hp
}
}
}
on *:sockclose:hppn:{
if %sira == 20 {
swbot1 PRIVMSG %botlogkanal 2Hızlandırılmış proxy listesi çekildi. Toplam $lines(tor.txt) kadar IP mevcut.
}
else {
inc %sira
sockclose hppn*
sockopen hppn samair.ru 80
}
}
alias pbn {
sockclose hppn
sockopen hppn samair.ru 80
set %sira 0
set %prox 0
}
alias madgir {
if ($1) {
inc %x1
sockopen $+(mor*,%x1) rbls.org 80
sockmark $+(mor*,%x1) $1
}
}
on *:sockopen:mor*:{
var %m sockwrite -n $sockname
%m GET / $+ $sock($sockname).mark HTTP/1.1
%m Host: rbls.org
%m $crlf
}
on *:sockread:mor*:{
var %x [ $+ [ $sockname ] ]
sockread %x [ $+ [ $sockname ] ]
$+(.timer,%mad,$md5($rand($rand(A,Z),$rand(A,Z)))) 1 60 sockclose $sockname
if *is listed in opm.tornevall.org* iswm %x [ $+ [ $sockname ] ] || *is listed in rbl.efnetrbl.org* iswm %x [ $+ [ $sockname ] ] || *is listed in tor.dan.me.uk* iswm %x [ $+ [ $sockname ] ] {
swbot1 gline $+(*@,$sock($sockname).mark) 2h Proxy/TOR/Wingate/SC5 Alert.
if !$read(tor.txt,w,$sock($sockname).mark) { write tor.txt $sock($sockname).mark }
}
}