HP 8112A, Operating, Programming And Servicing Manual

Page: 111 / 406

70 CLEAR SCREEN
80
90
CLEAR 7 1 2
1 0 0 A=SPOLL (712)
initi al ize interface and HP8 1 12A
clear status byte
1 10
120
!
Learn String interrogate funct ion CST (Current Sett ing)
130
140
DIM S etting$ [153]
150 OUTPUT 7 1 2 ; " CST"
160 ENTER 7 1 2 ; Sett ing$
170
180
PRINT "The current s etting of the HP8 1 12A is : "
190 PRINT S ett ing$
200
PRINT
2 1 0 PRINT
220
230
!
Interrogate Parameter Set IRCL0 . . 9
240
250 OUTPUT 7 12 ; " IRCL 5 "
260 ENTER 7 1 2 ; Sett ing$
270
read s ett ing from locat ion 5
280
PRINT "The current s ett ing of locat ion 5 is : "
290 PRINT Sett ing$
300 PRINT
3 10 PRINT
320
330
!
Interrogate Error !ERR
340
350 DIM A$ [100]
360 OUTPUT 7 1 2 ; "WID 1MS "
!
cause width and slope error
370
PRINT " Width and slope error caused . "
380
390
OUTPUT 7 12 ; " IERR"
400 ENTER 7 12 ; A$
410
!
read error ( s )
420 PRINT "Errors read with !ERR : " ; A$
430 PRINT
440
450
460
OUTPUT 7 1 2 ; 11WID 1US 11
!
correct error
470
!
Interrogate Error commands (here shown : !PER , IHIL , and !BUR)
480
490
OUTPUT 7 12 ; " IPER"
500 ENTER 7 1 2 ; P eriod$
5 1 0
520
PRINT " Response after !PER command : " ; Perfod$
530
540
OUTPUT 7 1 2 ; " IHIL"
550 ENTER 7 1 2 ; High_level$
560
570
PRINT " Response after IHIL command : " ; High_l evel$
Programming Examples
7 -19