home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1985 September / 64er_Magazin_85-09_1985_Markt__Technik_de.d64 / blinker (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1985-01-01  |  634 b   |  12 lines
  1. 10 print"[147]"
  2. 11 input "staradresse=828[157][157][157][157][157]";bl
  3. 20 fori=bltobl+132:readx:s=s+x:pokei,x:next:ifs<>19188thenprint"fehler":goto107
  4. 100 data32,253,174,32,158,183,134,253,224,10,176,113,224,1,144,109,32,253
  5. 101 data174,32,158,183,134,254,165,253,10,24,101,254,201,26,176,91,165,253
  6. 102 data9,48,133,252,166,254,160,0,24,32,240,255,169,48,133,250,230,250,165
  7. 103 data2,240,4,169,18,133,199,165,250,32,210,255,169,13,32,210,255,165,250
  8. 104 data197,252,240,7,169,13,32,210,255,208,223,162,103,165,198,240,15,32
  9. 105 data180,229,133,251,197,252,240,29,176,4,201,49,176,23,136,208,234,202
  10. 106 data208,231,165,2,240,5,138,133,2,240,175,230,2,208,171,169,0,133,251
  11. 107 data96,0,0,0:pokev,14:end
  12.