Ip Gosterme Koduna Ek - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Kimimben · 17 Aralık 2011, 23:46

Merhaba Arkadaslar elimde CesuryureK hocama ait bir kod var.Ip gosterme kodu.Kodu remoteye ekledigimiz zaman Admin olan kisi kanala giren birisi oldugu zaman kanalda ipini gosteriyor su sekilde

*** Giris: Rambek (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

bu kodla giren kisilerin iplerini direk gosteriyor ama Admin olmak lazim ipleri gormek icin admin olmayan goremez.Bu koda ekleme yapabilirmiyiz su sekilde olabilir mi

*** Giris: Rambek (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) Shun Gline Kline

Bu sekilde girenin ipini gosterdigi gibi sonunada ban kodlari koyabilirmiyiz.Aslinda F tuslarida var ban icin ama Kullandigim Leptopda F tuslari islemiyor o yuzden yardimci olacak arkadaslara simdiden Tsk ederim.

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

#IPGoster on
on *:snotice:*: {
  if (Client connecting isin $1-) {
    if (!$hget(Giris)) { hmake giris 100 }
    hadd Giris $9 $10
  }
  if (Client exiting isin $1-) {
    if  !$hget(Giris,$6) { hadd Giris $6 $7 } 
  }
}
on ^*!:Join:#: {
  haltdef
  if ($hget(Giris,$nick)) { echo $chan $+($chr(3),$color(join)) *** Giris: $nick $hget(Giris,$nick) }
  elseif (!$hget(Giris,$nick)) { set -u3 %gnick $nick | set -u3 %gchan $chan | giris | .timer 1 1 .userip $nick }
}
on ^*:quit: {
  haltdef
  var %i = 1, %t = $comchan($nick,0)
  while (%i <= %t) {
    echo $comchan($nick,%i) $+($chr(3),$color(quit)) *** IRC'den Cikti: $nick $hget(Giris,$nick) $+($chr(40),$1-,$chr(41))
    inc %i
  }
  hdel Giris $nick
}
raw 340:*: {
  haltdef
  hadd Giris $gettok($2,1,61) $+($chr(40),$gettok($2,2,43),$chr(41)) 
}
on ^*!:Part:#: {
  haltdef 
  if ($hget(Giris,$nick)) { echo $chan $+($chr(3),$color(part)) *** Ayrildi: $nick $hget(Giris,$nick) }
  elseif (!$hget(Giris,$nick)) { set -u5 %pnick $nick | set -u %pchan $chan | cikis | .timer 1 1 .userip $nick }
}
alias giris { echo %gchan %gnick $hget(Giris,%gnick) }
alias cikis { echo %pchan %pnick  $hget(Giris,%pnick) }
#IPGoster End
on *:Exit: { disable #IPGoster }
raw 381:*: { enable #IPGoster }

SiLuet · 18 Aralık 2011, 10:58

Kodda Şu kısımdaki,

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

on ^*!:Join:#: {
  haltdef
  if ($hget(Giris,$nick)) { echo $chan $+($chr(3),$color(join)) *** Giris: $nick $hget(Giris,$nick) }

İf le başlayan Satırı,

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

if ($hget(Giris,$nick)) { echo $chan $+($chr(3),$color(join)) *** Giris: $nick $hget(Giris,$nick)Shun Gline Zline }

Bu şekilde Değiştir.
Ve Kodun En sonuna Aşagıdaki Kodu ekle. Giriş Mesajının Sonundaki Shun Gline Zline Kelimelerine çift tıkladıgında O komutu Satırda Geçen Nick Üzerine Uygulayacaktır.

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

on ^*:hotlink:*:#:return
on *:hotlink:*:#:{
  if ($1 == Shun) { .Shun $gettok($hotline,4,32) süre Sebep } 
  elseif ($1 == Gline) { .Gline $gettok($hotline,4,32) Sebep }
  elseif ($1 == Zline) { .Zline $gettok($hotline,4,32) }
}

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Yazı koduna Yardim Lütfen	Nothinq	mIRC Scripting Sorunları	2	14 Şubat 2011 22:31
oto mesaj koduna bir ek yaparmısınız	kurugaddere	mIRC Scripting Sorunları	0	19 Temmuz 2009 09:16
radyo !durum gosterme.	bøCek	mIRC Scripting Sorunları	2	08 Aralık 2008 21:12

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

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.