0 MODE0:REM LINE 0 By CJR. Line 10 BY L1L
   10 INPUT"Mode "m:MODEm:INPUT"$"A$:INPUT"X"X:INPUT"Y"Y:PRINTTAB(X,Y)A$:Y=32-Y-1:Z=16*(1+m):X=X*Z:Y=Y*32:F=10:G=F/(2-m):MOVEX-F,Y-G:DRAWX+Z*LEN(A$)+F,Y-G:DRAWX+Z*LEN(A$)+F,Y+32+G:DRAWX-F,Y+32+G:DRAWX-F,Y-G