#	$eterna: wallopstat,v 1.2 2001/08/12 15:57:12 mrg Exp $
#
# This one from Snoopy (hellmond@phoenix.princeton.edu
# silent script for ircII (cut and compress, put into script directory)
# =======================
#
# Purpose:
# selective silencing of wallops according to user/oper/server groups
#
# Functioning:
# wallops are identified as either user wallops ($1 = -),
# or oper wallops ($1 = +) or server wallops ($1 = S).
# this allows for selective turning on or off of these three groups

# load will make wallops be displayed normally
# loud- is for users, loud+ is for opers, loudS is for servers

alias loud- ^on ^wallop "* - *" _show_wallops $$*
alias loud+ ^on ^wallop "* + *" _show_wallops $$*
alias loudS ^on ^wallop "* S *" _show_wallops $$*

# silent will push wallops into the status_user variable %U
# which should be defined in the /set status_format line
# silent- is for users, silent+ is for opers, silentS is for servers

alias silent- ^on ^wallop "* - *" _handle_wallops $$*
alias silent+ ^on ^wallop "* + *" _handle_wallops $$*
alias silentS ^on ^wallop "* S *" _handle_wallops $$*
alias _handle_wallops ^assign WALLOPS $*;/^set status_user Wallops: !$[9]0$1! $2-

# lastwallops will show the last wallops sent 

alias lastwallops _show_wallops $WALLOPS
alias _show_wallops echo !$0$1! $2-

# Default:
loud-
loud+
loudS
# lynx91; later modification by snoopy (04/92)