home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_12_1986_Transactor_Publishing.d64 / delay (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  515b  |  32 lines
  1. 0 rem delay (aug 25/84)               :
  2. 1 :
  3. 2 rem  1 statement, 0 functions
  4. 3 :
  5. 4 rem keyword characters:  5
  6. 5 :
  7. 6 rem keyword     routine  line   ser #
  8. 7 rem delay       dela     3180    026
  9. 8 :
  10. 9 rem ================================
  11. 10 :
  12. 106 .asc "dela[217]"
  13. 1106 .word dela-1
  14. 3180 dela jsr $ad8a
  15. 3182 jsr $b7f7
  16. 3184 de1 ldy #$0e
  17. 3186 de2 ldx #$85
  18. 3188 de3 dex
  19. 3190 bne de3
  20. 3192 dey
  21. 3194 bne de2
  22. 3196 jsr $a82c
  23. 3198 ldx $14
  24. 3200 bne de4
  25. 3202 ldy $15
  26. 3204 beq de5
  27. 3206 dec $15
  28. 3208 de4 dec $14
  29. 3210 jmp de1
  30. 3212 de5 rts
  31. 3214 ;
  32.