Fixed issue with drawing hint
This commit is contained in:
parent
88946ed583
commit
16fca20680
|
@ -223,8 +223,7 @@
|
|||
( | glyph )
|
||||
.Screen/x DEI2k #0008 SUB2 ROT DEO2
|
||||
.Screen/y DEI2k #0016 ADD2 ROT DEO2
|
||||
;keys/space #05 <draw-glyph>
|
||||
( >> )
|
||||
;keys/space #05 !<draw-glyph>
|
||||
|
||||
@<draw-hint> ( -- )
|
||||
( | clear )
|
||||
|
@ -233,6 +232,7 @@
|
|||
[ LIT2 f2 -Screen/auto ] DEO
|
||||
;fill-icn .Screen/addr DEO2
|
||||
[ LIT2 0f -Screen/sprite ] DEOk DEO
|
||||
.hover LDZ2 #001d NEQ2 ?{ JMP2r }
|
||||
( | draw )
|
||||
#0050 .Screen/x DEO2
|
||||
#00b2 .Screen/y DEO2
|
||||
|
@ -328,6 +328,6 @@
|
|||
&c ( -- )
|
||||
#0f AND DUP #09 GTH #27 MUL ADD [ LIT "0 ] ADD #18 DEO
|
||||
JMP2r
|
||||
|
||||
|
||||
~assets.tal
|
||||
|
||||
|
|
Loading…
Reference in New Issue