1 OPEN1,8,15,"S:VUOKATTI":CLOSE1:OPEN1,8,1,"VUOKATTI":L=9
2 L=L+1:C=0:READA$,D:IFA$=""THENCLOSE1:PRINT"NO ERRORS":END
3 FORA=1TO63STEP2:B=(ASC(MID$(A$,A,1))-66)*16+ASC(MID$(A$,A+1,1))-66:C=C+B
4 PRINT#1,CHR$(B);:NEXT:IFC<>DTHENPRINT"ERROR IN LINE"L:CLOSE1:END
5 GOTO2
10 DATABCCBBMCBBCBBKPEFECEBEIBBLDBBFNHBCCGNGLIQIQGQGGGHGLGNGPGHGBBCBGGB,1988
11 DATAGBCGBGBGCGOGLGLKBMDILGDFHBFCBGCGGGGFGPGQGIGIGGGHGHGJILIHGFGFGBGC,2563
12 DATAFCCGJGNGNGOGKGLGDKBMLILCDCFGFGBGCGGFGDGEGEGIGHGLHJPBOLFLFJGCGCGB,3246
13 DATAGFCGMGQGOGOGGGKGKGDGLOKOCGCGBGFGFCGFGBGBGFGIGLHLPBOJGLCJBKFCGBGF,3291
14 DATAGGEGLGQOQOQGGGKGLGEGMGKGBGFBGBBGBGFGFGFGFFFFHLFLFPFPFLFIGIGPGQGG,3180
15 DATAGGGGFGBGCGGGGGLGLOKOKGQGNCJCBGBGGGGMFDDGKGGGHGLKLLLLHLGLGGGGGGGG,3315
16 DATAGGBBGHGGGGGGGGGHLLLLLLKGGGGGGGGGGGPGJKGDHFLJLKLLLLLKGGGGGGGGGGGG,3585
17 DATAGGGJHEFPNKEGDGCHCHDMEMEQBNNBIBGGGGEKNOMDHEGNLJLNQNNBBBBBBBBEBPGG,2853
18 DATAGGGGGGGHGIGJGCGCGDGBGJGNHDICFKFGFHFGJODBCFGGGKLLDJDJLHGHGGGGGLLL,2811
19 DATALKGGGGKGCGEGJGFGJGBGDGEGJKFOHCKCLCFJFBFDJKNGDGCGCGCHCLCJDBBCBKGF,2422
20 DATAGFLKHKGLGGGGGHGHGLGJLJEMBLEDEBNQBBDCBCICHCGDGEKJKFLFDJDJBJBBDBNG,2700
21 DATABGIJLKBMKOBBKHKOBBKILKGGKOBBCJJGBGFLJGBDJGBCMOPICDKOCBJQLKJBKOBB,3044
22 DATABDKOBBBEBLKGBBJLBLLJMOQJJBKKQCCJKKQDCJPJOBNNLDHJPNBFKBOBQMLBJIDB,4119
23 DATAHBCELGBFFLFLLLLGBCQBHBCJIOQMCENKDBMBBDLKDBNGBDKBBDPKBCJGBCFLFLHK,3101
24 DATAONJOBOKBMOQICECJHGBGNKQOKBBHLBBQLKBBQBBJNKMBKBBHLBBBLKMBJFBFJGBG,3605
25 DATALBDBLHBFQBBJLKQIDBCKCDOBBCNLPBBQQBBJLKPQDBCKCDOBBCPJJHBFLGBBEJPG,3511
26 DATABCJGBBKBHBDBBGCEFNKGCCDBDCCDLKPQLBBCDBCKCDOBPGFNBMCBJODBKCKJDODC,2487
27 DATAKCHBLFBJLHBKPNOPCEQBBFMBBIKBBMNNOOCEKBBHJPOPCEJNOOCEJLLDBCDBFICD,3426
28 DATALDBILOOPCELNOOCEJHBLDBFOCDKJFJFLFLFLFLDBGHCDHJDKBQBKKBKONHBDLGBL,2767
29 DATAKONHKHPJHBQJLGBCFLFLFLFLFLHGBJJGBJLGBKKBBHPHBDHKBBJGBKOJLDBBMOCB,3253
30 DATABDKOQJBCMOCBKHKOQJKGPJOBQCLGBBDBBGCELDBBMOCBBEKOQJBDMOCBKIKOQJKH,3907
31 DATAPJOBQCLDCJLKJBKOOQBELKBMKOOQKINLOBQELHBEQBBHLBBBJFBEQBDCDBJJCENG,4278
32 DATABDMBFBDBJJCEDKBNOBBDBKBNLJDBJJCEDKBQJGQQDBJJCEDKBGEJHGQQLLMKPICE,2762
33 DATAKOPBKIKOPCKIEBBEKOPDKIMKPJCEKOPBBEMKPKCEKOPCBEMKPLCEKOPDBENBBNOB,4528
34 DATABDJHBEFNKGCCDBMHCELBGQLKGGKKCBCJJJCBQLLGBFBLBLBLDKPBLJLGBBFLFLFL,2737
35 DATAFLFKBQLLLGBGFLDKBEJGBHLKBQJGBIMKCBCBKOCBCJMKDBCBKOEBCJLGBHQBCLJG,2529
36 DATAQQEJIPCBCJIPEBCJIPGBCJCJIPCBCJIPEBCJIPGBCJNHQQOBPJPJNJNHBICBOBLB,3437
37 DATAJCLDBELGBHOBBCNLJHBILGBGFLFLFLLLMOHBBDDBKBCEKOHBBDNJMOIJBDDBKBCE,3022
38 DATAKOIJBDNJPJNHBIOBPILGQPPODFKCJGQPHBEBDDNKBPKBBPFJLKCBJGBFLKBBJGBC,3827
39 DATAJOBOKBHJHBLKIQJGBCLGBFNKBJLKBQMBBDLKBBJGBFKJHBFLFLFLFLCJHKBDFLLJ,2891
40 DATAMBBIDBNJCENPBCKBHBJNBCKBJJNNBFKBOBQMLBBMJJOBQOHBBLBCKJDKBBJNBBBB,3321
41 DATABBBBBBBBBBBBJCBKBOCECFCGJQBPBQJBBMBMBNBOBOCBCCCDQPQQBCBDQQBCBCQQ,1646
42 DATA"",0
