Table of Contents
Advertisement
Appendix C
Artisan Technology Group - Quality Instrumentation ... Guaranteed | (888) 88-SOURCE | www.artisantg.com
360
! Dimension a computer variable to store the measurements.
370
! (size = number of bursts * number of readings per burst.)
380
REAL Readings(1:25)
390
! Trigger the multimeter one time for each burst specified by the
400
! Trigger Count parameter. A wait period equal to the number of readings
410
! in the burst times the aperture time is inserted to allow the measurement
420
! computation(s) to complete. All bursts occur before the readings are read
430
! from the buffer.
440
FOR I=1 TO 5
450
CALL Peek_meas(13)
460
WAIT 5*.0167
470
NEXT I
480
! Retrieve the measurement(s) and convert the measured signal to volts,
490
! ohms, etc.
500
CALL Read_data(Readings(*))
510
END
520
! The timing of events within a register-based program is controlled by
530
! monitoring the Status register for conditions which indicate when an
540
! event is in progress or has finished. The following subprogram reads
550
! the Status register and is called by other subprograms to determine when
560
! an action can be performed.
570
SUB Read_status(Status,Rdy,Done,Indardy,Qryrdy,Noerr,Pass_fail)
580
Read_status: !
590
COM Base_addr,Aper,Func,Rng
600
Status=READIO(-16,Base_addr+4)
610
Rdy=BIT(Status,0)
620
Done=BIT(Status,7) AND Rdy
630
Indardy=BIT(Status,4) AND Done
640
Qryrdy=BIT(Status,1) AND Done
650
Noerr=NOT (NOT (BIT(Status,6)) AND Done)
660
Pass_fail=BIT(Status,2)
670
SUBEND
680
! This subprogram calls the Read_status subprogram to check status bit 0
690
! (Cmd/Parm Rdy) to determine when a command or parameter can be sent.
700
SUB Wait_not_bsy
710
Wait_not_bsy: !
720
COM Base_addr,Aper,Func,Rng
730
REPEAT
740
CALL Read_status(Status,Rdy,Done,Indardy,Qryrdy,Noerr,Pass_fail)
750
UNTIL Rdy
760
SUBEND
Continued on Next Page
HP E1326B/E1411B Multimeter Register-Based Programming
235
Advertisement
Table of Contents
