HP 5335A - Page 66

upci duun d J iu i iu5fammm5
EXAMPLE 8 (Continued)
9835A EXAMPLE
10 DIM A$! 30 :i
20 LOCAL 703
30 I) IS P “MAN LI A L. L Y 8 L T -1J P S 3 3 S A 0 0 N T R 0 i... 8 .
PRESS ' C QN T ' WHEN READY"
r*~40
PAUSE
SO
OUTPUT 703>"pq "
60
ENTER 703 USING "#,30A">A$
61
LOCAL 703
Press CONTINUE —
62
BEEP
TO RESUME
80
DI.8P "NOW, CHANGE THE S33SA CONTROLS.
PRESS 'CONT' WHEN READY"
-**-90
P AUSE
10 0
INPUT "DO YOU NEED MATH FUNCTIONS ?
(YES OR NO)",B$
11 0
IF B $ i; 1 > 1 j« "Y " T H E N G O T 0 L. o n g
0 = SHORT DATA
( 120
OUTPUT 703 USING "#,2A > 6A,B">“pb",A$ ? 2 55
TRANSFER
{ 130
BEEP
1 = LONG DATA
( 140
WAIT 50 0
TRANSFER
ISO BEEP
160 GOTO 210
170 Long : OUTPUT 703 USING ,2A , 30A " > "ph " , A$
180
BEEP
190
WAIT son
20 0 BEEP
210
LOCAL 703
220
END
3-50
fviuuci \
«-vrJ D t*/-! r/r'i rV^ m i n rt