Specifications

100 Chapter 6
Retrieving Measurement Results
Retrieving the Monitored Values of Test Signal Levels
Example 6-6 Retrieving the Monitored Values of Test Signal Levels (lvl_mon.bas)
10 REAL I_mon(1:32),V_mon(1:32)
20 INTEGER List_stat,Nop,I
30 ASSIGN @Agt4287a TO 717
40 !
50 OUTPUT @Agt4287a;":SOUR:LIST:STAT?"
60 ENTER @Agt4287a;List_stat
70 IF List_stat=1 THEN
80 OUTPUT @Agt4287a;":SOUR:LIST:SIZE?"
90 ENTER @Agt4287a;Nop
100 ELSE
110 Nop=1
120 END IF
130 REDIM I_mon(1:Nop),V_mon(1:Nop)
140 !
150 OUTPUT @Agt4287a;":FORM ASC"
160 OUTPUT @Agt4287a;":DATA:IMON?"
170 ENTER @Agt4287a;I_mon(*)
180 OUTPUT @Agt4287a;":DATA:VMON?"
190 ENTER @Agt4287a;V_mon(*)
200 !
210 ! Display results
220 !
230 PRINT "[Test Signal Monitor Value]"
240 IF List_stat=1 THEN
250 PRINT "No. Current[mA] Voltage[mV]"
260 FOR I=1 TO Nop
270 PRINT USING "2D,4X,2D.4D,6X,2D.4D";I,I_mon(I)*1000,V_mon(I)*10
00
280 NEXT I
290 ELSE
300 PRINT " Current[mA]:";I_mon(1)*1000
310 PRINT " Voltage[mV]:";V_mon(1)*1000
320 END IF
330 !
340 END