10 REM GEMINI 10X FONT MAKER›15 REM SG-10 MODIFICATION BY CHARLES JACKSON›20 REM (c) 1985, ANTIC PUBLISHING›1700 D=PEEK(CHORG+10*(C-32)):B$(18,18)=CHR$(7):IF D=0 THEN B$(18,18)=CHR$(8)›1702 FOR I=1 TO 9:TMP=USR(ADR(B$),(PEEK(CHORG+10*(C-32)+I))):T(I)=TMP:NEXT I›1720 PRINT #4;E$;CHR$(42);CHR$(1);CHR$(C);CHR$(C);CHR$(9+128*(D=0));›1730 PRINT #4;"";CHR$(T(1));CHR$(T(2));CHR$(T(3));CHR$(T(4));›1735 PRINT #4;CHR$(T(5));CHR$(T(6));CHR$(T(7));CHR$(T(8));CHR$(T(9));"";›2315 DIM B$(27):B$="hhh…Ô)¢ FÔièàÐõ…Ô©…Õ`"›2590 POSITION 11,0:? "ÓÇ±° ÆÏÎÔ ÍÁËÅÒ":POSITION 15,1:? "by James Duffin"›2710 ? :? "The ÓÇ±° Æïîô Íáëåò":? " by JAMES DUFFIN":? " is a program which allows you to"›