home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 2 / 64er_Magazin_Sonderheft_02_86-02_1986_Markt__Technik_de.d64 / listschutz (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  2KB  |  29 lines
  1. 0 rem *********************************
  2. 1 rem *      (c) u. v. gaisberg       *
  3. 2 rem *       am zuckerberg 70        *
  4. 3 rem *       7140 ludwigsburg        *
  5. 4 rem *       tel. 07141/55910        *
  6. 5 rem *********************************
  7. 6 fori=0to340:reada:b=b+a:poke50000+i,a
  8. 7 next i
  9. 8 if b <> 33527 then print"fehler in datas !":end
  10. 9 print"ok !":end
  11. 10 rem datas fuer maschinenprogramm
  12. 11 data169,0,141,32,208,141,33,208,169,1,141,134,2,32,68,229,174,3,8,172
  13. 12 data4,8,192,0,208,7,224,2,176,3,76,206,195,162,0,142,134,2,169,32,32
  14. 13 data210,255,232,224,50,208,246,162,0,189,21,196,157,0,4,232,224,29,208
  15. 14 data245,169,24,157,0,4,232,224,69,208,246,162,0,189,50,196,157,80,4,232
  16. 15 data224,8,208,245,162,0,189,58,196,157,120,4,232,224,8,208,245,162,10
  17. 16 data160,0,24,32,240,255,169,19,162,13,160,4,141,119,2,142,120,2,142,121
  18. 17 data2,142,122,2,132,198,96,162,0,189,99,196,32,210,255,232,224,31,208
  19. 18 data245,96,32,68,229,162,10,160,0,24,32,240,255,162,1,142,134,2,202,189
  20. 19 data66,196,32,210,255,232,224,33,208,245,169,20,162,17,160,255,141,18
  21. 20 data8,142,29,8,140,4,8,162,0,189,130,196,157,32,8,232,224,34,208,245
  22. 21 data96,48,18,5,13,34,148,148,148,148,148,148,148,148,148,148,34,12,12
  23. 22 data9,19,20,19,3,8,21,20,26,26,76,49,19,25,19,50,48,57,56,19,25,19,53
  24. 23 data48,49,52,48,80,82,79,71,82,65,77,77,32,45,32,40,67,41,32,85,46,86
  25. 24 data46,71,65,73,83,66,69,82,71,32,32,49,57,56,52,66,73,84,84,69,32,90
  26. 25 data69,73,76,69,32,48,32,85,78,68,32,49,32,69,78,84,70,69,82,78,69,78
  27. 26 data32,33,169,255,141,4,8,169,131,162,164,141,2,3,142,3,3,76,131,164
  28. 27 data165,2,141,4,8,169,32,162,8,141,2,3,142,3,3,96,0
  29.