sgnu16.asm 206 B

12345678910111213
  1. ; Returns SGN (SIGN) for 16 bits unsigned integer
  2. ;
  3. __SGNU16:
  4. lda z80_h ;- ld a,h
  5. sta z80_a
  6. ora z80_l ;- or l
  7. bne *+3 ;- ret z
  8. rts
  9. lda #1 ;- ld a,1
  10. sta z80_a
  11. rts ;- ret