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