| Alper |
05 Nisan 2021 01:22 |
Site güncellendiği için şuanda çalışmıyor sanırım bu kod aşağıdaki değişiklikleri yaparsanız çalışacaktır.
NOT: Yeni sistemde çalışması için mIRC için SSL ayarları yapılmış olması gerekmektedir.
Kod:
on *:sockopen:pro*:{
sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1
sockwrite -nt $sockname Host: www.ipaddresslocation.org
sockwrite -nt $sockname Connection: keep-alive
sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36
sockwrite -nt $sockname $crlf
}
on *:sockread:pro*:{
if ($sockerr) { .sockclose $sockname | return }
var %:pro | sockread -f %:pro
if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) }
if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) }
if (ISP Provider: isin %:pro) {
var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58))
var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)
$iif(!$window(@Giriş),window -e @Giriş)
.echo @Giriş Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp
.hfree -sw %:n
sockclose $sockname
}
}
Yukarıdaki kısmı komple aşağıdaki gibi değiştirin.
Kod:
on *:sockopen:pro*:{
sockwrite -nt $sockname GET $+(/locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1
sockwrite -nt $sockname Host: www.ipaddresslocation.org
sockwrite -nt $sockname Connection: close
sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:87.0) Gecko/20100101 Firefox/87.0
sockwrite -nt $sockname $crlf
}
on *:sockread:pro*:{
var %:pro
sockread %:pro
if $regex(u,%:pro,/IP Country\x3A\x20(\S+)\x20/Si) { .hadd -m $token($sock($sockname).mark,2,191) Ülke $iif($htmlfree($regml(u,1)) == $null,Belirsiz,$htmlfree($regml(u,1))) }
if $regex(c,%:pro,/Town\x3A\x20(\S+)\x20/Si) { .hadd -m $token($sock($sockname).mark,2,191) Sehir $iif($htmlfree($regml(c,1)) == $null,Belirsiz,$htmlfree($regml(c,1))) }
if $regex(i,%:pro,/ISP Provider\x3A\x20(.+)<hr>/Si) {
var %:isp $iif($htmlfree($regml(i,1)) == $null,Belirsiz,$htmlfree($regml(i,1)))
var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir)
echo -st 2[ 4Giriş 2] *** Nick:4 %:n 3- IP:4 %ip 3- Ulke:4 %ülke 3- Sehir:4 %sehir 3- ISP:4 %:isp 3- Saat:4 $timestamp
}
}
on *:sockclose:pro*:{ .hfree $token($sock($sockname).mark,2,191) }
Ek olarak,
sockopen $+(pro,%:r) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
Yukarıdaki kısmı aşağıdaki gibi değiştirmek gerekiyor.
sockopen -e $+(pro,%:r) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 443 |
