home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1990 July / 64er_Magazin_90-07_1990_Markt__Technik_de_Side_A.d64 / cursor (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  436b  |  21 lines
  1. 10 poke 56334,peek(56334) and 254
  2. 20 poke 1,peek (1) and 251
  3. 30 for a = 53248 to 57343
  4. 40 poke a-40960,peek (a)
  5. 50 next a
  6. 60 poke 1,peek (1) or 4
  7. 70 poke 56334,peek (56334) or 1
  8. 80 poke 53272,peek (53272) and 240 or 13
  9. 90 for a=12288+4096/4 to 12288+4096/2
  10. 100 poke a,peek (a-4096/4)
  11. 110 next a
  12. 120 for a=12288+4096/4+7 to 12288+4096/2 step 8
  13. 130 poke a,255
  14. 140 next a
  15. 150 for a=12288+(3/4)*4096 to 12288+4096
  16. 160 poke a,peek (a-4096/4)
  17. 170 next
  18. 180 for a=12288+(3/4)*4096+7 to 12288+4096 step 8
  19. 190 poke a,255
  20. 200 next a
  21.