home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 247 / 247.d81 / e.power2 < prev    next >
Encoding:
Text File  |  2004-01-01  |  276 b   |  22 lines
  1. u                            PRINT THIS
  2.  
  3.               2^ NUMBER
  4.               ---------
  5.  
  6.    .Y < BASE NUMBER
  7.  
  8.          LDY (POWER)
  9.          LDA #1
  10.          CPY #0
  11.          BEQ END
  12.  
  13.          CLC
  14.    SHIFT ROLA
  15.  
  16.          DEY
  17.          BNE SHIFT
  18.    END   RTS
  19.  
  20.    (RESULT > .A)
  21.  
  22.  
  23.