home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / s85xx / s8501.d64 / m-p-s (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  5KB  |  80 lines
  1. 0 REM  ********************
  2. 1 REM  *       M-P-S      *
  3. 2 REM  *       -----      *
  4. 3 REM  *  K.MOSSAVI       *
  5. 4 REM  *  KIRCHWEG 24     *
  6. 5 REM  *  3008 GARBSEN 1  *
  7. 6 REM  *  TEL.05137/71767 *
  8. 7 REM  ********************
  9. 8 :
  10. 9 :
  11. 10 PRINT"[147]MOMENT BITTE..."
  12. 20 FORI=51200TO52367
  13. 30 READ A:POKEI,A:L=L+A
  14. 40 NEXTI
  15. 50 IFL<>157782THENPRINT"FEHLER IN DATAS !":END
  16. 60 SYS51200
  17. 61 DATA169,0,141,32,208,141,33,208,169,1,141,134,2,169,23,160,200,32,30
  18. 62 DATA171,76,93,204,147,32,32,32,32,32,32,42,42,42,32,77,85,76,84,73,45
  19. 63 DATA80,82,79,71,82,65,77,77,45,83,89,83,84,69,77,32,42,42,42,13,13,32
  20. 64 DATA32,32,32,32,32,32,32,32,32,40,67,41,32,66,89,32,75,46,77,79,83,83
  21. 65 DATA65,86,73,32,32,49,57,56,52,13,13,13,0,169,110,160,200,141,4,3,140
  22. 66 DATA5,3,76,116,164,162,0,160,0,185,0,2,221,190,200,240,17,189,190,200
  23. 67 DATA208,3,76,187,200,185,0,2,232,232,232,76,117,200,232,200,185,0,2,221
  24. 68 DATA190,200,240,5,202,136,76,130,200,232,200,185,0,2,221,190,200,240
  25. 69 DATA7,202,202,136,136,76,130,200,189,215,200,141,185,200,232,189,215
  26. 70 DATA200,141,186,200,76,48,201,76,124,165,79,70,70,83,80,65,83,84,79,68
  27. 71 DATA83,80,82,69,67,68,69,76,69,88,67,0,0,0,0,0,0,241,200,0,48,201,0,127
  28. 72 DATA201,0,120,202,0,78,203,0,36,204,0,99,204,0,255,255,0,169,124,160
  29. 73 DATA165,141,4,3,140,5,3,76,116,164,72,74,74,74,74,32,22,201,170,104,41
  30. 74 DATA15,32,22,201,72,138,32,210,255,104,76,210,255,24,105,246,144,2,105
  31. 75 DATA6,105,58,96,169,36,32,210,255,165,253,32,254,200,165,254,32,254,200
  32. 76 DATA96,169,13,32,210,255,169,1,162,8,133,254,134,253,32,32,201,169,45
  33. 77 DATA32,210,255,165,45,166,46,133,254,134,253,32,32,201,169,32,32,210
  34. 78 DATA255,169,47,32,210,255,169,32,32,210,255,165,46,56,233,8,133,98,165
  35. 79 DATA45,133,99,32,209,189,169,119,160,201,32,30,171,76,116,164,32,66,89
  36. 80 DATA84,69,83,13,0,230,122,230,122,230,122,169,34,32,255,174,174,144,204
  37. 81 DATA172,145,204,232,208,1,200,142,164,201,140,165,201,160,0,185,4,2,201
  38. 82 DATA34,240,16,141,11,240,238,164,201,208,3,238,165,201,200,192,16,208
  39. 83 DATA233,152,24,101,122,133,122,230,122,32,253,174,32,158,183,224,32,144
  40. 84 DATA3,76,72,178,173,164,201,172,165,201,141,213,201,140,214,201,142,11
  41. 85 DATA240,169,1,141,238,201,169,8,141,239,201,173,146,204,174,147,204,141
  42. 86 DATA241,201,142,242,201,173,249,10,141,68,194,238,238,201,208,3,238,239
  43. 87 DATA201,206,241,201,208,3,206,242,201,173,238,201,197,45,208,227,173
  44. 88 DATA239,201,197,46,208,220,174,148,204,172,149,204,173,146,204,142,33
  45. 89 DATA202,140,34,202,141,4,248,232,208,1,200,173,147,204,142,49,202,140
  46. 90 DATA50,202,141,5,248,232,208,1,200,173,241,201,142,65,202,140,66,202
  47. 91 DATA141,6,248,232,208,1,200,173,242,201,142,81,202,140,82,202,141,7,248
  48. 92 DATA232,208,1,200,142,148,204,140,149,204,173,241,201,174,242,201,141
  49. 93 DATA146,204,142,147,204,173,164,201,174,165,201,141,144,204,142,145,204
  50. 94 DATA76,116,164,169,13,32,210,255,169,1,162,240,141,161,202,142,162,202
  51. 95 DATA162,248,142,208,202,162,0,138,141,207,202,72,169,0,32,205,189,32
  52. 96 DATA222,203,120,169,53,133,1,173,1,240,162,55,134,1,88,201,255,208,3
  53. 97 DATA76,61,203,201,32,144,14,32,210,255,238,161,202,208,3,238,162,202
  54. 98 DATA76,155,202,169,34,32,210,255,32,238,203,120,169,53,133,1,173,0,248
  55. 99 DATA133,254,174,207,202,172,208,202,232,208,1,200,142,228,202,140,229
  56. 100 DATA202,173,5,248,133,253,32,247,203,169,45,32,14,204,174,228,202,172
  57. 101 DATA229,202,232,208,1,200,142,1,203,140,2,203,173,6,248,133,254,174,1
  58. 102 DATA203,172,2,203,232,208,1,200,142,22,203,140,23,203,173,7,248,133,253
  59. 103 DATA232,208,1,200,142,207,202,140,208,202,32,247,203,104,168,200,152
  60. 104 DATA72,170,169,13,32,5,204,238,161,202,208,3,238,162,202,76,147,202,169
  61. 105 DATA20,32,210,255,32,210,255,32,210,255,32,210,255,76,116,164,32,84,203
  62. 106 DATA76,116,164,230,122,230,122,230,122,32,158,183,134,251,169,4,133,252
  63. 107 DATA169,0,133,253,162,8,70,252,144,3,24,101,251,106,102,253,202,208,243
  64. 108 DATA165,253,141,136,203,169,248,141,137,203,160,0,120,169,53,133,1,185
  65. 109 DATA0,248,153,150,204,200,192,4,208,245,169,54,133,1,88,173,150,204,141
  66. 110 DATA174,203,173,151,204,141,175,203,169,1,141,177,203,169,8,141,178,203
  67. 111 DATA173,60,197,141,196,10,206,174,203,208,3,206,175,203,238,177,203,208
  68. 112 DATA3,238,178,203,173,174,203,205,152,204,208,226,173,175,203,205,153
  69. 113 DATA204,208,218,173,177,203,133,45,32,28,204,133,46,96,169,46,32,210
  70. 114 DATA255,169,32,32,210,255,169,34,32,210,255,96,169,32,32,210,255,32,210
  71. 115 DATA255,96,169,55,133,1,88,32,32,201,120,169,53,133,1,96,160,55,132,1
  72. 116 DATA88,32,210,255,96,160,55,132,1,88,32,210,255,120,169,53,133,1,96,160
  73. 117 DATA55,132,1,173,178,203,96,32,42,204,76,116,164,169,0,141,144,204,141
  74. 118 DATA148,204,169,240,141,145,204,169,255,141,146,204,169,199,141,147,204
  75. 119 DATA169,248,141,149,204,160,0,169,255,153,0,240,153,0,241,153,0,242,153
  76. 120 DATA0,243,153,0,244,200,208,238,96,32,42,204,76,107,204,32,84,203,169
  77. 121 DATA138,76,231,167,162,1,160,6,24,32,240,255,160,0,169,61,32,210,255
  78. 122 DATA200,192,29,208,248,169,13,32,210,255,32,210,255,32,210,255,32,210
  79. 123 DATA255,76,97,200
  80.