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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Çözüldü Ulke yasaklama Addonu Sorunu (https://www.ircforumlari.net/mirc-scripting-sorunlari/848725-ulke-yasaklama-addonu-sorunu.html)

silenger 14 Ocak 2025 23:06

Cevap: Ulke yasaklama Addonu Sorunu
 
Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1042963979)
Merhaba,

Sorgu yapılan sitenin 80 portundan veri alabildiğine emin misiniz? Çünkü site http(s) protokolünü kullanıyor.
Kod ile siteden veri alınıp alınmadığını bir deneyin isterseniz. Eğer sonuç olumlu ise kodu düzeltmek kolay olacaktır.

Aga buna emin değilim büyük ihtimal ile almıyor olabilir dediğim.gibi sadece who işlemi yapıyor

Tupac 24 Ocak 2025 22:53

Cevap: Ulke yasaklama Addonu Sorunu
 
allow {
ip *@CH; # İsviçre
ip *@DE; # Almanya
ip *@FR; # Fransa
ip *@TR; # Türkiye
};

deny {
ip *@*; # Diğer tüm ülkeleri engelle
};
bunuda kullanabilirsiniz loadmodule "geoip.so";

CoCoRiCo 12 Şubat 2025 18:30

Cevap: Ulke yasaklama Addonu Sorunu
 
Bu tip adresler sıklıkla kapanır, bu nedenle iyi bir kaynak bulmanız gerekir
FireFox eklentisi olan bir kaynak için Ülke bilgisi veren aşağıdaki kodu kullanabilirsiniz..





Kod:

alias gip {
  if $regex($1,/^(\d+(\.|$)){4}/g) { .sockopen -e $+(gip-,$1) iplookup.flagfox.net 443 }
  else { echo *GeoIP* Hatalı IP Adress }
}
on *:sockopen:gip-*: {
  if (!$sockerr) { 
    var %s sockwrite -n $sockname
    %s GET /?ip= $+ $gettok($sockname,-1,$asc(-)) $+ &host= HTTP/1.1
    %s Host: iplookup.flagfox.net
    %s User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:135.0) Gecko/20100101 Firefox/135.0
    %s Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
    %s Cookie: Geotool-Language=en-US
    %s Connection: keep-alive
    %s $str($crlf,2)
  }

}
on *:sockread:gip-*: {
  if ($sockerr > 0) return | :.
  sockread %d
  if ($sockbr == 0) return
  if *nowrap*/wiki/* iswm %d && $regsubex(%d,/(<b>(.*?)<\/b>)/g,\1) {
    echo : $remove($regml(1),</b>,<b>)
  }
  goto .
}



Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 19:46.

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