home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / sigm / vols000 / vol089 / scomphd.mac < prev    next >
Encoding:
Text File  |  1984-04-29  |  462 b   |  28 lines
  1. ;
  2. ; SYSLIB Module Name:  SCOMPH
  3. ; Author:  Richard Conn
  4. ; SYSLIB Version Number:  2.0
  5. ; Module Version Number:  1.0
  6. ; Module Entry Points:
  7. ;    COMPHD
  8. ; Module External References:
  9. ;    None
  10. ;
  11.  
  12. ;
  13. ;  SCOMPHD --
  14. ;    Compare HL with DE.  On return, Zero means HL=DE; Carry means
  15. ; HL<DE.
  16. ;    PSW is affected.  HL and DE are not.
  17. ;
  18.  
  19. COMPHD::
  20.     MOV    A,H    ; COMPARE HIGH
  21.     CMP    D
  22.     RNZ        ; IF NOT ZERO, FLAGS ARE SET
  23.     MOV    A,L    ; COMPARE LOW
  24.     CMP    E
  25.     RET
  26.  
  27.     END
  28.