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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Add-on ve snippet(parça) kod istekleri buraya (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/523479-add-ve-snippetparca-kod-istekleri-buraya.html)

Birtürk 07 Nisan 2021 14:15

İp SorguLama Remotesi
 
selamun aleyküm.
Arkadaslar guzel bir İp SorguLama Remotesi olan varmı rc etsem yarımcı olurmunsuz..

High 14 Nisan 2021 00:11

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Selamun aleykum. Arkadaşlar Sunucuya giren kişilerin ip adreslerini [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Adresinden sorgulayıp eğer ki sorgulamada alınan yanıt şu şekilde ise.
Örnek:
Kod:

Decimal: 3257495556

Hostname: 194.41.112.4

ASN: 209854

ISP: Surfshark Ltd.

Organization: Surfshark Ltd.

Services: Network sharing device or proxy server

Type: Corporate

Assignment: Likely Static IP

Continent: North America

Country: Mexico

Services: Network sharing device or proxy server ( Sorgulama da proxy server ) yanıt alınırsa işlem GZline uygulasın.
Umarım anlatabilmişimdir.

YouMyCure 14 Nisan 2021 00:16

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:

High Nickli Üyeden Alıntı (Mesaj 1042474246)
Selamun aleykum. Arkadaşlar Sunucuya giren kişilerin ip adreslerini [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Adresinden sorgulayıp eğer ki sorgulamada alınan yanıt şu şekilde ise.
Örnek:
Kod:

Decimal: 3257495556

Hostname: 194.41.112.4

ASN: 209854

ISP: Surfshark Ltd.

Organization: Surfshark Ltd.

Services: Network sharing device or proxy server

Type: Corporate

Assignment: Likely Static IP

Continent: North America

Country: Mexico

Services: Network sharing device or proxy server ( Sorgulama da proxy server ) yanıt alınırsa işlem GZline uygulasın.
Umarım anlatabilmişimdir.

Bende mars'da yaşamak istiyorum ;d

High 14 Nisan 2021 00:45

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...], Kardeşim Coder olan sizsiniz dimi? Bilgi sahibi olan siz. Böyle bir şey mümkün değilse de alternatif belki benzer bir şey yapılabilir. Mars da yaşama isteğine gelince Elon Musk'a yakın ol belki o yardımcı olur sana.
Konu alakasız yada saçma ise de yetkili bi arkadaş silebilir.
İyi if'ler

YouMyCure 14 Nisan 2021 01:11

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:

By ZehiR Nickli Üyeden Alıntı (Mesaj 1042445333)
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 }
}

Peki bunu @G-kontrol penceresi yerine admin odasına yansıtıp .muafnick veya .muafip olarak ayarlama imkanımız varmı
Teşekkür ederim şimdiden yardımınız için

Kod:

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 }
    }
  }
}


#Admin kanalında !muafip ekle sil list olarak kullanabilirsiniz.

Alıntı:

High Nickli Üyeden Alıntı (Mesaj 1042474254)
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...], Kardeşim Coder olan sizsiniz dimi? Bilgi sahibi olan siz. Böyle bir şey mümkün değilse de alternatif belki benzer bir şey yapılabilir. Mars da yaşama isteğine gelince Elon Musk'a yakın ol belki o yardımcı olur sana.
Konu alakasız yada saçma ise de yetkili bi arkadaş silebilir.
İyi if'ler

İlk olarak ben "Coder" değilim.
İkincisi senin istediğin şey parça kod değil, proxy korumasi istiyorsun.
Üçüncü hiç şaka kaldıramıyorsun.

High 14 Nisan 2021 09:28

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...], kusura bakma şaka için iyi bir gün değildi benim için. Tepkim için kusura bakma tekrardan, parça koddan kasıt ufak kodlar mı? ne bilim baktım istek de bulunuyorlar benimde aklıma böyle bir şey geldi. Faydalı olabileceğini düşündüm

CayLak 20 Nisan 2021 16:38

Re: Add-on ve snippet(parça) kod istekleri buraya
 
Selamlar herkeslere on !*:join:#dj:{ os raw svsmode $nick +r -R }
Bu kodu Dj odasında Bulunup Dj Takısı alanlara nasıl ayarlayabilirim..
Teşekkürler

aLone 20 Nisan 2021 21:19

Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Kod:

on !*^:JOiN:#dj:{
  if *dj* iswm $nick { os raw svsmode $nick +abcdefg
  }
}

DJ odasına giren nick te dj eki varsa işlem yapabilirsin

Kod:

on *:nick:{
  if ($newnick ison #dj) && (*dj* iswm $newnick) {
    os raw svsmode $newnick +abcdefg
  }
}

dj odasında dj eki alan nicke işlem yapabilirsin

CayLak 20 Nisan 2021 22:42

Re: Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Alıntı:

aLone Nickli Üyeden Alıntı (Mesaj 1042477508)
Kod:

on !*^:JOiN:#dj:{
  if *dj* iswm $nick { os raw svsmode $nick +abcdefg
  }
}

DJ odasına giren nick te dj eki varsa işlem yapabilirsin

Kod:

on *:nick:{
  if ($newnick ison #dj) && (*dj* iswm $newnick) {
    os raw svsmode $newnick +abcdefg
  }
}

dj odasında dj eki alan nicke işlem yapabilirsin


Çok Teşekkürler @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] oldu kolay gelsin

CayLak 24 Nisan 2021 21:47

Re: Cevap: Add-on ve snippet(parça) kod istekleri buraya
 
Selamlar kolay gelsin. Benim bir sorum olacak tüm nickler kaydedildiğinde +RD olsun istiyorum. fakat Vip kanalına eklediğim kişiler birbirine yazabilecek Vip olmayan kişi ne olursa olsun özelde yazamayacak böyle birşeyi nasıl yapabilirim


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

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