~rabbits/nasu: Improved font

3 files changed, 51 insertions(+), 99 deletions(-)

R etc/{block8.chr => block8.icn}
M src/font.tal
M src/manifest.tal

R etc/block8.chr => etc/block8.icn +0 -0

M src/font.tal => src/font.tal +49 -97

@@ 1,97 1,49 @@
-@font
-0000 0000 0000 0000
-1010 1010 1000 1000
-2828 0000 0000 0000
-44fe 4444 44fe 4400
-107e 807c 02fc 1000
-0044 0810 2044 0000
-7884 8864 9a84 7a00
-1020 0000 0000 0000
-2040 4040 4040 2000
-0804 0404 0404 0800
-0044 2810 2844 0000
-0010 107c 1010 0000
-0000 0000 0010 2000
-0000 007c 0000 0000
-0000 0000 0000 1000
-0204 0810 2040 8000
-7c82 8282 8282 7c00
-3010 1010 1010 3800
-7c82 027c 8080 fe00
-7c82 021c 0282 7c00
-2242 82fe 0202 0200
-fe80 807c 0282 7c00
-7c82 80fc 8282 7c00
-fe82 0408 0810 1000
-7c82 827c 8282 7c00
-7c82 827e 0202 0200
-0000 1000 1000 0000
-0000 1000 1010 2000
-0008 1020 1008 0000
-0000 7c00 7c00 0000
-0010 0804 0810 0000
-7c82 820c 1000 1000
-7c82 92aa aa92 6400
-7c82 82fe 8282 8200
-fc82 82fc 8282 fc00
-7c82 8080 8082 7c00
-fc82 8282 8282 fc00
-fe80 80f0 8080 fe00
-fe80 80f0 8080 8000
-7c82 808e 8282 7c00
-8282 82fe 8282 8200
-3810 1010 1010 3800
-0602 0202 0282 7c00
-8284 88f0 8884 8200
-8080 8080 8080 fe00
-ec92 9292 9292 9200
-c2a2 a292 8a8a 8600
-7c82 8282 8282 7c00
-fc82 82fc 8080 8000
-7c82 8282 8a84 7a00
-fc82 82fc 8282 8200
-7c82 807c 0282 7c00
-fe10 1010 1010 1000
-8282 8282 8286 7a00
-8282 8282 4428 1000
-9292 9292 9292 ec00
-8244 2810 2844 8200
-8282 4428 1010 1000
-fe02 0c10 6080 fe00
-6040 4040 4040 6000
-8040 2010 0804 0200
-0c04 0404 0404 0c00
-1028 0000 0000 0000
-0000 0000 0000 fe00
-1008 0000 0000 0000
-0000 7c02 7e82 7e00
-0000 fc82 fc82 fc00
-0000 7c82 8082 7c00
-0000 027e 8282 7e00
-0000 7c82 fc80 7e00
-0000 7c82 e080 8000
-0000 7c82 7e02 fc00
-0000 80fc 8282 8200
-0000 1000 1010 1000
-0000 0200 0282 7c00
-0000 8284 f884 8200
-0000 8080 8080 7e00
-0000 6c92 9292 9200
-0000 bcc2 8282 8200
-0000 7c82 8282 7c00
-0000 fc82 fc80 8000
-0000 7c82 7e02 0200
-0000 bcc2 8080 8000
-0000 7e80 7c02 fc00
-0000 fe10 1010 1000
-0000 8282 8282 7c00
-0000 8282 4428 1000
-0000 9292 9292 6c00
-0000 8244 3844 8200
-0000 8282 7e02 7c00
-0000 fe02 7c80 fe00
-2040 4080 4040 2000
-1010 1010 1010 1000
-0804 0402 0404 0800
-0000 0032 4c00 0000
-0000 0000 0000 0000
+@font ( block8 )
+0000 0000 0000 0000 1010 1010 1000 1000
+2828 0000 0000 0000 44fe 4444 44fe 4400
+107e 807c 02fc 1000 0044 0810 2044 0000
+7884 8864 9a84 7a00 1020 0000 0000 0000
+2040 4040 4040 2000 0804 0404 0404 0800
+0044 2810 2844 0000 0010 107c 1010 0000
+0000 0000 0010 2000 0000 007c 0000 0000
+0000 0000 0000 1000 0204 0810 2040 8000
+7c82 8282 8282 7c00 3010 1010 1010 3800
+7c82 027c 8080 fe00 7c82 021c 0282 7c00
+2242 82fe 0202 0200 fe80 807c 0282 7c00
+7c82 80fc 8282 7c00 fe82 0408 0810 1000
+7c82 827c 8282 7c00 7c82 827e 0202 0200
+0000 1000 1000 0000 0000 1000 1010 2000
+0008 1020 1008 0000 0000 7c00 7c00 0000
+0010 0804 0810 0000 7c82 820c 1000 1000
+7c82 92aa aa92 6400 7c82 82fe 8282 8200
+fc82 82fc 8282 fc00 7c82 8080 8082 7c00
+fc82 8282 8282 fc00 fe80 80f0 8080 fe00
+fe80 80f0 8080 8000 7c82 808e 8282 7c00
+8282 82fe 8282 8200 3810 1010 1010 3800
+0602 0202 0282 7c00 8284 88f0 8884 8200
+8080 8080 8080 fe00 ec92 9292 9292 9200
+c2a2 a292 8a8a 8600 7c82 8282 8282 7c00
+fc82 82fc 8080 8000 7c82 8282 8a84 7a00
+fc82 82fc 8282 8200 7c82 807c 0282 7c00
+fe10 1010 1010 1000 8282 8282 8286 7a00
+8282 4444 2828 1000 9292 9292 9292 6c00
+8244 2810 2844 8200 8282 4428 1010 1000
+fe02 0c10 6080 fe00 6040 4040 4040 6000
+8040 2010 0804 0200 0c04 0404 0404 0c00
+1028 0000 0000 0000 0000 0000 0000 fe00
+1008 0000 0000 0000 0000 7c02 7e82 7e00
+0000 fc82 fc82 fc00 0000 7c82 8082 7c00
+0000 027e 8282 7e00 0000 7c82 fc80 7e00
+0000 7c82 e080 8000 0000 7c82 7e02 fc00
+0000 80fc 8282 8200 0000 1000 1010 1000
+0000 0200 0282 7c00 0000 8284 f884 8200
+0000 8080 8080 7e00 0000 6c92 9292 9200
+0000 bcc2 8282 8200 0000 7c82 8282 7c00
+0000 fc82 fc80 8000 0000 7c82 7e02 0200
+0000 bcc2 8080 8000 0000 7e80 7c02 fc00
+0000 fe10 1010 1000 0000 8282 8282 7c00
+0000 8282 4428 1000 0000 9292 9292 6c00
+0000 8244 3844 8200 0000 8282 7e02 7c00
+0000 fe02 7c80 fe00 2040 4080 4040 2000
+1010 1010 1010 1000 0804 0402 0404 0800
+0000 0032 4c00 0000 aa55 aa55 aa55 aa55

M src/manifest.tal => src/manifest.tal +2 -2

@@ 1,7 1,7 @@
 @manifest
 
 	&name "Nasu $1 
-	&date "2022-06-28 $1
+	&date "2022-07-03 $1
 	&menu
 		07 "File $1
 			01 'n :file-new "New $1


@@ 355,7 355,7 @@ JMP2r
 	&inv .Screen/x DEI2 #0010 SUB2 .Screen/x DEO2 ROT POP ;draw-str JSR2 POP2 JMP2r
 	&del "del $1 &tab "tab $1 &ent "ent $1 &spc "spc $1 &esc "esc $1
 
-@draw-str ( str* -- str* )
+@draw-str ( str* -- nextstr* )
 
 	&while
 		LDAk ,draw-chr JSR