?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1.  ifndef included_xamean
  2.  define included_xamean
  3.  include "../common/pushpop.asm"
  4.  include "../common/mov.asm"
  5.  include "xadd.asm"
  6.  
  7. xamean:
  8. ;229+{0(special case),17}+mov10+xadd
  9.   call pushpop
  10.   push bc
  11.   ld bc,xOP1
  12.   call xadd
  13.   ld hl,(xOP1+8)
  14.   ld a,h
  15.   and $7F
  16.   or l
  17.   jr z,xameanok;+_
  18.   dec hl
  19.   ld (xOP1+8),hl
  20. xameanok;_:
  21.   ld hl,xOP1
  22.   pop de
  23.   jp mov10
  24.  endif
  25.