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

Print values

This commit is contained in:
Devine Lu Linvega 2024-02-11 10:40:48 -08:00
parent 4cf112a5a0
commit 4735f11a32
1 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
gui/shaviankb/shaviankb.tal
View File

@ -7,7 +7,8 @@
|0000 |0000
@hover $2 @lock $1 @hover $2
@lock $1
|0100 |0100
@ -56,8 +57,15 @@
@<set-press> ( id* -- ) @<set-press> ( id* -- )
.hover LDZ2 ;btn-chr <draw-key-id> .hover LDZ2 ;btn-chr <draw-key-id>
;btn-press-chr <draw-key-id> DUP2 ;btn-press-chr <draw-key-id>
JMP2r ( | event )
( key ) #0006 MUL2 ;layout ADD2 LDA2
( length ) #0010 ADD2 LDA2k SWP2 INC2 INC2
&l ( -- )
LDAk <phex>/b
#0a18 DEO
INC2 GTH2k ?&l
POP2 POP2 JMP2r
@<set-hover> ( id* -- ) @<set-hover> ( id* -- )
DUP2 .hover LDZ2 EQU2 ?{ DUP2 .hover LDZ2 EQU2 ?{