home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128Toolkit / UNASM.RAM.ARC / UNASSM3 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  436 b   |  24 lines
  1. 10 SETADD CPY $24;# OF BYTES IN BEGIN & END ADDRESSES
  2. 20 BCS ST
  3. 30 INY
  4. 40 LDA ADDBUF,Y;GET THE COMMAND D P OR X
  5. 50 CMP #$30;ZERO
  6. 60 BCC ST;# < 0
  7. 70 CMP #$3A
  8. 80 BCS U32;# > 9
  9. 90 SBC #$2F;BECOMES REAL #, #$31 - #$2F = #$01
  10. 100 U32 CMP #$41
  11. 110 BCC U33; A OR >
  12. 120 SBC #$37
  13. 130 U33 CMP #$10
  14. 140 BCS ST;# > G
  15. 150 RTS
  16. 160 ;
  17. 170 HEX LDA $22;CHANGE # TO HEX
  18. 180 ASL:ASL:ASL:ASL
  19. 190 STA $22
  20. 200 LDA $23
  21. 210 ORA $22
  22. 220 RTS
  23. 230 .FILE UNASSM4
  24.