0MODE0:REM THIS LINE ADDED BY CJR. T
HE REST IS BY L1L
10REM EPSON SCREEN DUMP
15*LOAD 1.PICTURE
20VDU2,1,27,1,51,1,24
30FOR Y=1023 TO 0 STEP -32
40VDU2,1,27,1,75,1,64,1,1
50FOR X=0 TO 1279 STEP 4
60A=0
70FOR B=0 TO 31 STEP 4
80A=A*2
90IF POINT(X,Y-B)>0 A=A+1
100NEXT
110VDU1,A
120NEXT
130VDU1,10
140NEXT
150VDU3