IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 12 Toplam 13 Sayfadan « İlkSayfa 2567891011 12 13
Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Girişte Ülke/Şehir/İSP Gösterme (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/682252-giriste-ulke-sehir-isp-gosterme.html)

Akabinde 01 Aralık 2021 18:11
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
BaşarıLar

POSOFxPOWER 10 Ocak 2022 17:27
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
Hayirli gunler,
bu kod artik calismiyormu ?

Che 10 Ocak 2022 17:41
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
Alıntı:
POSOFxPOWER Nickli Üyeden Alıntı (Mesaj 1042595123)
Hayirli gunler,
bu kod artik calismiyormu ?
Erişime kısıtlandığı için çalışmaz.

Zanay 16 Şubat 2022 11:30
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
Alıntı:
Che Nickli Üyeden Alıntı (Mesaj 1042595129)
Erişime kısıtlandığı için çalışmaz.
Che merhabalar;

Özel mesaj atamıyorum. Erişim kısıtlandı demişsin, konuyla ilgili yardımcı olur musun?

Toprak 19 Ağustos 2022 10:59
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
Kod:
on *:snotice:*:if $regex($1-,/Client connecting (on port|at) .+\: (.+) \((.+)@(.+)\)/Si) { who +I $regml(2) }
raw 352:*:var %_rand $+($6,$r(1000,99999)) | sockopen $+(giris_bildiri,%_rand) cesuryurek.net 80 | sockmark $+(giris_bildiri,%_rand) $+($4,¿,$6)
on *:sockopen:giris_bildiri*:{ 
  if ($sockerr) { sockclose $sockname }
  else {
    sockwrite -nt $sockname GET $+(/bilgi5.php?ip=,$token($sock($sockname).mark,1,191)) HTTP/1.1
    sockwrite -nt $sockname Host: $sock($sockname).addr
    sockwrite -nt $sockname Connection: keep-alive
    sockwrite -nt $sockname Cache-Control: max-age=0
    sockwrite -nt $sockname Upgrade-Insecure-Requests: 1
    sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/89.0.4389.114 Safari/537.36
    sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9
    sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.9,en-US;q=0.8,en;q=0.7
    sockwrite -nt $sockname $crlf 
  }
}
on *:sockread:giris_bildiri*:{ 
  var %tr | sockread %tr | tokenize 32 %tr
  if $regex($1-,/<span>Country:</span> <span>(.+)</span>/i) { .hadd -msu7 Ulke $sockname $regml(1) }
  elseif $regex($1-,/<span>City:</span> <span>(.+)</span>/i) { .hadd -msu7 Sehir $sockname $regml(1) }
  elseif $regex($1-,/<span>ISP:</span> <span>(.+)</span>/i) { .hadd -msu7 ISP $sockname $regml(1) }
  elseif $regex($1-,/<span>Mobile:</span> <span>(.+)</span>/i) { .hadd -msu7 Mobile $sockname $iif($regml(1) == true,Evet,Hayır) }
  elseif $regex($1-,/<span>Proxy:</span> <span>(.+)</span>/i) {
    $iif(!$window(@Giris),window -e @Giris)
    .echo @Giris 4Nick: $token($sock($sockname).mark,2,191) 4IP: $token($sock($sockname).mark,1,191) 4Ulke: $iif($hget(Ulke,$sockname),$v1,Belirsiz) 4Sehir: $iif($hget(Sehir,$sockname),$v1,Belirsiz) 4ISP: $iif($hget(ISP,$sockname),$v1,Belirsiz) 4Mobile IP: $hget(Mobile,$sockname) 4VPN: $iif($regml(1) == true,Evet,Hayır)
    sockclose $sockname
  }
}
Kod güncellendi.

High 01 Eylül 2022 12:46
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
Toprak, gayet güzel çalışıyor KOD bu koda hotlink ekleyebilir misin? boş vaktin olduğun da daha kullanışlı olur benzer Kodlar vardı ama çalışmıyor.

Tunne 10 Ekim 2022 22:41
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
Alıntı:
Toprak Nickli Üyeden Alıntı (Mesaj 1041617269)
Merhaba,
Giriş yapan kişinin Ülke, Şehir, ISP, Mobil(IP), VPN olup olmadığı şeklinde @Giris penceresine yansıtır..
Kodu kullanabilmeniz için client girişini görebilmeniz gerekmektedir.

Kod:
on *:snotice:*:if $regex($1-,/Client connecting (on port|at) .+\: (.+) \((.+)@(.+)\)/Si) { who +I $regml(2) }
raw 352:*:var %_rand $+($6,$r(1000,99999)) | sockopen $+(giris_bildiri,%_rand) igs.gevezeyiz.net 80 | sockmark $+(giris_bildiri,%_rand) $+($4,¿,$6)
on *:sockopen:giris_bildiri*:{ 
  if ($sockerr) { sockclose $sockname }
  else {
    sockwrite -nt $sockname GET $+(/bilgi.php?ip=,$token($sock($sockname).mark,1,191)) HTTP/1.1
    sockwrite -nt $sockname Host: $sock($sockname).addr
    sockwrite -nt $sockname Connection: keep-alive
    sockwrite -nt $sockname Cache-Control: max-age=0
    sockwrite -nt $sockname Upgrade-Insecure-Requests: 1
    sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/89.0.4389.114 Safari/537.36
    sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9
    sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.9,en-US;q=0.8,en;q=0.7
    sockwrite -nt $sockname $crlf 
  }
}
on *:sockread:giris_bildiri*:{ 
  var %tr | sockread %tr | tokenize 32 %tr
  if $regex($1-,/<span>Country:</span> <span>(.+)</span>/i) { .hadd -msu7 Ulke $sockname $regml(1) }
  elseif $regex($1-,/<span>City:</span> <span>(.+)</span>/i) { .hadd -msu7 Sehir $sockname $regml(1) }
  elseif $regex($1-,/<span>ISP:</span> <span>(.+)</span>/i) { .hadd -msu7 ISP $sockname $regml(1) }
  elseif $regex($1-,/<span>Mobile:</span> <span>(.+)</span>/i) { .hadd -msu7 Mobile $sockname $iif($regml(1) == true,Evet,Hayır) }
  elseif $regex($1-,/<span>Proxy:</span> <span>(.+)</span>/i) {
    $iif(!$window(@Giris),window -e @Giris)
    .echo @Giris 4Nick: $token($sock($sockname).mark,2,191) 4IP: $token($sock($sockname).mark,1,191) 4Ulke: $iif($hget(Ulke,$sockname),$v1,Belirsiz) 4Sehir: $iif($hget(Sehir,$sockname),$v1,Belirsiz) 4ISP: $iif($hget(ISP,$sockname),$v1,Belirsiz) 4Mobile IP: $hget(Mobile,$sockname) 4VPN: $iif($regml(1) == true,Evet,Hayır)
    sockclose $sockname
  }
}
Kod güncellendi..

oncelıkle emegınıze saglık bu kod ıcın. bunu mırce txt ata bılıyormuyuz ıslevı varmı. Bıde gırıs clıent gormek nasıl oalcak tsk ederım.

Bozkurt- 11 Ekim 2022 13:38
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
Alıntı:
Tunne Nickli Üyeden Alıntı (Mesaj 1042725496)
oncelıkle emegınıze saglık bu kod ıcın. bunu mırce txt ata bılıyormuyuz ıslevı varmı. Bıde gırıs clıent gormek nasıl oalcak tsk ederım.
Kopyaladığınız kodu txt atarsanız mirce tanıtmanız gerekir. /load -rs belgeadi.txt şeklinde ya da direkt mircinizde alt R kombinasyonu ile remoteler bölümüne kodu yapıştırabilirsiniz. Giriş bildirimlerini görmek için en az oper yetkisine sahip olmanız lazım. Mevcut kopyaladığınız koddaki site erişim kısıtlaması uyguladığı için site sahibinden ip adresinize giriş izni tanımlaması isteyebilirsiniz. Ya da son güncelleme ile eklenen kodu kullanabilirsiniz.

DeLiKanLl 24 Aralık 2022 17:28
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
4Nick: User 4IP: 88.242.240.90 4Ulke: Turkey 4Sehir: Kırıkkale 4ISP: TurkTelecom 4Mobile IP: Hayır 4VPN: Hayır
4Nick: User 4IP: 88.242.240.90 4Ulke: Turkey 4Sehir: Kırıkkale 4ISP: TurkTelecom 4Mobile IP: Hayır 4VPN: Hayır

Selamlar.
Kodu ekledim çalışıyor. Fakat giriş yapanı iki kez gösteriyor. Birde şehir kısmında karaktelrer bozuk çıkıyor. Düzeltilebilir mi ??

Bozkurt- 24 Aralık 2022 18:25
Cevap: Girişte Ülke/Şehir/İSP Gösterme
 
Alıntı:
DeLiKanLl Nickli Üyeden Alıntı (Mesaj 1042760301)
4Nick: User 4IP: 88.242.240.90 4Ulke: Turkey 4Sehir: Kırıkkale 4ISP: TurkTelecom 4Mobile IP: Hayır 4VPN: Hayır
4Nick: User 4IP: 88.242.240.90 4Ulke: Turkey 4Sehir: Kırıkkale 4ISP: TurkTelecom 4Mobile IP: Hayır 4VPN: Hayır

Selamlar.
Kodu ekledim çalışıyor. Fakat giriş yapanı iki kez gösteriyor. Birde şehir kısmında karaktelrer bozuk çıkıyor. Düzeltilebilir mi ??
Kod:
on *:snotice:*:if $regex($1-,/Client connecting (on port|at) .+\: (.+) \((.+)@(.+)\)/Si) { who +I $regml(2) }
raw 352:*:var %_rand $+($6,$r(1000,99999)) | sockopen $+(giris_bildiri,%_rand) cesuryurek.net 80 | sockmark $+(giris_bildiri,%_rand) $+($4,¿,$6)
on *:sockopen:giris_bildiri*:{ 
  if ($sockerr) { sockclose $sockname }
  else {
    sockwrite -nt $sockname GET $+(/bilgi5.php?ip=,$token($sock($sockname).mark,1,191)) HTTP/1.1
    sockwrite -nt $sockname Host: $sock($sockname).addr
    sockwrite -nt $sockname Connection: keep-alive
    sockwrite -nt $sockname Cache-Control: max-age=0
    sockwrite -nt $sockname Upgrade-Insecure-Requests: 1
    sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/89.0.4389.114 Safari/537.36
    sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9
    sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.9,en-US;q=0.8,en;q=0.7
    sockwrite -nt $sockname $crlf 
  }
}
on *:sockread:giris_bildiri*:{ 
  var %tr | sockread %tr | tokenize 32 %tr
  if $regex($1-,/<span>Country:</span> <span>(.+)</span>/i) { .hadd -msu7 Ulke $sockname $regml(1) }
  elseif $regex($1-,/<span>City:</span> <span>(.+)</span>/i) { .hadd -msu7 Sehir $sockname $_tr($regml(1)) }
  elseif $regex($1-,/<span>ISP:</span> <span>(.+)</span>/i) { .hadd -msu7 ISP $sockname $regml(1) }
  elseif $regex($1-,/<span>Mobile:</span> <span>(.+)</span>/i) { .hadd -msu7 Mobile $sockname $iif($regml(1) == true,Evet,Hayır) }
  elseif $regex($1-,/<span>Proxy:</span> <span>(.+)</span>/i) {
    $iif(!$window(@Giris),window -e @Giris)
    .echo @Giris 4Nick: $token($sock($sockname).mark,2,191) 4IP: $token($sock($sockname).mark,1,191) 4Ulke: $iif($hget(Ulke,$sockname),$v1,Belirsiz) 4Sehir: $iif($hget(Sehir,$sockname),$v1,Belirsiz) 4ISP: $iif($hget(ISP,$sockname),$v1,Belirsiz) 4Mobile IP: $hget(Mobile,$sockname) 4VPN: $iif($regml(1) == true,Evet,Hayır)
    sockclose $sockname
  }
}
alias _tr return $replace($1-,Ãœ,Ü,ÅŸ,ş,Ä,Ğ,Ä°,İ,Ö,Ö,ü,ü,ÅŸ,Ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,б,ı,Ğ°,İ,Ç,Ç,Å,Ş,ĞŸ,ğ,â,,Â,)
Girişte who çeken başka bir remoteniz varsa ondan iki kez gösteriyordur türkçe karakter için ufak bir düzenleme yaptım sorunsuz çalışıyor.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 11:21.
Sayfa 12 Toplam 13 Sayfadan « İlkSayfa 2567891011 12 13
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk