Connected arrows
This commit is contained in:
parent
797b8dc4e0
commit
c7482debc0
|
@ -93,10 +93,16 @@
|
|||
DUP [ LIT ". ] NEQ ?{ #001e <set-press> }
|
||||
POP BRK
|
||||
&on-button ( button -> )
|
||||
DUP [ LIT 40 ] NEQ ?{
|
||||
#0018 <set-press>
|
||||
POP BRK }
|
||||
DUP [ LIT 80 ] NEQ ?{
|
||||
#0019 <set-press>
|
||||
POP BRK }
|
||||
#02 SFT #01 AND .layer STZ
|
||||
<draw-keyboard>
|
||||
BRK
|
||||
|
||||
|
||||
(
|
||||
@|core )
|
||||
|
||||
|
@ -285,6 +291,6 @@
|
|||
&c ( -- )
|
||||
#0f AND DUP #09 GTH #27 MUL ADD [ LIT "0 ] ADD #18 DEO
|
||||
JMP2r
|
||||
|
||||
|
||||
~assets.tal
|
||||
|
||||
|
|
Loading…
Reference in New Issue