2019-02-14 22:57:55 +00:00
|
|
|
.sect .text
|
|
|
|
|
.sect .rom
|
|
|
|
|
.sect .data
|
|
|
|
|
.sect .bss
|
|
|
|
|
.sect .text
|
|
|
|
|
|
|
|
|
|
! Does a tristate signed comparison of hl <> de.
|
|
|
|
|
! Returns m flag if hl < de.
|
|
|
|
|
! Returns p flag if hl >= de.
|
|
|
|
|
! This doesn't set z coherently.
|
|
|
|
|
|
|
|
|
|
.define .cmps_mag
|
|
|
|
|
.cmps_mag:
|
|
|
|
|
mov a, d
|
|
|
|
|
xra h
|
|
|
|
|
jp .cmpu_mag ! signs are the same, so an unsigned comparison will do
|
|
|
|
|
xra h ! set A=H and set the sign flag
|
2019-02-15 20:30:27 +00:00
|
|
|
ral ! move sign flag into carry
|
2019-02-14 22:57:55 +00:00
|
|
|
ret
|
