Service manual

300 PRINT " 5. Turn Mainframe power ON "
310 PRINT " 5. Press Continue when ready to begin testing "
320 PAUSE
330 CLEAR SCREEN
340 !
350 ! Measure Channels 00-47 and 90-92 (HI, LO, and G)
360 !
370 OUTPUT @Dmm;"PRESET NORM;FUNC OHMF"
380 OUTPUT @Mux;"*RST"
390 J=100 ! Address offset
400 K=0
410 PRINT TABXY(1,1),"Channel 00-47 and 90-92";Path$(K);"
Measurements"
420 PRINT TABXY(1,3),"Connect DMM Sense and Input HI leads to
COMMON ";Path$(K)
430 PRINT TABXY(1,4),"Connect DMM Sense and Input LO leads to
VOLTAGE SENSE ";Path$(K)
440 DISP " Press Continue when connections are complete "
450 PAUSE
460 CLEAR SCREEN
470 FOR I=0 TO 47
480 OUTPUT @Mux;"CLOS (@"&VAL$(J+I)&")"
490 OUTPUT @Dmm;"TRIG SGL"
500 ENTER @Dmm;Value0(I)
510 OUTPUT @Mux;"OPEN (@"&VAL$(J+I)&")"
520 Result0(I)=Value0(I)-R(43)
530 IF Result0(I)<0. THEN Result0(I)=0
540 IF Result0(I)>2.0 THEN
550 PRINT "Resistance for Channel";I;" ";Path$(K);"Path is >2.0
Ohms"
560 END IF
570 NEXT I
580 PRINT "Measurements complete for Channels 00 - 47 and 90-92
";Path$(K)
590 DISP " Press Continue for Channels 90 - 92 ";Path$(K+1);"
measurements "
600 PAUSE
610 !
620 ! Measure channels 90-92 LO and G
630 !
640 OUTPUT @Mux;"*RST"
650 FOR K=1 TO 2
660 CLEAR SCREEN
2-12 Verification Tests