0 'QIKSUM.BA by G.W.Flanders [73300,2772] - All Rights Reserved - 09/07/88
1 CLEAR256,56000:FORI=56000TO56126:READD:POKEI,D:NEXT:CALL56000:T=(65536*PEEK(56112))+(256*PEEK(56111))+(PEEK(56110)):PRINT:PRINT"Checksum="T
2 DATA33,147,252,62,32,6,8,205,11,79,205,49,66,205,58,31,33,49,219,205,145,87,17,147,252,6,6,205,100,93,254,13,202,239,218,254,32,218,219,218,231,18,19,5,194,219,218,17,147,252,205,15,34,235,26,254,13,202,17,219,254,10,202,17,219
3 DATA254,26,202,42,219,71,58,46,219,128,50,46,219,220,21,219,19,195,246,218,58,47,219,198,1,50,47,219,220,33,219,201,58,48,219,198,1,50,48,219,201,205,40,78,201,0,0,0,70,105,108,101,32,116,111,32,83,117,109,58,32,34