home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol157 / cath.a86 < prev    next >
Encoding:
Text File  |  1985-03-14  |  341 b   |  23 lines
  1.     TITLE    'CONVERTS ASCII HEX IN A TO BINARY'
  2.     PUBLIC    CATH
  3.     CSEG
  4.  
  5. ;ENTER WITH ASCII HEX IN AL, LEAVE WITH BINARY OR BLANK IF NON
  6. ;HEX ASCII CHARACTER
  7.  
  8. CATH:    CMP    AL,'0'-1
  9.     JC    BLOUT
  10.     CMP    AL,'9'+1
  11.     JNC    ALPHA
  12.     SUB    AL,'0'
  13.     RET
  14. ALPHA:    CMP    AL,'A'-1
  15.     JC    BLOUT    ;BAD
  16.     CMP    AL,'G'
  17.     JNC    BLOUT
  18.     SUB    AL,'1'    ;CONVERT TO BINARY
  19.     RET
  20. BLOUT:    MOV    AL,' '
  21.     RET
  22.     END
  23.