Türkiye'nin IRCd ve LaMeR Forumu Sitesi
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Tags
yurtdışıkoruma mircaddon mirckodları yurtdışıkorumakod koruması ircforum yurtdısıkoruması yurtdışıaddon yurtdışıkorumakodu ircforumlari mircaddonları yurtdışı kodu yurtdışıkorumaaddon mirckod ircforumları yurtdışıkoruması

Yurtdışı Koruması
Admin
#1
Heart 
Yeni Yurtdışı Koruması 2020 #opers kanalında !yip on !yip off yazıldığında harekete geçer ve sadece 6667 6668 portundan bağlanan kullanıcıları kapsar.
.yip pas Yazıldğında da kod pasif kalır.


.yip on yurt dışından girişler SERBEST
.yip off yurt dışından girişler YASAK
.yip pas yurt dışından girişler PASİF


kırmızı alanda belirttiğim gibi yurt dışı girişleri yasak konumunda ise girenlere gzline uygulanır.
Kod aktif olduktan sonra @G-kontrol penceresinde bilgi verilir.2020



Kod:
on *:text:*:#opers:{
  if $regex($1-,/[.!]yip\s(on|off|pas)$/i) { set %yurtdisi $regml(1)
    msg # Yurt dışı girişleri $iif($regml(1) = off,4KAPATILDI,$iif($regml(1) = on,3AÇILDI,$iif($regml(1) = pas,2PASİF)))
  }
}
alias G-kontrol {
  if !$sock($+(G-kontrol@,$1)) {
    sockopen $+(G-kontrol@,$1) ipinfo.io 80
    sockmark $+(G-kontrol@,$1) $+(/,$1,/json?token=bdbdb82ae05b96)
  }
}
on *:snotice:*: {
  if $regex(gk,$1-,/Client\sconnecting(.+)666(7|8):\s(.*)\(((.*)@(.*))\)(.*)/i) {
    if %yurtdisi = pas { return }
G-kontrol $regml(gk,6)
  }
}
on *:sockopen:G-kontrol@*:{
  var %sw sockwrite -tn $sockname
  %sw GET $sock($sockname).mark HTTP/1.1
  %sw Host: ipinfo.io
%sw $crlf }
on *:sockread:G-kontrol@*:{
  var %d_G-kontrol
  sockread %d_G-kontrol
  if $regex(ig,%d_G-kontrol,/("country": "(.*)")/i) {
    if $regml(ig,2) !== TR && %yurtdisi = off {
      if !$window(@G-kontol) {  window -en @G-kontol }
      gzline $+(*@,$gettok($sockname,2,64)) 1h Sunucumuzun girişi şimdilik yurt dışına kapalıdır.
      echo -m @G-kontol $time(d/m/yyyy HH:nn) 5GİRİŞ[4Yurt Dışı] 2İP-ADRES: $gettok($sockname,2,64) 
    }
    else { echo -m @G-kontol $time(d/m/yyyy HH:nn) $iif($regml(ig,2) = TR,5GİRİŞ[3Yurt İçi],5GİRİŞ[4Yurt Dışı]) 2İP-ADRES: $gettok($sockname,2,64) }
  }
  if *"org":* iswm %d_G-kontrol { sockclose $sockname }
}

Cevapla


Bu Konudaki Yorumlar
Yurtdışı Koruması - Yazar: Admin - 05-31-2020, 10:48 PM
RE: Yurtdışı Koruması - Yazar: Lamer - 06-01-2020, 12:47 AM

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Lightbulb IP Bazlı Clone Korumasi Admin 0 3,793 11-15-2020, 08:23 PM
Son Yorum: Admin
Lightbulb PingFlood koruması Admin 0 3,168 11-15-2020, 08:18 PM
Son Yorum: Admin
  Clone Koruması 2020 Admin 0 3,997 08-20-2020, 05:56 PM
Son Yorum: Admin
Lightbulb mIRC Kanal Yetki Koruması Admin 0 4,048 08-20-2020, 05:43 PM
Son Yorum: Admin
  mIRC Küfür Koruması (Seçmeli Hotlink) Admin 1 5,468 06-04-2020, 04:20 PM
Son Yorum: Lamer

Hızlı Menü:


Konuyu Okuyanlar: 1 Ziyaretçi