home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a079 / 1.img / FPDG.LZH / VOL2NUM0 / MISC / DING.PRG < prev    next >
Encoding:
Text File  |  1992-08-20  |  596 b   |  16 lines
  1. ****************************************************************
  2. *     * 08/20/92                   DING.PRG           16:45:47 *
  3. ****************************************************************
  4. *     * Description:                                           *
  5. *     *  This program illustrates how create a three tone      *
  6. *     *  bell                                                  *
  7. ****************************************************************
  8. SET BELL TO 300,1
  9. ?? CHR(7)
  10. SET BELL TO 499,1
  11. ?? CHR(7)
  12. SET BELL TO 700,1
  13. ?? CHR(7)
  14. SET BELL TO 512,2 && Default value
  15. RETURN
  16.