Agilent Technologies 3458A User Manual page 341

1030 OUTPUT 722;"DCV, 10"
1040 FOR I=28 TO 33
1050 ENTER 722;A(l)
1060 NEXT I
1070 OUTPUT 722;"ACV,10;ACBAND 5000"
1080 ENTER 722;A(34)
1090 OUTPUT 722;"DCV,10"
1100 FOR I=35 TO 37
1110 ENTER 722;A(I)
1120 NEXT I
1130 Exe_time=TIMEDATE-Exe_time
1140 Dnld time=0
1150 Tns_time=0
1160 SUBEND
1170 SUB Integrat(REAL Dnld_time,Exe_time, Tns_time)
1180 DIM A(37)
1190 Exe_time=TIMEDATE
1200 OUTPUT 722;"PRESET"
1210 OUTPUT 722;"OHM,1E4;NPLC 0"
1220 FOR I=1 TO 15
1230 ENTER 722;A(I)
1240 NEXT I
1250 OUTPUT 722;"OHM,1E5"
1260 FOR I=16 TO 23
1270 ENTER 722;A(l)
1280 NEXT I
1290 OUTPUT 722;"OHMF,1E3;APER 20E-6"
1300 ENTER 722;A(24)
1310 ENTER 722;A(25)
1320 OUTPUT 722;"ACV,250;ACBAND 250"
1330 ENTER 722;A(26)
1340 OUTPUT 722;"ACV 10;ACBAND 25000"
1350 ENTER 722;A(27)
1360 OUTPUT 722;"DCV,10;NPLC 0"
1370 FOR I=28 TO 33
1380 ENTER 722;A(I)
1390 NEXT I
1400 OUTPUT 722:"ACV,10;ACBAND 5000;APER 20E-6"
1410 ENTER 722;A(34)
1420 OUTPUT 722;"DCV,10;NPLC 0"
1430 FOR I=35 TO 37
1440 ENTER 722;A(I)
1450 NEXT I
1460 Exe_time=TIMEDATE-Exe_time
1470 Dnld_time=0
1480 Tns_time=0
1490 SUBEND
1500 SUB Delay(REAL Dnld_time,Exe_time,Tns_time)
1510 DIM A(37)
1520 Exe_time=TIMEDATE
1530 OUTPUT 722;"PRESET"
1540 OUTPUT 722;"OHM,1E4;NPLC 0;DELAY 0"
1550 FOR I=1 TO 15
1560 ENTER 722;A(I)
1570 NEXT I
1580 OUTPUT 722;"OHM,1E5"
1590 FOR I=16 TO 23
1600 ENTER 722;A(I)
1610 NEXT I
1620 OUTPUT 722;"OHMF,1E3;APER 20E-6;DELAY-1"
1630 ENTER 722;A(24)
1640 ENTER 722;A(25)
1650 OUTPUT 722;"ACV,250;ACBAND 250;DELAY.1"
1660 ENTER 722;A(26)
1670 OUTPUT 722;"ACV 10;ACBAND 25000;DELAY.01"
Appendix D Optimizing Throughout and Reading Rate 341