Anritsu ML2430A Manual de usuario descargar pdf (Pagina 217)

Status

Control

This function demonstrates how to use the Status Registers to provide synchroni

zation.

Uses the TR2 (trigger with settling) command to make a reading.

Function GetTR2Reading (channel) As Single

‘

make space for the result

Dim result As String

result = String$(10, 0)

‘

Send Status Register setup command + TR0 hold trigger mode

Call DLLsend(0, 13, “*SRE 16; TR2 1", 14, NLend, ibsta%, iberr%, ibcntl&)

‘

Set loop flag

Value = -256

‘

Loop until SRQ is asserted.

Call DLLTestSRQ(0, SRQ%, ibsta%, iberr%, ibcntl&)

Loop Until SRQ%=0

‘

SRQ asserted, read the ML2430As status register

Call DLLReadStatusByte(0, 13, status_byte%, ibsta%,

iberr%, ibcntl&)

‘

Check if it is the ML2430A which is requesting

‘

service (SRQ bit + MAV bit)

If (status_byte% And 80) = 80 Then

It is the ML2430A, read back value

Call DLLreceive(0, 13, result, 10, STOPend,

ibsta%, iberr%, ibcntl&)

Value = Val(result)

End If

Loop Until Value <> -256

GetTR2Reading = Value

End Function

6-130 ML2430A OM

PROGRAMMING EXAMPLES GPIB OPERATION

1 2 ... 212 213 214 215 216 217 218 219 220 221 222 ... 270 271

Sin comentarios

Anritsu ML2430A Manual de usuario Pagina 217