; 7900/01 Cartridge Disc diagnostic (DSN 151302, 24396-13601_Rev-2326), user interaction test

echo
echo
echo ------------------------------------------------------
echo DSN 151302 - 7900/01 Cartridge Disc (user interaction)
echo ------------------------------------------------------
echo
echo Loading the diagnostic.
echo Expect halt 102077 if successful.

deposit A 151302
deposit B 000000
reset
go 120

assert T=102077


; Verify the DSN.

echo
echo Verifying DSN 151302.

deposit M 126
assert T=151302


; Configure the diagnostic.

echo
echo Configuring the diagnostic.
echo Expect halt 102074 if successful.

attach -N DPC0 scratch.U0.7900.disc

deposit S 000022
reset
go 100

assert T=102074


; Start the diagnostic.

echo
echo Executing the diagnostic.
echo Expect halt 102002 for user intervention.

deposit S 000160
reset
go

assert T=102002


; Respond to "H66 SET OVERRIDE SWITCH,PUSH RUN"

echo
echo [RUN pressed]
echo Expect message "E64 STATUS IS 000000 SHOULD BE  000010" and halt 102001.
echo

go

assert T=102001


; Respond to the error.

echo
echo Resuming from error.
echo Expect message "E64 STATUS IS 000000 SHOULD BE  000010" and halt 102001.
echo

go

assert T=102001


; Respond to the error.

echo
echo Resuming from error.
echo Expect halt 102002 for user intervention.
echo

go

assert T=102002


; Respond to "H67 CLEAR OVERRIDE SWITCH,PUSH RUN"

echo
echo [RUN pressed]
echo Expect message "E64 STATUS IS 000000 SHOULD BE  000031" and halt 102001.
echo

go

assert T=102001


; Respond to the error.

echo
echo Resuming from error.
echo Expect message "E64 STATUS IS 000000 SHOULD BE  000011" and halt 102001.
echo

go

assert T=102001


; Respond to the error.

echo
echo Resuming from error.
echo Expect message "E64 STATUS IS 000000 SHOULD BE  000011" and halt 102001.
echo

go

assert T=102001


; Respond to the error.

echo
echo Resuming from error.
echo Expect halt 102002 for user intervention.
echo

go

assert T=102002


; Respond to "H66 SET OVERRIDE SWITCH,PUSH RUN"

echo
echo [RUN pressed]
echo Expect halt 102002 for user intervention.
echo

go

assert T=102002


; Respond to "H67 CLEAR OVERRIDE SWITCH,PUSH RUN"

echo
echo [RUN pressed]
echo Expect halt 102002 for user intervention.
echo

go

assert T=102002


; Respond to "H70 UNLOAD UNIT  0,PUSH RUN"

echo
echo [Unit unloaded, RUN pressed]
echo Expect message "H40 PROTECT U/D THEN READY UNIT  0".
echo

set DPC0 UNLOAD
go until "UNIT  0\r\n"


; Respond to "H40 PROTECT U/D THEN READY UNIT  0"

echo
echo [U/D protected, unit readied, RUN pressed]
echo Expect halt 102002 for user intervention.
echo

set DPC0 LOAD,PROTECT
go

assert T=102002


; Respond to "H41 CLEAR U/D PROTECT,LOAD,PUSH RUN"

echo
echo [U/D protect cleared, RUN pressed]
echo Expect halt 102002 for user intervention.
echo

set DPC0 UNPROTECT
go

assert T=102002


; Respond to "H71 PRESS PRESET(S) THEN PRESS RUN"

echo
echo [PRESET pressed, RUN pressed]
echo Expect message "H65 SHORT PASS  0001,HEADS 0/1,UNIT 00, 0005 ERRORS".
echo

deposit S 000140
reset
go until "ERRORS\r\n"


; End of the diagnostic.
;
; Restore the hardware configuration.

detach DPC0
delete scratch.U0.7900.disc