IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Proxy yaRdım! (https://www.ircforumlari.net/mirc-scripting-sorunlari/316201-proxy-yardim.html)

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
}
;Sercan $sockname gzline *@ $+ %ipprox +1h :2[Proxy] $qsecantet
;Sercan $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.

Cevap: Proxy yaRdım!

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

Cevap: Proxy yaRdım!

Alıntı:

Cry Nickli Üyeden Alıntı (Mesaj 1040320659)

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

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

Cevap: Proxy yaRdım!

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..

Cevap: Proxy yaRdım!

Alıntı:

Entrance Nickli Üyeden Alıntı (Mesaj 1040320679)

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 ?

Cevap: Proxy yaRdım!

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