AppleIIAsm-Collection/T.RAND8.MIN at 41dc5f4a21aadc281374f51d7c1aa69a9dec9ff5 - AppleIIAsm-Collection - Applefritter: Git

Apple-2-SW/AppleIIAsm-Collection

mirror of https://github.com/nathanriggs/AppleIIAsm-Collection.git synced 2024-11-23 15:32:08 +00:00

nathanriggs 16c1731e54 Strings 0.2.0 update

- bugfixes
- implemented required library
- commenting updates
- .min of every routine

2018-12-22 20:35:05 -05:00

19 lines

276 B

Plaintext

Raw Blame History

 ** RAND8
 *
          LDX   #8
          LDA   RNDL+0
 :A
          ASL
          ROL   RNDL+1
          BCC   :B
          EOR   #$2D
 :B
          DEX
          BNE   :A
          STA   RNDL+0
          STA   RETURN
          LDY   #1
          STY   RETLEN
          CMP   #0
          RTS