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

(m291) Starting progress bar

This commit is contained in:
Devine Lu Linvega 2024-08-25 20:30:34 -07:00
parent e28f00bacb
commit 27f2dbd2bf
2 changed files with 23 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -334,12 +334,27 @@
[ LIT2 01 -Screen/sprite ] DEOk DEOk DEOk DEO
( | .. )
#0008 .Screen/x DEO2
#0080 .Screen/y DEO2
#0070 .Screen/y DEO2
;placeholder/time-a #01 <draw-uf2>
( | .. )
.Screen/width DEI2 #0008 SUB2 .Screen/x DEO2
#0080 .Screen/y DEO2
#0070 .Screen/y DEO2
;placeholder/time-b #01 <draw-uf2-right>
( >> )
@<draw-progress> ( -- )
[ LIT2 01 -Screen/auto ] DEO
#0004 .Screen/x DEO2
#0088 .Screen/y DEO2
;progress-icn/left .Screen/addr DEO2
[ LIT2 01 -Screen/sprite ] DEO
#e3
&>t ( -- )
;progress-icn/middle .Screen/addr DEO2
[ LIT2 01 -Screen/sprite ] DEO
INC DUP ?&>t
POP ;progress-icn/right .Screen/addr DEO2
[ LIT2 01 -Screen/sprite ] DEO
JMP2r
@<draw-spacer> ( addr* -- )
@ -533,6 +548,12 @@
1010 2010 1008 0700 0f0f 1f0f 0f07 0000
2010 1010 2020 c000 c0e0 e0e0 c0c0 0000 ]
@progress-icn
&left [ 0102 0404 0404 0201 ]
&middle [ ff00 0000 0000 00ff ]
&right [ 8040 2020 2020 4080 ]
&fill [ 0000 3078 7830 0000 ]
@button-icn [
0000 0000 0102 0408 0000 1f60 8000 0000
0000 f806 0100 0000 0000 0000 8040 2010

BIN
gui/m291/ss10x10.chr
View File

Binary file not shown.