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: 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) } }