Konu: Proxy
Tekil Mesaj gösterimi
Alt 28 Temmuz 2012, 15:09   #1
Çevrimdışı
XDie
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Proxy




Dynamite Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Arkadaşlar Bildiğiniz Gibi İsmi Lazım Değil Sitenin Proxy Bulması Kalktı. Güvenlik Kodu Getirdiler.Şimdiki Bende Başka Bir Sitenin Ve Denendi Koruması Gayet iyi. Bu Socket Botu PBot Sahibi Aeg'den Esinlenerek Yaptım. Proxy Koruma Botu Arıyordum Aeg'in Korumasını Gördüm Ve Güzelmiş. Sizinlede Paylaşmak İstedim. + Kendime Göre + Bir Koruma daha Ekledim.Daha Fazla Konuşmadan Sizlere Kodu Vermek İstiyorum.. Dediğim Gibi Bu Proxy Korumanın Sahibi Aeg Nickidir. Pbot Socket Botuna Koymuş.Bende Kendime Göre Biraz Editledim.. İyi Kullanmalar.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias pbotnick return Muhittin alias pnickpass return NİCKŞİFREYAZIN. alias popers return Muhittin OPERPASSYAZIN. alias pident return ~Dynamite alias poperchan return #opers alias psunucu return irc.SUNUCU-ADI 6667 alias phostum return Muhittin.Proxy-Bot alias bagla { if ($sockerr) { echo -a Bot Zaten Sunuda | halt } else { sockclose prox | sockopen prox $psunucu | echo -a - ProxyBot Devreye Girdi! | halt } } alias kopar { if ($sockerr) { echo -a Bot Zaten Sunuda Degil | halt } else { sockclose prox | echo -a - ProxyBot Devreden Cıkarildi! | halt } } on *:sockopen:prox:{ if ($sockerr) { echo $color(info) -a Socket botun bağlantısı kesildi. | return } swprox NICK User $+ $r(0,99) swprox USER $pident * * :Muhittin Socket Proxy-Bot swprox oper $popers swprox join 0, swprox NICK $pbotnick swprox join $poperchan swprox ns identify $pnickpass swprox mode $pbotnick +Dp swprox sethost $phostum swprox setident $pident .timer 0 20 swprox ping $pbotnick sockmark $sockname hgaehae } on *:sockread:prox:{ if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return } var %; | sockread %; | tokenize 32 %; swproxy $1- } alias swprox { if $sock(prox) { sockwrite -n prox $1- } } alias swproxy { ;eğer bot socketı açıksa if $sock(prox) { var %: = echo $color(info) -st > Socket bot: if :VERSION iswm $4- { swprox NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION Muhittin Socket Proxy-Bot $+ $chr(1) } if :FINGER iswm $4- { swprox NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER Muhittin Socket Proxy-Bot $+ $chr(1) } if $1 == PING { swprox PiNG $2- } if $1 == error && $2 == :closing { baglan } if ($2 == 352) && (%prox == on) { kpro $6 | kontrol $6 } if $2 == notice { if (*client connecting* iswm $strip($1-)) && (%prox == on) { var %:ip = $gettok($left($right($13,-1),-1),2,64) swprox who +I $12 } } if ($2 == privmsg) { var %n = $gettok($gettok($1,1,33),1,58), %m = $4,%text = $right($4-,-1), %k = $3 if (.proxy isin %m) && (%k == $poperchan) { if ($5 == on) { if (%prox == on) { .enable #proxy | swprox privmsg %k Proxy Koruma Aktif! | halt } } if ($5 == off) { if (%proxy == off) { .disable #proxy | swprox privmsg %k Proxy Koruma DEAktif! | halt } } } } } } #proxy on alias kontrol { sockopen $+(kontrol,$r(1,999999999)) $1- 1080 sockopen $+(kontrol,$r(1,999999999)) $1- 3128 sockopen $+(kontrol,$r(1,999999999)) $1- 9050 sockopen $+(kontrol,$r(1,999999999)) $1- 8000 sockopen $+(kontrol,$r(1,999999999)) $1- 6588 sockopen $+(kontrol,$r(1,999999999)) $1- 3124 sockopen $+(kontrol,$r(1,999999999)) $1- 50050 sockopen $+(kontrol,$r(1,999999999)) $1- 27977 } on *:sockopen:kontrol*: { if !$sockerr { .swprox gzline *@ $+ $sock($sockname).ip +0 Proxy Girişi Yasaktır hdel ckontrol $sock($sockname).ip sockclose $sockname } } on *:sockclose:kontrol*: { hdel ckontrol $sock($sockname).ip } alias ip2nick { var %i 1 while %i <= $hget(ckontrol,0).item { if $hget(ckontrol,%i).item == $1 { return $hget(ckontrol,%i).data | halt } inc %i } } alias kpro { inc -u6 %xxxx sockopen kpro $+ %xxxx
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 sockmark $+(kpro*,%xxxx) $1 } on *:sockopen:kpro*:{ sockwrite -n $sockname GET //?ip= $+ $sock($sockname).mark HTTP/1.1 sockwrite -n $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:sockread:kpro*:{ var %kpro sockread %kpro if (inetnum: isin %kpro) && (0.0.0.0 isin %kpro) { .swprox gzline *@ $+ $sock($sockname).mark +0 Proxy Girisi Yasak! sockclose $sockname } }

Botu /bagla Komutu İle Bağlayabilirsiniz. Botu /kopar Komutuyla Sunucudan Çıkarabilirsiniz.Proxy Korumayı Kapatmak için Opers Kanalında .proxy off Yapmanız Yeterlidir. İyi İF'Ler..


Burda Arkadaşın Açtığı Güzel Bir Konu Var ama Bunu Botsuz Kendime Göre Nasıl Yapmam Lazım yani ben Operim direk calismasi lazim

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet