home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_11_1986_Transactor_Publishing.d64 / old (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  440b  |  28 lines
  1. 0 rem old (j. rubin, sept/85)         :
  2. 1 :
  3. 2 rem  1 statement, 0 functions
  4. 3 :
  5. 4 rem keyword characters:  3
  6. 5 :
  7. 6 rem keyword     routine  line  ser #
  8. 7 rem s/old       ol      10190   142
  9. 8 :
  10. 9 rem==================================
  11. 10 :
  12. 141 .asc "ol[196]"
  13. 1441 .word ol-1
  14. 10190 ol ldy #1
  15. 10192 tya
  16. 10194 sta (43),y
  17. 10196 jsr $a533
  18. 10198 clc
  19. 10200 lda $22
  20. 10202 adc #2
  21. 10204 sta 45
  22. 10206 lda $23
  23. 10208 adc #0
  24. 10210 sta 46
  25. 10212 jsr $a660
  26. 10214 jmp $e386
  27. 10216 ;
  28.