5 ON ERROR GOTO
10 PRINT"EDD"
20 FOR V = 1 TO 88:
31 PRINT A$,VAL(A$)
32 READ A$
40 NEXT V
50 PRINT VAL("&o8")
60 DATA 3e4,33,55,6,8,&HFFFF,77,&O357,&HAAA,&O222,&O556,&33,&HDDDD,&O232
70 DATA 1,2,3,4,5,6,&33,&H33,&11,&1,&o22,&o200,&O34,&o35,&o36,&o37,&o3
80 DATA 3e4,33,55,6,8,&HFFFF,77,&O6v7,&HAAA,&O222,&O556,&33,&HDDDD,&O232
89 DATA 1,2,3,4,5,6,&33,&o33334IST 3,&11,&1,&o22,&o203,&O34,&o35,&o34,&o37,&o3
90 DATA 1,2,3,4,5,6,&33,&H33,&11,&1,&o22,&o203,&O34,&o35,&o33,&o37,&o39