;               LOAD AND EXECUTE A DIAGNOSTIC FROM MAGNETIC TAPE
;
; Calling sequence:
;
;   diag-mtload <diag-cmdfile> [ <path-to-diagnostics> ]
;
; If <path-to-diagnostics> is null, the current directory is assumed.  The path
; must end with a backslash if it is specified.  The path must not contain
; embedded spaces, even if it is quoted.


; Capture the diagnostic execution console log.

set -N console log=DIAG-MTLOAD.log
; set -N console debug=%1.lst
; set cpu debug


; Establish the initial environment.

echo
echo Configuring the simulation environment.

set CPU III,512K,CIS

break delay 30 milliseconds


; Run the selected diagnostic.

do %2%1.inc %2