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

(m291) Fixed redraw artifacts

This commit is contained in:
Devine Lu Linvega 2024-08-26 13:26:30 -07:00
parent f34b972602
commit ff922f79f2
1 changed files with 21 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
gui/m291/src/m291.tal
View File

@ -466,16 +466,28 @@
<draw-progress> !<draw-timestamp> <draw-progress> !<draw-timestamp>
@<draw-title> ( -- ) @<draw-title> ( -- )
( | clear )
#0020 .Screen/y DEO2
<clear-line>
( | draw )
#0080 .Screen/x DEO2 #0080 .Screen/x DEO2
#0020 .Screen/y DEO2 #0020 .Screen/y DEO2
;id3/title #01 !<draw-uf2-center> ;id3/title #01 !<draw-uf2-center>
@<draw-artist> ( -- ) @<draw-artist> ( -- )
( | clear )
#0030 .Screen/y DEO2
<clear-line>
( | draw )
#0080 .Screen/x DEO2 #0080 .Screen/x DEO2
#0030 .Screen/y DEO2 #0030 .Screen/y DEO2
;id3/artist #01 !<draw-uf2-center> ;id3/artist #01 !<draw-uf2-center>
@<draw-album> ( -- ) @<draw-album> ( -- )
( | clear )
#0040 .Screen/y DEO2
<clear-line>
( | draw )
#0080 .Screen/x DEO2 #0080 .Screen/x DEO2
#0040 .Screen/y DEO2 #0040 .Screen/y DEO2
;id3/album #01 !<draw-uf2-center> ;id3/album #01 !<draw-uf2-center>
@ -577,6 +589,15 @@
@<draw-dec> ( value -- ) @<draw-dec> ( value -- )
#0a DIVk MUL SUB [ LIT "0 ] ADD !<draw-glyph> #0a DIVk MUL SUB [ LIT "0 ] ADD !<draw-glyph>
@<clear-line> ( -- )
#0000 .Screen/x DEO2
;fill-icn .Screen/addr DEO2
[ LIT2 f2 -Screen/auto ] DEO
[ LIT2 00 -Screen/sprite ] DEOk DEOk #0080 .Screen/x DEO2
.Screen/y DEI2 #0008 SUB2 .Screen/y DEO2
DEOk DEO
JMP2r
@<draw-spacer> ( addr* -- ) @<draw-spacer> ( addr* -- )
#0000 .Screen/x DEO2 #0000 .Screen/x DEO2
.Screen/addr DEO2 .Screen/addr DEO2