60 F$="1541.IEEE-DOS"
70 open15,8,15
90 C=5*4096
100 for I=14*4096 to 16*4096-1 step 128
110 print#15,"M-R"chr$(I-int(I/256)*256);chr$(int(I/256));chr$(128)
120 for J=0 to 127:get#15,A$:pokeC,asc(A$+chr$(0)):C=C+1:nextJ
130 print"*";
140 next I:print:print
150 read A:read B
155 if A<5*4096 then stop
160 for I=A to A+B-1:read D:pokeI,D:nextI
170 poke28678,44:poke28704,142:poke28705,64:poke28706,3:sys 7*4096
180 if peek(832)<>224 then print"UEBERTRAGUNGSFEHLER":goto 320
190 print"OVERLAY GESTARTET"
200 restore
210 for L=1 to 10
220 read A,B
230 for I=A to A+B-1:read D:pokeI,D:nextI,L
240 poke2374,8:poke25253,5:poke25257,2:poke25261,20
250 sys7*4096
320 close15
340 data 28672,36
350 data 162,112,134,35,169,31,141,230,110,169,0,133,34,168,162,32,24,198,35
360 data 113,34,200,208,251,202,208,246,105,0,170,73,255,141,230,110,96
380 data 21943,4
390 data 201,69,67,45
410 data 21956,3
420 data 50,48,51
440 data 22400,28
450 data 96,142,1,24,142,3,24,169,206,141,0,24,169,49,141,2,24,169,104,141,0
460 data 28,169,111,141,2,28,96
480 data 22624,526
490 data 162,69,154,169,76,13,0,24,41,237,141,0,24,169,0,141,3,24,169,23,141
500 data 2,24,169,255,141,1,24,173,0,24,41,251,9,3,141,0,24,44,0,24,80,4,48
510 data 249,16,125,169,253,45,0,24,141,0,24,41,8,133,248,173,1,24,73,255,133
520 data 150,169,4,13,0,24,141,0,24,160,0,165,150,41,96,201,64,240,41,201,32
530 data 240,6,201,96,240,47,208,70,165,150,197,119,240,11,201,63,208,2,132
540 data 121,132,123,76,4,233,133,121,132,122,169,32,133,131,133,132,133,123
550 data 208,39,132,122,165,150,197,120,208,229,133,122,132,121,240,232,165
560 data 123,240,21,165,150,133,132,72,41,15,133,131,104,41,240,201,224,208
570 data 5,88,32,192,218,120,44,0,24,80,251,76,124,232,165,121,240,14,169,252
580 data 45,0,24,141,0,24,32,50,233,76,231,235,169,250,45,0,24,9,4,141,0,24
590 data 165,122,240,3,32,220,233,76,231,235,120,169,2,13,0,24,141,0,24,44,0
600 data 24,48,42,112,249,32,7,209,176,5,181,242,106,176,83,165,132,41,240,201
610 data 240,240,75,165,131,201,1,240,19,44,0,24,48,11,80,249,169,251,45,0,24
620 data 141,0,24,96,76,91,232,120,169,253,45,0,24,141,0,24,169,4,13,0,24,141
630 data 0,24,44,0,24,48,231,80,249,173,0,24,41,251,141,0,24,169,2,13,0,24,141
640 data 0,24,44,0,24,48,208,80,249,76,109,233,169,253,45,0,24,141,0,24,41,8
650 data 133,248,173,1,24,73,255,133,133,120,169,4,13,0,24,141,0,24,44,0,24
660 data 48,170,80,249,169,251,45,0,24,141,0,24,88,32,183,207,76,50,233,169
670 data 72,13,0,24,141,0,24,76,231,235,120,32,235,208,176,6,166,130,181,242
680 data 48,1,96,169,89,141,2,24,169,255,141,3,24,173,0,24,9,16,141,0,24,169
690 data 2,44,0,24,48,73,240,249,189,62,2,73,255,141,1,24,181,242,9,183,45,0
700 data 24,141,0,24,173,0,24,48,48,41,6,201,6,240,176,41,2,208,241,88,32,170
710 data 211,120,169,4,44,0,24,48,26,240,249,169,255,141,1,24,169,72,13,0,24
720 data 141,0,24,169,4,44,0,24,48,4,208,249,240,151,76,91,232,173,0,24,9,64
730 data 141,0,24,96,169,2,13,0,24,41,254,141,0,24,96,170,170,170,170,170,170
740 data 170,170,170,170,170,170
760 data 23204,3
770 data32,129,231
790 data 23357,14
800 data 9,16,141,0,24,32,16,255,234,234,234,234,234,234
820 data 23514,22
830 data 234,234,234,234,234,234,234,234,234,234,32,128,231,88,234,234,234,234
840 data  234,234,234,234
860 data 25476,8
870 data 3,133,74,165,34,32,72,255
890 data 28432,72
900 data 173,12,24,9,12,41,253,141,12,24,173,2,24,41,254,141,2,24,173,0,24,41
910 data 3,9,72,133,120,73,96,133,119,173,12,24,9,2,141,12,24,173,0,24,41,238
920 data 141,0,24,173,2,24,9,1,141,2,24,96,208,2,169,44,41,126,73,254,10,5,74
930 data 233,4,133,74,96
