Jump to content

Welcome to Pure Warfare - The #1 Community for Pures

Welcome to Pure Warfare - The #1 Community for Pures, like most online communities you must register to view or post in our community, but don't worry this is a simple free process that requires minimal information for you to signup. Be apart of Pure Warfare - The #1 Community for Pures by signing in or creating an account.
  • Start new topics and reply to others
  • Subscribe to topics and forums to get email updates
  • Get your own profile page and make new friends
  • Send personal messages to other members.

Grant

Member
  • Posts

    7
  • Joined

  • Last visited

Posts posted by Grant

  1. Ever in a large channel, where you can't find someone? can't find your friend among all of the unknown's but you know their addresses? This will do exactly the trick!

     

    The syntax's? :

    /find *!*@*hi.there*

    /find nickname*!*@*

    /find *!*ident*@*

     

    Image:

    090830222100.png

     

    alias find {  if (!$2) {	var %x 1,%m,%ticks $ticks	echo -a $arrow Searching10 $chan(0) channels,10 $calc($regsubex($str(~,9),/./g,$nick($chan(\n),0) +)) people..	while (%x <= $chan(0)) { 	  var %xx 1	  while (%xx <= $nick($chan(%x),0)) {		var %nick $nick($chan(%x),%xx)		if ($1 iswm $address($nick($chan(%x),%xx),5)) { 		  if (!$istok(%ret,%nick,32)) { echo -a $arrow Match found:10 %nick (10 $+ $replace($gettok($address(%nick,5),2,33),@,@10,.,.10,:,:10) $+ ) $regsubex($str(~,$comchan(%nick,0)),/./g,$+($chr(3),$iif(%nick isop $comchan(%nick,\n),4@,$iif(%nick ishop $comchan(%nick,\n),8%,$iif(%nick isvoice $comchan(%nick,\n),12+))),$chr(3),10,$comchan(%nick,\n) $chr(32)))) | inc %m } 		  var %ret %ret %nick		} 		inc %xx	  }	  inc %x   	} 	if (!%m) echo -a $alert No matches found.	else echo -a $arrow 10 $+ $bytes(%m,bd)  $+ $iif(%m == 1,match,matches) found in10 $calc(($ticks - %ticks) /1000) seconds   }}alias arrow { return $+($chr(151),$chr(155)) }

×
  • Create New...