;==========================================================================
; MODULE:  CDCert.txt
; AUTHOR:  JohnMil
; DATE:     4/8/93
;
; This file contains the CD Audio certification script for HCT's/DDK. It
; should be used in conjunction with the manual 'sanity test' for CD's.
; Note that this won't necessarily find all problems with a cdaudio
; driver: it is as comprehensive an audio test as we could supply which
; wouldn't be susceptible to timing issues.
;
; Rules for construction of this data file can be found in MCI\MCIGen\TestLoop.
;
;==========================================================================
;
;
;
;===========================
TestCase TC_CD_CERTIFICATION
;===========================
;
close all
*

open %driver% alias %alias%
0
*
!Testing Capability/Info
capability %alias% can eject
0
*
capability %alias% device type
0
cdaudio
info %alias% product
0
=%ProductName%
!Testing Seeking
seek %alias% to start wait
0

status %alias% current track
0
2
seek %alias% to end wait
0

status %alias% current track
0
30
set %alias% time format tmsf
0

seek %alias% to 10
0

seek %alias% to 25
0

seek %alias% to 23:00:02:37 wait
0

status %alias% current track
0
23
status %alias% position
0
23:00:02:*
seek %alias% to 31:00:00:00
MCIERR_OUTOFRANGE

seek %alias% to 28
0

seek %alias% to 10
0

seek %alias% to 25:00:03:37 wait
0

status %alias% position
0
25:00:03:*
status %alias% current track
0
25
status %alias% media present
0
true
stop %alias% wait
0

status %alias% mode
0
*
!Testing Track length sensing
;
;Test sensing while stopped
;
status %alias% length track 25
0
00:06:02
status %alias% length track 25
0
=%PeteLen%
status %alias% length track 22
0
%PeteLen%
status %alias% length track 1
0
*
status %alias% length track 30
0
00:07:01
status %alias% length track 20
0
%PeteLen%
seek %alias% to start wait
0

status %alias% position
0
02:00:00:*
;
;Test length sensing while seeking forward
;
seek %alias% to end
0

status %alias% length track 25
0
%PeteLen%
status %alias% length track 20
0
%PeteLen%
;
;Test length sensing while seeking backward
;
seek %alias% to end wait
0

seek %alias% to start
0

status %alias% length track 25
0
%PeteLen%
status %alias% length track 20
0
%PeteLen%
;
;Test length sensing while playing
;
play %alias%
0

status %alias% length track 25
0
%PeteLen%
status %alias% length track 25
0
%PeteLen%
status %alias% length track 20
0
%PeteLen%
status %alias% length track 1
0
*
status %alias% length track 29
0
00:09:38
status %alias% length track 20
0
%PeteLen%
!Play Test
;
;General Play
;
seek %alias% to start wait
0

play %alias% to 3 wait
0

status %alias% mode
0
stopped
status %alias% position
0
03:00:00:*
;
; Play from
;
play %alias% from 4:00:03:03
0

status %alias% length track 5
0
00:07:19
status %alias% mode
0
playing
stop %alias%
0

play %alias% from 31:00:00
MCIERR_OUTOFRANGE

play %alias% from 29 wait
0

status %alias% mode
0
stopped
;
; Play to
;
seek %alias% to 6
0

play %alias% to 7:0:2:30 wait
0

status %alias% mode
0
stopped
status %alias% position
0
07:00:02:*
play %alias% to -1
MCIERR_OUTOFRANGE

play %alias% to 31
MCIERR_OUTOFRANGE

play %alias% to 3
MCIERR_OUTOFRANGE

;
; Play from-to
;
play %alias% from 20 to 30
0

play %alias% from 27:00:01:04 to 29:00:02:30 wait
0

status %alias% position
0
29:00:02:*
play %alias% from 02:00 to 03:00 wait
0

status %alias% position
0
03:00:00:*
play %alias% from 5 to 4
MCIERR_OUTOFRANGE

play %alias% from 25 to 35
MCIERR_OUTOFRANGE

!Pause testing
;
; Play-pause test
;
seek %alias% to start wait
0

play %alias%
0

pause %alias% wait
0

status %alias% mode
0
*
play %alias%
0

pause %alias%
0

seek %alias% to 7 wait
0

play %alias% to 8 wait
0

status %alias% position
0
08:00:00:*
!SET (unverified) testing
set %alias% audio all on
*

set %alias% audio all off
*

set %alias% audio left on
*

set %alias% audio right on
*

set %alias% audio left off
*

set %alias% audio right off
*

set %alias% audio all on
*

close %alias%
*
*