mIRC Home    About    Download    Register    News    Help

Print Thread
Joined: Mar 2021
Posts: 48
R
Robert Offline OP
Ameglian cow
OP Offline
Ameglian cow
R
Joined: Mar 2021
Posts: 48
Hi all, i found this code on somewhere on internet (i fogotten :P).
Can everyone help me to write a event "on text" to check command triggered: !getnick *!*@ip/host (Ex: !getnick *!*@10.20.30.40 or !getnick *!*@nick.users.undernet.org ...etc)
Here is code:
Code
alias getNICK {
  ;/getNICK <#chan> <host>
  if (!$chan($1) || !$2) { return }
  var %a = 1, %b
  while ($nick($1,%a)) { 
    %b = $v1
    if ($2 iswm $address(%b,5)) { echo -a The Nickname using that ip/host is: %b }
    inc %a
  }
}
Thanks all so much! And hope receive the answer by code soon smile

Joined: Oct 2023
Posts: 16
Pikka bird
Offline
Pikka bird
Joined: Oct 2023
Posts: 16
Hi,

here 2 simple Versions

/getnick for you only
!getnick for other users in #chan

Update: On Text Event was updated

Code
/*
This is the /getnick #channel *!*@*.host Version

*/

ALIAS getnick {
  if ((!$1) || ($1 !ischan)) { noop $input(Error ! <#channel> is missing or not a #channel you are on ! Use /getnick <#channel> <*!*@*.host> , or join the #channel,wo,Error) }
  if (!$2) { noop $input(Error ! <address> is missing ! Use /getnick <#channel> <*!*@*.host>,wo,Error) }
  else {
    var %check.chan $1
    var %check.addr $2
    var %chan.users $nick(%check.chan,0)
    var %tmp.user 1
    
    while (%tmp.user <= %chan.users) {
    
      var %tmp.nick $nick(%check.chan,%tmp.user)
      var %tmp.addr $address(%tmp.nick,4)
      
      if (%tmp.addr == %check.addr) { echo 0,4INFO: 04 $+ < $+ %tmp.addr $+ >14 is 04< $+ %tmp.nick $+ > }
      inc %tmp.user
    }
  }
}


/*
Tis is the !getnick *!*@*.host Version for the actual channel
*/

ON *:TEXT:!getnick*:#: {
  if (!$2) {
    me 0,4GETNICK-ERROR 14Use the Command04 !getnick *!*@*.host
    me 0,4GETNICK-ERROR 14Replace 04*!*@*.host 14with the current User Address in this Format !
  }
  
  else {
    var %check.chan $chan
    var %check.addr $2
    var %chan.users $nick(%check.chan,0)
    var %tmp.user 1

    while (%tmp.user <= %chan.users) {

      var %tmp.nick $nick(%check.chan,%tmp.user)
      var %tmp.addr $address(%tmp.nick,4)

      if (%tmp.addr == %check.addr) { me 0,4GETNICK-INFO: 04 $+ < $+ %tmp.addr $+ >14 is 04< $+ %tmp.nick $+ > }
      inc %tmp.user
    }
  }
}

Last edited by atomic10; 04/11/23 01:30 PM.

Best Regards from Germany
-=[atomic10]=-

Link Copied to Clipboard