130
A=SPOLL (712)
!
clear Status Byte
140
150
DIM A$ [153]
!
The Learn String cons ists of 153 ASCII characters .
160
170
PRINT " Recalling sett ing from locat ion 0 (Standard S ett ing) . . . "
180
OUTPUT 712 ; " RCLO"
190
11 .
200
2 1 0
220
230
PRINT "Reading the current s etting
Oldt ime=TIMEDATE
. . .
'
240
OUTPUT 712 ; " CST"
250
ENTER 7 1 2 ; A$
260
read the current s ett ing
270
Timetaken= ( (TIMEDATE-Oldtime) DIV . 00 1 ) / 1000
280
PRINT "
f inished . "
290
PRINT "This took " ; Timetaken ; " seconds . "
300
3 10
PRINT "The current Learn String is : "
320
PRINT A$
330
340
350
WAIT 4
360
PRINT "Period is set to 999 ms . "
370
OUTPUT 7 1 2 ; " PER999MS "
380
WAIT 4
390
400
410
420
PRINT " Sending the Learn String back to the HP8 1 12A
"
·
. . .
,
430
Oldt ime=TIMEDATE
440
450
OUTPUT 7 12 ; A$
460
470
Timetaken= ( (TIMEDATE-Oldtime) DIV . 00 1 ) / 1 000
480
PRINT "
f inished . "
490
PRINT "This took " ; Timetaken ; " seconds . "
500
5 1 0
PRINT " End of the program LRN_DEMO . "
520
530
LOCAL 712
540
END
Programming Examples
7 -17
Summary of Contents for 8112A
Page 6: ......
Page 24: ......
Page 36: ......
Page 44: ......
Page 70: ......
Page 92: ......
Page 144: ...8 32 Testing Performance ...
Page 176: ......
Page 190: ......
Page 194: ...10 2 4 Servicing the Power Supply ...
Page 196: ......
Page 197: ......
Page 216: ......
Page 240: ...10 4 16 Servicing the Shaper and Output Amplifier ...
Page 242: ...A R l BD RY MR I N 1 2 7 I I IJt 51 CR1 B e i 1 _ _ _ _ 20 ...
Page 244: ......
Page 251: ......
Page 262: ...A B A2 ED RY CONTROL ...
Page 270: ......
Page 290: ...R B c R3 BD RY M I CROPROCESSOR 1 2 3 FIGURE 1 0 7 8 ...
Page 294: ... 8 X2l 2 X2 Figure A 1 Mechanical Parts 1 A 2 Replaceable Parts ...
Page 295: ...MP MP3 MP MP2 MP4 MPS MP 1 2 MPS MP MP I B ElElElEl Replaceable Parts A 3 ...
Page 334: ......
Page 378: ...Figure B 14 Mechanical Parts 1 B 44 Backdating ...
Page 380: ......
Page 382: ......
Page 402: ......