mIRC Home    About    Download    Register    News    Help

Print Thread
Mirc mutiple Slap script #12350 21/02/03 11:20 PM
Joined: Feb 2003
Posts: 4
H
Hawke Offline OP
Self-satisified door
OP Offline
Self-satisified door
H
Joined: Feb 2003
Posts: 4
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

Re: Mirc mutiple Slap script #12351 22/02/03 02:49 AM
Joined: Dec 2002
Posts: 271
N
NightChillz Offline
Fjord artisan
Offline
Fjord artisan
N
Joined: Dec 2002
Posts: 271
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...

Re: Mirc mutiple Slap script #12352 22/02/03 04:06 AM
Joined: Feb 2003
Posts: 4
H
Hawke Offline OP
Self-satisified door
OP Offline
Self-satisified door
H
Joined: Feb 2003
Posts: 4
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.


Re: Mirc mutiple Slap script #12353 22/02/03 05:27 AM
Joined: Dec 2002
Posts: 1,237
T
The_Game Offline
Hoopy frood
Offline
Hoopy frood
T
Joined: Dec 2002
Posts: 1,237
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.....

Re: Mirc mutiple Slap script #12354 22/02/03 09:51 AM
Joined: Dec 2002
Posts: 843
P
Poppy Offline
Hoopy frood
Offline
Hoopy frood
P
Joined: Dec 2002
Posts: 843
You could try here. smile


Never compare yourself to others - they're more screwed up than you think.
Re: Mirc mutiple Slap script #12355 24/02/03 08:51 PM
Joined: Feb 2003
Posts: 4
H
Hawke Offline OP
Self-satisified door
OP Offline
Self-satisified door
H
Joined: Feb 2003
Posts: 4
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

Re: Mirc mutiple Slap script #12356 25/02/03 07:26 AM
Joined: Dec 2002
Posts: 1,321
H
Hammer Offline
Hoopy frood
Offline
Hoopy frood
H
Joined: Dec 2002
Posts: 1,321
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 > %nicks var %max = $calc($int($calc(%nicks / 2)) * 2)
 [color:#006600]
  ;  Build the random nicklist
  ;[/color]
  while $numtok(%nicklist, 32) < %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) $&
      %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 $&
      %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.


DALnet: #HelpDesk and #m[color:#FF0000]IR[color:#EEEE00]C