: to post messages from mail with BBS in subject to sysops bbs file
# and move other mail messages to the sysops mbox
# the sysop and homein directories have to modified to customize it
sysop=dick
user=$sysop
homein=/u/faculty
mail=/usr/spool/mail/$sysop
if [ ! -s $mail ]
then exit
fi
roster=$homein/$sysop/bbs.roster
mbox=$homein/$sysop/mbox
bbs=$homein/$sysop/bbs
junk=$homein/$sysop/pbi/junk
mailx -f $mail 2>&1 1>/dev/null <<+++++
s ksc.th.com $junk
d ksc.th.com
s invest@juno.com $junk
d invest@juno.com
s kae28@prodigy.com $junk
d kae28@prodigy.com
s vg_12@usa.net $junk
d vg_12@usa.net
s somebody@somewhere.com $junk
d somebody@somewhere.com
s teuda39@cpod.fr $junk
d teuda39@cpod.fr
s bpi@ns9.internetconnect.net $junk
d bpi@ns9.internetconnect.net
s feduola58@idnet.net.uk $junk
d feduola58@idnet.net.uk
s nou39@mlmpro.net $junk
d nou39@mlmpro.net
s CASH4YOU $junk
d CASH4YOU
s loans@xitau.de $junk
d loans@xitau.de
s miceoqoa@aol.com $junk
d miceoqoa@aol.com
s patriot-911.net $junk
d patriot-911.net
s peuwu93@birch.de $junk
d peuwu93@birch.de
s donthitreply $junk
d donthitreply
s way2hot@mailexcite.com $junk
d way2hot@mailexcite.com
s Selective.Marketing@earthlink.net $junk
d Selective.Marketing@earthlink.net
s biy@lunar.edu $junk
d biy@lunar.edu
s Hangman37@aol.com $junk
d Hangman37@aol.com
s @quantcom.com $junk
d @quantcom.com
s @hotsuccess.com $junk
d @hotsuccess.com
s @stellaluna.2099.com $junk
d @stellaluna.2099.com
s @aztec.co.za $junk
d @aztec.co.za
s personalt@personalt.com $junk
d personalt@personalt.com
s fsdj97@aol.com $junk
d fsdj97@aol.com
s freedomtoyou@aol.com $junk
d freedomtoyou@aol.com
s hotmail.com $junk
d hotmail.com
s /adm.clean $homein/$sysop/todo/adm.clean
d /adm.clean
s /help $homein/$sysop/todo/help
s /BBS $homein/$sysop/tmp/newbbs
s /BBS $homein/$sysop/bbs
d /help
d /BBS
s /202  $homein/$user/cs202/received
s /202  $homein/$user/todo/cs202
d /202
s /320  $homein/$user/cs320/received
s /320  $homein/$user/todo/cs320
d /320
s /595  $homein/$user/cs595/received
s /595  $homein/$user/todo/cs595
d /595
s /SRE todo/SRE
s /SRE pbi/SRE
d /SRE
s * $mbox
d *
q
+++++
date >/$homein/$sysop/.last.posting
if [ -s $homein/$sysop/tmp/newbbs -a -s $roster ]
then
	cat $roster|while read member
	do
	  (/u/faculty/dick/bin/cm -o $homein/$sysop/tmp/newbbs; echo; cat $homein/$sysop/tmp/newbbs ) | mailx -s BBS $member 
	done
	# new.bbs.users >>bbs.roster
	rm $homein/$sysop/tmp/newbbs
	echo "Last Message: " `date` >>/$homein/$sysop/.last.posting
fi
distribute $bbs aviion indigo orion gemini challenge
distribute /$homein/$sysop/.last.posting aviion indigo orion gemini challenge
if [ -r $mbox ]; then chmod 600 $mbox
fi
chmod 644 $bbs $roster
for n in 320 365
do
[ -r todo/cs$n ] && cm -n todo/cs$n >$homein/$user/cs$n/backlog
done