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

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 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])

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 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) 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:

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