home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga MA Magazine 1998 #6
/
amigamamagazinepolishissue1998.iso
/
cdrom
/
scdplayer
/
rexx
/
repeat1.scdp
< prev
next >
Wrap
Text File
|
1996-09-07
|
410b
|
35 lines
/* Skandalfo CD Player ARexx script
** Repeat-1-track mode.
*/
OPTIONS RESULTS
STATUS
ST=RESULT
IF ST~=PLAYING THEN RETURN
PLAYINGTRACK
TR=RESULT
FLAG=1
PLAYTRACK TR
USERACTION
DO WHILE FLAG
ADDRESS COMMAND Delay 500
USERACTION
UA=RESULT
IF UA~=0 THEN RETURN
STATUS
ST=RESULT
IF ST=NODISK THEN FLAG=0
IF ST=STOPPED THEN PLAYTRACK TR
END