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
}

Like Page Follow Author

Comments

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
  }
}

1 Response

WiseWolf - Sep 29, 2022

How can we add a timer between msgs?? to avoid disconnecting with reason (Excess Flood)