mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz. |
|
Seçenekler | Stil |
14 Ekim 2020, 13:50 | #1 |
Girişte Ülke/Şehir/İSP Gösterme
PHP- Kodu
Kodon *:snotice:*Client connecting on port*:who +I $9 raw 352:*:var %:r $r(1000,99999) | sockopen $+(pro,%:r) www.ipaddresslocation.org 80 | sockmark $+(pro,%:r) $+($4,¿,$6) alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 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 } } |
|
|
14 Ekim 2020, 14:06 | #2 |
emegine saglik
________________
Hope. . . ✨
|
|
|
14 Ekim 2020, 14:08 | #3 |
Emeğine sağlık
________________
. |
|
|
14 Ekim 2020, 15:34 | #4 |
Emeğinize sağlık ;ççk
________________
bazen insanlar iyilesmek istemez.
cünkü , icindeki acı sevdiklerinin son hatirasidir.. per aspera ad astra ✨ |
|
|
05 Nisan 2021, 01:22 | #5 |
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. Kodon *: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 } } Kodon *: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) } 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 |
|
|
05 Nisan 2021, 01:35 | #6 |
Emegıne Saglık.
|
|
|
05 Nisan 2021, 14:59 | #7 |
Emeğine sağlık kardeşim
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
________________
Popüler Olabilirsin Ama Kalite Başka Birşey.. |
|
|
05 Nisan 2021, 15:22 | #8 |
ellerine saglık alper çogu kişi sorun yaşıyordu eminimki site güncellemesi yüzünden .
|
|
|
06 Nisan 2021, 21:40 | #9 |
Emeğinize sağlık
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
________________
~ E & B ~ |
|
|
06 Nisan 2021, 21:41 | #10 |
emeğine sağlık reis
|
|
|
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
|
|