0 REM
100 REM"[141][142]
102 [143]"(null)TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANRIGHT$
103 REM"[221]         WRITTEN BY          [221]
104 [143]"(null)RALPH GAUER                  (null)
105 REM"[221]WEILERSTR. 8                 [221]
106 [143]"(null)7968 WILFERTSWEILER          (null)
107 REM"[171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]
108 [143]"(null)DATUM: 17. JUNI 1987         (null)
109 REM"[202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]
110 [153]"LOAD"[199](142):[151]53280,0:[151]53281,0
112 [143]                                 ************* ENTSCHEIDUNG *************
114 GG$(0)[178]"GANZE DISKETTE FORMATIERENWAIT"
116 GG$(1)[178]"NUR SPUR 36-41 FORMATIERENWAIT"
118 GG[178]0:[153]GG$(0);GG$(1)
120 [153]"AUSWAHL MIT CURSORTASTEN UND [RETURNWAIT]"
122 [153]""GG$(GG)
124 [146]198,1:[161]GG$
126 [139]GG$[178][199](13)[167]136
128 [139]GG$[178]""[167][139]GG[178]0[167][153]GG$(GG):GG[178]1:[137]122
130 [139]GG$[178]"ON"[167][139]GG[178]1[167][153]GG$(GG):GG[178]0:[137]122
132 [137]124
134 [143]                                 ************* INITIALISIERUNG **********
136 [159]1,8,15,"UI"
138 [150][165]HI(X)[178][181](X[173]256):[150][165]LO(X)[178][181](X[171][165]HI(X)[172]256)
140 [145]GG[137]200
142 [143]                                 ************* NORMAL FORMATIEREN *******
144 I$[178]"":[153]I$"                                        ";
146 II$[178]I$[170]"DISKETTENNAME: ":[153]II$"                WAIT"
148 [153]II$"TAN";:NA$[178]""
150 [146]198,1:[161]O$:[151]198,0
152 [139]O$[178][199](13)[175]NA$[179][177]""[167]164
154 [139]O$[178][199](20)[176]O$[178]"CMD"[167]146
156 [139][198](O$)[177]31[175][198](O$)[179]128[175][195](NA$)[179]16[167]NA$[178]NA$[170]O$
158 [139][198](O$)[177]159[175][195](NA$)[179]16[167]NA$[178]NA$[170]O$
160 [153]II$""NA$"WAIT";:[139][195](NA$)[179]16[167][153]"TAN";
162 [137]150
164 [153]II$NA$"               ":[153]II$"TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB("
166 I$[178]"":[153]I$"                                        ";
168 II$[178]I$[170]"DISKETTEN-ID: ":[153]II$"     WAIT"
170 [153]II$"TAN";:DI$[178]""
172 [146]198,1:[161]O$:[151]198,0
174 [139]O$[178][199](13)[175]DI$[179][177]""[167]DI$[178]DI$[170]"    ":DI$[178][200](DI$,5):[137]186
176 [139]O$[178][199](20)[176]O$[178]"CMD"[167]168
178 [139][198](O$)[177]31[175][198](O$)[179]128[175][195](DI$)[179]5[167]DI$[178]DI$[170]O$
180 [139][198](O$)[177]159[175][195](DI$)[179]5[167]DI$[178]DI$[170]O$
182 [153]II$""DI$"WAIT";:[139][195](DI$)[179]5[167][153]"TAN";
184 [137]172
186 [153]II$DI$:[153]II$"TAB(TAB(TAB(TAB(TAB(":ID$[178][200](DI$,2)
188 [152]1,"N:"[170]NA$[170]","[170]ID$
190 [159]2,8,2,"#2"
192 [152]1,"U1"2;0;18;0
194 [152]1,"B-P"2;162:[152]2,DI$;
196 [152]1,"U2"2;0;18;0:[160]2
198 [143]                                 ************ VORBEREITUNG **************
200 [152]1,"M-W"[199](81)[199](0)[199](1)[199](255):[152]1,"I"
202 [152]1,"M-W"[199](8)[199](0)[199](2)[199](36)[199](0)
204 [143]                                 ************ UEBERTRAGUNG **************
206 [129]X[178]1024[164]1024[170]32:[135]A:[152]1,"M-W"[199]([165]LO(X))[199]([165]HI(X))[199](1)[199] (A)
208 [130]
210 [143]                                 ************ FORMATIERE ****************
212 [152]1,"M-W"[199](1)[199](0)[199](1)[199](224)
214 [143]                                 ************ WARTEN ********************
216 [152]1,"M-R"[199](1)[199](0)[199](1):[161]#1,A$:[139][198](A$[170][199](0))[177]127[167]216
218 [143]                                 ************ FORMAT-DATAS **************
220 [131]165, 81,201,255,240, 24,165, 81,201,  1,208,  6,169, 18,133, 81,133, 34
222 [131]165, 81,201, 25,208,  6,169, 36,133, 81,133, 34, 76,199,250
224 [143]                                 ************ TWO BUMPS *****************
226 [129]BU[178]1[164]2:[152]1,"M-W"[199](0)[199](0)[199](1)[199](192)
228 [152]1,"M-R"[199](0)[199](0)[199](1):[161]#1,A$:[139][198](A$[170][199](0))[177]127[167]228
230 [130]
232 [143]                                 ************ SPURSCHALTPROGRAMME *******
234 [137]254
236 [152]1,"M-W"[199](6)[199](0)[199](2)[199](1)[199](0)
238 [152]1,"M-W"[199](0)[199](0)[199](1)[199](128)
240 [152]1,"M-R"[199](0)[199](0)[199](1):[161]#1,A$:[139][198](A$[170][199](0))[177]127[167]240
242 [142]
244 [141]236:[152]1,"M-W"[199](6)[199](0)[199](2)[199](36)[199](0)
246 [152]1,"M-W"[199](0)[199](0)[199](1)[199](176)
248 [152]1,"M-R"[199](0)[199](0)[199](1):[161]#1,A$:[139][198](A$[170][199](0))[177]127[167]248
250 [142]
252 [143]                                 ************ DIRECTORY GENERATOR *******
254 [141]236:[159]2,8,2,"#2"
256 [152]1,"U1"2;0;18;0
258 [129]X[178]4[164]71:[152]1,"B-P"2;X
260 [152]2,[199](0);:[130]
262 [152]1,"B-P"2;72:[152]2,[199](17)[199](252)[199](255)[199](7);:
264 [129]X[178]76[164]95[169]4:[152]1,"B-P"2;X
266 [152]2,[199](19)[199](255)[199](255)[199](7);:[130]
268 [129]X[178]96[164]143:[152]1,"B-P"2;X
270 [152]2,[199](0);:[130]
272 [152]1,"B-P"2;162:[152]2,"OBEN ";
274 [141]244:[152]1,"U2"2;0;18;0
276 [141]236
278 [143]                                 ************ TEXT GENERIEREN ***********
280 [152]1,"U1"2;0;18;1
282 [141]244
284 [129]X[178]0[164]255:[152]1,"B-P"2;X:[152]2,[199](0);:[130]
286 [152]1,"B-P";2;0
288 [152]2,[199](0)[199](255)[199](192)[199](0)[199](0)"NICHT VALIDIEREN";
290 [152]1,"U2"2;0;18;1
292 [160]2:[141]236:[152]1,"I"
294 [143]                                 ************ DISKSWITCH C000 ***********
296 [159]2,8,2,"DISKSWITCH C000,P,W"
298 [132]1,A,B$,C,D:[139]A[179][177]0[167][160]2:[160]1:[153]A;B$;C;D:[128]
300 [152]2,[199]([165]LO(49152))[199]([165]HI(49152));
302 [129]X[178]0[164]195:[135]A:[152]2,[199](A);:[130]
304 [160]2
306 [132]1,A,B$,C,D:[139]A[179][177]0[167][160]2:[160]1:[153]A;B$;C;D:[128]
308 [143]                                 ************ DISKSWITCH 033C ***********
310 [159]2,8,2,"DISKSWITCH 033C,P,W"
312 [132]1,A,B$,C,D:[139]A[179][177]0[167][160]2:[160]1:[153]A;B$;C;D:[128]
314 [152]2,[199]([165]LO(828))[199]([165]HI(828));
316 [129]X[178]0[164]195:[135]A:[152]2,[199](A);:[130]
318 [160]2
320 [143]                                 ************ ENDE **********************
322 [132]1,A,B$,C,D:[153]A;B$;C;D
324 [160]1
326 [143] VON 49152 BIS 49347             ************ DS C000 DATA **************
328 [131]169, 11,141, 24,  3,169,192,141, 25,  3, 96,120,169,161,141, 24,  3
330 [131]169,  2,133,183,169, 20,133,184,169, 15,133,185,169,  8,133,186,169
332 [131]193,133,187,169,192,133,188, 32,192,255,169, 20, 32,195,255,173,162
334 [131]192,240, 11, 32,109,192,169,  0,141,162,192, 76,142,192, 32, 76,192
336 [131]169,  1,141,162,192, 76,142,192,169,  9,133,183,169,163,133,187, 32
338 [131]192,255,169, 20, 32,195,255,169,  8,133,183,169,171,133,187, 32,192
340 [131]255,169, 20, 32,195,255, 96,169,  9,133,183,169,178,133,187, 32,192
342 [131]255,169, 20, 32,195,255,169,  8,133,183,169,186,133,187, 32,192,255
344 [131]169, 20, 32,195,255, 96,169,  2,133,183,169,193,133,187, 32,192,255
346 [131]169, 20, 32,195,255, 32,  0,192, 64,  1, 77, 45, 87,  6,  0,  2, 36
348 [131]  0, 77, 45, 87,  0,  0,  1,176, 77, 45, 87,  6,  0,  2,  1,  0, 77
350 [131] 45, 87,  0,  0,  1,128, 73, 68, 78
352 [143] VON 828 BIS 1023                ************ DS 033C DATA **************
354 [131]169, 71,141, 24,  3,169,  3,141, 25,  3, 96,120,169,221,141, 24,  3
356 [131]169,  2,133,183,169, 20,133,184,169, 15,133,185,169,  8,133,186,169
358 [131]253,133,187,169,  3,133,188, 32,192,255,169, 20, 32,195,255,173,222
360 [131]  3,240, 11, 32,169,  3,169,  0,141,222,  3, 76,202,  3, 32,136,  3
362 [131]169,  1,141,222,  3, 76,202,  3,169,  9,133,183,169,223,133,187, 32
364 [131]192,255,169, 20, 32,195,255,169,  8,133,183,169,231,133,187, 32,192
366 [131]255,169, 20, 32,195,255, 96,169,  9,133,183,169,238,133,187, 32,192
368 [131]255,169, 20, 32,195,255,169,  8,133,183,169,246,133,187, 32,192,255
370 [131]169, 20, 32,195,255, 96,169,  2,133,183,169,253,133,187, 32,192,255
372 [131]169, 20, 32,195,255, 32, 60,  3, 64,  1, 77, 45, 87,  6,  0,  2, 36
374 [131]  0, 77, 45, 87,  0,  0,  1,176, 77, 45, 87,  6,  0,  2,  1,  0, 77
376 [131] 45, 87,  0,  0,  1,128, 73, 68,  0