Agilent Technologies 4294A Programming Manual page 199

1090 PAUSE
1100 DISP "Wait until the setup is finished."
1110 OUTPUT @Agt4294a;"E4TP M1"
1120 Result=FNUser_Corr(@Agt4294a,"Adapter_Phase")
1130 IF Result<>0 THEN Prog_end
1140 OUTPUT @Agt4294a;"ECALDON"
1150 DISP ""
1160 PRINT TABXY(2,5);"x]
1170 RETURN
1180 !
1190 Adjust:!
1200 IF Elec$="C" OR Elec$="D" THEN
1210 PRINT TABXY(2,6);"n]
1220 RETURN
1230 END IF
1240 IF F_adapt_setup=0 THEN
1250 DISP "Perform the electrode adjustment?
1260 INPUT "",Ans
1270 IF Ans=1 THEN
1280 PRINT TABXY(2,6);"s]
1290 RETURN
1300 END IF
1310 END IF
1320 F_adjust=1
1330 PRINT TABXY(5,6);"->"
1340 OUTPUT @Agt4294a;"SWPT LIN"
1350 OUTPUT @Agt4294a;"CENT ";Adj_center
1360 OUTPUT @Agt4294a;"SPAN 0"
1370 OUTPUT @Agt4294a;"POIN 2"
1380 OUTPUT @Agt4294a;"CALP USER"
1390 OUTPUT @Agt4294a;"MEAS CPD;TRAC A"
1400 OUTPUT @Agt4294a;"HIDI ON"
1410 OUTPUT @Agt4294a;"EDITLIML"
1420 OUTPUT @Agt4294a;"LIMCLEL ;LIMSADD"
1430 OUTPUT @Agt4294a;"LIMSTAR ";Adj_center
1440 OUTPUT @Agt4294a;"LIMSTOP ";Adj_center
1450 OUTPUT @Agt4294a;"LIMLSTAR ";Adj_low_limit
1460 OUTPUT @Agt4294a;"LIMUSTAR ";Adj_up_limit
1470 OUTPUT @Agt4294a;"LIMLSTOP ";Adj_low_limit
1480 OUTPUT @Agt4294a;"LIMUSTOP ";Adj_up_limit
1490 OUTPUT @Agt4294a;"LIMSDON;;LIMEDONE"
1500 OUTPUT @Agt4294a;"TOPV ";1.5*Adj_up_limit-.5*Adj_low_limit
1510 OUTPUT @Agt4294a;"BOTV ";1.5*Adj_low_limit-.5*Adj_up_limit
1520 !
1530 OUTPUT @Agt4294a;"LIMITEST OFF"
1540 DISP "Set the micrometer of 16451B at 10um and press 'Continue'."
1550 PAUSE
1560 OUTPUT @Agt4294a;"LIMITEST ON"
1570 OUTPUT @Agt4294a;"CONT"
1580 OUTPUT @Agt4294a;"MKR ON"
1590 DISP "Adjust the electrode until PASS is displayed"
1600 PAUSE
1610 OUTPUT @Agt4294a;"HOLD"
1620 OUTPUT @Agt4294a;"OUTPFAIP?"
1630 ENTER @Agt4294a;F_nop
1640 IF F_nop<>0 THEN Adj
1650 OUTPUT @Agt4294a;"LIMITEST OFF"
1660 PRINT TABXY(2,6);"x]
1670 RETURN
1680 !
1690 Compen:!
1700 IF F_adjust=0 THEN
1710 DISP "Perform the fixture compensation?
1720 INPUT "",Ans
13
Application Sample Programs
Measuring Dielectric Material
"
"
0:Yes, 1:Skip";
"
"
0:Yes, 1:Skip";
199