; 12936 Privileged interrupt diagnostic (DSN 103115, 24396-13601_Rev-2326)
;
; Four diagnostic runs are made with these I/O card configurations:
;
;  1. Low SC < PIF < High SC < 40B
;  2. Low SC < PIF < 40B < High SC
;  3. Low SC < 40B < PIF < High SC
;  4. 40B < Low SC < PIF < High SC
;
; These test the "io_poll_interrupt" routine in the CPU simulator for proper
; interrupt recognition.

echo
echo
echo ---------------------------------
echo DSN 103115 - Privileged Interrupt
echo ---------------------------------
echo
echo Loading the diagnostic.
echo Expect halt 102077 if successful.

deposit A 103115
deposit B 000000
reset
go 120

assert T=102077


; Verify the DSN.

echo
echo Verifying DSN 103115.

deposit M 126
assert T=103115



; Configure the diagnostic for case 1 (Low SC < PIF < High SC < 40B).

echo
echo
echo Configuring the diagnostic for the first run.
echo Expect halt 102070 if successful.

set MC1 DIAGNOSTIC,SC=30
set PIF 12936A,SC=31
set MC2 DIAGNOSTIC,SC=37

deposit S 003730
reset
go 100

assert T=102070

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

deposit S 000031
go

assert T=102074


; Start the diagnostic.

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

deposit S 000000
reset
go

assert T=102032


; Respond to "H032 PRESS PRESET(EXT), RUN".

echo
echo [INTERNAL and EXTERNAL PRESET pressed, RUN pressed]
echo Expect halt 102077 for successful completion.
echo

reset
go


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

assert T=102077



; Configure the diagnostic for case 2 (Low SC < PIF < 40B < High SC).

echo
echo
echo Configuring the diagnostic for the second run.
echo Expect halt 102070 if successful.

set MC1 DIAGNOSTIC,SC=30
set PIF 12936A,SC=37
set MC2 DIAGNOSTIC,SC=57

deposit S 005730
reset
go 100

assert T=102070

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

deposit S 000037
go

assert T=102074


; Start the diagnostic.

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

deposit S 000000
reset
go

assert T=102032


; Respond to "H032 PRESS PRESET(EXT), RUN".

echo
echo [INTERNAL and EXTERNAL PRESET pressed, RUN pressed]
echo Expect halt 102077 for successful completion.
echo

reset
go


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

assert T=102077



; Configure the diagnostic for case 3 (Low SC < 40B < PIF < High SC).

echo
echo
echo Configuring the diagnostic for the third run.
echo Expect halt 102070 if successful.

set MC1 DIAGNOSTIC,SC=31
set PIF 12936A,SC=55
set MC2 DIAGNOSTIC,SC=72

deposit S 007231
reset
go 100

assert T=102070

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

deposit S 000055
go

assert T=102074


; Start the diagnostic.

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

deposit S 000000
reset
go

assert T=102032


; Respond to "H032 PRESS PRESET(EXT), RUN".

echo
echo [INTERNAL and EXTERNAL PRESET pressed, RUN pressed]
echo Expect halt 102077 for successful completion.
echo

reset
go


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

assert T=102077



; Configure the diagnostic for case 4 (40B < Low SC < PIF < High SC).

echo
echo
echo Configuring the diagnostic for the fourth run.
echo Expect halt 102070 if successful.

set MC1 DIAGNOSTIC,SC=55
set PIF 12936A,SC=65
set MC2 DIAGNOSTIC,SC=75

deposit S 007555
reset
go 100

assert T=102070

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

deposit S 000065
go

assert T=102074


; Start the diagnostic.

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

deposit S 000000
reset
go

assert T=102032


; Respond to "H032 PRESS PRESET(EXT), RUN".

echo
echo [INTERNAL and EXTERNAL PRESET pressed, RUN pressed]
echo Expect halt 102077 for successful completion.
echo

reset
go


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

assert T=102077


; Restore the hardware configuration.

set PIF 12620A,SC=37

set MC1 DEVICE,SC=45
set MC2 DEVICE,SC=46