... continued
230 !
240 ! Configure the GPIB interrupt system to generate an SRQ
250 !
260 Hpib=7 ! HP-IB select code is "7"
270 ON INTR Hpib CALL Read_data ! Call subprogram when operation complete
280 Mask=2 ! Bit 1 is SRQ
290 ENABLE INTR Hpib;Mask ! Enable SRQ to interrupt program
300 !
310 OUTPUT @Meter;"SENS:FUNC ’VOLT:DC’" ! Select dc volts on channel 1 (default)
320 OUTPUT @Meter;"SENS:VOLT:DC:RANG 10" ! Select 10 volt range
330 OUTPUT @Meter;"SENS:VOLT:DC:NPLC 10" ! Select 10 power line cycles
340 OUTPUT @Meter;"CALC:FUNC SCAL" ! Select math scaling function
350 OUTPUT @Meter;"CALC:STAT ON" ! Turn math scaling on
360 OUTPUT @Meter;"CALC:SCAL:GAIN 0.001" ! Set the gain value (1 mV)
370 OUTPUT @Meter;"CALC:SCAL:OFFS 0.5" ! Set the offset value (50 mV)
380 !
390 OUTPUT @Meter;"SAMP:COUN 5" ! Take 5 reading per trigger
400 OUTPUT @Meter;"TRIG:SOUR EXT" ! Select external trigger source
410 OUTPUT @Meter;"INIT" ! Initiate measurement, wait for trigger,
420 ! and send readings to internal memory
430 OUTPUT @Meter;"*OPC" ! Set "Operation Complete" bit in
440 ! Standard Event Register when complete
6
Chapter 6 Application Programs
HP BASIC Language Programs
219