Category: | Special |
Windows specifics: | all |
data _null_; /* Open a CD player. */ msg=mcipistr("open cdaudio alias mytunes"); put msg=; /* Wait one second for the CD player */ /* to become active. */ slept=mcipislp(1); /* Begin playing your favorite tunes */ /* from the beginning of the CD. */ msg=mcipistr("play mytunes"); put msg=; /* Now open a video file. */ msg=mcipistr("open c:\movies\amovie.avs alias myshow"); put msg=; /* Begin the show and wait for it to */ /* complete. */ msg=mcipistr("play myshow wait"); put msg=; /* When the show is complete, */ /* close the instance. */ msg=mcipistr("close myshow"); put msg=; /* Stop and close the instance of the CD */ /* player. */ msg=mcipistr("stop mytunes"); put msg=; msg=mcipistr("close mytunes"); put msg=; run;