Home
JAQForum Ver 20.06
Log In or Join  
Active Topics
Local Time 22:17 21 Apr 2024 Privacy Policy
Jump to

Notice. New forum software under development. It's going to miss a few functions and look a bit ugly for a while, but I'm working on it full time now as the old forum was too unstable. Couple days, all good. If you notice any issues, please contact me.

Forum Index : Microcontroller and PC projects : Fonts for Mites

     Page 2 of 2    
Author Message
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 07:06am 13 Sep 2023
Copy link to clipboard 
Print this post

PET Style Fontset




' font_ PET Style Martin Herhaus
' Font type    : Full (160 Characters)
' Font size    : 8x8 pixels
' Memory usage : 1280
DefineFont #9
A0200808
00000000 00000000 08080808 00080000 00242424 00000000 247E2424 0024247E
1C281E08 00083C0A 08646200 00462610 30484830 003A444A 00100804 00000000
10100804 00040810 08081020 00201008 3E1C2A08 00082A1C 3E080800 00000808
00000000 10080800 7E000000 00000000 00000000 00181800 08040200 00402010
5A46423C 003C4262 08281808 003E0808 0C02423C 007E4030 1C02423C 003C4202
24140C04 0004047E 0478407E 00384402 7C40201C 003C4242 0804427E 00101010
3C42423C 003C4242 3E42423C 00380402 00080000 00000800 00080000 10080800
6030180E 000E1830 007E0000 0000007E 060C1870 0070180C 0C02423C 00100010
564A221C 001E204C 7E422418 00424242 3C22227C 007C2222 4040221C 001C2240
22222478 00782422 7840407E 007E4040 7840407E 00404040 4E40221C 001C2242
7E424242 00424242 0808081C 001C0808 0404040E 00384404 70484442 00424448
40404040 007E4040 5A5A6642 00424242 4A526242 00424246 42422418 00182442
7C42427C 00404040 42422418 001A244A 7C42427C 00424448 3C40423C 003C4202
0808083E 00080808 42424242 003C4242 24424242 00181824 5A424242 0042665A
18244242 00424224 1C222222 00080808 1804027E 007E4020 2020203C 003C2020
10204000 00020408 0404043C 003C0404 2A1C0800 08080808 20100000 0010207F
00000000 000000FF 04380000 003A443C 625C4040 005C6242 423C0000 003C4240
463A0202 003A4642 423C0000 003C407E 7C10120C 00101010 463A0000 3C023A46
625C4040 00424242 08180008 001C0808 040C0004 38440404 48444040 00446850
08080818 001C0808 49760000 00494949 625C0000 00424242 423C0000 003C4242
625C0000 40405C62 463A0000 02023A46 625C0000 00404040 403E0000 007C023C
107C1010 000C1210 42420000 003A4642 42420000 00182442 49410000 00364949
24420000 00422418 42420000 3C023A46 047E0000 007E2018 08080808 080808FF
50A050A0 50A050A0 08080808 08080808 3333CCCC 3333CCCC 993366CC 993366CC
00000000 00000000 F0F0F0F0 F0F0F0F0 00000000 FFFFFFFF 000000FF 00000000
00000000 FF000000 80808080 80808080 55AA55AA 55AA55AA 01010101 01010101
00000000 55AA55AA F8FCFEFF 80C0E0F0 03030303 03030303 08080808 0808080F
00000000 0F0F0F0F 08080808 0000000F 00000000 080808F8 00000000 FFFF0000
00000000 0808080F 08080808 000000FF 00000000 080808FF 08080808 080808F8
C0C0C0C0 C0C0C0C0 E0E0E0E0 E0E0E0E0 07070707 07070707 0000FFFF 00000000
00FFFFFF 00000000 00000000 FFFFFF00 01010101 FF010101 00000000 F0F0F0F0
0F0F0F0F 00000000 08080808 000000F8 F0F0F0F0 00000000 F0F0F0F0 0F0F0F0F
00000000 000000FF 7F3E1C08 003E1C7F 10101010 10101010 FF000000 00000000
00FF0000 00000000 0000FF00 00000000 00000000 0000FF00 20202020 20202020
04040404 04040404 00000000 080810E0 04080808 00000003 10080808 000000E0
80808080 FF808080 10204080 01020408 08040201 80402010 808080FF 80808080
010101FF 01010101 7E7E3C00 003C7E7E 00000000 00FF0000 7F7F7F36 00081C3E
40404040 40404040 00000000 08080403 18244281 81422418 42423C00 003C4242
772A1C08 0008082A 02020202 02020202 7F3E1C08 00081C3E 08080808 080808FF
50A050A0 50A050A0 08080808 08080808 3E010000 00141454 1F3F7FFF 0103070F
End DefineFont

'no comment
 
Volhout
Guru

Joined: 05/03/2018
Location: Netherlands
Posts: 3498
Posted: 09:53am 13 Sep 2023
Copy link to clipboard 
Print this post

Hi Martin...

Nice... You have mapped the characters on the ASCII related numbers, not the PET screen codes. (in the PET the @ABCD... are mapped to codes 0...32) But that is not important since 6502 code won't run on MMBasic anyway, so using these characters is a new MMBasic program anyway.

As far as I can see you implemented the lower case character set, and added 32 missing graphics characters from the graphics/full set at the end.



If you want to use this for "PETCII ROBOTS" you also need the inverted graphics characters, and some inverted text characters.... David used almost every character in the set on his PET version (fixed upper/graphics characterset).

Volhout
Edited 2023-09-13 20:10 by Volhout
PicomiteVGA PETSCII ROBOTS
 
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 10:42am 13 Sep 2023
Copy link to clipboard 
Print this post

on the PET, you don't have the option to choose the foreground and background color,
as is possible on the *Mites.
So If we need a inverted graphics character, we can simply swap fore- and background.
:-)
You can occupy the remaining 64 chrs (higher than 191) with a selection of the required inverted characters. This would have the advantage that you could store it in a string and output it without interrupting the output.
Like they ve done with the  Apple II Font Port of PETSCII ROBOTS


Another option would be to store the entire character set inverted again as another font.

AFAIK, David uses a special Character Rom for PETSCII ROBOTS
Edited 2023-09-13 21:52 by Martin H.
'no comment
 
cosmic frog
Senior Member

Joined: 09/02/2012
Location: United Kingdom
Posts: 278
Posted: 12:00pm 13 Sep 2023
Copy link to clipboard 
Print this post

Arcade style font






' arcadefont.bas
' Font type    : Full (64 characters)
' Font size    : 8x8 pixels
' Memory usage : 516 bytes
' Font adapted from: http://www.rinkydinkelectronics.com/r_fonts.php


DefineFont #8
 40200808 00000000 00000000 0C060703 00100008 00243636 00000000 247E2400
 00247E24 3E683E08 00083E0B 08646200 00462610 38342418 003D424D 10081818
 00000000 30180C06 00060C18 060C1830 0030180C 08142200 00002214 3E080800
 00000808 00000000 00301818 3C3C0000 00003C3C 00000000 00001818 08040000
 00402010 6363261C 001C3263 18183818 007E1818 1E07633E 007F703C 1E0C063F
 003E6303 66361E0E 0006067F 037E607E 003E6303 7E60301E 003E6363 0C06637F
 00181818 3C72621C 003E434F 3F63633E 003C0603 00181800 00001818 00181800
 00301818 10080000 00081020 003E0000 00003E00 10200000 00201008 0E03633E
 001C001C 6767331E 001E3360 6363361C 0063637F 7E63637E 007E6363 6060733E
 003E7360 6363667C 007C6663 7C60607E 007F6060 7C60607E 00606060 6760301F
 001F3363 7F636363 00636363 1818187E 007E1818 0C0C0C0C 00386C0C 786C6663
 00676E7C 60606060 007E6060 6B7F7763 00636363 7F7B7363 0063676F 6363633E
 003E6363 7E63637E 00606060 6163633E 003D6265 6763637E 00676E7C 3E60663C
 003E6303 1818187E 00181818 63636363 003E6363 63636363 00081C36 6B636363
 0063777F 1C3E7763 0063773E 3C666666 00181818 1C0E077F 007F7038 20203800
 00382020 20400000 00040810 08083800 00380808 54381000 00101010 00000000
 FE000000
End DefineFont

 
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 12:41pm 13 Sep 2023
Copy link to clipboard 
Print this post

  cosmic frog said  Arcade style font
' Font adapted from: http://www.rinkydinkelectronics.com/r_fonts.php

looks good, first i was a little confused, as there are no lower case Chars in there.

Thank you for linking the Page,
I didn't know the site yet, but he explained how to create the fonts very well.
http://www.rinkydinkelectronics.com/h_utft_fonts_101.php
'no comment
 
cosmic frog
Senior Member

Joined: 09/02/2012
Location: United Kingdom
Posts: 278
Posted: 01:10pm 13 Sep 2023
Copy link to clipboard 
Print this post

  Martin H. said  
  cosmic frog said  Arcade style font
' Font adapted from: http://www.rinkydinkelectronics.com/r_fonts.php

looks good, first i was a little confused, as there are no lower case Chars in there.

Thank you for linking the Page,
I didn't know the site yet, but he explained how to create the fonts very well.
http://www.rinkydinkelectronics.com/h_utft_fonts_101.php


Yes, the original 80's arcade fonts had no lower case.
I use this to make (Tweak) my fonts.
FontTweak.zip


Dave.
 
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 02:02pm 13 Sep 2023
Copy link to clipboard 
Print this post

Maybe you like the Konami Style Font, I used in PicoFrog
A 80s Arcade like Font but with lower Case  



' Konami Style Font (Martin H.)
' Font type    : Full (95 ChArACtErs)
' Font size    : 8x8 pixels
' Memory usage : 764 Bytes
DefineFont #9
 5F200808
00000000 00000000 18181818 00180018 006C6C6C 00000000 367F3636 0036367F
3E683F0C 00187E0B 180C6660 00066630 386C6C38 003B666D 0030180C 00000000
3030180C 000C1830 0C0C1830 0030180C 3C7E1800 0000187E 7E181800 00001818
00000000 30181800 7E000000 00000000 00000000 00181800 180C0600 00006030
7E6E663C 003C6676 18183818 007E1818 0C06663C 007E3018 1C06663C 003C6606
6C3C1C0C 000C0C7E 067C607E 003C6606 7C60301C 003C6666 180C067E 00303030
3C66663C 003C6666 3E66663C 00380C06 18180000 00181800 18180000 30181800
6030180C 000C1830 007E0000 0000007E 060C1830 0030180C 180C663C 00180018
6A6E663C 003C606E 7E66663C 00666666 7C66667C 007C6666 6060663C 003C6660
66666C78 00786C66 7C60607E 007E6060 7C60607E 00606060 6E60663C 003C6666
7E666666 00666666 1818187E 007E1818 0C0C0C3E 00386C0C 70786C66 00666C78
60606060 007E6060 6B7F7763 0063636B 7E766666 0066666E 6666663C 003C6666
7C66667C 00606060 6666663C 00366C6A 7C66667C 0066666C 3C60663C 003C6606
1818187E 00181818 66666666 003C6666 66666666 00183C66 6B6B6363 0063777F
183C6666 0066663C 3C666666 00181818 180C067E 007E6030 6060607C 007C6060
18306000 0000060C 0606063E 003E0606 42663C18 00000000 00000000 FF000000
7C30361C 007E3030 063C0000 003E663E 667C6060 007C6666 663C0000 003C6660
663E0606 003E6666 663C0000 003C607E 7C30301C 00303030 663E0000 3C063E66
667C6060 00666666 18380018 003C1818 18380018 70181818 6C666060 00666C78
18181838 003C1818 7F360000 00636B6B 667C0000 00666666 663C0000 003C6666
667C0000 60607C66 663E0000 07063E66 766C0000 00606060 603E0000 007C063C
307C3030 001C3030 66660000 003E6666 66660000 00183C66 6B630000 00367F6B
3C660000 00663C18 66660000 3C063E66 0C7E0000 007E3018 7018180C 000C1818
00181818 00181818 0E181830 00301818 00466B31 00000000 FFFFFFFF FFFFFFFF
End DefineFont

Edited 2023-09-14 00:16 by Martin H.
'no comment
 
cosmic frog
Senior Member

Joined: 09/02/2012
Location: United Kingdom
Posts: 278
Posted: 02:44pm 13 Sep 2023
Copy link to clipboard 
Print this post

  Martin H. said  Maybe you like the Konami Style Font, I used in PicoFrog
A 80s Arcade like Font but with lower Case  




Looks good  
 
Amnesie
Guru

Joined: 30/06/2020
Location: Germany
Posts: 372
Posted: 04:16pm 13 Sep 2023
Copy link to clipboard 
Print this post

Ahh so many cool Fonts to play with :)  

Greetings
Daniel
 
Plasmamac

Guru

Joined: 31/01/2019
Location: Germany
Posts: 501
Posted: 06:12pm 13 Sep 2023
Copy link to clipboard 
Print this post

like , thx
Plasma
 
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 08:53am 14 Sep 2023
Copy link to clipboard 
Print this post

More to play with:
Bubblegum

' font_BubbleGum
' Font type    : Full (96 Characters)
' Font size    : 8x8 pixels
' Memory usage : 768
' Source https://damieng.com/typography/zx-origins/
DefineFont #9
60200808
00000000 00000000 24242418 00182418 00CCAA44 00000000 C682D67C 007CD682
548ECA7E 00FCA6E2 A4926E00 00EC924A 42924438 007E4294 60502810 00000000
4C44241C 001C2444 64444870 00704844 82EE447C 007C44EE 82C6447C 007C44C6
00000000 30281408 7E000000 00000000 00000000 00102810 4422120C 00609088
92924438 007C8282 2644447C 007E4242 466284F8 00FE828C 84628478 00788462
9242221E 001EF282 848E827E 00FC8262 9284423E 00384482 E48282FE 00784844
44924438 007C8292 92824438 00F88442 28100000 00102810 14080000 30281408
4824120C 000C1224 7C82FE00 0000FE82 12244830 00304824 6482827C 18242418
A2AA827C 007E829E 82924438 00FE9292 849282FC 00FC8292 8C82423E 003E4282
928284F8 00F88482 828E82FE 00FE828E 828E82FE 00F8888E 928E443C 003E4282
829292EE 00EE9292 4242423C 007E4242 E212121E 00F88482 848292EC 00EC9282
9E9090F0 00FE8282 8282926C 00D6AA82 828284F8 00EE9292 92824438 00384482
869282FE 00F0909C 96824438 003E5282 849282FE 00EE9282 448EC27E 00FC86E2
C68282FE 007C4444 929292FE 00384482 8292AAC6 00384482 8282AAD6 006C9282
4482926C 006C9282 829292EE 007C4444 EE8482FE 00FE8242 484C443C 003C444C
44889060 000C1222 24644478 00784464 82442810 007C4444 00000000 FF000000
444E423C 00FE824E 92423E00 00768A82 82929CF0 00FC8292 8E423E00 007E8282
8292721E 007E8292 92423C00 007E8284 889E827E 00F09098 92423E00 78846282
829498F0 00EE9282 4224423C 003C4242 120C120C F88482F2 929C90F0 00FC9286
6444447C 003C2424 82927C00 00FEAA82 8284F800 00EE9292 92443800 007C8282
9284F800 F0988482 92423E00 1E324282 82423E00 00F0909E 8E423C00 007884E2
9E8898F0 003E4282 8292EE00 00384482 8292EE00 00102844 82AAFE00 007C9282
44926C00 006C9282 8292EE00 F8846282 C282FE00 00FE8286 8462221E 001E2262
2424243C 003C2424 428C88F0 00F0888C ECBA6E00 00000000 A199423C 3C4299A1
End DefineFont


Carton:

' font_Carton
' Font type    : Full (96 Characters)
' Font size    : 8x8 pixels
' Memory usage : 768
' Source https://damieng.com/typography/zx-origins/
DefineFont #9
60200808
00000000 00000000 10101010 00100010 00482424 00000000 247E2400 00247E24
3C483E08 00107C12 1048A440 00044A24 32404830 003A444A 00100808 00000000
20201008 00081020 08081020 00201008 38541000 00001054 7C101000 00001010
00000000 20101000 7C000000 00000000 00000000 00101000 10080402 00804020
928A4438 003844A2 08081808 001C0808 0804423C 007E2010 1C08047E 003C4202
24140C04 00047E44 027C407E 003C4202 3C201008 003C4242 0804027E 00101010
3C42423C 003C4242 3C42423C 00100804 00101000 00101000 00101000 20101000
40300C00 00000C30 007E0000 0000007E 020C3000 0000300C 0C02423C 00100010
AA9A4438 003C40BC 44282810 0082447C 7C42427C 007C4242 8080423C 003C4280
42424478 00784442 7840407E 007E4040 7840407E 00404040 8E80423C 003A4682
7E424242 00424242 10101038 00381010 02020202 00384442 60504844 00444850
40404040 007E4040 AAAAC6C6 00829292 52526262 00464A4A 82824438 00384482
7C42427C 00404040 82824438 023A448A 7C42427C 00424448 3C40423C 003C4202
101010FE 00101010 82828282 00384482 44448282 00102828 54828282 00282854
10284482 00824428 28448282 00101010 1008047E 007E4020 20202038 00382020
10204080 00020408 08080838 00380808 44282810 00000000 00000000 FF000000
7C20221C 007E2020 023C0000 003E423E 625C4040 007C4242 423C0000 003E4040
463A0202 003E4242 423C0000 003E407E 7C10100E 00101010 423E0000 3C023E42
625C4040 00424242 10300010 00181010 040C0004 38440404 4C424040 00424C70
10101030 00181010 92EC0000 00929292 625C0000 00424242 423C0000 003C4242
427C0000 40407C42 423E0000 02023E42 625C0000 00404040 403E0000 007C023C
107C1010 000E1010 42420000 003A4642 42420000 00182424 92820000 004444AA
24420000 00422418 42420000 60101824 047E0000 007E2018 6010100E 000E1010
10101010 00101010 06080870 00700808 92620000 0000008C A199423C 3C4299A1
End DefineFont


Punch:

' font_Punch
' Font type    : Full (96 Characters)
' Font size    : 8x8 pixels
' Memory usage : 768
' Source https://damieng.com/typography/zx-origins/
DefineFont #9
60200808
00000000 00000000 38383838 00383800 00CCEE77 00000000 6CFE6C00 006CFE6C
7CF0EE2A 00A8EE1E 38DCEE66 00CCEE76 6EE0EC6E 006EECEC 0030381C 00000000
0070381E 001E3870 000E1C78 00781C0E 00FE3810 0044FE7C EE303800 003838DE
00000000 30381C00 7E000000 0000007E 00000000 00383800 28140E06 00C0E050
D6EA743A 00B85CAE 1C6C341C 001C1C1C 3C1EEE6C 00EEF678 389CCEEE 006CEE0E
EE763A1E 000EBEDE ECE0E6EE 006CEE0E ECE0EE6C 006CEEEE 1C8ECEEE 0038381C
6CEEEE6C 006CEEEE 6EEEEE6C 006CEE0E 38380000 00383800 1C1C0000 30381C00
70381C0E 000E1C38 007E7E00 00007E7E 0E1C3870 0070381C 1CDEEE6C 00383800
EEEEE66C 006EE0EE 6C5C3838 00EEF6EE ECEEEEEC 00ECEEEE E0EE6E2C 002C6EEE
EEEEECE8 00E8ECEE E8E2E6EE 00EEE6E2 E8E2E6EE 00E0E0E8 E6E0662E 002E6EEE
FEEEEEEE 00EEEEEE 38383838 00383838 0A0C0E1E 005CEEC6 B8DCEEE6 00E6EEDC
E2E0E0E0 00DEEEE6 D6BA6CEE 00EEEEEE D6EECE8E 00E2E6EE EEEE6C28 00286CEE
EEEEEEEC 00E0E0EC EEEE6C28 042E6CEE ECEEEEEC 00EEECE8 6CE2EE6E 00ECEE8E
38BAD6EE 00383838 EEEEEEEE 006CEEEE 6CEEEEEE 0038385C D6EEEEEE 00EE6CBA
3854EEEE 00EEEE54 5CEEEEEE 00383838 389CCEEE 00EEE672 70707676 00767670
2850E0C0 00060E14 0E0E6E6E 006E6E0E FA743810 000082C6 00000000 FFFF0000
F6707236 00F67270 EE6E0000 006EEEEE EEECE0E0 00ECEEEE EE6C0000 006CEEE0
EE6E0E0E 006EEEEE EE6C0000 006EE0EE F6707236 00707070 EE6E0000 ECCE2EEE
EEECE0E0 00EEEEEE 38380038 00383838 0E0E000E 6CEEEE0E EEE6E0E0 00E6EEEC
38383838 00383838 7CEE0000 00D6D6BA EEEC0000 00EEEEEE EE6C0000 006CEEEE
EEEC0000 E0ECEEEE EE6E0000 0E6EEEEE EEEC0000 00E0E0EE F27E0000 00FC9E6C
70F67030 00367270 EEEE0000 006EEEEE EEEE0000 00385C6C D6D60000 006C7CBA
7CEE0000 00EE7C28 EEEE0000 ECCE2EEE 9CDE0000 00F67238 E0381E1E 001E1E38
38383838 00383838 0E38F0F0 00F0F038 00DCEE76 00000000 F7BD5A3C 3C5ABDF1
End DefineFont



Find hunderts of fonts  at https://damieng.com/typography/zx-origins/
Cheers
Martin
Edited 2023-09-14 18:54 by Martin H.
'no comment
 
thwill

Guru

Joined: 16/09/2019
Location: United Kingdom
Posts: 3836
Posted: 08:55am 14 Sep 2023
Copy link to clipboard 
Print this post

Thanks Martin, some of these will definitely be making an appearance in my future projects.

Best wishes,

Tom
Game*Mite, CMM2 Welcome Tape, Creaky old text adventures
 
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 09:12am 14 Sep 2023
Copy link to clipboard 
Print this post

  thwill said  Thanks Martin, some of these will definitely be making an appearance in my future projects.

Best wishes,

Tom

that is, what it is made for ...
so if you find a Font that fits for your Project,
Save the Picture of a font from https://damieng.com/typography/zx-origins/
Invert it ..
And use my little Convert Program:
'png to Font Converter .. Martin H.
'works on MM_Basic 4 Windows
'fonts on the PNG are on a 32*8 grid each 8x8 Pixel in Blacl/White
'so chr$(32) starts at position 0,8 , chr$(64) at 0,16 etc.
'--------------------------------------------------------
'                *** User part  ***
'File name, number of chars, first char and size
'chars lower 32 couldn't be converted
fname$="font_Punch"
chrs=96
Start =32
W=8
H=8
'--------------------------------------------------------

cls
load png fname$+".png",0,8
open fname$+".bas" for output as #1
?#1,"' ";fname$
?#1,"' Font type    : Full (";str$(chrs);" Characters)"
?#1,"' Font size    : ";str$(w);"x";str$(H);" pixels"
mem=(W/8)*H*chrs
?#1,"' Memory usage : ";STR$(mem)
?#1,"DefineFont #9"
?#1,hex$(chrs,2);hex$(start,2);hex$(h,2);hex$(w,2)
t=0
for y=h to (chrs/32)*8 step H
for x=0 to 248 step w
hx$=""
  for y1=y to y+h-1:v=0:b=128
   for x1=x to x+w-1
   if pixel(x1,y1)=RGB(White) then Pixel x1,y1,rgb(green):inc v,b
   'pause 100
   b=b>>1
next x1
  hx$=hex$(v,2)+hx$
  next y1
?#1 ,right$(hx$,8);" ";left$(hx$,8);
inc t:if t=4 then
 ?#1:T=0
else
 ?#1," ";
endif
next x
next y
?#1,"End DefineFont"
close #1

'no comment
 
carlschneider
Senior Member

Joined: 04/08/2023
Location: South Africa
Posts: 140
Posted: 03:51pm 18 Sep 2023
Copy link to clipboard 
Print this post

Thanks Martin, your Carton font has found its way into my project.

It displays nicely on a SSD1306 0.96" OLED I2C display, but I have tweaked the line separation to give more space between the lines at the expense of 1 row of characters.



The protective film is still on so that is impacting the image quality.
Cheers Carl                                                        
Retirement is tough on Hobbies without a day job
 
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 07:09am 23 Sep 2023
Copy link to clipboard 
Print this post

  Volhout said  Hi Martin...

Nice... You have mapped the characters on the ASCII related numbers, not the PET screen codes. (in the PET the @ABCD... are mapped to codes 0...32) But that is not important since 6502 code won't run on MMBasic anyway, so using these characters is a new MMBasic program anyway

Volhout

I was thinking about how to Display a 256 character font on the Pico, because it can only display characters starting from 32. The good old GUI BITMAP seems to be a clever solution.

dim gfxfont$(255) length 8
open "gfxfont.bin" for Input as #1
for f=0 to 255:gfxfont$(f)=input$(8,#1):next
SW%=256 'Screen
close #1
cls:ox=0
'test output
for f=0 to 255 step 32
 for n=f to f+31:tn$=tn$+chr$(n):next:GText 0,ox,tn$:tn$=""
 inc ox,8
next
print @(0,128),
'output of this font
sub GText tx%,ty%,text$
local integer c,tl
for c=1 to len(Text$): tl=asc(mid$(text$,c,1))
GUI BITMAP tx%,ty%,gfxfont$(tl),8,8,1,rgb(white)
inc tx%,8:if tx%>=SW% then TX%=0:Inc TY%,8
next
end sub

Font Rom File:
gfxfont.zip


Edited 2023-09-23 21:41 by Martin H.
'no comment
 
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 09:58am 27 Sep 2023
Copy link to clipboard 
Print this post

Here the Font for Use in the PR Game




' C64_PetsciiRobotsFont  Martin Herhaus
' Font type    : Full (96 Characters)
' Font size    : 8x8 pixels
' Memory usage : 768
DefineFont #9
60200808
00000000 00000000 38383838 00380038 8844EEEE 00000000 62FF6200 0062FF62
FEC0F61C 0070DE06 381CEEE6 00CEEE70 7EE0E4FC 00FEE4E4 20103838 00000000
10100804 00040810 08081020 00201008 3C7E1800 0000187E FE383800 00003838
00000000 20103838 7E000000 00000000 00000000 00383800 381C0E06 00C0E070
C6C2C2FE 00FE8686 10101030 007C7C10 FE0202FE 00FEC0C0 FE0404FC 00FE0606
C6C6C0C0 000606FE FE8080FE 00FE0606 FE808CFC 00FE8686 3E0202FE 00303030
FE4C4C7C 00FEC6C6 FE8686FE 00060606 00383800 00003838 00383800 20103838
70381C0E 000E1C38 007E0000 0000007E 0E1C3870 0070381C 3E0ECEFE 00300030
41899576 36494122 FE46467E 00868686 FE8C8CFC 00FE8686 808686FE 00FE8282
C68484FC 00FEC6C6 FE8080FE 00FEC0C0 FEC080FE 00C0C0C0 9E8082FE 00FE8686
FE868686 00868686 1810107E 007E1818 06040404 00FE8686 F8848282 0086868C
C0404040 00FEC0C0 8696AEC6 00868686 9EB6E6C6 0086868E 868282FE 00FE8686
FE8282FE 00C0C0C0 C4C4C4FC 00F6CECC FE8C8CFC 00C6C6C6 FEC0C2FE 00FEC202
1818187E 00181818 86868686 00FE8686 86868686 00385C8E 86868686 00C6AE96
7CC2C2C2 00868686 7E464646 00181818 380C06FE 00FEC060 10100804 00040810
3870E0C0 00060E1C 08081020 00201008 38381010 0000006C 00000000 FF000000
FC40623C 00FEE0E0 86FE0000 00F68E86 C2FEC0C0 00FEE2C2 C2FE0000 00FEE2C0
86FE0606 00FE8E86 C2FE0000 00FEE0FE C0C03E00 00E0E0F8 86FE0000 FE0EFE86
C2FEC0C0 00E2E2C2 1838001C 001C1C18 0C0C000C FE8E0E0C 86868080 008E8EFC
18181838 001C1C18 C2FE0000 00EAEACA C2FE0000 00E2E2C2 86FE0000 00FE8E86
C2FE0000 E0E0FEC2 8EFE0000 0E0EFE8E C2FE0000 00E0E0C0 C0FE0000 00FE0EFE
C0F8C0C0 00FEE2C0 86860000 00FE8E86 C2C20000 0070E8C4 CACA0000 00FEE2CA
74E20000 008E5C38 86860000 FE0EFE86 06FE0000 00FEE0FE B838383A 003A3838
38383838 00383838 3E3838B8 00B83838 AA55AA55 AA55AA55 B195423C 3C4295B1
End DefineFont

'no comment
 
Martin H.

Guru

Joined: 04/06/2022
Location: Germany
Posts: 891
Posted: 12:39pm 27 Sep 2023
Copy link to clipboard 
Print this post

Various_symbols

Font type: Full font (95 chars)
Font size: 16x16 pixels
based on several symbol type PC fonts with normal font weight.
Very usefull for creating buttons on touch screens.



' various_symbols
' Font type    : Full (96 Characters)
' Font size    : 16x16 pixels
' Memory usage : 3072
' Source       : http://www.rinkydinkelectronics.com/r_fonts.php
DefineFont #9
60201010
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000010001E00F00010001000100000001E00F000000000000
06000000F80FE4032E1C1C1F8E384E3C1E398E397C1C3C3AE013F80F00000030
0000000000000000000000000000000000000000CC0C0000CC0CCC0C00000000
0000000080300000004B00690036005A8C0D000452125A0B8C21D61200000000
00000000181E000060633033C06640636603BC3DC606C6027818CC0C00000000
00000000E0030000C00C6006E006C00D00000000000000000000000000000000
000000003000E003700030000007C0010000E007000000000000000000000000
00000000C000C00700068003C000C0010000800F000000000000000000000000
00000000800380010003F01FE03F000300060007000E000E0000000000000000
00000000000000007000300000006000FE0FFE0FC00000008001C00100000000
00000000E00030006000E000C0006000C000C000000000000000000000000000
000000001C380000181C3C1C781E300EC003C0030003F83F0007000700000000
00000000F803F80080030003F80CF007980F180EF000E003F00F30080000C007
00000000000000000000000080010000C003C003000080010000000000000000
000000007C001000D001FC00A003A003A003A003F000F8014000400000000000
00000000F00FC003B81D381C9C399C399C399C39381CB81DC003F00F00000000
00000000F00FC003381E381F3C3F3C3F3C3F3C3FF81F381FC003F00F00000000
00000000F00FC003981D381E3C3F9C3FFC3C7C3EF81F181CC003F00F00000000
00000000F00FC003981F381C7C3E9C3F9C3F9C3F381C981FC003F00F00000000
00000000F00FC003781E781F7C3D7C3D3C387C3B781F781FC003F00F00000000
00000000F00FC003381CF81FFC3DFC3D3C3F7C3C781C381FC003F00F00000000
00000000F00FC003F81C181E3C38FC399C399C39381C981DC003F00F00000000
00000000F00FC003181CF81FBC3FDC3FFC3E7C3FF81FF81CC003F00F00000000
00000000F00FC003D81B381C7C3CDC39DC3B3C3F381CD81BC003F00F00000000
00000000F80FE003DC193C1CCE39CE39CE3F4E3C3C1C9C1FE003F80F00000000
00000000FC0F0000FC0FFC0FFC0FFC0FFC0FFC0FFC0FFC0F0000FC0F00000000
00000000F00FC0031818381C0C300C300C300C30381C1818C003F00F00000000
000000001428FC3F1428142814281428E427F42FE424E424FC1FE42400000000
000000004001C000100220010804100204080808021002100000FF3F00000000
000000000210FF3F040802100804080810021002400120010000C00000000000
0400000024001C000403C40004180404040C0410840004031C00640000000400
00000000FC3FFC3F6C320C30CC33EC32EC338C310C366C36FC3FFC3F00000000
02000000FC3FFC3F2C301C30CC344C300C338C3F0C300C33FC3FFC3F00000000
0000000000000000FE3F00001A260628B226622306300E380000FE3F00000000
00000000FC3FFC3F0C300C300C300C300C300C300C300C30FC3FFC3F00000000
600000000602FC01000800040008F83F0008F81F0004000CF801040300000000
38000000E00070008001C000E00310038000C006000B8001800F000A0000000C
00000000C038601C8019801870323813CC0C60361810FC080000183000000000
000000006038300C801840180633FC311C040602FC18700C0000000000000000
00000000187C00002038300CDC0C607030F9B80C7E0266030C0C0C0400000000
0000000060000000E000E000C00000008007C001000E000FF007100E0000E003
0000000070029001600C0000701FF01DE01C701EE038E01C0000F03800000000
C007000018303018644C682C044004402448244898334824C007301800000000
E00300000C18180C32263416C2210220122422220C181414E003180C00000000
000000003018C007C82618300440C446E44F044018300820C007301800000000
00000000F003E001D002F003C0002001080CC000C000380F180E300300000000
80000000E003C001F80FF007DE3DFC1FC221C631C001C001C001C001C001C001
C0010000C001C001C001C001C221C001DE3DC631F80FFC1FE003F0078000C001
80030000000E0007003C001EFEFFFE7F003CFE7F000E001E8003000700000000
C00100007000E0003C007800FF7FFE7F3C00FE7F70007800C001E00000000000
08000000200010008000400000338001000E001A0008000C0000000000000000
0020000000240038C020002318202020302008200021C0200038002600000020
00000000380038002C103810042004200420042008100810C003300C00000000
00000000001C001C0834081C042004200420042008100810C003300C00000000
000000009832701C082108210820082010101010400420080003800200000001
000000000808F0071224E41302240224122402240410E223F007080800000000
000000001008E0072424C817C42724244424842408102424E007100800000000
000000002008C00708201010082008200820082010101010F83E600C00000000
0000000080010000800280020003800200020002000200068003800200000000
0000000000000000000000008809700688098808000070060000000000000000
00000000804000009C608040A248A250A244A24880419C428040BE4000000000
C001800020024001000010040000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000FFFF0000
00000000E6007C00CE00C60000007C0000000000000000000000000000000000
00000000FE007C008003C201F80380030007F803FC0F00060000FC0700000000
00000000000000003003300360062002E80668060004B007000C000C0000000C
F8030000080C1806F01F000C0008F01F000CE01F1807080C0000F00300000000
000000008000000080038001800F80078007800F800180030000800000000000
000000000002000080030003E003C003C003E003000380030000000200000000
000000000000000080070003E01FC00F0000F03F000000000000000000000000
0000000000000000F03F0000C00FE01F00038007000000000000000000000000
000000000000000030061002F01E700EF03FF03F700EF01E1002300600000000
FC7F0000C24382438243C247C2470240C243C243C243C2430240C2430000FC7F
0000000040080000700E600CFC0F780F780FFC0F600C700E0000400800000000
00000000000000008C318430BC379C33FC3FFC3F9C33BC3784308C3100000000
00000000000000008C310C21EC3DCC39FC3FFC3FCC39EC3D0C218C3100000000
00000000C00C0000C00CC00CC00CC00CC00CC00CC00CC00CC00CC00C00000000
00000000FC0F0000FC0FFC0FFC0FFC0FFC0FFC0FFC0FFC0F0000FC0F00000000
00000000E0010000F807F807FC0FFC0FFC0FFC0FF807F8070000E00100000000
00080000000E000CC00F000FC00FC00FC00FC00F000E000F0008000C00000000
0800000078003800C803E80108020803F8027802001EF002003C003E00000000
20040000301C701C1830381C1830183070381830701C70180000400800000000
0000000080038001000380030002000200020002800300038001800300000000
000600002038181C7C6E3A34E04370E7E003C001381E70070E041C2C00000418
80070003E01FC00FF87FF03FFCFFFCFFF03FF87FC00FE01F0003800700000000
000000000000000070060000FE3FF80FF80F1C1C0000E0030000000000000000
00000000180CE003C4130C1822222222C223222204120222180C0C1A0000E003
00000000FC030000FF1FFE1FFF3FFF3FFF1FFF3FF81FFF0F0038001C00000000
00020000C0010001E020E000FFBFE030E020E0308001E0000003C00100000000
00000000004E0078C0BA00B54878B08994193826A201640600007E0000000000
8001000080018001F00FF00F8001800180018001800180010000800100000000
0000000000C00000003F0078FC0FE01F70100E08004C8023000000F000000000
00000000007000007C780F508003E0077C78E00700700F500000000000000000
80000000C000C0003003E0011E1E38073C1F0320A0013003C000C00000008000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
End DefineFont

Edited 2023-09-27 22:45 by Martin H.
'no comment
 
     Page 2 of 2    
Print this page


To reply to this topic, you need to log in.

© JAQ Software 2024