RexxCD features an ARexx interface, from there you can control the program behaviour. If you are not familiar with ARexx, please refer to the "ARexx User's Guide" supplied with your computer.
1. PLAY PREVIOUS
2. options results;
getattr drive field status var stat;
if stat=2 then PAUSE;
else PLAY
3. SKIP SECONDS 5 BACK
4. SKIP SECONDS 5
5. PAUSE
6. STOP
7. options results;
getattr drive field status var stat;
if stat=0 then INSERT;
else EJECT
INSERT LOCK DISABLE UNLOCK QUIT SETATTR DISABLE ENABLE Say "Don't mess with me."
APPLICATION
.NAME
.VERSION
.SCREEN
SETTINGS
.REPEAT
.CREATEICONS
.ALLOWMACROS
.TOCPATH
BUTTON
.1
.2
.3
.4
.5
.6
.7
DEVICE
.NAME
.UNIT
VOLUME
.LEFT
.RIGHT
DRIVE
.NAME
.VENDOR
.REVISION
.PRIVATE
.STATUS
0 - No disc
1 - Playing
2 - Paused
3 - Stopped
.TYPE
0 - Hard disc
1 - Streamer
2 - Printer
3 - CPU
4 - WORM
5 - CD-ROM
6 - Scanner
7 - MO
8 - Jukebox
9 - Comm
10 - Pre-Press device
11 - Pre-Press device
.BPS
.STEREO
.COMPATFIXES
DISC
.ARTIST
.TITLE
.ID
.BARCODE
.IDFILE
.LENGTH
.ELAPSED
TRACK
.COUNT
.CURRENT
.ELAPSED
With NAME (track number) set:
.LENGTH
.LYRICS
.ARTIST
.TITLE
NAME argument required:(TEXTFONT, DIGITFONT, LYRICFONT)
FONT
.NAME
.SIZE
NAME argument required: (MAIN, LYRICS)
WINDOW
.TOP
.LEFT
.WIDTH
.HEIGHT
.TITLE
.OPEN
/* Show the table of contents */
GETATTR TRACK STEM TRACK
do i=1 to TRACK.COUNT
'GETATTR TRACK NAME 'i' STEM TRACK'
Say RIGHT(i, 2, '0')': 'TRACK.ARTIST' - 'TRACK.TITLE
end
APPLICATION
.SCREEN
SETTINGS
.REPEAT
.ALLOWMACROS
.TOCPATH
BUTTON
.1
.2
.3
.4
.5
.6
.7
VOLUME
.LEFT
.RIGHT
DEVICE
.NAME
.UNIT
.TYPE
DRIVE
.BPS
.STEREO
NAME
"DRIVE.BPS" defaults to 75, and for some CD drives the value is 300.
DEV.NAME='z3scsi.device' DEV.UNIT=0 SETATTR DEVICE STEM DEV
/* Show the table of contents
*/
options results
address REXXCD
GETATTR TRACK STEM T
Say
Say 'No.__Artist/Group__ __Title__'
do i=1 to T.COUNT
'GETATTR TRACK NAME 'i' STEM T'
Say RIGHT(i,2,'0')':'LEFT(T.ARTIST,28)' 'LEFT(T.TITLE,48)
end
/* Load the TOC-file into TurboText
*/
options results
address REXXCD
GETATTR DISC FIELD IDFILE VAR FILE
address COMMAND
'TTX 'FILE
RexxCD starts an ARexx script at startup time, This defaults to "Startup_RexxCD.rexx"
Here's an example of how it can look like:
/*
Name : StartUp_RexxCD.rexx
Created : 05/07/95
Last change : 18/06/96
Programmer : Urban Lindeskog
Organization : ProNotion SoftWare Development Group
*/
OPTIONS RESULTS
SETATTR DRIVE FIELD STEREO VALUE 0
V.LEFT=255
V.RIGHT=255
SETATTR VOLUME STEM V
PLAY 1