home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / s85xx / s8504a.d64 / centron.(lang) (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  5KB  |  85 lines
  1. 100 PRINT"      *****************************
  2. 101 [153]"      *                           *
  3. 102 PRINT"      *     SEIKOSHA GP-550 A     *
  4. 103 [153]"      *  CENTRONICS-SCHNITTSTELLE *
  5. 104 PRINT"      *       AM USER-PORT        *
  6. 105 [153]"      *                           *
  7. 106 PRINT"      *      AUSDRUCK ALLER       *
  8. 107 [153]"      *       STEUER-UND          *
  9. 108 PRINT"      *      GRAFIKZEICHEN        *
  10. 109 [153]"      *                           *
  11. 110 PRINT"      *         FLEXIBLE          *
  12. 111 [153]"      *         HARDCOPY          *
  13. 112 PRINT"      *                           *
  14. 113 [153]"      *          - - -            *
  15. 114 PRINT"      *                           *
  16. 115 [153]"      *      ERWEITERUNG DER      *
  17. 116 PRINT"      * CENTRONICS-TREIBERROUTINE *
  18. 117 [153]"      *   VON H.EYSSELE - 7/84    *
  19. 118 PRINT"      *                           *
  20. 119 [153]"      *****************************
  21. 120 PRINT
  22. 121 PRINT"          LANGE PROGRAMMVERSION [146]
  23. 122 [153]"               BEINHALTET
  24. 123 PRINT"        CENTRONICS-TREIBERROUTINE
  25. 124 [153]"        VON H.EYSSELE - HEFT 7/84 ON
  26. 125 :
  27. 126 FOR I= 51456 TO 52350
  28. 127 READ X:POKEI,X:S=S+X:NEXT
  29. 128 DATA 169, 90,160,201,141, 26,  3,140, 27,  3,169,145,160,201,141, 28,  3
  30. 129 DATA 140, 29,  3,169,173,160,201,141, 30,  3,140, 31,  3,169,200,160,201
  31. 130 DATA 141, 32,  3,140, 33,  3,169,227,160,201,141, 38,  3,140, 39,  3,169
  32. 131 DATA 255,141,  3,221,173,  2,221,  9,  4,141,  2,221, 96, 72,169, 16, 44
  33. 132 DATA  13,221,240,251,104,141,  1,221,173,  0,221,  9,  4,141,  0,221, 41
  34. 133 DATA 251,141,  0,221, 96,166,184,240,  5, 32, 15,243,208,  3, 76,254,246
  35. 134 DATA 166,152,224, 10,144,  3, 76,251,246,230,152,165,184,157, 89,  2,165
  36. 135 DATA 185,  9, 96,157,109,  2,165,186,157, 99,  2,201,  4,240,  4,201, 16
  37. 136 DATA 144,  2, 24, 96,201,  0, 76,119,243, 32, 20,243,240,  2, 24, 96, 32
  38. 137 DATA  31,243,138, 72,165,186,201, 16,176,  7,201,  4,240,  3, 76,157,242
  39. 138 DATA  76,241,242, 32, 15,243,240,  3, 76,  1,247, 32, 31,243,165,186,201
  40. 139 DATA   4,240,  4,201, 16,144,  3, 76, 10,247, 76, 25,242, 32, 15,243,240
  41. 140 DATA   3, 76,  1,247, 32, 31,243,165,186,201,  4,240,  4,201, 16,144,  3
  42. 141 DATA  76,117,242, 76, 91,242, 72,133,158,165,154,201, 16,176,  7,201,  4
  43. 142 DATA 240,  3, 76,205,241,152, 72,138, 72,165,158,164,154,192, 16,208,  6
  44. 143 DATA  32, 64,201, 24,144, 31,192, 17,208,  6, 32, 92,202, 24,144, 21,192
  45. 144 DATA   4,240,  4,192, 18,208,  6, 32, 43,202, 24,144,  7,192, 19,208,  3
  46. 145 DATA  32, 68,202,104,170,104,168,104, 24, 96,201, 65,144, 18,201, 95,176
  47. 146 DATA   4,  9, 32,208, 10,201,193,144,  6,201,222,176,  2, 41,127, 76, 64
  48. 147 DATA 201,201,255,240, 24,201, 96,176,  3, 76, 64,201,233, 64, 16,  2,233
  49. 148 DATA  64,160,208,132,  6, 76,196,202,201,255,208,  6,162, 94,160,208,208
  50. 149 DATA  91, 72,164,185,192,255,208,  2,230,185, 41,127,201, 32,144, 44,168
  51. 150 DATA 165,185, 41,  1,240, 16,104,201,160,144,  4,201,192,144,  3, 76, 43
  52. 151 DATA 202,233, 64,208, 14,104,201, 96,176,  3, 76, 64,201,233, 64, 16,  2
  53. 152 DATA 233, 64,160,208,132,  6, 76,196,202,104, 36, 15, 48,  3, 76, 64,201
  54. 153 DATA  24,105, 64, 48,  2,105, 64,170,165,185, 41,  2,208,113,160,208,165
  55. 154 DATA 185, 41,  1,240,  2,160,216,132,  6,138,168,169,  0,162,  7,157,192
  56. 155 DATA   2,202, 16,250,152, 74, 74, 74, 74, 74, 24,101,  6,133,  6,152, 10
  57. 156 DATA  10, 10,133,  5,169,  1,133,  3,120,165,  1, 41,251,133,  1,160,  7
  58. 157 DATA 177,  5,133,  2,162,  7,  6,  2,144,  8,189,192,  2,  5,  3,157,192
  59. 158 DATA   2,202, 16,241,  6,  3,136, 16,230,165,  1,  9,  4,133,  1, 88,162
  60. 159 DATA   0,189,210,203, 32, 64,201,232,224,  5,208,245,162,  7, 76,215,203
  61. 160 DATA  32, 64,201,202, 16,247, 24, 96,224,213,144,  1,202,138, 41,127,201
  62. 161 DATA  80,144,  2,233,  3,201, 69,144,  2,233,  3,201, 65,144,  2,233, 33
  63. 162 DATA 201, 28,144,  2,233,  8,201, 17,144,  2,233, 11, 56,233,  4,170,169
  64. 163 DATA  60, 32, 64,201,160,255,202,240,  8,200,185,122,203, 16,250, 48,245
  65. 164 DATA 200,185,122,203, 48,  6, 32, 64,201, 24,144,244, 41,127, 32, 64,201
  66. 165 DATA 169, 62, 76, 64,201, 87, 72,212, 67, 82,196, 82, 79,206, 72, 79,205
  67. 166 DATA  82, 69,196, 67, 82,210, 71, 82,206, 66, 76,213, 79, 82,199, 70,177
  68. 167 DATA  70,179, 70,181, 70,183, 70,178, 70,180, 70,182, 70,184, 66, 76,203
  69. 168 DATA  67, 82,213, 82, 79,198, 67, 76,210, 66, 82,206, 72, 82,212, 71, 82
  70. 169 DATA 177, 71, 82,178, 72, 71,206, 72, 66,204, 71, 82,179, 80, 85,210, 67
  71. 170 DATA  82,204, 89, 69,204, 67, 89,206, 27, 71, 48, 48, 56,169,128,133,151
  72. 171 DATA 169,  0,168,133,251,189,192,  2,133,252,165,252, 37,151,240,  7,165
  73. 172 DATA 251, 25,119,204,133,251,200, 24, 70,151,176,  2,144,235,165,251, 76
  74. 173 DATA  32,203,169, 27, 32, 64,201,169, 57, 32, 64,201,169,  0,160, 32,133
  75. 174 DATA 253,132,254,162, 25,160,  4,185,114,204, 32, 64,201,136, 16,247,169
  76. 175 DATA  40,133, 21,169,128,133,151,169,  0,133, 20,160,  7,169, 52,120,133
  77. 176 DATA   1,177,253, 37,151,240,  7,165, 20, 25,119,204,133, 20,136, 16,240
  78. 177 DATA 169,  2,133,251,169,255, 56,229, 20,160, 55,132,  1, 88, 32, 64,201
  79. 178 DATA  24, 70,251,144,238, 70,151,144,203,165,253,105,  7,133,253,144,  2
  80. 179 DATA 230,254,198, 21,208,185,169, 10, 32, 64,201,202,208,162, 96, 48, 52
  81. 180 DATA  54, 71, 27,  1,  2,  4,  8, 16, 32, 64,128
  82. 181 IF S<> 103481 THEN PRINT"[147][155]FEHLER IN DATAS !!":END
  83. 182 PRINT "[145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][155]OK"
  84. 183 SYS51456
  85.