0 POKE198,1:POKE631,29
1 INPUT"[147]FILENAME   &[157][157][157]";F$
2 OPEN2,8,2,F$+",U,R
4 CK[178]0:[153]
6 [141]100:[139]ST[167][153]"FILE NOT FOUND!":[128]
8 CK[178]CK[170]A:B[178]A:[141]200
10 [141]100
12 CK[178]CK[170]A:[141]200:[153]"STARTADRESSE"A[172]256[170]B
14 [141]100
16 CK[178]CK[170]A:[141]200:[153]"LAENGE ="A:L[178]A
18 [129]I[178]1[164]L
20 [141]100:CK[178]CK[170]A:[141]200
22 [130]
24 [153]"ERRECHNETE PRUEFSUMME:"CK
26 [141]100:[153]"GELESENE PRUEFSUMME:"A
28 [139]A[179][177]CK[167][153]"   FEHLER   "
30 [153]
32 [139]ST[178]0[167]4
34 [160]2:[128]
100 [161]#2,A$:A[178][198](A$[170][199](0)):[142]
200 [139]CK[177]255[167]CK[178]CK[171]255:[137]200
210 [142]