IEEE-488 Programming
5-2
Sample Program
Comments
DIM A$[200],C$[200]
' Dimension crosspoint input and display.
PRINT #1, "REMOTE 18"
' Tell Model 708A (at IEEE-488 location 18) to
' listen over bus.
PRINT #1, "OUTPUT 18;V11000000W00000011X"
' Select rows A and B for make/break and rows
' G and H for break/make.
PRINT #1, "OUTPUT 18;E1Z1,0X"
' Set edit pointer to setup #1, and send setup #1
COMMAND:
' to relays and display.
LINE INPUT "CROSSPOINTS COMMAND", C$
' Allow user to input crosspoint data.
IF LEN (C$)=0 THEN STOP
' Check for null string.
PRINT #1, "OUTPUT 18;C$+"X"
' Send command string to Model 708A.
GOTO COMMAND
' Allow user to input additional crosspoint data.
END
Figure 5-1
Flowchart of example program
Start
Place Unit in Remote
Open and Close
Crosspoints of Setup
Trigger Setup to
Relays
End
Get Setup and Display
Select Make/Break
and Break/Make Rows
Step 4: Open and close crosspoints
You can open, close, and clear crosspoints by sending the ap-
propriate command, which is made up of an ASCII letter rep-
resenting the command, followed by one or more characters
for the command options. Commands can be grouped to-
gether in one string. The command strings are not opening
and closing relays unless the edit pointer is set to zero.
To open and close crosspoints over the bus, run the previous
program and enter a command string when prompted. Some
example strings are shown in Table 5-1.
Terminate each string by pressing RETURN on the control-
ler keyboard. If a null string is entered, the program ends.
Table 5-1
Sample strings
Sample string
Description
"P1"
"CA5,A6,B9,B10"
"NA5,A6"
"CA1,A2NB9,B10"
Clear (open) all crosspoints of
setup #1.
Set (close) crosspoints A5, A6,
B9, B10.
Clear (open) crosspoints A5, A6.
Set (close) A1, A2 and clear
(open) B9, B10.
Artisan Technology Group - Quality Instrumentation ... Guaranteed | (888) 88-SOURCE | www.artisantg.com
Содержание 708A
Страница 135: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 136: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 137: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 138: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 139: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 145: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 146: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 147: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 148: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 149: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 150: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...