A basic script with loops that I made to slap everybody in a certain room at once.
Quote:
Mega Slap! {
set %slapall.i 1
set %slapall.workstring slaps
:next
set %slapall.nick $nick(#,%Slapall.i)
if (!%slapall.nick) goto done
if (%slapall.nick == $me) goto skip
if (*covert* iswm %slapall.nick) goto skip
if (*green* iswm %slapall.nick) goto skip
if (*justaguy* iswm %slapall.nick) goto skip
if (*malthius* iswm %slapall.nick) goto skip
if (*pt* iswm %slapall.nick) goto skip
if (*wier* iswm %slapall.nick) goto skip
if ($len(%slapall.workstring) > 230) {
set %slapall.workstring %slapall.workstring %slapall.nick
me %slapall.workstring with a $1-
set %slapall.workstring slaps
}
else {
set %slapall.workstring %slapall.workstring %slapall.nick
}
:skip
inc %slapall.i
goto next
:done
if ($len(%slapall.workstring) > 5) me %slapall.workstring with a $1-
unset %slapall*
}
|
Aug 23rd, 2004, 8:14 AM
Threaded Mode