; Synchronous Single-Line Controller diagnostic (D434A). ; Parameter 1 = path to diagnostic tape. ; ; Configuration locations: ; ; Location Default Value Contents ; ------------- ------------- -------------------------------------- ; DB+0 023354 000000 Switch Register setting ; DB+1 023355 077000 Section Select Register setting ; DB+2 023356 010103 Version update ; DB+3 023357 000022 Interface DRT number ; DB+4 023360 000310 Maximum number of errors ; DB+5 023361 000003 Clock DRT number echo echo echo ------------------------------------------ echo D434A - Synchronous Single-Line Controller echo ------------------------------------------ echo echo Loading the stand-alone loader. ; Cold load the I/O diagnostics tape. attach -r MS0 %130000-11017_Rev-2640_IO.tape boot MS0 ; Load the tape file containing the diagnostic. ; ; The I/O tape contains these files: ; ; DIAGNOSTIC FILE REV %FILE ; ------------------- ------ ----- ---- ; SLEUTH PD411A 01.05 (01) ; CART DISC-7905A PD419A 01.04 (02) ; MEMORY PATTERN PD421A 01.00 (03) ; MULTIPLEXOR CHAN PD422A 01.02 (04) ; DISC FILE-2888A PD423A 01.00 (05) ; CART DISC-7900A PD424A 01.00 (06) ; SYSTEM CLOCK II/III PD425A 01.00 (07) ; SYS CLK/FLI III-LC PD426A 00.00 (10) ; TERMINAL DATA PD427A 01.01 (11) ; FIXED HEAD DISC PD428A 01.00 (12) ; SELECTOR CHAN PD429A 01.01 (13) ; FLT.CORR.MEM SER-II PD430A 01.01 (14) ; FLT.CORR.MEM SER-III PD430B 00.00 (15) ; EXTEND INSTRUC SET PD431A 01.00 (16) ; HSI DIAG. PD432A 01.00 (17) ; MAGNETIC TAPE PD433A 01.04 (20) ; SSLC INTERFACE PD434A 01.03 (21) ; ASLC INTERFACE PD434B 01.04 (22) ; UI DIAG PD435A 01.01 (23) ; TERMINAL CONTROL PD438A 01.00 (24) ; CALCOMP PLOTTER PD439A 01.01 (25) ; COBOLII A F/W DIAG PD441A 00.00 (26) ; COBOLII B F/W DIAG PD442A 00.00 (27) ; STAND ALONE DISC SADUTIL 01.00 (30) deposit SWCH 21 ; Set the CLK into real-time mode for the timing tests. ; ; Set the SSLC into serial mode to simulate attaching the 30055-60011 ; synchronous serial cable. set CLK REALTIME set SSLC SERIAL,SYNCHRONOUS ; Load and start the diagnostic. ; ; The diagnostic loads from tape and then waits for a . echo echo Loading and executing the diagnostic. reply "\r" delay 2 seconds go ; Verify HALT 6 and respond to P10 ENTER SWITCH REG. OPTIONS. assert CIR=030366 ; Set the Switch Register options: ; ; + bit 0 = select the external switch register ; + bit 1 = modify the Section Select Register ; bit 2 = not used ; bit 3 = not used ; bit 4 = not used ; bit 5 = loop on the current section ; bit 6 = not used ; bit 7 = output to the line printer (if configured) ; bit 8 = not used ; bit 9 = suppress non-error messages ; bit 10 = suppress error messages ; bit 11 = loop on the last step ; bit 12 = halt on error ; bit 13 = halt at the end of each step ; bit 14 = halt at the end of each section ; bit 15 = halt at the end of each diagnostic pass deposit SWCH 140000 echo echo Configuring the switch register. echo Expect halt 5 if successful. echo go ; Verify HALT 5 and respond to P11 ENTER SECTION SEL. OPTION. assert CIR=030365 ; Set the Section Select options: ; ; bit 0 = reconfigure ; bit 1 = execute Section 1 ; bit 2 = execute Section 2 ; bit 3 = execute Section 3 ; bit 4 = execute Section 4 ; bit 5 = execute Section 5 ; bit 6 = execute Section 6 ; + bit 7 = execute Section 7 ; bit 8 = execute Section 8 ; bit 9 = not used ; bit 10 = not used ; bit 11 = not used ; bit 12 = not used ; bit 13 = not used ; bit 14 = not used ; bit 15 = not used deposit SWCH 000400 echo echo Configuring the section select register. echo Expect halt 6 if successful. echo go ; Verify HALT 6 and respond to P10 ENTER SWITCH REG. OPTIONS. assert CIR=030366 ; Set the Switch Register options: ; ; + bit 0 = select the external switch register ; bit 1 = modify the Section Select Register ; bit 2 = not used ; bit 3 = not used ; bit 4 = not used ; bit 5 = not used ; bit 6 = not used ; bit 7 = output to the line printer (if configured) ; bit 8 = not used ; bit 9 = suppress non-error messages ; bit 10 = suppress error messages ; bit 11 = loop on the last step ; + bit 12 = halt on error ; bit 13 = halt at the end of each step ; bit 14 = halt at the end of each section ; + bit 15 = halt at the end of each diagnostic pass ; ; NOTE: If bit 9 is set, this diagnostic does not halt at the end of each pass ; but instead loops continuously, even though bit 12 is set. deposit SWCH 100011 ; Run the diagnostic. ; ; Start the run for one second to allow the diagnostic to configure the SSLC to ; interrupt on DSR assertion. Otherwise, it will not see the connection. echo echo Reconfiguring the switch register and executing the diagnostic. echo Expect halt 15 for successful completion of Section 7. echo go for 1 second set SSLC CONNECT=1060 go ; Verify HALT 15 for a successful pass. assert CIR=030375 ; Restore the hardware configuration. ; ; The pause is necessary to allow time for the network connection to drain ; before exiting. pause 500 milliseconds set CLK CALTIME set SSLC DISCONNECT,SYNCHRONOUS exit