HP 5334B Service Manual page 69

Table
4-4.
HP-ZB Operational Verification
Program Listing (Continued)
71 70 PAUSE
71 80 CLEAR
7190 D I S P " D i s c o n n e c t t h e BNC c a b l e . "
7200 D I S P
7210 D I S P B$
7220 PAUSE
7230
OUTPUT A ; " H S 0 I N "
7240
GOT0
7960
'7250 !
7260
! END OF PROGRAM
7270 CLEAR
7280
D I S P H$
7290
DLSP
7300 D I S P " CHECKPOINT RESULTS"
7310 D I S P
"
FOR H P - I B ADDRESSn;A
7320 D I S P
7330 D I S P H$
7340 I F C=2 THEN D I S P @ GOT0 7380
7350 D I S P
7360 D I S P F$
7370 PAUSE
7380 CLEAR
7390 FOR 1=1 TO 14
7400 I F R ( I ) = 0 THEN R$="NOT PERFORMED"
7410 I F R ( I ) = l THEN R $ = " F A I L "
7420 I F R ( I
)=Z
THEN R$=" P A S S "
7430
I F
1=1
THEN D I S P "CHECKPOINT " ; I ; "
" ; R $ @ GOTO 7460
7440
I F
I<,:10
THEN D I S P
"
" ; I ; " " ; R $ @ GOTO 7460
7450 D I S P
" " ;
I ;R$
7460 NEXT I
7470
I F
C=2
THEN D I S P U S I N G
" 5 / "
@ GOT0
7650
7480 D I S P U S I N G
"#,K,/"
;
F $
7490 PAUSE
7500 CLEAR
7510 D I S P " W o u l d y o u l l k e
a p r l n t e d v e r s l o n o f t h e c h e c k p o i n t r e s u l t s ? "
7520 D I S P
7530 D I S P " Y e s
-
P r e s s
K 1
t o r e c e i v e a p r i n t e d v e r s i o n . "
7540
D I S P
7550 DISP
" N o -
P r e s s K4 t o p r o c e e d . "
7560
ON KEY#
I
, " Y E S u GOT0
76
10
'7570 OFF KEY# 3
7580 ON KEY#
4 , "
NO" GOTO 7670
7590
KEY L A B E L
7600 GOTO 7600
761 0 CLEAR
7620 CRT I S 2
7630 C=?
7640 GOTO 7270
'7650 CRT I S 1
7660 C = l
7670 LOCAL 7
7680 AEORTIO 7
HP 5334B
-
Service Manual
4-59