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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - ip bilgisi (https://www.ircforumlari.net/mirc-scripting-sorunlari/387289-ip-bilgisi.html)

mrb ben yeniyim aranizda biraz mrc den anliyom cok olmasada bi yerde adminim ama bi sorunum var bi tane user surekli ipine reset atiyor ve ben bu kisinin ipini alsam ve bu kanala girdigi zaman ipinden nasıl anlarim ozelime Bilgi adinda gelip Su İp su nick adı altında kanala girdi demesini istiyorum ipin bes hanesini veya 6 hanesini aldıgim zaman o ipten gelenlerin haber vermesini istiyorum mirci tesekkur ederim :)

Cevap: ip bilgisi

merhaba öncelikle ipin belirli hanelerini belirtmediğiniz için sunucuya giren kişilerin iplerini size @Bilgi kısmında verebilecek bir kod yazdım aşağıdaki kodu
ALT+R yapıp çıkan remote panelinin sol üst köşesinde bulunan "Dosya"(File) kısmına tıklayıp çıkan sekmelerden "Yeni"(New) kısmına tıklayınız. Çıkan boş remote sayfasına aşağıdaki kodu yapıştırınız.

Kod:

 

on *:snotice:*: {

  if (Client connecting isin $1-) {

    if (!$hget(Giris)) { hmake giris 100 }

    hadd Giris $9 $10

    $iif(!$window(@Bilgi),window -en @Bilgi)

    echo 2 @Bilgi $9 Nicki $10 Ip Adresi ile Giriş Yapmıştır.

  }

  if (Client exiting isin $1-) {

    if $hget(Giris,$6) { hdel Giris $6 } 

  }

}

Cevap: ip bilgisi

mrb oncelikle tsk ederim denedim olmus ama girenleri gosteriyor ben simdi size biraz ip vereyim bunlar girdikleri zaman nasil haber verebilir iplerin tam kısmini yazmadim cunku ipler degisiyor sadece degismeyen kisimlarini aldim bunlar nasil eklenir simdiden tsk ederim

88.230.8
88.230.2
88.227.6
88.224.7
78.165.1
88.228.1
88.230.9
78.167.2
88.231.1
95.10.7

Cevap: ip bilgisi

Sizce sorunlu giriş olduğunu düşündüğünüz ip numara kıstaslarını,aşağıdaki örnek komutlarla scriptinizin Kullanıcı (USERS) bölümüne ekleyiniz:

/auser Sorunlu 84.128.14.7*
/auser Sorunlu 92.64.15*
/auser Sorunlu 121.54.128.4*

bu sizin için uğraştırıcı ise scriptinizde ALT + R ile açılan panelde Kullanıcı (USERS) başlığı altında aşağıdaki verileri şablona göre oluşturursunuz:

Sorunlu:84.128.14.7*
Sorunlu:92.64.15*
Sorunlu:121.54.128.4*

Bu veri tabanı hazır olduktan sonra aşağıdaki kodu Remote kısmına eklemeniz halinde ve sorunlu giriş olduğu takdirde @Uyari pencerenizde giriş yapıldığına dair bilgi alacaksınızdır:

Kod:

on $*:snotice:/Client connecting.+\x3A\s(\S+)\s\x28.+@(.+)\x29/i: {

  if $level($regml(2)) == Sorunlu {

    $iif(!$window(@Uyari),window -ne @Uyari)

    aline -hp @Uyari Sorunlu giriş tespit edildi: $regml(1) nicki $regml(2) ip no

  }

}

Hoşca paylaşımlar dilerim...

Cevap: ip bilgisi

mrb dediginiz sekilde yaptım ve oldu once /auser Sorunlu İp yazdım kayit ettim sonrada o verdiginiz kodu ekledim ve oldu ozelime uyari geldi ama ben bu ipi geri silmek icin hangi komutu kullanacam yada listesine nasil bakacam /auser Sorunlu İp bunun listesine nasil bakacam sonrada silmek istedigim olursa ne yapacam ve ozelime gelen Uyaride
Sorunlu giriş tespit edildi: flower nicki 78.165.127.104 ip no
sekilde yazıyor sonunda bunun durdugu sehiride yazabilirmi mesela
Sorunlu giris tespit edildi: flower nicki 78.165.127.104 ip Ankara
bu sekilde yapabilirmiyiz tsk ederim yardiminiz icin :)

Cevap: ip bilgisi

Kayıt girdiğiniz Kullanıcı listesini görüntülemek için /ulist Sorunlu komutunu uygulayınız.
Listeden veri silmek için (örnek) /ruser 125.65.45.2* komutunu uygulayınız.

Son isteğinize gelince ip no ile bağlantı aldığı Bölge\Şehir bilgisini elde etmek forumumuzda ilgili konuları araştırmanızı ve çözüm geliştirme gayretinde bulunmanızı tavsiye ederim.

Cevap: ip bilgisi

yaa ben o kadarini yapamam zaten mirc de kod eklemeyi bile 2 gun oldu ogreneli bugun burda cok konular okudum ama kodlara baktim benim asla yapacagim seyler deyil mirc de remote yi bile ogreneli 2 gun oldu yinede tsk ederim umarim yardim edecek birisi cikar simdiden tsk ederim

Cevap: ip bilgisi

mrb kimse bana difizyonun verdigi kodda hangi sehirde oldugunu gostermesini ayarlamiyacak mi yardim edin lutfen ;frown

Cevap: ip bilgisi

Sayın sedaa006,

mIRC Scripting bölümünün amacı üyelerin Scripting konusunda kendilerini geliştirmeye yönelik paylaşımda bulunmasıdır.İlk isteğinizi bir saldırı durumu olarak algıladığımdan size direkt olarak yardımda bulundum.Bu aşamada USERS Kullanıcı kısmını kavradığınızı düşünüyorum.Akabinde gelen Şehir isteğinizi kendinizi geliştirmeye yönelik bir çalışma olarak görmediğimden size bu konuda bir araştırma yapmanızı önerdim.

Fakat siz herhangi bir gelişme kaydetmediğiniz halde konuda ısrarcı bir şekilde yanıt beklemekteseniz.Bölüm sizin anlık isteklerinize yanıt verecek bir pozisyonda değildir.Kendinizi bu yönde gayret ettirmek durumundasınız...

Biz 1 adımlık gayretinize 5 adım yanıt vereceğizdir.Bu defalık konunuzu yanıtlayacağım lakin sizden gelişme katedecek beklenti içerisinde olduğumuzu hatırlatırız...

Hoşca paylaşımlar dilerim...
__________________

Kodun bütün hali:

Kod:

on $*:snotice:/Client connecting.+\x3A\s(\S+)\s\x28.+@(.+)\x29/i: {

  if $level($regml(2)) == Sorunlu {

    if $sock(yerelbilgi,1).status != active { set %yerelipno $regml(2) | bağlan $regml(2) }

    $iif(!$window(@Uyari),window -ne @Uyari)

    aline -hp @Uyari Sorunlu giriş tespit edildi: $regml(1) nicki $regml(2) ip no

  }

}

on *:sockopen:yerelbilgi:{

  sockwrite -n $sockname GET /index.php?query= $+ %yerelipno  HTTP/1.1

  sockwrite -n $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $clrf   

}

on *:sockread:yerelbilgi:{

  if ($sockerr) { aline @Uyari Veri alımında Hata oluştu. | halt }

  else {

    var %difi 

    sockread %difi

    if (*Country*Region*City* iswm %difi) { set %dify $remove($htmlfrex(%difi),$chr(9)) }

    elseif (*Registry*Information* iswm %difi) { 

      sockclose yerelbilgi 

      if $regex(%dify,/ISP(.+)Google.+Map.+for.+ISP.+Continent/i) {

        aline -hp @Uyari $regml(1)

        unset %dif*

      }      

    }

  }

}

alias bağlan {

  sockclose yerelbilgi

  sockopen yerelbilgi 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80

}

alias htmlfrex {  

  var %x, %i = $regsub($replace($1-,<td>,$chr(160),</td>,$chr(160)),/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)

  return %x  

}