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