User manual

180 DATA "","AB GUARD","BANK 6 COM LO"
190 FOR I=1 TO 13
200 FOR J=1 TO 3
210 READ Chan_data$(I,J)
220 NEXT J
230 NEXT I
240 !
250 CLEAR SCREEN
260 PRINT
270 I=1
280 FOR Chan_num=990 TO 991
290 !
300 PRINT "Testing channel ";Chan_num;" ";Chan_data$(I,1)
310 PRINT TAB(5);"Connect dvm HI to ;"Chan_data$(I,2);" and dvm LO to
";Chan_data$(I,3)
320 GOSUB Open_ch
330 PRINT
340 I=I+1
350 PRINT "Testing channel ";Chan_num;" ";Chan_data$(I,1)
360 PRINT TAB(5);"Connect dvm HI to ;"Chan_data$(I,2);" and dvm LO to
";Chan_data$(I,3)
370 GOSUB Close_ch
380 PRINT
390 I=I+1
400 NEXT Chan_num
410 FOR Chan_num=992 TO 995 STEP 1
420 PRINT "Testing channel ";Chan_num;" ";Chan_data$(I,1)
430 PRINT TAB(5);"Connect dvm HI to ;"Chan_data$(I,2);" and dvm LO to
";Chan_data$(I,3)
440 GOSUB Close_ch
450 PRINT
460 I=I+1
470 PRINT "Testing channel ";Chan_num;" ";Chan_data$(I,1)
480 PRINT TAB(5);"Connect dvm HI to ;"Chan_data$(I,2);" and dvm LO to
";Chan_data$(I,3)
490 GOSUB Close_ch
500 PRINT
510 I=I+1
520 NEXT Chan_num
530 !
540 PRINT
550 Chan_num = 996
560 PRINT "Testing channel ";Chan_num
570 PRINT TAB(5);"Connect dvm HI to ;"Chan_data$(I,2);" and dvm LO to
";Chan_data$(I,3)
26 Verification Tests Agilent E1460A Service Manual