?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.  ifndef included_srl64
  2.  define included_srl64
  3.  
  4. srlxOP2:
  5.   ld hl,xOP2+7
  6.   jp srl64
  7. srlxOP1_mantissa:
  8. ;182cc
  9.   ld hl,xOP1+7
  10. srl64:
  11. ;172cc
  12.   srl (hl) : dec hl
  13.   rr (hl) : dec hl
  14.   rr (hl) : dec hl
  15.   rr (hl) : dec hl
  16.   rr (hl) : dec hl
  17.   rr (hl) : dec hl
  18.   rr (hl) : dec hl
  19.   rr (hl)
  20.   ret
  21.  endif
  22.