HP 132A Manual de usuario Pagina 147

  • Descarga
  • Añadir a mis manuales
  • Imprimir
  • Pagina
    / 330
  • Tabla de contenidos
  • MARCADORES
  • Valorado. / 5. Basado en revisión del cliente
Vista de pagina 146
Chapter 3 Programming Your Universal Counter for Remote Operation
Elements of SCPI Commands
Programming Guide 3-79
To Perform Limit Testing (QuickBASIC) (Continued)
ON PEN GOSUB limitfail 'When SRQ happens, go get out of
PEN ON 'limit result
CALL IOPEN(isc&, priority%)
CALL sendhp(":INIT:CONT ON") 'Set counter to run
PRINT "Making Period measurements"
Loophere: 'Wait here until out of limit
IF complete THEN GOTO endprogram 'If already serviced out of limit
GOTO Loophere 'then end program
limitfail:
complete = 1 'Test bit
CALL IOSPOLL(source&, statusbyte) 'Check status byte. Should be 72
PRINT "Status byte = ", statusbyte
CALL sendhp("FETCH:PERIOD?") 'Fetch the out of limits period
CALL IOENTERS(source&, period, 23, actf%) 'Read the out of limit period
PRINT "Out of limits period is ", period 'Print results
RETURN
endprogram:
END
SUB sendhp (code$)
CALL iooutputs(source, code$, LEN(code$))
END SUB
Vista de pagina 146
1 2 ... 142 143 144 145 146 147 148 149 150 151 152 ... 329 330

Comentarios a estos manuales

Sin comentarios