10
Example
7
Example
7
Function
This
program
measures
the
minimum
and
maximum
of
an
incoming
signal.
Listing
10
ON
KBD
GOTO
Theend
20
Pmm=722
25
!
30
OUTPUT
Pmm;"*RST,*CLS"
40
OUTPUT
Pmm;"INIT1:CONT
ON"
45
!
50
OUTPUT
Pmm;"READ1:POW?"
60
OUTPUT
Pmm;A
70
GOSUB
Minmeas
80
GOSUB
Maxmeas
85
!
90
LOOP
100
OUTPUT
Pmm;"READ1:POW?"
110
ENTER
Pmm;A
120
IF
A<Minimum
THEN
GOSUB
Minmeas
130
IF
A>Maximum
THEN
GOSUB
Maxmeas
140
END
LOOP
145
!
150
Minmeas:
Minimum=A
160
TABXY(4,12);"Minimum:
"
170
TABXY(13,12);Minimum
180
RETURN
185
!
190
Maxmeas:
Maximum=A
200
TABXY(4,14);"Maximum:
"
210
TABXY(13,14);Maximum
220
RETURN
225
!
230
Theend:
END
Remote
Operation
-
Programming
Examples
10-15
Artisan Technology Group - Quality Instrumentation ... Guaranteed | (888) 88-SOURCE | www.artisantg.com
Содержание 8153A
Страница 29: ...Index Contents 11 Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 62: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 96: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 116: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 132: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 154: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 184: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 192: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 228: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 240: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...