home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1986 May / 1986-05.d64 / blick (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  449b  |  12 lines
  1. 100 fori=679to758:reada:pokei,a:ck=ck+a:next
  2. 110 ifck<>11167thenprint"error in data statements.":stop
  3. 120 sys679:print"[147]blick enabled"
  4. 130 data 169,15,141,24,212,141,19,212,169,120
  5. 140 data 141,15,212,169,1,141,14,212,169,0
  6. 150 data 141,20,212,162,201,160,2,142,38,3
  7. 160 data 140,39,3,96,32,202,241,133,251,134
  8. 170 data 252,132,253,169,33,141,18,212,169,175
  9. 180 data 32,202,241,162,234,160,0,200,208,253
  10. 190 data 232,208,250,169,32,141,18,212,169,20
  11. 200 data 32,202,241,165,251,166,252,164,253,96
  12.