Agilent Technologies E1364A - Manual (Page 26)

380 OUTPUT @Switch;"CLOS (@100:115)" !Open all NC contacts
390 FOR I=0 TO 15
400 !Closed-channel resistance (NC contacts)
410 OUTPUT @Switch;"OPEN (@"&VAL$(100+I)&")"
420 OUTPUT @Dmm;"TRIG SGL"
430 ENTER @Dmm;Rdg
440 PRINT "Channel "&VAL$(I)&" (closed): "&VAL$(Rdg)
450 !
460 !Open-channel resistance (NC contacts)
470 OUTPUT @Switch;"CLOS (@"&VAL$(100+I)&")"
480 OUTPUT @Dmm;"TRIG SGL"
490 ENTER @Dmm;Rdg
500 PRINT "Channel "&VAL$(I)&" (open): "&VAL$(Rdg)
510 PRINT
520 NEXT I
530 !
540 END
26 Verification Tests Chapter 2