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

10Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 13 Ocak 2016, 15:53   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Real Name revealer




hepinize merhaba

This is my first topic here on IF and yeah... I need help.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


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:   Kodu kopyalamak için üzerine çift tıklayın!
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

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 13 Ocak 2016, 17:28   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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...] .

 
Alıntı ile Cevapla

Alt 13 Ocak 2016, 17:59   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Real Name revealer




eyup20 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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...] .

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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


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.

 
Alıntı ile Cevapla

Alt 13 Ocak 2016, 20:05   #4
Çevrimdışı
KuL
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Real Name revealer




I think this should help you.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#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.

 
Alıntı ile Cevapla

Alt 13 Ocak 2016, 22:34   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 14 Ocak 2016, 01:27   #6
Çevrimdışı
KuL
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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:   Kodu kopyalamak için üzerine çift tıklayın!
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:   Kodu kopyalamak için üzerine çift tıklayın!
[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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


You must only change the last event.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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.

 
Alıntı ile Cevapla

Alt 14 Ocak 2016, 02:34   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Real Name revealer




KuL Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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:   Kodu kopyalamak için üzerine çift tıklayın!
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:   Kodu kopyalamak için üzerine çift tıklayın!
[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
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


You must only change the last event.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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...

 
Alıntı ile Cevapla

Alt 14 Ocak 2016, 02:44   #8
Çevrimdışı
KuL
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Real Name revealer




elhale Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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:   Kodu kopyalamak için üzerine çift tıklayın!
[00:22:50 14/01/2016] ******************** | kadir606 (88.123.456.78) entered the stream.


 
Alıntı ile Cevapla

Alt 14 Ocak 2016, 08:44   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Real Name revealer




KuL Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


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:   Kodu kopyalamak için üzerine çift tıklayın!
[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.

 
Alıntı ile Cevapla

Alt 14 Ocak 2016, 19:11   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Real Name revealer




KuL Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
[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...


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



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

 
Alıntı ile Cevapla

Cevapla

Etiketler
fullname, real, real name, revealer


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Euroleague Final Four | Real Madrid 96-87 Fenerbahçe Ülker | Real Madrid Final'de! Kalemzede Fenerbahçe 0 16 Mayıs 2015 00:12
Real Madrid 4-1 Real Sociedad Seth Haber Arşivi 0 31 Ocak 2015 21:00