6502basiccompiler/arch/6502/__sandbox__/library-asm/lei16.asm

#include once <lti8.asm>
__LEI16: ; Test 8 bit values HL < DE
; Returns result in A: 0 = False, !0 = True
eor z80_a      ;- xor a
lda z80_l      ;- sbc hl,de
sbc z80_e
sta z80_l
lda z80_h
sbc z80_d
sta z80_h
jne __LTI2     ;- jp nz, __LTI2
sec            ;- dec a
sbc #$01
rts            ;- ret