Added bullet markers

This commit is contained in:
Devine Lu Linvega 2024-05-27 20:38:21 -07:00
parent ee9a63a154
commit 0c067d797d
4 changed files with 9 additions and 1008 deletions

3
.gitignore vendored
View File

@ -2,7 +2,7 @@
*jpg *jpg
*png *png
*bmp *bmp
*/bin */bin/
*nametable *nametable
*.rom *.rom
*.rom.sym *.rom.sym
@ -10,3 +10,4 @@
.snarf .snarf
.theme .theme
.notepad .notepad

File diff suppressed because it is too large Load Diff

View File

@ -18,6 +18,9 @@
@marker-icn [ @marker-icn [
0000 0000 0000 4060 7060 4000 0000 0000 0000 0000 0000 4060 7060 4000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000 ] 0000 0000 0000 0000 0000 0000 0000 0000 ]
@bullet-icn [
0000 0000 0038 7c7c 7c38 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000 ]
@close-icn @close-icn
0000 00ff 8080 8080 8080 8080 80ff 0000 0000 00ff 8080 8080 8080 8080 80ff 0000
0000 00ef 202f 202f 202f 202f 20ef 0000 0000 00ef 202f 202f 202f 202f 20ef 0000

View File

@ -499,6 +499,8 @@ JMP2r
( tabbed ) ( tabbed )
DUP2 find-line-start LDA2 #093e NEQ2 ?{ DUP2 find-line-start LDA2 #093e NEQ2 ?{
#01 #0021 !draw-linebreak } #01 #0021 !draw-linebreak }
DUP2 find-line-start LDA2 #092d NEQ2 ?{
#01 #0021 !draw-linebreak }
#01 #0008 !draw-linebreak #01 #0008 !draw-linebreak
&no-wrap &no-wrap
( char ) ( char )
@ -527,6 +529,7 @@ JMP2r
DUP #7e GTH ?&missing DUP #7e GTH ?&missing
DUP #20 LTH ?&blank DUP #20 LTH ?&blank
DUP2 #093e EQU2 ?&marker DUP2 #093e EQU2 ?&marker
DUP2 #092d EQU2 ?&bullet
NIP #20 SUB NIP #20 SUB
#00 SWP #50 SFT2 ;font/glyphs ADD2 #00 SWP #50 SFT2 ;font/glyphs ADD2
@ -534,6 +537,7 @@ JMP2r
&blank POP2 ;font/glyphs JMP2r &blank POP2 ;font/glyphs JMP2r
&missing POP2 ;error-icn JMP2r &missing POP2 ;error-icn JMP2r
&marker POP2 ;marker-icn JMP2r &marker POP2 ;marker-icn JMP2r
&bullet POP2 ;bullet-icn JMP2r
@char-width ( char -- width* ) @char-width ( char -- width* )