Fluke Biomedical Cufflink User Manual
Page 116
Cufflink
Operators Manual
3-42
10 REM Demonstration program for C
u
fflinks RS-232 Comm
u
nications.
20 REM The system
u
sed for this demonstration has a mo
u
se on COM1
30 REM so COM2 is
u
sed.
40 CLOSE #2
‘Ens
u
res that #2 file is closed.
50 CLS
’Clears the screen.
60 OPE
N
“COM2:9600,
N
,
8
,1,CDO,CSO,DSO,OPO,RS,TB204
8
,RB204
8
” FOR RA
N
DOM AS #2
70 REM OPE
N
“COM2:9600,
N
,
8
,1,CDO,CSO,DSO,OPO,RS,TB204
8
,RB204
8
”
8
0
‘Opens
comm
u
nications channel 2 in
90
‘random-access
mode
at
speed
of
100
‘9600
b
a
u
d
w
ith no parity
b
it,
8
data
b
its
110
‘
and
1
stop
b
it. The program can no
w
120
‘access
channel
2
as
file
n
u
m
b
er 2.
130 ‘____________________
140 CUFFOUT$= “IDE
N
T”
‘Displays the c
u
rrent firm
w
are
v
ersion.
150 PRI
N
T #2, CUFFOUT$
‘Sends command to the C
u
fflink.
160 ’
170 I
N
DATA$ = I
N
OUT$(13,
#2)
‘Gets
ret
u
rn data from the C
u
fflink.
1
8
0 REM The ret
u
rn from the C
u
fflink is “C
u
fflink, 3.20, A
u
sc, P
u
mp”
190 REM that is 25 characters for the inp
u
t string. For shorter strings,
200 REM the n
u
m
b
er m
u
st
b
e smaller and longer strings
w
ill carry o
v
er to
210 REM the next inp
u
t string.
211 REM
220 PRI
N
T “Press any key to contin
u
e”: a$ = I
N
PUT$(1)
230 PRI
N
T I
N
DATA$
‘Prints data on screen
240 ‘
250 ’____________________
260 ‘The next command sho
w
s a MAKEARM command
w
ith parameters.’
270 ‘
2
8
0 CUFFOUT$ = “MAKEARM HR=60,BP=ADAMS-150/.100,PULSEID=3”
290 PRI
N
T #2, CUFFOUT$
‘Sends command to the C
u
fflink.
300 ’
310 CLOSE #2
320 OPE
N
“COM2:9600,
N
,
8
,1,CDO,CSO,DSO,OPO,RS,TB204
8
,RB204
8
” FOR RA
N
DOM AS #2
330 REM The t
w
o pre
v
io
u
s lines close and clear the comm
u
nications
bu
ffer
340 REM that is
u
sed. This
w
ipes extra characters that list options and
350 REM the “*” ret
u
rns
w
hen C
u
fflink recei
v
es the MAKEARM command.
351 REM
360 PRI
N
T “press any key
w
hen test is completed”: a$ = I
N
PUT$(1)
370 I
N
DATA$ = I
N
PUT$(39,#2)
‘Gets
ret
u
rn data from the C
u
fflink.
3
8
0 REM Again the length of the ret
u
rned string affects the Inp
u
t$.
390 REM If the string is longer than the Inp
u
t$, the system
w
ill hang
u
p.
391 REM
400 PRI
N
T I
N
DATA$
410 PRI
N
T “Press any key to ret
u
rn C
u
fflink to LOCAL” : a$ = I
N
PUT$(!)
420 CUFFOUT$ = “GOTOLOCAL”
430 PRI
N
T #2, CUFFOUT$
440 CLOSE #2
450 E
N
D
fcv061.eps
Figure 3-6. A BASIC Program using Analyzer Remote Commands