home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1984 May / 1984-05.d64 / mlbeg_64 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  1KB  |  54 lines
  1. 10 i=49152
  2. 20 read a:if a=256 then 50
  3. 30 poke i,a:ck=ck+a:i=i+1:goto 20
  4. 40 end
  5. 50 if ck<>41231 thenprint"error in data statements":stop
  6. 49152 data 160,0,169,8,153,0
  7. 49158 data 216,153,0,217,153,0
  8. 49164 data 218,153,0,219,200,208
  9. 49170 data 241,160,0,169,224,153
  10. 49176 data 0,4,153,192,7,200
  11. 49182 data 192,40,208,245,169,39
  12. 49188 data 133,71,169,4,133,72
  13. 49194 data 162,24,160,0,169,224
  14. 49200 data 145,71,200,145,71,202
  15. 49206 data 240,16,24,165,71,105
  16. 49212 data 40,133,71,165,72,105
  17. 49218 data 0,133,72,76,44,192
  18. 49224 data 169,20,133,204,32,158
  19. 49230 data 224,164,98,185,168,3
  20. 49236 data 201,224,240,244,169,90
  21. 49242 data 153,168,3,198,204,208
  22. 49248 data 235,169,169,133,251,169
  23. 49254 data 7,133,252,32,199,192
  24. 49260 data 162,5,32,209,192,165
  25. 49266 data 197,201,56,240,14,201
  26. 49272 data 8,240,25,201,46,240
  27. 49278 data 91,201,35,240,86,208
  28. 49284 data 231,198,251,160,0,177
  29. 49290 data 251,201,32,240,16,230
  30. 49296 data 251,76,108,192,160,2
  31. 49302 data 177,251,201,32,240,25
  32. 49308 data 76,108,192,230,251,160
  33. 49314 data 1,169,32,145,251,165
  34. 49320 data 251,208,2,198,252,198
  35. 49326 data 251,32,199,192,76,108
  36. 49332 data 192,160,1,169,32,145
  37. 49338 data 251,230,251,208,2,230
  38. 49344 data 252,32,199,192,76,108
  39. 49350 data 192,160,1,169,120,145
  40. 49356 data 251,136,208,251,96,160
  41. 49362 data 0,136,208,253,202,208
  42. 49368 data 248,96,165,251,133,253
  43. 49374 data 165,252,133,254,32,15
  44. 49380 data 193,160,0,165,193,145
  45. 49386 data 253,162,10,32,209,192
  46. 49392 data 169,32,145,253,32,15
  47. 49398 data 193,177,253,201,32,208
  48. 49404 data 7,169,193,145,253,76
  49. 49410 data 235,192,201,224,240,4
  50. 49416 data 201,90,240,223,76,108
  51. 49422 data 192,56,165,253,233,40
  52. 49428 data 133,253,165,254,233,0
  53. 49434 data 133,254,96,256
  54.