HP 5501A Operating And Service Manual page 256

Table A-2. Comparator-Based System Using HP 9830A
2670 B1=255-RBME2
2680 B2=255-RBYTE2
2690 B3=255-RBYTE2
2700 B4=255-RBYTE2
2710 D=INT(B1/16)
2720 Bl=BI-16*D
2730 B=(B1*2T 24+B2*65536+
B3*256+B4)*101(2-D)
2740 IF F#0 THEN 2760
2750 B=B-2128
2760 IF F#l THEN 2780
2770 B=B-2128
2780 RETURN
A = 160 A/1.58248E-4*C
M I D
RETURN
4000 OUTPUT (2,5)251;
4010 BI=INT(A/2124)
4020 OUTPUT (2,5)255-81;
4030 BI=A-2124*B1
4040 B2=INT(B1/2116)
4050 OUTPUT (2,5)255-82;
4060 Bl=BI-2116*B2
4070 B2=I NT(B1/2t8)
4080 OUTPUT (2,5)255-82;
4090 BI=B1-218*B2
4188 OUTPUT (2,5)255-81;
4110 RETURN
5000
I F
F#0 THEN 5020
5010 PRINT "X-AXIS
ERROR"
5020 IF F # l THEN 5040
5030 PRINT "Y-AXIS
ERROR"
5040 DlSP "GO T O GAGE";
5050 STOP
5060 G O T 0 10
5070 END
Read i n bits 31-24.
Read i n bits 23-16.
Read i n bits 15-8.
Read i n bits 7-0.
D contains bits 31-28 decimai point information.
B1
=
Bits 27-24.
Apply proper weighting.
(2-D) applies decimal point.
Correct for overflow
-
really underflow.
Return, as this is recoverable error.
Conversion t o fringes.
4000 is a routine t o output a 32-bit number i n four &bit bytes
i n positive-true form. 251 "4P" prepare 10746A t o input a
destination and a tolerance.
O u t p u t bits 31-24 t o 10746A
O u t p u t bits 23-16 t o 10746A.
O u t p ~ ~ t bits 15-8 t o 10746A.
Output bits 7-0 t o 10746A.
Output completed. Transfer command needs t o b e given next.
Irrecoverable error, so stop and g o t o gage o n machine; then
hit continue.