Programming Guide – 32
WEND
PRINT sr
' print final value of sr
END
Generating a Service Request Interrupt
This example tests the service request interrupt function. It unmasks the settled bit in the
SRQ mask register and selects a channel. An interrupt is generated when the switch reaches
the channel.
ON PEN GOSUB SPOLL
' enable SRQ interrupt
PEN ON
PRINT #1, "OUTPUT 07;CSB;SRE 4"
' clear status register and unmask
' settled bit in SRQ mask register
PRINT #1 "OUTPUT 07;CLOSE 6"
' change channel
' More code executed while switch channel set
'
'
WHILE (INKEY$ = "")
' endless loop to simulate bigger program
WEND
' ends when any key is pressed
PEN OFF
END
SPOLL:
PRINT #1, "SPOLL 07"
' serial poll the switch
INPUT #2, sr
' read status register
PRINT sr
' verify SRQ bit is set
PRINT #1, "SPOLL 07"
' serial poll again to verify SRQ bit is now cleared
INPUT #2, sr
' read status register
PRINT sr
RETURN
Learn Query (LRN?)
This example demonstrates the use of the learn query.
DIM LEARN$[100]
PRINT #1, "OUTPUT 07;LRN?"
' send the learn query command
PRINT #1, "ENTER 07"
LINE INPUT #2, LEARN$
' The above variables can be saved in a data file before quitting the program and
' then later read back and used to restore the switch to a same state.
' Like this...
PRINT#1, "OUTPUT 07;"LEARN$
' SB settings are now restored
END
RS232 Programming Examples
This section provides programming examples for controlling the SB switch over the RS232
interface. The examples were written in MS-DOS Qbasic and run on a personal computer
Summary of Contents for SB Series
Page 1: ...SB SERIES FIBEROPTIC SWITCH User s Manual...
Page 2: ......
