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

Sayfa 1 Toplam 4 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

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

- - Real Name revealer (https://www.ircforumlari.net/mirc-scripting-sorunlari/722435-real-name-revealer.html)

elhale

13 Ocak 2016 15:53

Real Name revealer

hepinize merhaba

This is my first topic here on IF and yeah... I need help. :)

I stumbled on this old code but it doesn't work for me...

What I wan't to do is to be able to click on the realName and use an alias to execute a command...

So, when user joins #channel, i want the code to exempt some users, and scan (who) others... if it matches i want to show me the "Real Name" near his nick. Be able to click it to select and execute a command... for example ban (real name).

I hope you guys will help... the code is this, but it doesn't work for me.

Kod:

on *:input:*:real $1- on ^*:text:*:*:real $1- on ^*:action:*:*:real $1- on ^*:notice:*:*:real $1- on *:join:#:who $iif($nick = $me,#,$v1) on !^*:part:#:{ set $+(%,real,$nick) $nick echo $color(part) # * Parts: $nick $ial($nick).mark @ $+ $site haltdef } on !^*:quit:{ var %- 1 | while $comchan($nick,%-) { echo $color(quit) $v1 * Quits: $nick $ial($nick).mark @ $+ $site haltdef inc %- } } raw 352:*:.ialmark $6 ( $+ $9- $+ ) | halt raw 315:*:{ if $($+(%,real,$2),2) { var %c 1 | while $comchan($me,%c) { echo $color(join) -a * $2 $ial($2).mark has joined $v1 unset $+(%,real,$2) | halt | inc %c } } } on *:ping:var %ial 1 | while $comchan($me,%ial) { who $v1 | inc %ial } alias -l pnickschan { return $iif($event = text,$+(<,$iif($left($nick(#,$nick).pnick,1) isin $prefix,$v1),$nick),$& $iif($event = action,$+(*,$chr(32),$iif($left($nick(#,$nick).pnick,1) isin $prefix,$v1),$nick),$& $iif($event = notice,$+(-,$iif($left($nick(#,$nick).pnick,1) isin $prefix,$v1),$nick,-)))) } alias -l pnickspm { return $iif($event = text,$+(<,$nick),$iif($event = action,$+(*,$chr(32),$nick),$iif($event = notice,$+(-,$nick,-)))) } alias -l real { if (!$inpaste) && ((!$istok(/ $readini($mircini,text,commandchar),$left($1,1),32)) || ($ctrlenter)) { var %realnick $ial(*,0) | while %realnick { if $regex($iif($event = input,$1-,$nick),/(^|\s)\Q $+ $replacecs($ial(*,%realnick).nick,\E,\E\\E\Q) $+ \E(\s|$)/iS) { $iif($event = input,say,echo -bcfilmrt $iif($event = text,normal,$event) $iif(#,#,$iif($query($nick),$& $nick,$iif($active ischan,$v1,$target)))) $replace($iif($event = input,$strip($1-),$& $iif(#,$pnickschan($nick),$pnickspm($nick))),$ial(*,%realnick).nick,$& $iif($event = text,$ial(*,%realnick).nick $+ >,$ial(*,%realnick).nick) $ial(*,%realnick).mark) $& $iif($istok(text action notice,$event,32),$1-) | haltdef } dec %realnick } } } #real end menu nicklist,channel { Turn Real-Name-Revealer $iif($group(#real) = on,OFF,ON) { if ($group(#real) != on) .enable #real | else disable #real else ($group(# if $group(#real) = on { who # } | else { ialclear | who # } echo 4 -ag * Real Name Revealer has been turned $upper($group(#real).status) } }

teşekkür ederim

eyup20

13 Ocak 2016 17:28

Cevap: Real Name revealer

on *:text:*:#:{
if ($1 == !add) {
if !$2 { msg # Please chose fullname | return }
if $read(fullname.txt,w,$strip($2-)) { msg # already add. | return }
.write fullname.txt $strip($2-)
msg # [ $strip($2-) ] Added Fullname.
}
if ($1 == !del) {
if !$2 { msg # Please chose deleting fullname. | return }
if $read(fullname.txt,w,$strip($2-)) { .write $+(-dl,$readn) fullname.txt | msg # [ $strip($2-) ] Fullname deleted. | return }
else { msg # Belirttiginiz fullname listem'de bulunmamaktadır. | return }
}
if ($1 == !listfullname) {
if $lines(fullname.txt) == 0 { msg # Fullname list is empty. | return }
var %t = 1 | while %t <= $lines(fullname.txt) {
msg # 4 $+(%t,.) $read(fullname.txt,%t)
inc %t
}
}
}
raw 352:*:{ var %:comchan = 1 | while %:comchan <= $comchan($6,0) { if $me isop $comchan($6,%:comchan) || $me ishop $comchan($6,%:comchan { ban -k $comchan($6,%:comchan) $6 - Forbidden fullname. } | inc %:comchan } }

hi @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
pls create fullname.txt on mirc directory or just !add one.
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] created this remote code. Thanks to @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] .

elhale

13 Ocak 2016 17:59

Cevap: Real Name revealer

Alıntı:

eyup20 Nickli Üyeden Alıntı (Mesaj 1041723590)

Thankyou for answering @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

However I want to add them automatically not manually... on, on *:join:*:#:, or for hub

;Connect
on *:snotice:*Client connecting on port*:who +I $9
;Hub connect
on *:snotice:*Client connecting at*:who +I $8

grab the fullname and show it near the nick, click on it, and execute command :)

for example...

[04:47:52pm] * Robin H d572b9a7@109.169.29.95 :0 c-98b872d5.304696492-0-646f63736973.cust.bredbands
[04:47:52pm] Robin End of /WHO list.

[04:49:24pm] * Mobile_09 H 5f9b1081@109.169.29.95 :2 95.155.16.129
[04:49:24pm] Mobile_09 End of /WHO list.

so, if users connect from @109.169.29.95

i want to show like this, when they join channel

[04:49:00pm] ******************* J | Robin (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) joined #channel from (server)
[04:49:00pm] ******************** | Robin (c-98b872d5.304696492-0-646f63736973.cust.bredbands) entered the stream.
[04:49:26pm] ******************* J | Mobile_09 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) joined #channel from (server)
[04:49:26pm] ******************** | Mobile_09 (95.155.16.129) entered the stream.

KuL	13 Ocak 2016 20:05

Cevap: Real Name revealer

I think this should help you.

Kod:

#IPGoster off

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)) $timestamp *** Giriş: $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)) $timestamp *** IRC’den Çıktı: $nick $hget(Giris,$nick)

    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)) $timestamp *** Ayrıldı: $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 }

If I remember correctly, cesuryurek wrote this snippet code.

After you wrote your oper/admin pass and get the rights of an administrator to see the ip address you must write /enable #IPGoster to actvate the code.

And than you should see the normal join, but instead of the fake ip you should see the right ip of the user.

XcLusive

13 Ocak 2016 22:34

Cevap: Real Name revealer

real name kısmında olan ip adresi kullanıcının gerçek adresi sanırım.
109.169.29.95 adresinden bağlananların, gerçek ip adresini kanala giren kullanıcılarda görmek istiyor
nick@ip şeklinde ve mouse ile üzerine geldiğinde komut çalıştırmak istediğini belirtmiş.

Mobile_09 adlı kullanıcının kanala giriş şekli:
[04:49:26pm] ******************* J | Mobile_09 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) joined #channel from (server)

who çekince aldığı cevap:
[04:49:24pm] * Mobile_09 H 5f9b1081@109.169.29.95 :2 95.155.16.129
[04:49:24pm] Mobile_09 End of /WHO list.

görmek istediği şekil:
[04:49:26pm] ******************** | Mobile_09 (95.155.16.129) entered the stream.

ve son olarak mouseyi üzerine getirince komut çalıştırmak.

zamanınız varsa güzel bir kod yazılabilir arkadaşa :)

KuL	14 Ocak 2016 01:27

Cevap: Real Name revealer

Hasan Abinin (L4roXyL) bir Kodu vardi bunun icin, giris cikislari yansitma acisindan yani.

Kücük eklentilerlede ipe tiklanabilinilir duruma getirebilinilir. Ben Konuyu yanlis anlamissim.

Kod:

on !^*:join:#:haltdef | inc $+(%,$nick,ip) 1 | hadd -m $nick # 1 | if ($regex($evalnext($+(%,$nick,ip)),^1$)) { userip $nick } | unset $+(%,$nick,ip)

raw 340:*: {

  haltdef | var %& = $regsubex($2,/\+|\*|-/g,) | var %n = $token(%&,1,61),%id = $token(%&,2,64)

  if ($hget(%n,0).item >= 2) { var %2 = $v1,%1 = 1 | while (%1 <= %2) { echo $color(join) -t $hget(%n,%1).item ******************** |  %n $+($chr(40),%id,$chr(41)) entered the stream. | inc %1 } | hfree %n }

}
 

on ^1:HOTLINK:*.*.*:*:{ if ($active != #) { halt } | else { return } }

on *:HOTLINK:*.*.*:*:{ if ($active != #) { halt } | else { echo -a This is only a ECHO. Her is the IP -> $remove($gettok($hotline,6,32),$chr(40),$chr(41)) } }

Sonuc:

Kod:

[00:22:50 14/01/2016] ******************** | kadir606 (88.246.245.26) entered the stream.

[00:22:53 14/01/2016] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]_> neyse az yokum

This is only a ECHO. Her is the IP -> 88.246.245.26

IP Adresine tiklayincada, Echo veriyor. Kullaniciya kalmis gerisi o IP le ne yapmak istedigi.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] now I hope that this code will help you :)

You must only change the last event.

Kod:

echo -a This is only a ECHO. Her is the IP -> $remove($gettok($hotline,6,32),$chr(40),$chr(41)) } }

I wrote an echo to see if it works. And you can change it, to whatever you want.

elhale

14 Ocak 2016 02:34

Cevap: Real Name revealer

Alıntı:

KuL Nickli Üyeden Alıntı (Mesaj 1041723773)

Hasan Abinin (L4roXyL) bir Kodu vardi bunun icin, giris cikislari yansitma acisindan yani.

Kücük eklentilerlede ipe tiklanabilinilir duruma getirebilinilir. Ben Konuyu yanlis anlamissim.

Kod:

on !^*:join:#:haltdef | inc $+(%,$nick,ip) 1 | hadd -m $nick # 1 | if ($regex($evalnext($+(%,$nick,ip)),^1$)) { userip $nick } | unset $+(%,$nick,ip)

raw 340:*: {

  haltdef | var %& = $regsubex($2,/\+|\*|-/g,) | var %n = $token(%&,1,61),%id = $token(%&,2,64)

  if ($hget(%n,0).item >= 2) { var %2 = $v1,%1 = 1 | while (%1 <= %2) { echo $color(join) -t $hget(%n,%1).item ******************** |  %n $+($chr(40),%id,$chr(41)) entered the stream. | inc %1 } | hfree %n }

}
 

on ^1:HOTLINK:*.*.*:*:{ if ($active != #) { halt } | else { return } }

on *:HOTLINK:*.*.*:*:{ if ($active != #) { halt } | else { echo -a This is only a ECHO. Her is the IP -> $remove($gettok($hotline,6,32),$chr(40),$chr(41)) } }

Sonuc:

Kod:

[00:22:50 14/01/2016] ******************** | kadir606 (88.246.245.26) entered the stream.

[00:22:53 14/01/2016] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]_> neyse az yokum

This is only a ECHO. Her is the IP -> 88.246.245.26

Kod:

echo -a This is only a ECHO. Her is the IP -> $remove($gettok($hotline,6,32),$chr(40),$chr(41)) } }

I wrote an echo to see if it works. And you can change it, to whatever you want.

Thankyou for taking the time to help @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] but it is not working for me...

I put it in remote and nothing happens...

KuL	14 Ocak 2016 02:44

Cevap: Real Name revealer

Alıntı:

elhale Nickli Üyeden Alıntı (Mesaj 1041723789)

Thankyou for taking the time to help @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] but it is not working for me...

I put it in remote and nothing happens...

After you put it on a new remote page, how does the logins look like?

Can you show me a part of the channel logins.

Normaly it should look like this:

Kod:

[00:22:50 14/01/2016] ******************** | kadir606 (88.123.456.78) entered the stream.

elhale

14 Ocak 2016 08:44

Cevap: Real Name revealer

Alıntı:

KuL Nickli Üyeden Alıntı (Mesaj 1041723790)

After you put it on a new remote page, how does the logins look like?

Can you show me a part of the channel logins.

Normaly it should look like this:

Kod:

[00:22:50 14/01/2016] ******************** | kadir606 (88.123.456.78) entered the stream.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] When i put it on a new remote, the logins don't show at all, just quits and users talking in channel.

elhale

14 Ocak 2016 19:11

Cevap: Real Name revealer

Alıntı:

KuL Nickli Üyeden Alıntı (Mesaj 1041723790)

[FONT="Tahoma"][COLOR="Black"]
Can you show me a part of the channel logins.

I removed some addons, maybe they interfered and now I see the logins but no echo of the ip-s

Also I see that hash tables are created for every user that joins.

I also made screenshots...

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 09:24.

Sayfa 1 Toplam 4 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster