HP 5334B - Page 69

Table 4-4. HP-ZB Operational Verification
Program Listing (Continued)
71 70 PAUSE
71 80 CLEAR
7190 DISP "Disconnect the BNC cable."
7200 DISP
7210 DISP B$
7220 PAUSE
7230 OUTPUT A ;"HS0 IN"
7240 GOT0 7960
'7250
!
7260 ! END OF PROGRAM
7270 CLEAR
7280 DISP H$
7290 DLSP
7300 DISP " CHECKPOINT RESULTS"
7310 DISP " FOR HP-IB ADDRESSn;A
7320 DISP
7330 DISP H$
7340 IF C=2 THEN DISP @ GOT0 7380
7350
DISP
7360 DISP F$
7370 PAUSE
7380 CLEAR
7390 FOR 1=1 TO 14
7400
IF R(I )=0 THEN R$="NOT PERFORMED"
7410 IF R(I)=l THEN R$="FAIL"
7420 IF R( I )=Z THEN R$=" PASS"
7430 IF 1=1 THEN DISP "CHECKPOINT ";I;" ";R$ @ GOTO 7460
7440
IF I<,:10 THEN DISP "
";I;" ";R$ @ GOTO 7460
7450
DISP " " ; I ;R$
7460 NEXT I
7470 IF C=2 THEN DISP USING "5/" @ GOT0 7650
7480
DISP USING "#,K,/" ; F$
7490 PAUSE
7500 CLEAR
7510 DISP "Would you llke a prlnted verslonof the checkpoint results?"
7520 DISP
7530 DISP "Yes - Press K1 to receive a printed version."
7540 DISP
7550 DISP "No - Press K4 to proceed."
7560 ON KEY# I ,"YESu GOT0 76 10
'7570 OFF KEY# 3
7580 ON KEY# 4 ," NO" GOTO 7670
7590
KEY LABEL
7600 GOTO 7600
761 0 CLEAR
7620 CRT IS 2
7630 C=?
7640 GOTO 7270
'7650
CRT IS 1
7660 C=l
7670 LOCAL 7
7680 AEORTIO 7
HP 5334B - Service Manual
4-59