( EPSOM ROUTINE )                                               DED 0 C= XC?                                                    HEX                                                             { CODE .eps } ASM  ( Houston and Epson printer routine )        { ASM   H POP, 0 D LXI, 0F8 H MVI, BEGIN,                         E INR, 0=, IF, D INR, 0=, IF, H INR, 0=, IF, ' offl JMP, THEN,  THEN, THEN, PLSTAT IN, 7 ( 3 ) A BIT, 0<>, IF, 0 ( 2 ) A BIT,   THEN, 0<>, END, L A MOV, PLDATA OUT, NEXT }                   { : .EPS }  ' .eps PUT ! { ; }                                  DECIMAL                                                         ;S                                                                                                                                                                                                                                                                                                                                                                                              