?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.  ifndef included_xpow
  2.  define included_xpow
  3.  include "../common/pushpop.asm"
  4.  include "xmul.asm"
  5.  include "xlg.asm"
  6.  include "xpow2.asm"
  7.  
  8. xpow:
  9. ;;Computes x^y
  10. ;;HL points to y
  11. ;;DE points to x
  12. ;;BC points to output
  13.   call pushpop
  14.   push bc
  15.   push de
  16.   ld bc,xOP1
  17.   call xlg
  18.   pop de
  19.   ld h,b
  20.   ld l,c
  21.   call xmul
  22.   pop bc
  23.   jp xpow2
  24.  endif
  25.