10 REM EPSON FX80 FONT MAKER 410 Y=3:RESTORE 480:IF X>11 THEN SOUND 0,0,0,0:RETURN 430 IF Y>9 THEN X=X+1:GOTO 410 470 Y=Y+1:GOTO 430 510 Y=3:RESTORE 580:IF X>11 THEN SOUND 0,0,0,0:POKE 88,TEXTL:POKE 89,TEXTH:POKE 87,0:RETURN 530 IF Y>9 THEN X=X+1:GOTO 510 570 Y=Y+1:GOTO 530 1430 T(X-2)=T(X-2)+64*(Y=3)+32*(Y=4)+16*(Y=5)+8*(Y=6)+4*(Y=7)+2*(Y=8)+(Y=9) 1580 POKE 712,56:POSITION 5,13:? "�����Р����蠱�����濠�ٯΩ� ":GOSUB 2680 1630 IF IN=35 THEN POKE 764,255:POSITION 5,13:? "����Π��Ơ��Р�����Ƞ���� ":GOSUB 2680:GOTO 1970 1670 PRINT #4;E$;CHR$(58);CHR$(0);CHR$(0);CHR$(0); 1720 PRINT #4;E$;CHR$(38);CHR$(0);CHR$(C);CHR$(C);:IF D=0 THEN PRINT #4;CHR$(139); 1725 IF D=1 THEN PRINT #4;CHR$(11); 1735 PRINT #4;CHR$(0);CHR$(0); 1760 PRINT #4;E$;CHR$(37);CHR$(1);CHR$(0); 2590 POSITION 9,0:? "EPSON FX80 FONT MAKER":POSITION 15,1:? "by James Duffin" 2710 ? :? "The ����� �ظ� ���� �����":? " by JAMES DUFFIN":? " is a program which allows you to" 2720 ? "make your own character sets and":? "download them to an Epson FX80 printer"
Back to previous page