home *** CD-ROM | disk | FTP | other *** search
/ C64'er / C64'er.iso / 85xx / 8506.d64 / mps802_data (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  3KB  |  47 lines
  1. 10 READA :I=I+1:S=S+A:PRINTI,A,S:IFA =-1 THEN 30
  2. 20 GOTO10
  3. 30 IF S<>79150 THEN PRINT"FEHLER IN DATAS":END
  4. 40 IF I<>668 THEN PRINT"ANZAHL DATAS FALSCH":END
  5. 50 PRINT"OK!"
  6. 60 LB=00:HB=13
  7. 70 OPEN2,8,2,"HI-PRINT MPS 802,P,W"
  8. 80 PRINT#2,CHR$(LB);CHR$(13)
  9. 90 RESTORE
  10. 100 READA$:IFA$="-1" THEN PRINT"SPEICHERN OK":GOTO 120
  11. 110 GOTO 100
  12. 120 CLOSE2:END
  13. 32000 DATA133,91,169,100,162,4,160,0,32,8,14,169,106,162,4,160,6,32,8,14,162
  14. 32001 DATA106,32,201,255,169,20,32,210,255,162,100,32,201,255,169,141,32,210
  15. 32002 DATA255,169,105,162,4,160,5,32,8,14,165,91,10,144,3,76,134,14,165,91,41
  16. 32003 DATA7,162,2,32,19,14,169,20,133,251,165,91,41,192,240,16,165,91,74,74,74
  17. 32004 DATA41,7,162,0,32,19,14,169,0,133,251,169,0,141,61,3,32,45,14,32,102,14
  18. 32005 DATA240,41,162,105,32,201,255,162,0,189,62,3,32,210,255,232,224,8,208,245
  19. 32006 DATA169,13,32,210,255,162,100,32,201,255,32,116,14,169,254,32,210,255,169
  20. 32007 DATA141,32,210,255,24,165,94,105,8,133,94,144,2,230,95,32,225,255,240,63
  21. 32008 DATA238,61,3,173,61,3,201,40,208,181,165,91,41,192,240,24,165,94,166,92
  22. 32009 DATA133,92,134,94,165,95,166,93,133,93,134,95,165,251,73,40,133,251,208
  23. 32010 DATA146,162,100,32,201,255,169,13,32,210,255,238,60,3,173,60,3,201,25,240
  24. 32011 DATA3,76,92,13,169,105,32,195,255,162,106,32,201,255,169,36,32,210,255
  25. 32012 DATA162,100,32,201,255,169,141,32,210,255,169,106,32,195,255,32,204,255
  26. 32013 DATA169,100,32,195,255,96,32,186,255,169,0,32,189,25576,192,255,160,6
  27. 32014 DATA217,150,31,240,3,136,208,248,169,0,149,92,141,60,3,24,105,32,136,16
  28. 32015 DATA251,149,93,96,120,169,52,133,1,162,0,138,157,62,3,232,224,8,208,248
  29. 32016 DATA169,128,133,96,160,0,177,94,162,0,10,144,10,72,189,62,3,5,96,157,62
  30. 32017 DATA3,104,232,224,8,208,238,70,96,200,192,8,208,227,169,55,133,1,88,96
  31. 32018 DATA162,0,138,221,62,3,208,5,232,224,8,208,246,96,24,165,251,109,61,3,170
  32. 32019 DATA240,8,169,32,32,210,255,202,208,250,96,165,91,41,7,162,0,32,19,14,133
  33. 32020 DATA95,169,0,133,94,133,251,133,89,133,90,169,192,149,252,74,74,232,224
  34. 32021 DATA4,208,247,169,0,141,61,3,32,45,14,165,90,240,17,162,0,189,62,3,10,10
  35. 32022 DATA10,10,157,62,3,232,224,8,208,241,32,98,15,76,214,14,162,0,189,74,3
  36. 32023 DATA157,70,3,232,224,4,208,245,32,141,15,240,47,162,105,32,201,255,162
  37. 32024 DATA0,189,70,3,32,210,255,189,70,3,32,210,255,232,224,4,208,239,169,13
  38. 32025 DATA32,210,255,162,100,32,201,255,32,116,14,169,254,32,210,255,169,141
  39. 32026 DATA32,210,255,32,225,255,208,3,76,225,13,238,61,3,165,89,73,8,133,89,208
  40. 32027 DATA172,24,165,94,105,8,133,94,144,2,230,95,173,61,3,201,80,240,3,76,171
  41. 32028 DATA14,162,100,32,201,255,169,13,32,210,255,165,90,73,25,133,90,165,94
  42. 32029 DATA166,92,133,92,134,94,165,95,166,93,133,93,134,95,238,60,3,173,60,3
  43. 32030 DATA201,50,240,3,76,166,14,76,225,13,169,0,170,168,157,70,3,232,224,8,208
  44. 32031 DATA248,170,185,62,3,10,144,11,72,24,185,70,3,117,252,153,70,3,104,232
  45. 32032 DATA224,4,208,237,162,0,200,192,8,208,227,96,162,0,138,221,70,3,208,5,232
  46. 32033 DATA224,4,208,246,96,-1
  47.