Sample Program - Agilent Technologies 4288A Programming Manual

Sample program

Example 8-1 shows a sample program to execute the self-test. This program is stored on
the sample program disk under the filename "selftest.bas".
This program executes the self-test and displays the result.
Line 30
Lines 50 to 70
Line 100
Lines 120 to 320
Example 8-2 Executing the self-test (selftest.bas)
10
20
30
40
50
60
70
80
90
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
Chapter 8
Avoiding Mistakes Related to Work and Daily Checks
Sets the GPIB address.
Executes the self-test and reads out the result.
If the error code is 0, displays the "ALL TEST PASS" message.
If the error code is not 0, displays the test item that has failed.
INTEGER Result
!
ASSIGN @Agt4288a TO 717
!
PRINT "Now testing..."
OUTPUT @Agt4288a;"*TST?"
ENTER @Agt4288a;Result
!
IF Result=0 THEN
PRINT "ALL TEST PASS"
ELSE
IF BIT(Result,0)=1 THEN
PRINT "TEST FAIL: RAM"
END IF
IF BIT(Result,1)=1 THEN
PRINT "TEST FAIL: Boot ROM"
END IF
IF BIT(Result,2)=1 THEN
PRINT "TEST FAIL: Flash ROM"
END IF
IF BIT(Result,3)=1 THEN
PRINT "TEST FAIL: Factory Cal. Data"
END IF
IF BIT(Result,4)=1 THEN
PRINT "TEST FAIL: Compensation Data"
END IF
IF BIT(Result,5)=1 THEN
PRINT "TEST FAIL: A/D Converter"
END IF
IF BIT(Result,6)=1 THEN
PRINT "TEST FAIL: Back-up RAM"
END IF
END IF
END
Daily Checks (executing the self-test)
99