User`s manual

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
Appendix C HP E1326B/E1411B Multimeter Register-Based Programming 235