A simple mass slap script, with a delay to prevent spam (If someone would like to use it that way).
Simple usage, paste it into remotes by pressing alt+r and go to any channel window, type /slapall and it'll slap everyone in the room, except yourslelf ofcourse :P
Also added a simple warning, incase you changed ur mind, or if there were tons of people in the channel ;p.
Edit:
Added a lil menu ontop of it, for thoose who love em :P..
It was a lil too small imo to be a snippet =P
menu channel {
Mass slap!
.$iif($group(#slap) == on,Slap off,Slap on) : $iif($group(#slap) == on,.disable,.enable) #slap
.$iif($group(#slap) == off,$style(2) Slap all,Slap all) : slapall
}
#slap on
alias slapall {
if $($+(%,sent,.,$chan),2) { return }
beep 2 | var %warn $input(There are $nick($active,0) user(s) in the channel $+ $chr(44) are you sure you wish to continue?,yv,Warning!)
if (%warn == $yes) {
var %x = 1, %y = $nick($active,0)
while (%x <= %y) {
if (!$istok($me,$nick($active,%x),32)) {
$+(.timer,.,$chan,.,%x) 1 %x describe # slaps $nick($active,%x) around a bit with a large trout
}
inc %x
}
set -u10 $+(%,sent,.,$chan) 1
}
}
#slap end
I took your script and made it use a random slap off a .txt file.
menu channel {
Mass slap!
.$iif($group(#slap) == on,Slap off,Slap on) : $iif($group(#slap) == on,.disable,.enable) #slap
.$iif($group(#slap) == off,$style(2) Slap all,Slap all) : slapall
}
alias slapall {
if $($+(%,sent,.,$chan),2) { return }
beep 2 | var %warn $input(There are $nick($active,0) user(s) in the channel $+ $chr(44) are you sure you wish to continue?,yv,Warning!)
if (%warn == $yes) {
var %x = 1, %y = $nick($active,0)
while (%x <= %y) {
if (!$istok($me,$nick($active,%x),32)) {
$+(.timer,.,$chan,.,%x) 1 %x describe # slaps $nick($active,%x) around a bit with $read(C:\Users\slap.txt)
}
inc %x
}
set -u10 $+(%,sent,.,$chan) 1
}
}
alias slap {
if ($active ischan) && ($nick($active,0) > 1) {
get.nicks
if (%nicks) {
var %nicks = $remove(%nicks,$me $+ $chr(44))
.timer -m 1 100 describe # slaps %nicks around with a nachos.
}
}
}
alias get.nicks {
var %a = 1
while %a <= $nick($active,0) {
set %nicks $addtok(%nicks,$nick($chan,%a) $+ $chr(44),32)
inc %a
.timer -m 1 1 unset %nicks
}
}
Does just what U want, Erma.
would be good if you could slapp all without one by one.This one could make flood.
Or like this one :
Sa[[[B0B0]] duduts eMuNaThO[A] Francesco
Totti KasihSetia[A] KaTReSNaN[A] kurcacikecil
imut supern0va are you still alive?i just use popups
and this is the popups code :
.Multi slap:/me throw out a garbages to face $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) $nick(#,5) $nick(#,6) $nick(#,7) $nick(#,8) $nick(#,9) $nick(#,10) $nick(#,11) $nick(#,12) $nick(#,13) $nick(#,14) $nick(#,15) $nick(#,16) $nick(#,17) are you still alive?
Do anyone could making this code right?, because when i use this one my nick show to.
oke thanks
I totally dont get ur code, it looks like a mess.
That will slap ALL users in the channel in 1 slap, which is not what I want to do in mine. Secondly, u need inc %a in yours, or it\'ll spam as f*ck lol.
So its not a matter of making it shorter, infact, mine is sorter then yours, measuring its size when totally stripped into doing what ur does.
Yeah, well, I saw this script posted yesterday, 2 lines of pointless slap revenge, and it got like 5, 6? Crazy...
Imo, u shoudnt be allowed to vote before you got atleast 100/150 posts on the forums.
When you reached that ammount of posts, u prolly know that the ban revenge on 2 lines which can be found in the help file, doesnt deserve more then a rating of 2.