home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_13_1986_Transactor_Publishing.d64 / restore (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  470b  |  29 lines
  1. 0 rem rest (w. happ)                  :
  2. 1 :
  3. 2 rem  1 statement, 0 functions
  4. 3 :
  5. 4 rem keyword characters:  7
  6. 5 :
  7. 6 rem keyword   routine   line   ser #
  8. 7 rem s/restore res      12316    165
  9. 8 :
  10. 9 rem =================================
  11. 10 :
  12. 150 .asc "restor[197]"
  13. 1150 .word res-1
  14. 12316 res beq re2
  15. 12318 jsr $a96b
  16. 12320 jsr $a613
  17. 12322 bcc re3
  18. 12324 ldx $5f
  19. 12326 ldy $60
  20. 12328 dex
  21. 12330 bne re1
  22. 12332 dey
  23. 12334 re1 stx $41
  24. 12336 sty $42
  25. 12338 rts
  26. 12340 re2 jmp $a81d
  27. 12342 re3 jmp $a8e3
  28. 12344 ;
  29.