10 REM This program prints out an AMX screen
   20 DEFFNS="AMXprt"
   30 ONERROR CLOSE#0:END
   40 MODE1
   50 PRINT"SELECT 1 OR 2"
   60 PRINT"1. Drawing 1"
   70 PRINT"2. Drawing 2"
   80 A$=GET$
   90 IF A$="1" A$="DRAW1"
  100 IF A$="2" A$="DRAW2"
  110 F%=OPENIN A$
  120 L%=&3000
  130 REPEAT
  140 ?(L%+&FFFF0000)=BGET#F% EOR &FF
  150 L%=L%+1
  160 IFL%MOD&280=0 L%=L%+&80
  170 UNTILEOF#F%
  180 CLOSE#F%
  190 REPEATUNTILGET
  200 REM *GDUMP