?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.  ifndef included_xsinh
  2.  define included_xsinh
  3.  include "../common/pushpop.asm"
  4.  include "xexp.asm"
  5.  include "xinv.asm"
  6.  include "xamean.asm"
  7.  
  8. hyper_0=xOP1+72
  9. hyper_1=xOP1+82
  10. xsinh:
  11.   call pushpop
  12.   push bc
  13.   ld bc,hyper_0
  14.   call xexp
  15.   ld h,b
  16.   ld l,c
  17.   ld bc,hyper_1
  18.   call xinv
  19.   ld a,(hyper_1+9)
  20.   xor 80h
  21.   ld (hyper_1+9),a
  22.   ld d,b
  23.   ld e,c
  24.   pop bc
  25.   jp xamean
  26.  
  27. ;#undefine hyper_0
  28. ;#undefine hyper_1
  29.  endif
  30.