HP 5334B Service Manual page 67

Table 4-4. HP-IB Operational Verification
Program Listing (Continued)
61 30 GOT0 7970
6140 !
6150 ! CHECKPOINT 12
6160 I $ = " S t a t u s B y t e "
6170 S=12
6180 GOSUB 7810
6190 R=l
6200 DISP E 5 ; " t h e 5334A/BU
6210 DISP " w i l l b e r e s e t , and t h e s t a t u s b y t e
w i l l
b e r e a d b y t h e "
6220 DISP " c o n t r o l l e r . "
6230 GOSUB 8480
6240 REMOTE A
6250 OUTPUT A ;"CKH
6260 GOSUB 8600
6270 GOSUB 8750
6280 GOT0 7970
6290 !
6300 ! CHECKPOINT 13
6310 I $ = " Send E r r o r Code"
6320 S=13
6330 GOSUB 781 0
6340 R=l
6350 DISP E $ ; " a n W
6360 DISP " u n r e c o g n i z a b l e command code w i l l b e s e n t t o t h e 5334A/B t o g e n e r
a t e a n e r r o r . "
6370 GOSUB 8480
6380 REMOTE A
6390 OUTPUT A
;
"INVALID COMMAND"
6400 CLEAR
6410 DISP " V e r i f y t h a t t h e 5334A/B d i s p l a y shows 'ERROR 4 . 0 ' . "
6420 DISP
6430 DISP E 5 ; " t h e e r r o r "
6440 DISP " f o r t h i s i l l e g a l command
w i l l
b e s e n t t o t h e c o n t r o l l e r . "
6450 GOSUB 8480
6460 LOCAL 7
6470 WAIT 3000
6480 E=O
6490 CLEAR
6500 DISP "The e x p e c t e d v a l u e f o r t h i s e r r o r code i s 4
. "
6510 REMOTE A
6520 OUTPUT A ; " T E "
6530 ENTER A
;
E
6540 OISP
6550 DISP "The r e t u r n e d v a l u e f o r t h i s e r r o r code is " ; E ; " . "
6560 I F E=4 THEN R=R*l
6570 I F ES::>4 THEN R=R*0
6580 DISP
6590 DISP F5
6600 PAUSE
6610 CLEAR A
6620 GOSUB 8750
6630 !
HP
5334B
-
Service Manual
4-57