Table of Contents
Advertisement
22 Verification Tests
90
CLEAR SCREEN
100
PRINT "Install Component Assembly and Test Cable"
110
PRINT
120
PRINT " 1. Turn mainframe power OFF"
130
PRINT " 2. Install HP E1330A/B component assembly into
mainframe "
140
PRINT " 3. Attach test cable to component assembly"
150
PRINT " 4. Turn mainframe power ON "
160
PRINT " 5. Press Continue when ready to begin testing "
170
PAUSE
180
CLEAR SCREEN
190
OUTPUT @Dio;"*IDN?"
200
ENTER @Dio;A$
210
IF A$[17,21]<>"E1330" THEN
220
PRINT "Incorrect Card Type detected"
230
STOP
240
END IF
250
PRINT "Bit walk test of all ports for read and write (no handshake)"
260
FOR I=0 TO 7
270
FOR J=0 TO 3
280
OUTPUT @Dio;"SOUR:DIG:DATA"&VAL$(J)&"
#B"&Bit_walk$(I)
290
IF J<2 THEN
300
OUTPUT @Dio;"MEAS:DIG:DATA"&VAL$(J+2)&"?"
310
ELSE
320
OUTPUT @Dio;"MEAS:DIG:DATA"&VAL$(J-2)&"?"
330
END IF
340
ENTER @Dio;A$
350
Number=VAL(A$)
360
B$=DVAL$(Number,2)
370
IF B$[25,32]<>Bit_walk$(I) THEN
380
Fail = 1
390
PRINT "Failure of bit walk"
400
PRINT "WRITE at port ";J
410
IF J<2 THEN
420
PRINT "READ at port ";J+2
430
ELSE
440
PRINT "READ at port ";J-2
450
END IF
460
END IF
470
NEXT J
480
NEXT I
490
PRINT "End of bit walk test"
Chapter 2
Advertisement
Table of Contents
