Typical Result
Bit walk test of all ports for read and write (no handshake)
End of bit walk test
Handshake line test
End of handshake line test
Digital I/O PASSED all tests
Chapter 2
500
PRINT
510
PRINT "Handshake line test"
520
FOR T=1 TO 0 STEP -1
530
FOR I =0 TO 3
540
OUTPUT @Dio;"SOUR:DIG:CONT"&VAL$(I)&" "&VAL$(T)
550
IF I <2 THEN
560
OUTPUT @Dio;"MEAS:DIG:FLAG"&VAL$(I+2)&"?"
570
ELSE
580
OUTPUT @Dio;"MEAS:DIG:FLAG"&VAL$(I-2)&"?"
590
END IF
600
ENTER @DIO;A$
610
IF VAL(A$)<>T THEN
620
Fail = 1
630
PRINT "Failure of handshake lines"
640
IF I<2 THEN
650
PRINT "CTL line on port ";I;" to FLG line on port ";I+2
660
ELSE
670
PRINT "CTL line on port ";I;" to FLG line on port ";I-2
680
END IF
690
END IF
700
NEXT I
710
NEXT T
720
PRINT "End of handshake line test"
730
PRINT
740
IF Fail=0 THEN
750
PRINT "Digital I/O PASSED all tests"
760
ELSE
770
PRINT "Digital I/O failed tests"
780
END IF
790
END
Verification Tests 23