home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1995 February / 1995-02b.d64 / 64saver (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  2KB  |  63 lines
  1. 100 poke 53281,6 :poke 53280,0
  2. 110 print"[147]";
  3. 120 print"[164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164]"
  4. 130 print"[155]compute's gazette[146][144]"
  5. 140 print"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][144]"
  6. 150 print"c64 screensaver"
  7. 160 print"[154](c)1995 compute publications int'l. ltd."
  8. 170 print"all rights reserved"
  9. 180 rem ******************************
  10. 190 for s = 52970 to 53245:read a:cn = cn+a:poke s,a:next s
  11. 200 if cn <> 31335 then print"error in data statement":stop
  12. 210 print"[144]screensaver installed[146]!"
  13. 220 print" sys 52970 to enable."
  14. 230 print" sys 53077 to disable."
  15. 240 new
  16. 250 stop
  17. 260 data32,154,207,32,168,207
  18. 270 data32,131,207,32,96,207
  19. 280 data32,122,207,120,162,16
  20. 290 data169,207,142,20,3,141
  21. 300 data21,3,162,51,169,207
  22. 310 data142,24,3,141,25,3
  23. 320 data88,96,165,197,201,64
  24. 330 data208,3,76,48,207,32
  25. 340 data131,207,174,252,207,224
  26. 350 data1,208,13,173,17,208
  27. 360 data9,16,141,17,208,169
  28. 370 data0,141,252,207,76,49
  29. 380 data234,173,13,221,201,132
  30. 390 data240,3,76,71,254,72
  31. 400 data138,72,152,72,173,17
  32. 410 data208,41,239,141,17,208
  33. 420 data169,1,141,252,207,104
  34. 430 data168,104,170,104,64,120
  35. 440 data32,138,255,88,169,4
  36. 450 data141,13,221,96,173,15
  37. 460 data221,9,128,141,15,221
  38. 470 data169,0,174,251,207,141
  39. 480 data11,221,142,10,221,141
  40. 490 data9,221,141,8,221,96
  41. 500 data173,13,221,9,132,141
  42. 510 data13,221,96,173,15,221
  43. 520 data41,127,141,15,221,169
  44. 530 data0,141,11,221,141,10
  45. 540 data221,141,9,221,141,8
  46. 550 data221,96,162,0,189,189
  47. 560 data207,32,210,255,232,224
  48. 570 data36,208,245,96,32,228
  49. 580 data255,201,49,144,249,201
  50. 590 data58,176,245,32,210,255
  51. 600 data56,233,48,141,251,207
  52. 610 data96,69,78,84,69,82
  53. 620 data32,66,76,65,78,75
  54. 630 data32,68,69,76,65,89
  55. 640 data32,84,73,77,69,32
  56. 650 data49,45,57,32,77,73
  57. 660 data78,85,84,69,83,58
  58. 670 data32,32,87,82,73,84
  59. 680 data84,69,78,32,66,89
  60. 690 data32,77,65,82,84,73
  61. 700 data78,32,70,69,78,83
  62. 710 data79,77,69,0,0,255
  63.