From: "James C. Sewell" 
The Librarian, whom God loves, said:
>To allow me to know when files are being switched
>I have inserted the line [to make a beep]
You can create a global variable in the TSE.UI file
near the top.  Call it MakeSound or something like
that and set it to 1. (There is a section for global
variables already.  You may put it there.)
  
  integer MakeSound=1
Then in your function OnFirstEdit say:
proc OnFirstEdit()
if MakeSound == 1
Sound(50) Delay(2) NoSound()
endif
end
And finally set up some key combination to toggle the sound like:
 MakeSound = iif( MakeSound==1),0,1)
---
---------------