OCR na szybko:
10 PRINT "Czytanie danych.": LET d$="": FOR n=100 TO 560 STEP 10
20 LET suma=256
30 READ a: IF a<256 THEN LET suma=suma+a: LET d$=d$+CHR$ a: GO TO 30
40 IF suma<>a THEN PRINT "BLAD W LINII ";n: STOP
50 NEXT n
70 DIM *"START": OPEN #*1;"START";a;1
80 PRINT "Tworzenie pliku START.": FOR a=1 TO LEN d$: PRINT *#1;d$(a): NEXT a: CLOSE #*: CLS : STOP
100 DATA 0,30,0,233,2,233,2,0,0,211,2,249,192,176,34,50,1670
110 DATA 51,55,55,49,34,58,234,253,229,253,33,0,0,207,253,225,2245
120 DATA 33,247,92,17,86,33,237,83,59,33,1,170,2,237,176,195,1957
130 DATA 3,6,0,253,203,1,126,202,130,0,42,93,92,43,126,254,1830
140 DATA 207,194,130,0,225,6,91,205,239,35,62,254,205,29,3,1,2142
150 DATA 22,62,11,17,1,72,213,33,103,33,229,33,134,33,229,205,1688
160 DATA 185,35,0,58,0,33,225,209,254,128,40,11,175,50,100,32,1771
170 DATA 205,197,33,62,145,24,223,6,2,205,185,33,198,3,50,79,1906
180 DATA 33,50,80,33,50,81,33,35,35,35,35,35,62,109,190,32,1164
190 DATA 110,205,185,33,24,238,4,72,205,247,33,62,6,190,32,246,2148
200 DATA 120,201,33,0,32,175,14,32,190,40,11,165,56,4,18,19,1386
210 DATA 14,32,237,160,24,242,27,12,26,254,32,40,249,19,62,1,1687
220 DATA 185,48,13,62,6,18,19,62,17,185,48,4,62,6,18,19,1028
230 DATA 175,18,19,201,33,0,72,175,190,35,32,252,13,32,249,201,1953
240 DATA 175,219,254,230,31,254,31,32,247,205,21,0,40,251,201,58,2505
250 DATA 79,33,79,205,247,33,201,58,79,33,42,80,33,189,201,205,2053
260 DATA 249,35,58,79,33,214,5,205,21,34,205,247,3,35,6,7,1692
270 DATA 197,253,203,87,158,62,3,184,32,11,229,205,26,34,225,56,2221
280 DATA 4,253,203,87,222,205,216,3,35,193,16,228,205,12,34,33,2205
290 DATA 34,34,229,33,103,33,254,11,32,11,205,26,34,254,6,200,1755
300 DATA 61,50,79,33,201,254,10,32,8,205,26,34,60,188,208,24,1729
310 DATA 240,229,254,65,32,6,205,72,35,230,7,1,254,88,32,6,1992
320 DATA 205,72,35,233,2,0,254,71,32,6,205,72,35,236,7,0,1721
330 DATA 254,8,32,13,33,94,0,34,0,32,46,2,205,157,35,7,1208
340 DATA 0,254,86,32,6,205,72,35,86,20,2,254,32,200,254,7,1801
350 DATA 225,193,202,3,6,197,229,87,205,26,34,56,77,188,40,74,2098
380 DATA 122,254,13,32,25,205,211,35,62,12,50,0,33,175,50,2,1537
370 DATA 33,50,77,33,205,193,12,33,180,34,227,205,184,35,254,9,2020
380 DATA 32,5,205,67,35,7,0,254,80,32,5,205,67,35,20,1,1306
390 DATA 254,85,32,5,205,67,35,20,0,254,73,32,5,205,67,35,1630
400 DATA 20,3,254,69,40,9,254,76,40,5,225,225,195,79,34,245,2029
410 DATA 205,237,35,205,18,34,205,247,3,241,254,69,32,25,62,210,2338
420 DATA 205,51,0,175,205,51,0,205,3,34,254,89,194,209,35,205,2171
430 DATA 51,0,205,67,35,4,1,205,211,35,205,78,35,241,5,0,1634
440 DATA 205,211,35,24,85,205,237,35,33,0,32,227,126,35,227,229,2202
450 DATA 205,51,0,205,49,0,225,14,1,229,62,143,119,35,62,32,1688
480 DATA 119,35,175,119,43,43,227,229,197,1,33,22,237,67,136,92,2031
470 DATA 205,247,3,205,3,34,230,127,193,225,227,254,13,40,22,43,2327
480 DATA 13,40,6,254,32,40,211,56,8,12,35,119,121,254,96,48,1601
490 DATA 201,35,12,24,197,175,119,227,225,35,125,205,149,3,227,126,2341
500 DATA 35,227,50,0,33,175,50,2,33,227,126,35,227,205,100,3,1784
510 DATA 205,172,3,48,251,58,2,33,183,225,200,33,33,19.34,136,1891
520 DATA 92,175,50,44,33,33,13,33,205,247,3,205,3,34,225,201,1852
530 DATA 205,18,34,17,0,32,205,200,33,33,9,32,126,254,32,40,1526
540 DATA 3,43,54,46,175,46,12,119,35,201,6,72,33,0,64,54,1219
550 DATA 0,35,124,184,32,249,33,33,24,34,136,92,201,13,0,10,1456
560 DATA 2,0,207,13,0,20,2,0,226,13,0,30,2,0,247,13,1031