home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: DFÜ und Kommunikation / SOS-DFUE.ISO / programm / dos / terminal / ca_29 / conalarm.cmd < prev    next >
Encoding:
Text File  |  1989-10-09  |  649 b   |  22 lines
  1. ; ----- CONALARM: Alarm for conference areas
  2. ; ----------------------------------------------------------------
  3. ;    Note: This script waits for something received and then
  4. ;    sounds the alarm.  It is useful when in an empty conference
  5. ;    area, waiting for someone else to arrive.
  6. ; ----------------------------------------------------------------
  7. ;
  8. ;    Initialize
  9. ;
  10. SET ALARM ON
  11. SET ATIME 30
  12. Legend " Conference alarm armed..."
  13. ;
  14. ;    Wait for something
  15. ;
  16. Loop:
  17.    rget s9 80 30   ; Get 80 chars - wait up to 30 secs for them
  18.    if failure       ; IF nothing received
  19.       goto loop    ; Try again
  20.       endif
  21.    alarm       ; Ring the bell
  22.