; Enumerate the diagnostic serial numbers (DSNs) on a diagnostic tape. ; Note that as SIMH does not provide looping, we attempt to load 65 successive files. ; Presumably, this will fail, and the assertion test will catch it. ; If it doesn't, you'll have to add more sequential file loads. echo Run with "HP2100 DIAG-DSN " echo echo Attempting attachment of %1 attach -R MSC0 %1 ; Capture the diagnostic execution console log. set -N console log=%1.log ; ***************************** ; * * ; * Diagnostic Configurator * ; * * ; ***************************** echo echo echo -------------------------------------------------------------------- echo Diagnostic Serial Number (DSN) Catalog for %1 echo -------------------------------------------------------------------- ; Configure as 21MX-E with DMA, MPRT, and FP. echo echo echo Configuring the CPU as a 1000 E-Series. set CPU 1000-E,128K ; Enable normally disabled I/O devices so that all devices are available. echo echo Configuring the simulation environment. set ALL ENABLED ; Load the diagnostic configurator. echo echo Loading the diagnostic configurator from magnetic tape. echo Expect halt 102077 if successful. deposit S 000000 boot MSC0 assert T=102077 ; Verify the Diagnostic Serial Number. echo echo Verifying DSN 000200. deposit M 126 assert T=000200 ; Prepare for automatic configuration with program load from magnetic tape. echo echo Configuring the diagnostic configurator for magnetic tape loading. echo Expect halt 102077 if successful. deposit S 113011 deposit A 0 deposit B 0 reset go 100 assert T=102077 ; get DSNs and print echo echo echo -------------- echo Capturing DSNs echo -------------- examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 deposit A 0 deposit B 0 go 120 assert T=102077 examine 126 ; If we get this far, there are more diagnostic files on the tape. ; Report this so that we will edit this file and try again. echo WARNING! End of tape was NOT reached, so the DSN list is incomplete!