HP 132A Instrukcja Użytkownika Pobierz pdf (Strona 147)

100

101

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

1 2 ... 142 143 144 145 146 147 148 149 150 151 152 ... 329 330

Komentarze do niniejszej Instrukcji

Brak uwag

HP 132A Instrukcja Użytkownika Strona 147

Komentarze do niniejszej Instrukcji

Powiązane produkty i podręczniki dla Pomiary, testowanie i kontrola HP 132A