Do not needlessly redraw footer
This commit is contained in:
parent
c17fe9c0af
commit
4140196702
|
@ -433,7 +433,8 @@
|
||||||
#0000 .Screen/x DEO2
|
#0000 .Screen/x DEO2
|
||||||
#0018 .Screen/y DEO2
|
#0018 .Screen/y DEO2
|
||||||
[ LIT2 80 -Screen/pixel ] DEO
|
[ LIT2 80 -Screen/pixel ] DEO
|
||||||
( >> )
|
<draw-note>
|
||||||
|
!<draw-footer>
|
||||||
|
|
||||||
@<draw-note> ( -- )
|
@<draw-note> ( -- )
|
||||||
[ LIT2 00 -collapsed ] LDZ EQU ?{ JMP2r }
|
[ LIT2 00 -collapsed ] LDZ EQU ?{ JMP2r }
|
||||||
|
@ -460,7 +461,7 @@
|
||||||
[ LIT2 05 -Screen/sprite ] DEO
|
[ LIT2 05 -Screen/sprite ] DEO
|
||||||
.Screen/x DEI2k #0008 SUB2 ROT DEO2
|
.Screen/x DEI2k #0008 SUB2 ROT DEO2
|
||||||
&block walk-char POP INC2 LDAk ?&>w
|
&block walk-char POP INC2 LDAk ?&>w
|
||||||
&end POP2
|
&end POP2 JMP2r
|
||||||
|
|
||||||
@<draw-footer> ( -- )
|
@<draw-footer> ( -- )
|
||||||
[ LIT2 26 -Screen/auto ] DEO
|
[ LIT2 26 -Screen/auto ] DEO
|
||||||
|
|
Loading…
Reference in New Issue