home *** CD-ROM | disk | FTP | other *** search
/ Loadstar Extras 3 / Ex3side1.d64 / 16x16 < prev    next >
Encoding:
Text File  |  1990-01-01  |  418 b   |  42 lines
  1. ; this code multiples a 16 bit number
  2. ; by a 16 bit number.
  3. ; store multitplier in mplrl and mplrh
  4. ; multiplicand in mcndl and mcndh
  5.  
  6.  
  7.  
  8. .org $c000
  9. .mem
  10.  
  11. mlt16 lda #0
  12. sta res+2
  13. sta res+3
  14. ldx #16
  15.  
  16. nxtbt lsr mplrh
  17. ror mplrl
  18. bcc align
  19. clc
  20. lda res+2
  21. adc mcndl
  22. sta res+2
  23. lda res+3
  24. adc mcndh
  25. align ror
  26. sta res+3
  27. ror res+2
  28. ror res+1
  29. ror res
  30. dex
  31. bne nxtbt
  32.  
  33. rts
  34.  
  35.  
  36. mplrl .byt 0
  37. mplrh .byt 0
  38. mcndl .byt 0
  39. mcndh .byt 0
  40. res .buf 4
  41.  
  42.