;===========================================================================
;
; Module :  CDCert7.txt
; Author :  a-prestp
; Date	 :  3/2/96
;
;   This is an overhaul of JohnMil's original tests, so that the new HCT's
; will be able to do all of it's MCI testing in 7 tracks, instead of the
; origianl 30 audio tracks.
;
;   Docs on how to write these tests will be forth coming, as soon as I
; get some free time.  The original rules for writing these have been lost
; in the mists of time, and they need to be redone.
;
;  The general format for commands are :
;
;  MCI text command
;  True or False return value ( True = 0 )
;  Return Value ( if any )
;
;===========================================================================
;
;
;===========================
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
12
set %alias% time format tmsf
0

seek %alias% to 2
0

seek %alias% to 10
0

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

status %alias% current track
0
2
status %alias% position
0
02:00:02:*
seek %alias% to 13:00:00:00
MCIERR_OUTOFRANGE

seek %alias% to 6
0

seek %alias% to 4
0

seek %alias% to 09:00:01:37 wait
0

status %alias% position
0
09:00:01:*
status %alias% current track
0
9
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 2
0
00:09:10
status %alias% length track 10
0
=%MultiLen%
status %alias% length track 8
0
%MultiLen%
status %alias% length track 1
0
*
status %alias% length track 7
0
00:11:36
status %alias% length track 4
0
%MultiLen%
seek %alias% to start wait
0

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

status %alias% length track 4
0
%MultiLen%
status %alias% length track 10
0
%MultiLen%
;
;Test length sensing while seeking backward
;
!-------------------------------------------
! Test length sensing while seeking backward
!-------------------------------------------
seek %alias% to end wait
0

seek %alias% to start
0

status %alias% length track 4
0
%MultiLen%
status %alias% length track 8
0
%MultiLen%
;
;Test length sensing while playing
;
play %alias%
0

status %alias% length track 4
0
%MultiLen%
status %alias% length track 10
0
%MultiLen%
status %alias% length track 8
0
%MultiLen%
status %alias% length track 1
0
*
status %alias% length track 7
0
00:11:36
status %alias% length track 10
0
%MultiLen%
;
;General Play
;
!---------------------
! General Play Testing
!---------------------
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:09:37
status %alias% mode
0
playing
stop %alias%
0

play %alias% from 13:00:00
MCIERR_OUTOFRANGE

play %alias% from 9 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 13
MCIERR_OUTOFRANGE

play %alias% to 3
MCIERR_OUTOFRANGE

;
; Play from-to
;
!-------------
! Play from-to
!-------------
play %alias% from 3 to 9
0

play %alias% from 5:00:01:04 to 6:00:02:30 wait
0

status %alias% position
0
06: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 8 to 13
MCIERR_OUTOFRANGE

;
; Play-pause test
;
!----------------
! 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%
*
*