home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1988 February / 64er_Magazin_88-02_1988_Markt__Technik_de_Side_A.d64 / mse-tipphilfe (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1988-01-01  |  1.2 KB  |  40 lines
  1. 100 rem --- mse-tipphilfe am 128er ---
  2. 110 rem ------------------------------
  3. 120 for l=820 to 1019
  4. 130 read d : poke l,d : p=p+d
  5. 140 next
  6. 150 :
  7. 160 if p<>21212 then print"error":stop
  8. 170 :
  9. 180 poke 56334, 0: rem   interrupt aus
  10. 190 poke 655, 166: poke 656, 3
  11. 200 poke 788,  52: poke 789, 3
  12. 210 poke 56334, 1: rem   interrupt an
  13. 220 end
  14. 230 :
  15. 240 data 169, 64,133,203, 41,  0,141, 47
  16. 250 data 208,  9,255,141,  0,220,205,  1
  17. 260 data 220,240, 66,160, 89,169,251,141
  18. 270 data  47,208, 72,173,  1,220,205,  1
  19. 280 data 220,208,248,162,  8, 10,176,  2
  20. 290 data 132,203,136,192, 65,144,  7,202
  21. 300 data 208,243,104, 74, 16,225,104,173
  22. 310 data 141,  2, 10,201,  8,144,  2,169
  23. 320 data   6,170,189,188,  3,133,245,189
  24. 330 data 189,  3,133,246, 32,155,  3, 32
  25. 340 data 224,234, 32,155,  3,169,255,141
  26. 350 data  47,208, 41,127,141,  0,220,164
  27. 360 data 203,140,196,  3, 76, 49,234,165
  28. 370 data 197,174,196,  3,141,196,  3,134
  29. 380 data 197, 96,165,203,162,  3,221,244
  30. 390 data   3,240,  6,202, 16,248, 76, 72
  31. 400 data 235,189,248,  3,133,203,208,246
  32. 410 data 131,  3,155,  3,155,  3,131,  3
  33. 420 data  64,  8, 56, 53,142, 50, 52, 55
  34. 430 data  49,  0, 69, 70, 17, 13, 54, 57
  35. 440 data  51, 14, 48, 44,145, 17,157, 29
  36. 450 data   3,  9, 56, 53, 24, 50, 52, 55
  37. 460 data  49, 27, 43, 45, 10,141, 54, 57
  38. 470 data  51,142, 48, 58,145, 17,157, 29
  39. 480 data   3,  6,  5,  4, 18, 20, 28, 10
  40.