Agilent Technologies 3458A User Manual page 343

2330 OUTPUT 722;"ACV 10;ACBAND 25000;DELAY .01;TRIG SGL"
2340 OUTPUT 722:"DCV,10;NPLC 0;DELAY 0;NRDGS 6;TRIG SGL"
2350 OUTPUT 722;"ACV,10;ACBAND 5000;APER 20E-6;DELAY .01;NRDGS 1;TRIG SGL"
2360 OUTPUT 722:"DCV,10;NPLC 0;DELAY 0;NRDGS 3;TRIG SGL;SUBEND"
2370 Dnld_time=TIMEDATE-Dnld_time
2380 Exe_time=TIMEDATE
2390 OUTPUT 722;"CALL 1"
2400 Exe_time=TIMEDATE-Exe_time
2410 Tns_time=TIMEDATE
2420 FOR I=1 TO 37
2430 ENTER 722:A(I)
2440 NEXT I
2450 Tns_time=TIMEDATE-Tns_time
2460 SUBEND
2470 SUB Azero(REAL Dnld_time,Exe_time,Tns_time)
2480 DIM A(37)
2490 Dnld_time=TIMEDATE
2500 OUTPUT 722;"PRESET;MFORMAT SREAL;DISP OFF, TESTING;AZERO OFF"
2510 OUTPUT 722;"SUB 1;MEM FIFO;OHM,1E4;NPLC 0;DELAY 0;NRDGS 15;TRIG SGL"
2520 OUTPUT 722;"OHM,1E5;NRDGS 8;TRIG SGL"
2530 OUTPUT 722;"OHMF,1E3;APER 20E-6;DELAY-1; NRDGS 2;TRIG SGL"
2540 OUTPUT 722;"ACV,250:ACBAND 250;DELAY.1;NRDGS 1;TRIG SGL"
2550 OUTPUT 722;"ACV 10;ACBAND 25000;DELAY.01; TRIG SGL"
2560 OUTPUT 722;"DCV10;NPLC 0;DELAY 0;NRDGS 6; TRIG SGL"
2570 OUTPUT 722;"ACV,10;ACBAND 5000;APER 20E-6; DELAY.01;NRDGS 1;TRlG SGL"
2580 OUTPUT 722;"DCV,10;NPLC 0;DELAY 0;NRDGS 3; TRIG SGL;SUBEND"
2590 Dnld_time=TIMEDATE-Dnld_time
2600 Exe_time=TIMEDATE
2610 OUTPUT 722;"CALL 1"
2620 Exe_time=TIMEDATE-Exe_time
2630 Tns_tlme=TIMEDATE
2640 FOR I=1 TO 37
2650 ENTER 722;A(I)
2660 NEXT I
2670 Tns_time=TIMEDATE-Tns_time
2680 SUBEND
2690 Defeat(REAL Dnld_time,Exe_time,Tns_time)
2700 DIM A(37)
2710 Dnld_time=TIMEDATE
2720 OUTPUT 722;"PRESET;DISP OFF,TESTING;MFORMAT SREAL;DEFEAT ON"
2730 OUTPUT 722;"SUB 1;MEM FIFO;OHM.1E4;NPLC 0;DELAY 0:NRDGS 15;TRIG SGL"
2740 OUTPUT 722:"OHM.1E5:NRDGS 8;TRIG SGL"
2750 OUTPUT 722;"OHMF,1E3;APER 20E-6:DELAY -1; NRDGS 2:TRIG SGL"
2760 OUTPUT 722;"ACV,250;ACBAND 250;DELAY .1; NRDGS 1;TRIG SGL"
2770 OUTPUT 722;"ACV 10;ACBAND 25000;DELAY.01; TRIG SGL"
2780 OUTPUT 722;"DCV,10;NPLC 0;DELAY 0;NRDGS 6;TRIG SGL"
2790 OUTPUT 722;"ACV,10;ACBAND 5000;APER 20E-6;DELAY .01;NRDGS 1;TRIG SGL"
2800 OUTPUT 722;"DCV10;NPLC 0;DELAY 0;NRDGS 3;TRIG SGL;SUBEND"
2810 Dnld_time=TIMEDATE-Dnld_time
2820 Exe_time=TIMEDATE
2830 OUTPUT 722;"CALL 1"
2840 Exe_time=TIMEDATE-Exe_time
2850 Tns_time=TIMEDATE
2860 FOR I=1 TO 37
2870 ENTER 722;A(I)
2880 NEXT I
2890 Tns_time=TlMEDATE-Tns_time
2900 SUBEND
10 !MAIN PROGRAM
20 COM A(20),B(90),C(30),D(30),J$[80]
30 CALL Test_58(Time58)
40 END
50 !
60 !
Appendix D Optimizing Throughout and Reading Rate 343