; 2000/Access Comm. Processor Firmware (DSN 101217, 13207-16001_Rev-1728)
;
; Parameter 1 = path to diagnostics

echo
echo
echo -------------------------------------------------
echo DSN 101217 - 2000/Access Comm. Processor Firmware
echo -------------------------------------------------
echo
echo Loading the diagnostic.
echo Expect halt 102077 if successful.

attach -E -R PTR %113207-16001_Rev-1728.abin

deposit S 001011
deposit A 101217
deposit B 000000
go 120

assert T=102077

detach PTR


; Verify the DSN.

echo
echo Verifying DSN 101217.

deposit M 126
assert T=101217


; Configure the diagnostic.

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

set CPU IOP

deposit S 000013
reset
go 100

assert T=102074


; Start the diagnostic.

echo
echo Executing the diagnostic.
echo Expect halt 102077 for successful completion.

deposit S 000000
reset
go


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

assert T=102077


; Restore the hardware configuration.

set CPU NOIOP