home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / MEDIAPO3.DMS / in.adf / ARexx.lha / Test_Commands.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1993-08-25  |  629 b   |  33 lines
  1. /* Test some MediaPoint Arexx commands, while the player is running */
  2.  
  3. ADDRESS 'MEDIAPOINT'
  4. options results
  5.  
  6. /*Switch of the manual control of MediaPoint*/
  7. CURSOR OFF
  8. say ''
  9.  
  10. /*Get the state of the player*/
  11. GETSTATE
  12. say 'The state of the player is' result
  13.  
  14. /*Get the currently shown page number*/
  15. GETPAGENR
  16. say 'The current page number is' result
  17.  
  18. /*Get the number of pages in the script*/
  19. GETNRPAGES
  20. say 'The number of pages in the script is' result
  21.  
  22. /*Do a little loop*/
  23. DO I=1 TO 5
  24.   GOTO NEXT
  25.   ADDRESS COMMAND WAIT 2
  26. END
  27.  
  28. /*You can use GOTO NEXT  GOTO PREV or GOTO labelname
  29. e.g. GOTO mainmenu */
  30.  
  31. /*Exit the player*/
  32. QUIT
  33.