Agilent Technologies 4288A User Manual

Chapter 7 91
Sorting Based on Measured Result (Comparator Function)
Sample Program
7. Sorting Based on
Measured Result
(Comparator Function)
Example 7-1 Sorting using comparator function (comprtr.bas)
10 DIM Pri$[9],Sec$[9],Range$[9],Mode$[9],Aux$[9],Low_c_rej$[9]
,Img$[50]
20 REAL Nom,L_lim(1:3),U_lim(1:3),L_lim_sec,U_lim_sec
30 REAL Low_c_rej_lim,Pri_para,Sec_para
40 INTEGER I,Meas_stat,Comp,Bin(1:11),Ovld
50 !
60 ASSIGN @Agt4288a TO 717
70 !
80 Pri$="CP"
90 Sec$="D"
100 Range$="1NF"
110 !
120 Mode$="PCNT"
130 Nom=1.E-9
140 !-- [BIN1] --
150 L_lim(1)=-1.0
160 U_lim(1)=1.0
170 !-- [BIN2] --
180 L_lim(2)=-2.0
190 U_lim(2)=2.0
200 !-- [BIN3] --
210 L_lim(3)=-3.0
220 U_lim(3)=3.0
230 !-- [Sec] --
240 L_lim_sec=0.
250 U_lim_sec=.1
260 !
270 Aux$="ON"
280 Low_c_rej$="ON"
290 Low_c_rej_lim=10.0
300 !
310 OUTPUT @Agt4288a;":SYST:PRES"
320 !
330 ! Measurement Condition Setting
340 !
350 OUTPUT @Agt4288a;":CALC1:FORM "&Pri$
360 OUTPUT @Agt4288a;":CALC2:FORM "&Sec$
370 OUTPUT @Agt4288a;":RANG "&Range$
380 !
390 ! Comparator Setting
400 !
410 OUTPUT @Agt4288a;":CALC:COMP:MODE "&Mode$
420 OUTPUT @Agt4288a;":CALC:COMP:PRIM:NOM ";Nom
430 FOR I=1 TO 3
440 OUTPUT @Agt4288a;":CALC:COMP:PRIM:BIN"&VAL$(I)&" ";L_lim(I)
;",";U_lim(I)
450 OUTPUT @Agt4288a;":CALC:COMP:PRIM:BIN"&VAL$(I)&":STAT ON"
460 NEXT I
470 FOR I=4 TO 9
480 OUTPUT @Agt4288a;":CALC:COMP:PRIM:BIN"&VAL$(I)&":STAT OFF"
490 NEXT I
500 OUTPUT @Agt4288a;":CALC:COMP:SEC:LIM ";L_lim_sec;",";U_lim_s
ec
510 OUTPUT @Agt4288a;":CALC:COMP:SEC:STAT ON"
520 !

Agilent Technologies 4288A Specifications

General

Brand	Agilent Technologies
Model	4288A
Category	Measuring Instruments
Language	English