home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_15_1987_Transactor_Publishing.d64 / unew (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  393b  |  24 lines
  1. 0 rem unew (wayne happ)               :
  2. 1 :
  3. 2 rem 1 statement, 0 functions
  4. 3 :
  5. 4 rem keyword chars: 4
  6. 5 :
  7. 6 rem keyword    routine   line  ser #
  8. 7 rem s/unew     une       15198  200
  9. 8 :
  10. 9 rem ===============================
  11. 10 :
  12. 163 .asc "une[215]"
  13. 1163 .word une-1
  14. 15198 une lda #1
  15. 15200 tay
  16. 15202 sta ($2b),y
  17. 15204 jsr $a533
  18. 15206 lda $22
  19. 15208 ldy $23
  20. 15210 sta $2d
  21. 15212 sty $2e
  22. 15214 jmp $a660
  23. 15216 ;
  24.