home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: OtherApp / OtherApp.zip / am4pmsrc.zip / amc / play.amc < prev    next >
Text File  |  1995-05-22  |  1KB  |  22 lines

  1. /*********************************************************************/
  2. /* PLAY.AMC - Play a message to the speaker                          */
  3. /*                                                                   */
  4. /* This program is called by AM4PM.EXE when the user wants to play   */
  5. /* a message selected from the listbox.                              */
  6. /*                                                                   */
  7. /* Input:  The name of the file to play                              */
  8. /*                                                                   */
  9. /* Output: 0  Normal. Only AT+VLS=0 is done before waiting           */
  10. /*         1  Full init. Reinit COM-port and everything.             */
  11. /*         2  Terminate AM4PM.                                       */
  12. /*                                                                   */
  13. /*********************************************************************/
  14. CALL AMDPrint 'PLAY.AMC('arg(1)') started'
  15. CALL AMSetLastEventText 'Play'
  16.  
  17. CALL AMSetStateText 'Playing message'
  18. CALL AMSendAT('AT+VLS=16{VCON}')    /* 2 Telco line, 16 Internal speaker */
  19.  
  20. DLECode=AMPlayFile(arg(1))
  21. Exit 0
  22.