Mass On Text Commands For Your Bot

By ThE ViPeR on May 11, 2010

This is a set of mass commands for your chat bot.
Paste This Script In Remotes.
+massvoice
-massvoice
+massquiet
-massquiet
etc.
Set in variables:
%user1 nick
%user2 nick
%user3 nick
%user4 nick

Not much else to say but have fun and enjoy!!!! =)
(These have been tested on chatspace.)

on 1:text:+massvoice*:#:{
  if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {
  msg $chan 4,1{`~*¤§|§¤*~`8,1Mass Voice in progress...4,1~*¤§|§¤*~` }
  set %num.nick 0
  set %user.tot $nick(#,0)
  :start
  inc %num.nick
  if (%num.nick > %user.tot) { halt }
else { mode # +v $nick(#,%num.nick) | goto start }  }
} 
on 1:text:-massvoice*:#:{
  if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {    
  msg $chan 4,1{`~*¤§|§¤*~`8,1Mass DeVoice in progress...4,1~*¤§|§¤*~` }
  set %num.nick 0
  set %user.tot $nick(#,0)
  :start
  inc %num.nick
  if (%num.nick > %user.tot) { halt }
  if ($nick(#,%num.nick) == $me) { goto start }
else { mode # -v $nick(#,%num.nick) | goto start }  }
}
on 1:text:+masskill*:#:{
if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {
msg $chan 4,1{`~*¤§|§¤*~`8,1Mass Kill in progress...4,1~*¤§|§¤*~` }
set %num.nick 0
set %user.tot $nick(#,0)
:start
inc %num.nick
if (%num.nick > %user.tot) { halt }
if ($nick(#,%num.nick) == $me) { goto start  }
else { kill $nick(#,%num.nick) 8,1MassKill! | goto start }  }
}

on 1:text:+masskick*:#:{
if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {
msg $chan 4,1{`~*¤§|§¤*~`8,1Mass Kick in progress...4,1~*¤§|§¤*~` }
set %num.nick 0
set %user.tot $nick(#,0)
:start
inc %num.nick
if (%num.nick > %user.tot) { halt }
if ($nick(#,%num.nick) == $me) { goto start  }
if ($nick(#,%num.nick) == r0bot) { goto start  }
if ($nick(#,%num.nick) == Mimierz) { goto start  }
else { kick # $nick(#,%num.nick) 8,1Mass Kick | goto start }  }
}

on 1:text:+massop*:#:{
if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {
msg $chan 4,1{`~*¤§|§¤*~`8,1Mass Op in progress...4,1~*¤§|§¤*~` }
set %num.nick 0
set %user.tot $nick(#,0)
:start
inc %num.nick
if (%num.nick > %user.tot) { halt }
if ($nick(#,%num.nick) == $me) { goto start }
else { mode # +o $nick(#,%num.nick) | goto start }  }
}

on 1:text:-massop*:#:{
if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {
msg $chan 4,1{`~*¤§|§¤*~`8,1Mass DeOp in progress...4,1~*¤§|§¤*~` }
set %num.nick 0
set %user.tot $nick(#,0)
:start
inc %num.nick
if (%num.nick > %user.tot) { halt }
if ($nick(#,%num.nick) == $me) { goto start  }
else { mode # -o $nick(#,%num.nick) | goto start }  }
}

on 1:text:+massquiet*:#:{
if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {
msg $chan 4,1{`~*¤§|§¤*~`8,1Mass Quiet in progress...4,1~*¤§|§¤*~` }
set %num.nick 0
set %user.tot $nick(#,0)
:start
inc %num.nick
if (%num.nick > %user.tot) { halt }
if ($nick(#,%num.nick) == $me) { goto start  }
else { /mode # +q $nick(#,%num.nick) | goto start }  }

}

on 1:text:-massquiet*:#:{
if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {
msg $chan 4,1{`~*¤§|§¤*~`8,1Mass UnQuiet in progress...4,1~*¤§|§¤*~` }
set %num.nick 0
set %user.tot $nick(#,0)
:start
inc %num.nick
if (%num.nick > %user.tot) { halt }
else { /mode # -q $2- $nick(#,%num.nick) | goto start }  }
}  
on 1:text:+massshun*:#: {
  if ($nick == %user1) || ($nick == %user2) || ($nick == %user3) || ($nick == %user4) {
  msg $chan 4,1{`~*¤§|§¤*~`8,17,1{-8,1 Mass Shun in progress...4,1~*¤§|§¤*~` }
  set %num.nick 0
  set %user.tot $nick(#,0)
  :start
  inc %num.nick
  if (%num.nick > %user.tot) { halt }
  if ($nick(#,%num.nick) == $me) { goto start  }
else { shun $address($nick(#,%num.nick),4) | goto start }  }
}  

Comments

Sign in to comment.
d8e93jf9vwp   -  Sep 05, 2010

How are you supposed to know all the commands without reading the script

 Respond  
Jethro   -  May 11, 2010

Cheiron, using:

//echo $prefix

is better than

//echo $nickmode

Then apply the prefix you want to > $nick(#,$nick,<>)where <> is to be replaced with a user mode prefix you're after.

 Respond  
Cheiron   -  May 11, 2010

ah thankies.. chatspace has always been a weird one. i take it the devoice still has to stand though ?

 Respond  
napa182   -  May 11, 2010

Cheiron the +q and -q are silence modes on chatspace servers

 Respond  
Cheiron   -  May 11, 2010

note..
extended ban silence is in format ~q:!@blah.blah.com (for example.. note the ~ )
also for it to be used.. a user must be set to regular in channel (ie no +,%,@,&)

 Respond  
napa182   -  May 11, 2010

lol

 Respond  
WorldDMT   -  May 11, 2010

flood detected!

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.