-
-
Save remy/2cedcc5186c6b25bcb68f74c1181eeff to your computer and use it in GitHub Desktop.
Using an arcade font in nextbasic
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#autoline 10 | |
RUN AT 3 | |
LAYER 2,1 | |
BORDER 0: PAPER 0: INK 255 | |
LOAD "font8.spr" BANK 15 | |
TILE DIM 16,0,59,8 | |
TILE BANK 15 | |
%x=0 | |
%y=0 | |
PROC writeLine("Hello World") | |
%y=%y+2: ; blank line | |
PROC writeLine("Isn't my arcade font fancy!") | |
%y=%y+2: ; blank line | |
PROC writeLine("Now, go do some work :)") | |
PAUSE 0 | |
DEFPROC writeLine(l$) | |
%x=0 | |
%l= LEN (l$) | |
FOR i=1 TO %l | |
PROC writeChar(l$(i)) | |
NEXT i | |
%y=%y+1 | |
ENDPROC | |
DEFPROC writeChar(c$) | |
%i=( CODE c$)-32 | |
IF %i > 63 THEN %i=%i-32: ; we don't have lowercase, so shift down | |
BANK 16 POKE 0,%i | |
TILE 1,1 AT 0,0 TO %x,%y | |
%x=%x+1 | |
ENDPROC |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
"��ȂȂ""����ȂȂȂȂˣȂ�˜Ȃ˜���Ȃ˸ȂȂ˴ȂˬȂˤȂȂȂˣȂ˿ȂȂ�˜˜��˜ȂȂ˸˸Ȃ˴ȂˬˬȂˤȂȂˣˣȂ˜��˜�˜ȂȂˣ˴ȂˣˬˤȂˤˣȂ"�Ȃ�ˣ�ˣ�ˣ˸˴ȂˣˤȂȂȂ˿"˜��Ȃ"�Ȃ�ˣˤȂ"�ˣ˜�ˣˣ"˿Ȃ"˜˜˜ȂȂ��ˣ˸ȂˣˬˬˬȂˤȂȂȂȂȂȂȂ˜�Ȃ˜�Ȃ˸˴ȂˬȂˤȂȂȂȂȂȂȂ"��ˣˣˣȂˣ�Ȃ˜��ˣ�ˣˣˣˤˣȂȂ"��˜�Ȃˣ�Ȃ˜�Ȃ�ˣȂȂˣȂȂȂȂˣ�Ȃ˜�Ȃˣ�ˣȂ˴ˣˤˣȂȂˣ��ˣ��ˣˣˣȂȂȂˣȂˣ"�ȂȂȂ�ˣȂȂ˴ˣˤˣȂȂˣ�Ȃ˜��ˣȂˣȂ˴ˣˤˣȂȂ"�Ȃ˜��ˣˣȂˣ�Ȃ˜��ˣ�˸ˣȂ˴ˣˤˣȂȂˣ�Ȃ˜��ˣ�˸Ȃ˴ˣˤˣȂȂ"�ȂȂ��ȂȂ˿ˣ˜�ˣ˜�ȂȂ˴ȂˬˣȂˤˣˣ���ȂȂȂȂȂȂ˿Ȃ�ȂȂ�ȂȂȂȂȂˣˤȂˣˣˣȂ˜ˣ�˜�˸ˣȂˣȂȂˤȂȂ"��ˣ�ˣ˜�ˣȂˬˣȂˣȂˣ�Ȃ˜��ˣ�ˣȂ˴ˣˣȂȂȂˣ�Ȃ˜��ˣȂˣˣˣˤˣȂȂ"�Ȃ˜ˣ�ˣ�ˣˣˣˣȂȂˣ"�ȂȂȂ�ˣȂȂˣȂȂȂȂ"�ȂȂȂ�ˣȂȂˣˣȂˣˣ�Ȃ˜��ˣȂˣˣ˴ˣˤˣȂȂˣ"�ˣ��ˣ�Ȃ˴ˣˣȂˣȂ"��Ȃˣ�ˣ�ˣˣˣˣˣˣˤȂˣˣ"�˜�ˣ���ˣˣˣˣȂˣȂˣ�ˣ�ˣˣˣˣȂȂȂȂˣ"��������˸˸˴˴ȂˬˣȂˣȂˣ"�����˜�˴ȂˣˤȂˣȂˣ�Ȃ˜��ˣ�ˣˣˣˤˣȂȂˣ�Ȃ˜��ˣ�ˣȂȂˣˣȂˣˣ�Ȃ˜��ˣ�ˣ˴ˬˤȂˣˣˣ�Ȃ˜��ˣ�ˣȂ˴ˣˣȂˣȂˣ�Ȃ˜��ˣˣ˸ˣȂ˴ˣˤˣȂȂȂ˜�Ȃ�Ȃˣ"�ˣ��ˣ�ˣˣˣˤˣȂȂˣ"�ˣ�˜��ˣˣˤˣˣˣ"�˜˜��˜˜�ˣˤȂȂˣ"����˜��ˣˣˣˤȂȂˣ˜����ˣ˸Ȃ"�Ȃ˜�Ȃˣ�ˣˣȂȂȂȂ |
@em00k I thought there were a couple actually in the demo folder. (This was just code to accompany the process of capturing the fonts as tiles - possible and likely the demo folder code is more useful than the code above).
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
There is an example included with NextBasic on the distro, DEMOS/NEXTBASIC/BASICFNT.BAS that uses the Arcade fonts.