;                         HP 3000 DIAGNOSTICS SUITE
;
; The HP Diagnostics Suite executes all of the diagnostics relevant to
; verification of proper SIMH operation.  It should be run to confirm operation
; of the HP3000 simulator before release.  Because some diagnostics are expected
; to give failures, comparison of the output log with a "known-good" log should
; be performed to judge simulator compliance.
;
; Invocation:
;
;    hp3000 diag-suite [ <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 and must not contain embedded
; spaces, even if it is quoted.


; Capture the suite execution console log.

set -N console log=DIAG-CPU.log


; Establish the initial environment.

echo
echo Configuring the simulation environment.

set CPU III,512K,CIS

break delay 30 milliseconds


; CPU diagnostic section 1 (D420A).

do %1CPU-S1.inc %1


; CPU diagnostic section 2 (D420A1).

do %1CPU-S2.inc %1


; CPU diagnostic section 3 (D420A2).

do %1CPU-S3.inc %1


; CPU diagnostic section 4 (D420A3).

do %1CPU-S4.inc %1


; CPU diagnostic section 5 (D420A4).

do %1CPU-S5.inc %1


; CPU diagnostic sections 6-14 (D420A5-D420A13).

do %1CPU-S6-S14.inc %1


; CPU Extended Instruction Set diagnostic (D431A).

do %1CPU-EIS.inc %1


; CPU COBOL II Extension Instruction Set diagnostic (D441A).

do %1CPU-CIS1.inc %1


; CPU COBOL II Extension Instruction Set diagnostic (D442A).

do %1CPU-CIS2.inc %1


; Done

exit