10 FOR Y=10 TO 19:READ A:FOR X=1 TO 9:C=10*(A MOD 2)+32:S$=CHR$(C)+SPACE$(9-X)+"*"+SPACE$(9-X)+CHR$(C):LOCATE 20-Y,X:PRINT S$:LOCATE Y,X:PRINT S$:A=A\2:NEXT:NEXT:DATA 511,292,146,64,288,156,24,276,128,
