home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / CDRom / asimcd30.dms / in.adf / ARexx_Samples / AsimTunes / get_num_tracks.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1995-06-17  |  363 b   |  21 lines

  1. /*  This example will demonstrate the use of the get_num_tracks command
  2.     in AsimTunes.
  3.  
  4.     (C)1993-1995 Asimware Innovations Inc.                               */
  5.  
  6.  
  7. options results
  8.  
  9. address "AsimTunes_ARexx"
  10.  
  11. get_num_tracks
  12. if rc ~= 0 then do
  13.     say 'Failed with 'rc'.'
  14.     exit
  15. end
  16.  
  17.  
  18. num_tracks = result
  19. say 'There are' num_tracks 'tracks on this audio CD.'
  20. exit
  21.