IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi

IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi (https://www.ircrehberi.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircrehberi.net/mirc-scripting-hazir-kodlar/)
-   -   Sunucu girişlerini yurt dışına kapatıp açmak (https://www.ircrehberi.net/mirc-scripting-hazir-kodlar/26540-sunucu-girislerini-yurt-disina-kapatip-acmak.html)

diEfoRyoU 01 Haziran 2020 01:02

Sunucu girişlerini yurt dışına kapatıp açmak
 
#opers kanalı için;

!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

Kişisel kullanım için;

/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
Kod aktif olduktan sonra @G-kontrol penceresinde bilgi verilir.

Kod:

alias yip {
  if $regex($1,/(on|off|pas)$/i) { set %yurtdisi $regml(1)
    echo -a Yurt dışı girişleri $iif($regml(1) = off,4KAPATILDI,$iif($regml(1) = on,3AÇILDI,$iif($regml(1) = pas,2PASİF)))
} }
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 }
}


oMeN 01 Haziran 2020 19:09

Emeğine sağlık Murat güzel bir anlatım olmuş kardeşim

Sim 01 Haziran 2020 19:10

emeginize saglik

Reyhan 01 Haziran 2020 19:37

Emeğinize sağlık

L_ 01 Haziran 2020 19:45

Eline sağlık kanka

BLueMooN 01 Haziran 2020 19:50

Emeğine, bilgine sağlık.

CaNeRR 01 Haziran 2020 20:50

Emeğine Sağlik. . .

Eda 01 Haziran 2020 21:08

Emeğinize sağlık.

NeoN 01 Haziran 2020 21:09

Paylaşım için teşekkürler @[Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...]

She 01 Haziran 2020 21:35

Emeğine sağlık arkadaşım.

Lord 01 Haziran 2020 21:39

Murat kardaşım eline bileğine mantığına sağlık başarılar dilerim.

Rima 15 Ekim 2020 00:37

Emeğinize sağlık


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.

Copyright ©2019 - 2025 | IRCRehberi.Net