Çevrimdışı

Merhaba ArkadaşLar. şöyLe Bir kod vaR Sanırım Socket Bot için uyarLanmış.

[BOX="30"]
inc %Random.say.v3
sercan $sockname Privmsg $yonetim : $+ $qlogo [Random] Random ident [ $gettok($left($right($12,-1),-1),1,64) ] [atılan : %Random.say.v3 ]
}
var %dx = $gettok($left($right($12,-1),-1),2,64)
if $regex(%dx,*ttnet*|.de|*telekom*|*co.uk) { goto son }
var %re = $iif($regex(%dx,-) != 1,$gettok(%dx,1,46),DONE)
if %re == DONE {
; Sercan $sockname gzline *@ $+ %dx +1h : $+ $qlogo 14[Proxy]
; Sercan $sockname privmsg #BotS :3Proxy2 Giriş Koruması:4 Nick: (12 $+ $11 $+ ) 7IP: (12 $+ %dx $+ )
}
var %ipprox $gettok($left($right($12,-1),-1),2,64)
if (!$istok(193.88.81.82.83.84.85.86.87.89.195.80.212 .217.213.213.70.71.72.73.74.75.76.77.78.79.195*.uk *,$gettok(%ipprox,1,46),46)) && ($gettok(%ipprox,-1,46) != tr) {
var %i 1
while ($read(ipler.txt,%i)) {
if ($v1 iswm %ip) { goto son }
inc %i
}

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ercan $sockname gzline *@ $+ %ipprox +1h :2[Proxy] $qsecantet

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ercan $sockname privmsg #BotS :3Proxy Giriş Koruması:4 Nick: (12 $+ $11 $+ ) 7IP: (12 $+ %ipprox $+ )
}
}
[/BOX]


(193.88.81.82.83.84.85.86.87.89.195.80.212.217.213 .213.70.71.72.73.74.75.76.77.78.79.195*.uk*,$getto k(%ipprox,1,46),46)) && ($gettok(%ipprox,-1,46) != tr) {

ßu kısımdaki ipLeri Muaf Tutuyor.
ßunu Kendi Mircimizde kuLLanacağımız ŞekiLde nasıL yaparız.

 

Çevrimiçi

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

 

Çevrimdışı

Cry Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Senin verdiğin Sayfada ki Kod`da Socket Bot için uyarLanmış.

 

Çevrimdışı

Alıntı:

on ^*:snotice:*: { if client connecting* iswm $4- { var %:ip $remove($gettok($10,2,64),$chr(41)) kontrol %:ip hadd -m ckontrol %:ip $9 halt } } 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- 6588 sockopen $+(kontrol,$r(1,999999999)) $1- 3124 sockopen $+(kontrol,$r(1,999999999)) $1- 50050 sockopen $+(kontrol,$r(1,999999999)) $1- 8008 sockopen $+(kontrol,$r(1,999999999)) $1- 1081 sockopen $+(kontrol,$r(1,999999999)) $1- 3380 sockopen $+(kontrol,$r(1,999999999)) $1- 3381 sockopen $+(kontrol,$r(1,999999999)) $1- 16104 sockopen $+(kontrol,$r(1,999999999)) $1- 41188 sockopen $+(kontrol,$r(1,999999999)) $1- 20769 sockopen $+(kontrol,$r(1,999999999)) $1- 47712 } on *:sockopen:kontrol*: { if !$sockerr { .raw gline *@ $+ $sock($sockname).ip +0 4[2Lamer4/2Module4] 4• 14I15R14C15S14t15a1415r4™ 2System4.. } echo -s 4Proxy girişvar : $+(,$sock($sockname).ip,3:,$sock($sockname).port ,) - Nicki bu:4 $ip2nick($sock($sockname).ip) 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 } }

Kendi Kullandığım Proxy Koruması. Güzelde çalışıyor. İşine Yararsa. KullanaßiLirsin.
Coden'in Yapımcısı. Kim ßiLmiyorum. İyi İF'ler..

__________________
-

 

Çevrimdışı

Entrance Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kendi Kullandığım Proxy Koruması. Güzelde çalışıyor. İşine Yararsa. KullanaßiLirsin. Coden'in Yapımcısı. Kim ßiLmiyorum. İyi İF'ler..

Kardeş kodun işlevi ve kullanımı hakkında biraz açıklama yapabılırmısın ?

 

Çevrimdışı

Anladığıma göre verdiği portları sunucuya sokmuyor.