IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Sunucu Girişinde Nick ve IP Ayrı Pencere Tek Tık Whois ve Takip Ekleme

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Sunucu Girişinde Nick ve IP Ayrı Pencere Tek Tık Whois ve Takip Ekleme (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/1052252-sunucu-girisinde-nick-ve-ip-ayri-pencere-tek-tik-whois-ve-takip-ekleme.html)

Sunucu Girişinde Nick ve IP Ayrı Pencere Tek Tık Whois ve Takip Ekleme

Kod:

alias _tekle {

  if ($1) {

    write takip_listesi.txt $1

    echo -a $1 takip listesine eklendi.

  } 

  else {

    echo -a Lütfen takip etmek istediğiniz nicki belirtin.

  }

}

alias _tsil {

  if (!$1) {

    echo -a Silmek istediğiniz kişiyi belirtin.

  }

  elseif ($read(takip_listesi.txt, w, $1)) {

    write -dl $+ $readn takip_listesi.txt

    echo -a $1 takip listesinden silindi.

  } 

  elseif (!$read(takip_listesi.txt, w, $1)) {

    echo -a $1 takip listesinde ekli değil.

  } 

}
 

on *:snotice:*: {

  if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e)) window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e

  if $regex($1-,/Yeni\sGiris/iS) {

    var %;port $remove($7,:)

    var %;ip $gettok($gettok($9,2,64),1,41)

    var %file ip_log.txt

    var %;t $date $+ $time

    var %;n $8

    write %file %;t $+ : %;n $+ : %;ip

    echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e 2 %;n  : 4 %;ip 5 %;port

    if ($read(takip_listesi.txt, w, %;n)) {

      echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e 4Takip listesinde yer alan 2 %;n 4 sunucuya giriş yaptı.

    }

  }

}
 

on ^*:hotlink:*:@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e: {

  if ($mouse.key & 1) {

    var %:nick $gettok($1,1,58)

    whois %:nick

  }

}

Kullanım;
/_tekle nick
/_tsil nick

Kodun amacı;

Sunucuya girişte @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e adında açılacak olan debug penceresine nick ve ip bilgilerini yansıtır.
Debug penceresi içerisinde nick e tek tık yaptığınız da whois olarak ayarladım ben ama siz o kısmı gzline/shun vb. şeklinde değiştirebilirsiniz.
Kod içerisinde var olan /_tekle özelliği bir nick takibe eklenir o nick sunucuya girdiğinde debug içerisinde uyarı alırsınız. Üzerine tek tık yaptığınız da whois çeker olarak ayarlı.
Nick ve ip bilgilerini kayıt eder.

Görünüm;
[19:46:22] Sinan45 : 78.178.******* 8085
[19:47:22] svs__a : 5.46.******* 8085
[19:47:51] fm35pist : 217.6******** 8085
[19:48:20] Nuryolu_ : 85.105***** 8085
[19:49:37] nida29 : 193.140*** 8085
[19:50:05] Aras : 77.244.11*** 7033
MircSystem takip listesine eklendi.
Takip listesinde yer alan MircSystem sunucuya giriş yaptı.
MircSystem takip listesinden silindi.
MircSystem takip listesine eklendi.
ali takip listesinde ekli değil.

IP bilgisinin yanında giriş port bilgisi yer alır. Kod içerisinde nick ve ip adresi girişleri $ değerleri uyuşması gerekir. Eğer o bilgiler uyuşmuyorsa konu altında sunucu giriş noticenizi paylaşırsanız size göre ayarlayabiliriz. Kullanıcı isteğine göre yapıldı. Umarım işinize yarar iyi forumlar.

Cevap: Sunucu Girişinde Nick ve IP Ayrı Pencere Tek Tık Ban ve Takip Ekleme

eline saglık kam :tatli:

Cevap: Sunucu Girişinde Nick ve IP Ayrı Pencere Tek Tık Whois ve Takip Ekleme

emeğinize sağlık.

Cevap: Sunucu Girişinde Nick ve IP Ayrı Pencere Tek Tık Whois ve Takip Ekleme

Kod:

alias _tekle {

  if ($1) {

    write takip_listesi.txt $1

    echo -a $1 takip listesine eklendi.

  } 

  else {

    echo -a Lütfen takip etmek istediğiniz nicki belirtin.

  }

}

alias _tsil {

  if (!$1) {

    echo -a Silmek istediğiniz kişiyi belirtin.

  }

  elseif ($read(takip_listesi.txt, w, $1)) {

    write -dl $+ $readn takip_listesi.txt

    echo -a $1 takip listesinden silindi.

  } 

  elseif (!$read(takip_listesi.txt, w, $1)) {

    echo -a $1 takip listesinde ekli değil.

  } 

}
 

on *:snotice:*: {

  if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e)) window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e

  if $regex($1-,/Client\sconnecting/iS) {

    var %;port $remove($7,:)

    var %;ip $gettok($gettok($9,2,64),1,41)

    var %file ip_log.txt

    var %;t $date $+ $time

    var %;n $8

    write %file %;t $+ : %;n $+ : %;ip

    echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e 2 %;n  : 4 %;ip 5 %;port

    if ($read(takip_listesi.txt, w, %;n)) {

      echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e 4Takip listesinde yer alan 2 %;n 4 sunucuya giriş yaptı.

    }

  }

}
 

on ^*:hotlink:*:@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]e: {

  if ($mouse.key & 1) {

    if ($regex($1, /^[^:]+$/)) { 

      var %:nick $gettok($1,1,58)

      if ($($+(%,clicked.,%:nick),2)) { 

        gzline %:nick : Hatalı ise bildirin. 

        unset $+(%,clicked.,%:nick) 

        echo -a GZLine komutu çalıştırıldı: %:nick

      }

      else { 

        set -u5 $+(%,clicked.,%:nick) 1 

        whois %:nick

        echo -a Whois komutu çalıştırıldı: %:nick

      }

    }

  }

}

Kodu kendi kullanımım için geliştirdim ilk tıklamada whois çekiyor 5 saniye içerisinde aynı tık yapılırsa gzline atıyor.

Cevap: Sunucu Girişinde Nick ve IP Ayrı Pencere Tek Tık Whois ve Takip Ekleme

eline sağlık ben de ip şeklinde yapmıştım version+whois+line+shun şıklarıyla hızlı kullanım açısından güzel