DATA &H00,&HFF,&HFF,&HFF,&HFF,&HFF,&HFF,&H00,&H05,&HE3,&H81,&HA7,&HB8,&H8A,&H00,&H00
DATA &HFF,&HFF,&HFF,&H00,&HE3,&HA7,&H8A,&H00,&H0E,&H03,&H22,&H78,&HA6,&HA1,&H4B,&H24
DATA &HFF,&HFF,&H05,&HA7,&H00,&H0E,&H68,&H78,&H9C,&H4B,&H16,&HBF,&H81,&H01,&H01,&H01
DATA &HFF,&H00,&HA7,&H00,&H03,&H78,&HA1,&H24,&HBF,&H80,&H01,&H01,&H01,&H2A,&H00,&H70
DATA &HFF,&HE3,&H00,&H03,&H2A,&H4B,&H57,&H80,&H01,&H01,&H30,&H00,&H13,&H00,&H00,&H30
DATA &HFF,&HA7,&H0E,&H78,&H4B,&HBF,&H01,&H01,&H01,&H00,&H00,&H1E,&H30,&H41,&H32,&H37
DATA &HFF,&H8A,&H68,&HA1,&H57,&H01,&H01,&H2A,&H30,&H00,&H00,&H41,&H00,&H1E,&H20,&HFC
DATA &H00,&H00,&H78,&H24,&H80,&H01,&H2A,&H70,&H1E,&H30,&H35,&H37,&H20,&HFC,&H4C,&HFA

sum = 0

FOR i = 1 TO 128
READ a
sum = sum + a
NEXT i

PRINT "checksum = "; HEX$(sum)