home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Media Share 13
/
mediashare_13.zip
/
mediashare_13
/
ZIPPED
/
OTHER
/
WB_41E.ZIP
/
PLAY_CD.WB_
< prev
next >
Wrap
Text File
|
1992-02-26
|
471b
|
21 lines
;This WBT file plays a music CD on a CDAudio player.
;It plays whatever in in the drive, from start to finish.
stat=PlayMedia("status cdaudio mode")
a=1
if stat=="playing" then a=AskYesNo("CD Audio","CD is Playing. Stop?")
if a==0 then exit
PlayMedia("open cdaudio shareable alias donna notify")
PlayMedia("set donna time format tmsf")
PlayMedia("play donna from 1")
PlayMedia("close donna")
exit
:CANCEL
PlayMedia("set cdaudio door open")