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

Mylife · 25 Ocak 2025, 19:59

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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.

Harika · 25 Ocak 2025, 20:00

eline saglık kam
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

idyllic · 25 Ocak 2025, 20:06

emeğinize sağlık.

Mylife · 21 Mart 2025, 14:43

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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.

Enes · 21 Mart 2025, 20:55

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

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Arkadaşlar @bankick ayrı pencere yardım	cihangarip	mIRC Scripting Sorunları	14	07 Temmuz 2015 00:42
Küfüre Ayrı Pencere	StanteaR	mIRC Scripting Sorunları	18	03 Mayıs 2013 01:45
Sorunlu Nick Girişinde Uyarı	Mecnun`X	mIRC Scripting Sorunları	3	17 Mayıs 2012 04:59
nick girişinde gzline	Dangerous123	mIRC Scripting Sorunları	1	18 Şubat 2012 22:32
Sunucu Girişinde Banmask İçinde Geçiyorsa Zline	KiLL	mIRC Scripting Sorunları	2	21 Nisan 2007 16:42

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.