Service manual

180 PAUSE
190 OUTPUT @Sw;"*CLS"
200 OUTPUT @Sw;"SYST:CDES? "&Cc$
210 ENTER @Sw;A$
220 SELECT A$[2,2]
230 CASE "1"
240 Row$="15"
250 Col$="15"
260 CASE "4"
270 Row$="03"
280 Col$="63"
290 CASE "8"
300 Row$="07"
310 Col$="31"
320 CASE ELSE
330 PRINT "Wrong card type detected: ";A$
340 STOP
350 END SELECT
360 CLEAR SCREEN
370 !
380 ! Measure DC isolation HI to LO, HI to Chassis, and LO to Chassis
390 !
400 OUTPUT @Sw;"*RST"
410 OUTPUT @Sw;"CLOS (@"&Cc$&"0000:"&Cc$&Row$&Col$&")"
420 OUTPUT @Sw;"*OPC?"
430 ENTER @Sw;Opc
440 IF Opc <> 1 THEN 420
450 PRINT TABXY(1,1)," HI to LO DC Isolation Measurements"
460 PRINT TABXY(1,3)," 1. Connect DMM Input HI lead to ";Conn$(0)
470 PRINT TABXY(1,4)," 2. Connect DMM Input LO lead to ";Conn$(1)
480 DISP "Press Continue when connections are complete"
490 PAUSE
500 CLEAR SCREEN
510 OUTPUT @Dmm;"TRIG SGL"
520 ENTER @Dmm;Value(0)
530 PRINT TABXY(1,1)," HI to Chassis DC Isolation Measurements"
540 PRINT TABXY(1,3)," 1. Connect DMM Input HI lead to ";Conn$(0)
550 PRINT TABXY(1,4)," 2. Connect DMM Input LO lead to ";Conn$(2)
560 DISP "Press Continue when connections are complete"
570 PAUSE
580 CLEAR SCREEN
590 OUTPUT @Dmm;"TRIG SGL"
600 ENTER @Dmm;Value(1)
32 Verification Tests Agilent E1465A/66A/67A Service Manual