Conference noted::hackers_v1

<>	    Write a hack (running in a subprocess) that catches your
  	broadcast messages and adds megabeeps to each one.

<>	    Collect a bunch of VT100s (and VT52s, if you like the
	"electronic raspberry" contrast) and log into all of them
	so that each mail message sends off a sea of beeps.

<>	    Hook up a microphone and amplifier to the beep speaker.

			<_Jym_>

	You could probably modify one of the COM files in topic 39
	to imbed ^Gs in the username. This would have the disadvantage
	that the bells would not only be heard from the broadcast, but
	also when doing a DIR or READ in mail (I'm not sure though).

	Another approach if you didn't mind tying up a terminal would
	be to use SET BROADCAST to disable everything except MAIL, and
	have a continuously running program which uses the SMG$ functions
	which allow broadcast trapping. I'm not sure of their names but
	a guess would be:
			SMG$ENABLE_BROADCAST_TRAPPING
		      & SMG$GET_BROADCAST_MESSAGE

	As soon as you get a broadcast, stick it on the screen with 
	as many ^Gs as you can stand.

<CFM>

	Oops - .1 slipped in while I wasn't looking.

	The hacked up SENDMESS.COM would of course be used by the
	mailer as opposed to the mailee which may or may not be
	practicable.

<CFM>  

    Patch MAIL.EXE to replace the single 'beep' with several.  I'd guess
    that it is in a string descriptor.  Or, change the "New mail from
    ..." message to include a few extra bells.  No sweat doing this,
    we've done more with less!

    Or, you could use this command file to change your personal name
    to one with a lot of beeps in it.
    
    	Jon

$ prev_priv = f$setprv("SYSPRV")
$ sysmai = "SYS$SYSTEM:VMSMAIL.DAT"
$ open /share=write /read /write /error=no_file f1 'sysmai'
$ goto file_open
$no_file:
$ write sys$output sysmai," not found...exiting"
$ exit
$file_open:
$ on control_y then goto done
$fulluser[0,31]:='p1'
$ read /index=0 /err=nosuchuser /key="''fulluser'" f1 record
$ address = f$extract(68,255,record)
$ addr_length = f$cvui(67*8,8,record)
$ fnmlng=f$cvui(66*8,8,record)
$ naddress = f$extract(0,addr_length,address)
$ full_name := "''f$extract(68+addr_length,fnmlng,record)'"
$ write sys$output "Personal name for ''p1' was:"
$ write sys$output "'","''full_name'","'"
$ rest_of_rec = f$extract(68+addr_length+fnmlng,255,record)
$ t3 = 'f$length(rest_of_rec)
$ t2 = 'f$length(naddress)
$ t1 = 'f$length(p2)
$ record[528,8]='t1'
$ record[68,255]:= "''naddress'''p2'''rest_of_rec'"
$ record = f$extract(0,68+t1+t2+t3,record)
$ write /update f1 record
$ write sys$output "Changed to:"
$ write sys$output "'","''p2'","'"
$ goto done
$nosuchuser:
$ write sys$output "User ",p1," does not exist"
$done:
$ close f1
$ prev_priv = f$setprv(prev_priv)
$ exit

	if you're doing all this hacking, why not have a visible 
	bell too? you could have the screen flash horribly.
	
	and you could run a command procedure or something so that 
	the bell keeps ringing until answered, rather than just 
	giving out 100 or so rings..
	
	jack 

    If the destination users have standard vt100's, why not really
    get their attention using the following escape sequences:
    
    <esc>[155q   (set term/piano ??)
    <esc>[153q   (beeps forever)
    
    Of course, this assumes that:
     1. the terminal is in autorepeat, keyclick enabled mode.
     2. it is possible to include these characters in the mail
        announcement.
                                   
    David.
    

Re .7 :

	Isn't it <ESC>[154q that beeps or am I wrong ?

	/piano only makes the keyboard repeat faster (mind you it
	does sound interesting if you type something)

<CFM>

Write a program to check for new mail and have the DECtalk call you
(or give a yell on the PA system) when it arrives.

Make technology work for you.

(Help my group make our budget.)

Martin.

    Hire a person to sit there and wait for mail.  When it comes, have
    the person notify your manager.  The manager will get ahold of you
    and make sure that you know that you've not read your mail.  Much
    more effective than beeps anyhow.  

    There is a public domain sharable image (deliver_mailshr.exe) which
    can automatically process your mail - you set autoforwarding to
    DELIVER%yourname (It gets invoked via the foreign protocol hook
    in VMSMAIL, the same hook NMAIL uses) This could be used to execute
    a command file upon receipt of mail.  I found the pointer to this
    in the VMSMAIL notesfile, it came from the Arpanet. I have a local
    copy of it on RUMOR::SAVE$:[falek.deliver]  -  you want to copy
    deliver_make.com, which contains the whole thing and makes its own
    individual pieces.  DELIVER% may not do exactly what you want,
    read the documentation.  anyway, its neat and possibly useful.
    

    Hey guys this is really great. The command procedure (when suitably
    hacked) in .5 allowed me to insert 10 bells in the personal name
    which woke up the operator on the other end. I guess I must have
    been doing something wrong when I tried it myself.
    
    Re .7 - I would really love to do that if i could figure out how
    to turn it off with an escape sequence after they had gotten the
    message
    
    re .10 - That idea was already thought of. In fact, in the true
    DEC spirit that's the way we already do it. We have 10 people who
    spend their time calling the local office just to log field service
    calls manually. This project is meant to bring us into the electronic
    age.
    

    RE: .-1
    	But think of all the people who you are putting out of work
    with this simple change.  Now is THAT the DEC way?  You bet, make
    them managers if they have nothing better to do now.

	    [RE .12 [RE .7]]:  To turn off the "siren", reset the
	terminal.  This is done by hitting the "SET-UP" key and then
	the "0" key on the keyboard (not the one on the keypad).
			<_Jym_>

   How about trying the following to put bells in(as many as you want)

 Keypad PF1
 
 Number "7" (not keypad 7)

 Keypad PF1

 Keypad 3

You have to use send/edit etc... from mail ....


                            Just throwen my 1/2 cents in.
					#6HACK

    Too simple ? how about a com file that submits another file that  
checks the mail then sees if anything is new and rings the bell ?    

    
$!mail.com    
$ mail    
dir newmail    
EXIT
$ exit 
    
$ !check.com    
$ start:    
$ purge mail.log
$ sub/noprint mail.com
$ wait 00:00:30
$ SEAR MAIL.log "# from"
$ IF $SEVERITY .EQS. "3" THEN GOTO start
$ bell:
$ BELL[0,7]=%O7
$ WRITE SYS$OUTPUT BELL
$ wait 00:00:02
$ GOTO BELL
    

    
    	btw :: howcum ? mail don't put the You have x new messages string
    into the log file ?
    
    							randy