d6
/
uxn-utils
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added etc-icn

This commit is contained in:
Devine Lu Linvega 2024-05-28 18:58:34 -07:00
parent 12d8d058a9
commit cbd31b86bc
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gui/notepad/src/assets.tal
View File

@ -28,6 +28,9 @@
0000 0000 0000 3078 7830 0000 0000 0000 0000 0000 0000 3078 7830 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000 ] 0000 0000 0000 0000 0000 0000 0000 0000 ]
@etc-icn [
0000 0000 0000 0000 0000 0000 0054 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

7
gui/notepad/src/notepad.tal
View File

@ -440,6 +440,11 @@
#0018 .Screen/y DEO2 #0018 .Screen/y DEO2
get-page get-page
&>w ( -- ) &>w ( -- )
( | page end )
.Screen/y DEI2 #00c8 NEQ2 ?{
;etc-icn .Screen/addr DEO2
#01 .Screen/sprite DEO
!&end }
( | draw char ) ( | draw char )
DUP2 #0001 SUB2 LDA2 char-addr .Screen/addr DEO2 DUP2 #0001 SUB2 LDA2 char-addr .Screen/addr DEO2
is-selected STH is-selected STH
@ -453,7 +458,7 @@
[ LIT2 05 -Screen/sprite ] DEO [ LIT2 05 -Screen/sprite ] DEO
.Screen/x DEI2k #0008 SUB2 ROT DEO2 .Screen/x DEI2k #0008 SUB2 ROT DEO2
&block walk-char POP INC2 LDAk ?&>w &block walk-char POP INC2 LDAk ?&>w
POP2 &end POP2
@<draw-footer> ( -- ) @<draw-footer> ( -- )
.Screen/height DEI2 #0020 GTH2 ?{ JMP2r } .Screen/height DEI2 #0020 GTH2 ?{ JMP2r }