home *** CD-ROM | disk | FTP | other *** search
/ Publication 4 / Publication_04_19xx_High-Tech_de_Side_A.d64 / screen-flackern (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  574b  |  21 lines
  1. 10 poke53265,27:rem bildschirm an
  2. 20 fori=49152to49169:readx:pokei,x:next
  3. 25 sys49152:rem aufruf
  4. 30 print"[147] 1. noch einmal"
  5. 35 print" 2. listing"
  6. 40 geta$:ifa$=""then40
  7. 45 ifa$="1"then25
  8. 50 ifa$="2"thenprint"[147]":list
  9. 55 goto40
  10. 60 data160,0,162,0,232,142,32,208,224,255,208,248,200,192,255,208,241,96
  11. 100 rem
  12. 101 rem *******************************
  13. 102 rem *                             *
  14. 103 rem *      screen-flackern        *
  15. 104 rem *     -----------------       *
  16. 105 rem *                             *
  17. 106 rem * written by tc (tiger-crew!) *
  18. 107 rem *                             *
  19. 108 rem *******************************
  20. 109 rem
  21.