; Memory Protect/Parity Error diagnostic (DSN = 102305)

echo
echo
echo ----------------------------------------
echo DSN 102305 - Memory Protect/Parity Error
echo ----------------------------------------
echo
echo Loading the diagnostic.
echo Expect halt 102077 if successful.

deposit A 102305
deposit B 000000
reset
go 120

assert T=102077


; Verify the DSN.

echo
echo Verifying DSN 102305.

deposit M 126
assert T=102305


; Configure the diagnostic.
;
; Set PCHAR to suppress BEL characters in messages.

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

set LPS DIAGNOSTIC
set CONSOLE PCHAR=23400

deposit S 140014
reset
go 100

assert T=102074


; Select the test set.

echo
echo Selecting the test set.
echo Expect halt 102075 if successful.

deposit S 001000
reset
go

assert T=102075

deposit A 035777


; Start the diagnostic.

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

deposit S 000000
reset
go

assert T=102061


; Respond to "H061 POWER DOWN COMPUTER
;               INSTALL JUMPERS PER TABLE 3-5 IN MOD
;               POWER UP COMPUTER"

echo
echo [Jumpers changed, computer powered up, RUN pressed]
echo Expect message "H314 PRESS HALT,PRESET AND RUN WITHIN 30 SECONDS".

set MP JSBOUT,INTOUT,SEL1IN
go until "30 SECONDS\r\n"


; Respond to "H314 PRESS HALT,PRESET AND RUN WITHIN 30 SECONDS".

echo
echo [PRESET pressed, RUN pressed]
echo Expect halt 102062 for user intervention.
echo

reset
go

assert T=102062


; Respond to "H062 POWER DOWN COMPUTER
;               SET JUMPERS TO INITIAL SETTINGS
;               PER TABLE 3-1 IN MOD
;               POWER UP COMPUTER"

echo
echo [Jumpers restored, computer powered up, RUN pressed]
echo Expect halt 102077 for successful completion.

set MP JSBIN,INTIN,SEL1OUT
go


; End of the diagnostic.
;
; Verify HLT 77B for a successful pass.

assert T=102077


; Restore the hardware configuration.

set LPS PRINTER
set CONSOLE PCHAR=23600