home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_88-03_1988_-_de_Side_B.d64 / led-intervall (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  369b  |  20 lines
  1. 0 rem >> led - interval <<
  2. 5 print"[147]":poke53280,0:poke53281,0
  3. 10 open1,8,15:fori=0to44:reada:print#1,"m-w"chr$(i)chr$(5)chr$(1)chr$(a):next
  4. 20 print#1,"uc"
  5. 30 data 169,254,170
  6. 40 data32,21,5
  7. 50 data202,224,1
  8. 60 data208,248,32
  9. 70 data21,5,232
  10. 80 data 224,255,208
  11. 90 data 248,240,235
  12. 100 data 138,72,73
  13. 110 data 255,168,169
  14. 120 data 248,141,0
  15. 130 data 28,202,208
  16. 140 data 248,169,240
  17. 150 data 141,0,28
  18. 160 data 136,208,248
  19. 170 data 104,170,96
  20.