home *** CD-ROM | disk | FTP | other *** search
/ Media Share 9 / MEDIASHARE_09.ISO / diags / pandor23.zip / TONE.PAN < prev   
Text File  |  1991-09-11  |  845b  |  26 lines
  1.       ******************************************************************
  2.       ***                                                            ***
  3.       ***  Sample Pandora script for making noises behind a program  ***
  4.       ***                                                            ***
  5.       ******************************************************************
  6.  
  7. * This script could be developed so that a tune is played while the
  8. * program is running.  You could even throw in a pop-up menu of medleys.
  9. * Why anyone would want to do this is a mystery to me but I am happy
  10. * to make the possibility available.
  11.  
  12. IfLoad "program.exe"
  13.     OnDeath Out
  14.     Go ""
  15. Else
  16.     Output "^M^JPlease edit this script to insert the name of a program."
  17.     Tone 440 3t
  18.     Quit
  19. EndIf
  20. Label keyer
  21. WaitPeriod 1s
  22. Tone 440 1s
  23. Jump keyer
  24. Label Out
  25. Quit
  26.