Mirc mutiple Slap script - mIRC Discussion Forums

i was given one of these a long time ago and i have recently lost it and was wondering if anyone knew how it was done and how i could get one.

thanks in advance

Perhaps You Can Give Us A Little More Information To Work With, Sorry, But I Dont Think Many Of Us Here Can Predict What Someone Is Asking For If They Dont Say EXACTLY What They Need/Thier Having Trouble With...

Hawke slaps Hawke around a bit with a large trout

i would like to be able to slap some of my friends about with them selves and to be able to do more than one at a time if that makes any sense.

Hawke slaps (Other User) around a bit with a large (Other User)

say for about 3 people i did have the script at some point but i have had a few problems with my computer and i have had to wipe and reinstall everything from scratch and thats one of the things i have lost i know its not that important a thing but it was always fun to be able to use.

thanks a lot and hope this explains it a bit more.

I think he means something along these lines

user slaps user1 (but doing this multiple times)

or

user slaps user 1, user 2 and user 3 (but doing this multiple times)

of course i could be wrong on interpreting this.....

You could try here.

your only a little wrong with it i would like to slap say five different users with say another five different users that are joined to the chat room, like when you do the one slap insted of the person being slapped with the fish that they are slapped by another user if that makes any sence now but i would like to do this more than once.

Andy

Put this popup code in your channel popups (Alt-P / View / 2. Channel)

Code:


Random Multi-Slap:{
 
  var %nicklist                           | [color:#006600]; %max different random nicks [/color]
  var %string                             | [color:#006600]; Output string[/color]
  var %max = 10                           | [color:#006600]; Start by assuming 5 slaps (times 2 nicks per slap)[/color]
  var %nicks = $calc($nick($chan,0) - 1)  | [color:#006600]; Total nicks (minus $me)[/color]
 [color:#006600]
  ;  Correct %max if there are less than 11 nicks in the channel
  ;[/color]
  if %max &gt; %nicks var %max = $calc($int($calc(%nicks / 2)) * 2)
 [color:#006600]
  ;  Build the random nicklist
  ;[/color]
  while $numtok(%nicklist, 32) &lt; %max {
 [color:#006600]
    ;  Get the next random nick
    ;[/color]
    var %nick = $nick($chan, $rand(1, %nicks))
 [color:#006600]
    ;  Make sure we're not adding ourselves
    ;[/color]
    if (%nick != $me) var %nicklist = $addtok(%nicklist, %nick, 32)
  }
 [color:#006600]
  ;  Build the output string
  ;[/color]
  while $gettok(%nicklist, 1-2, 32) != $null {
 [color:#006600]
    ;  Save the two nicks we're working with
    ;[/color]
    var %2 = $ifmatch
 [color:#006600]
    ;  If we reach the end of the %nicklist, substitute "and " for the delimiting ", " and 
    ;  append a "." to terminate the string.
    ;[/color]
    if ($numtok(%nicklist, 32) == 2) $&amp;
      %string = %string and $gettok(%2, 1, 32) with a large $gettok(%2, 2, 32)
 [color:#006600]
    ;  Otherwise, just delimit each string addition with a ", ".
    ;[/color]
    else $&amp;
      %string = %string $+ , $gettok(%2, 1, 32) with a large $gettok(%2, 2, 32)
 [color:#006600]
    ;  Delete these two nicks from the %nicklist
    ;[/color]
    %nicklist = $deltok(%nicklist, 1-2, 32)
  }
 [color:#006600]
  ;  Perform the slap, chopping off the initial ", " in the process.
  ;[/color]
  describe $chan slaps $right(%string, -2)
}

* Mike` slaps rickcp with a large Hrung, tomalak16 with a large J-P, AmOserver with a large CyRus\\, d00dman with a large Drewb9805 and Force with a large Bekar.