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