Mass msg, invite, whois, noticer

By joshschooley444 on Sep 22, 2009

This is a mass Invite, Whois, msg, and notice script.
right click in channel after loading (alt r)
I did not make this, my friend Jordan who is the owner of irc.flamechat.com did
if you like please stop by and visit.

;####### irc.flamechat.com  ######
;#######      SPAWN         ######
;#######     #Script        ######
;#######   DO NOT EDIT    ######
;####### www.flamechat.com #####

menu nicklist,channel,menubar {
  -=- Mass Commands -=-
  .Mass Commands
  ..Inviting:minvite
  ..Whoising:mwho
  ..Noticing:mnotice
  ..Msg-ing:mmsg
}
alias m {
  /set %opt $1
  /set %except $2
  if (%opt == inv) { //echo -a 12*** Mass Inviting # | /minvite | halt }
  if (%opt == who) { //echo -a 12*** Mass Whoising # | /mwho | halt }
  if (%opt == not) { //echo -a 12*** Mass Noticing # | /mnotice | halt }
  if (%opt == msg) { //echo -a 12*** Mass Msg-ing # | /mmsg | halt }
  else { halt }
}
alias mnotice {
  /set %msg $?="Notice What?"
  /set %m 1
  :jump1
  /set %mnick $nick(#,%m)
  if (%mnick == $null) { halt | /unset %except }
  if (%mnick == %except) { /inc %m | goto jump1 }
  if (%mnick == $me) { /inc %m | goto jump1 }
  if (%mnick != $me) { /notice %mnick [_Hello_ $nick] %msg }
  inc %m
  goto jump1
}
alias mmsg {
  /set %msg $?="Msg What?" 
  /set %m 1
  :jump1
  /set %mnick $nick(#,%m)
  if (%mnick == $null) { halt | /unset %except }
  if (%mnick == %except) { /inc %m | goto jump1 }
  if (%mnick == $me) { /inc %m | goto jump1 }
  if (%mnick != $me) { /msg %mnick %msg }
  inc %m
  goto jump1
}
alias minvite {
  /set %invroom $?="Msg What?" 
  /set %m 1
  :jump1
  /set %mnick $nick(#,%m)
  if (%mnick == $null) { halt | /unset %except }
  if (%mnick == %except) { /inc %m | goto jump1 }
  if (%mnick == $me) { /inc %m | goto jump1 }
  if (%mnick != $me) { /invite %mnick %invroom }
  inc %m
  goto jump1
}
alias mwho {
  /set %m 1
  :jump1
  /set %mnick $nick(#,%m)
  if (%mnick == $null) { halt | /unset %except }
  if (%mnick == %except) { /inc %m | goto jump1 }
  if (%mnick == $me) { /inc %m | goto jump1 }
  if (%mnick != $me) { /whois %mnick }
  inc %m
  goto jump1
}

Comments

Sign in to comment.
MarkLomax   -  Dec 30, 2009

Do NOT use on quakenet. Excess flood.

 Respond  
Darkriddick   -  Sep 23, 2009

true true, i was the one who made that , i sent it to a friend, i guess my friend put it on here, awesome :P. its a comment for snippet, thats cute to call my net fail

 Respond  
sunslayer   -  Sep 23, 2009

@ghost-writer how can you rate a snippet based the network it was made on?

 Respond  
Darkriddick   -  Sep 23, 2009

lol, shut up

 Respond  
gooshie   -  Sep 23, 2009

Eliminated /set %variables, halts, /slashes, $null checks, and
replaced goto jumps with while loops. Added if # condition to
/m alias and instruction responses.

Use $2- in the /m command allows excluding more than one nick.

Removed Commands from menubar to avoid usage in non-channel
windows. Also removed the double nesting of 'Mass Commands'
title in menus.

menu nicklist,channel {
  -=- Mass Commands -=-
  .Inviting:minvite
  .Whoising:mwho
  .Noticing:mnotice
  .Msg-ing:mmsg
}
alias m {
  var %note
  if # {
    if $1 == msg { %note = Mass Msg-ing # | mmsg $2- }
    elseif $1 == not { %note = Mass Noticing # | mnotice $2- }
    elseif $1 == inv { %note = Mass Inviting # | minvite $2- }
    elseif $1 == who { %note = Mass Whoising # | mwho $2- }
    else { %note = Correct Usage: /m <msg|not|inv|who> Nick2Bexcluded1 Nick2Bexcluded2 Nick2Bexcluded3 etc }
  }
  else { %note = You must be in a channel to use '/m' command. }
  echo 12 -a *** %note
}
alias mmsg {
  var %i 1,%msg $?="Msg What?" 
  while $nick(#,%i) {
    if $v1 != $me && $v1 !isin $1- { msg $v1 %msg }
    inc %i
  }
}
alias mnotice {
  var %i 1,%msg $?="Notice What?"
  while $nick(#,%i) {
    if $v1 != $me && $v1 !isin $1- { notice $v1 [_Hello_ $v1 $+ ] %msg }
    inc %i
  }
}
alias minvite {
  var %i 1,%c $?="Enter Room Name inviting # to." 
  while $nick(#,%i) {
    if $v1 != $me && $v1 !isin $1- { invite $v1 %c }
    inc %i
  }
}
alias mwho {
  var %i 1
  while $nick(#,%i) {
    if $v1 != $me && $v1 !isin $1- { whois $v1 }
    inc %i
  }
}
 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.