home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh2x / sh24a.d64 / screensave (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  841b  |  19 lines
  1. 1 REM******      SCREENSAVE      ******
  2. 2 REM
  3. 3 REM         VON: HANS HABERL
  4. 4 REM              BAHNHOFSTR. 3
  5. 5 REM              8018 GRAFING
  6. 6 REM
  7. 10 DATA32,3,178,166,184,32,201,255,152,32,210,255,165,252,32,210,255,169
  8. 20 DATA210,133,248,162,32,36,250,48,2,162,4,36,250,48,12,177,253,32,0,178
  9. 30 DATA145,253,177,251,56,176,14,120,169,52,133,1,177,251,72,169,54,133
  10. 40 DATA1,88,104,32,0,178,145,251,200,208,29,230,252,230,254,202,208,22,240
  11. 50 DATA26,234,32,3,178,166,184,32,198,255,32,207,255,32,207,255,169,207
  12. 60 DATA208,180,234,169,195,36,144,240,183,32,204,255,165,184,32,195,255
  13. 70 DATA76,42,130,108,248,0,32,219,131,32,35,129,160,0,132,251,132,253,165
  14. 80 DATA185,106,106,133,250,48,8,169,216,133,254,169,4,208,2,169,224,133
  15. 90 DATA252,169,255,133,249,96,234
  16. 100 S=0:FORI=45455TO45608:READA:S=S+A:POKEI,A:NEXTI
  17. 110 IFS<>22096THENPRINT"FEHLER IN DATA'S":END
  18. 120 PRINT"OK"
  19.