1630 !
This subprogram writes commands and parameters to the Command and
1640 !
Parameter registers. When a command is written, it calls Wait_not_bsy
1650 !
before writing the parameter(s). Once a command and parameter are
1660 !
written it calls Wait_done, and Err_chk to check for configuration
1670 !
errors. The subprogram also stores the function, range, and aperture
1680 !
time so that the right routine is used to convert the measured signal
1690 !
to the appropriate quantity. When the trigger command is sent, subprogram
1700 !
Mm_comp is called to monitor status bit 5 before the channel is
1710 !
advanced. The waiting period allows multiple measurements to complete.
1720 SUB Peek_meas(Cmd,OPTIONAL INTEGER Parm1,Parm2,Parm3)
1730 Peek_meas: !
1740
COM I,Base_addr,Base_addrm,Aper,Func,Rng,Nchan,Chan_closed
1750
CALL Wait_not_bsy
1760
WRITEIO -16,Ba8;Cmd
1770
IF NPAR>1 THEN
1780
CALL Wait_not_bsy
1790
WRITEIO -16,Ba10;Parm1
1800
END IF
1810
IF NPAR>2 THEN
1820
CALL Wait_not_bsy
1830
WRITEIO -16,Ba10;Parm2
1840
END IF
1850
IF NPAR>3 THEN
1860
CALL Wait_not_bsy
1870
WRITEIO -16,Ba10;Parm3
1880
END IF
1890
IF Cmd=0 THEN Aper=Parm1
1900
IF Cmd=2 THEN Rng=Parm1
1910
IF Cmd=4 THEN Func=Parm1
1920
IF Cmd=13 THEN
1930
CALL Mm_comp
1940
WAIT 1*.0334
!
Number of readings per channel
1950
ELSE
1960
CALL Wait_done
1970
CALL Err_chk(Noerr)
1980
END IF
1990 SUBEND
Continued on Next Page
250 HP E1326B/E1411B Multimeter Register-Based Programming
Appendix C
Artisan Technology Group - Quality Instrumentation ... Guaranteed | (888) 88-SOURCE | www.artisantg.com