on *:start: {
  if !$hget(muafip) {
    hload -sm muafip muafip.ymc
  }
}
on *:text:*:#: {
  if $chan == #admin {
    if $regex($1,/^[.!]muaf[iİı]p$/Si) {
      if !$2 { msg $chan Hatalı komut. 7(!muafip ekle-sil-list nick) | return }


      if $regex($2,/^(l[iıİ]st)$/Si) {
        msg $chan 2----4 Muafip Listesi 2----
        var %i = 1
        while %i <= $hget(muafip,0).item {
          msg $chan %i - $hget(muafip,%i).item - [ Ekleyen: $hget(muafip,%i).data ]
          inc %i
        }
      }
      if $regex($2,/^(s[iıİ]l)$/Si) {
        if !$3 { msg $chan Lütfen bir ip belirtin. (!muafip ekle 1.2.3.4) | return }
        if !$hfind(muafip,$3) { msg $chan $3 ip adresi zaten muafip listesinde bulunmuyor. | return }
        hdel -s muafip $3 | hsave -s muafip muafip.ymc
        msg $chan $3 muafip listesinden silindi
      }

      if $2 == ekle {
        if !$3 { msg $chan Lütfen bir ip belirtin. (!muafip ekle 1.2.3.4) | return }
        if $hfind(muafip,$3) { msg $chan $3 ip adresi zaten muafip listesinde bulunuyor. | return }
        hadd -sm muafip $3 $nick | hsave -s muafip muafip.ymc
        msg $chan $3 muafip listesine eklendi.
      }


    }
  }
  if $chan == #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 || $hfind(muafip,$regml(gk,6)) { 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 {

      gzline $+(*@,$gettok($sockname,2,64)) 1h Sunucumuzun girişi şimdilik yurt dışına kapalıdır.
      msg #admin $time(d/m/yyyy HH:nn) GİRİŞ[4Yurt Dışı] İP-ADRES: $gettok($sockname,2,64)

      if *"org":* iswm %d_G-kontrol { sockclose $sockname }
    }
  }
}