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

Optimized drawing

This commit is contained in:
Devine Lu Linvega 2023-04-26 21:03:54 -07:00
parent dce26ead1f
commit 5486e6d031
1 changed files with 8 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
gui/notepad/notepad.tal
View File

@ -419,35 +419,21 @@ JMP2r
#15 .Screen/auto DEO
#0008 .Screen/x DEO2
#0018 .Screen/y DEO2
;mem #00 .page LDZ #2000 MUL2 ADD2
&while
( wrap )
LDAk #20 GTH ?&no-wrap
DUP2 word-length .Screen/x DEI2 ADD2 #00d0 LTH2 ?&no-wrap
draw-linebreak
INC2 LDAk ?&while
&no-wrap
LDAk #20 SUB #00 SWP
DUP2 #50 SFT2 ;font/glyphs ADD2 .Screen/addr DEO2
;font ADD2 LDA #00 SWP .Screen/x DEI2 ADD2
OVR2 is-selected STH #0701 STHr JMP SWP POP .Screen/sprite DEOk DEO
( display cursor )
( draw char )
LDAk #20 SUB #00 SWP #50 SFT2 ;font/glyphs ADD2 .Screen/addr DEO2
DUP2 is-selected STH #0701 STHr JMP SWP POP .Screen/sprite DEOk DEO
.Screen/x DEI2k #0010 SUB2 ROT DEO2
( draw selector )
.selection/from LDZ2 .selection/to LDZ2 NEQ2 ?&block
OVR2 .selection/from LDZ2 NEQ2 ?&block
DUP2 .selection/from LDZ2 NEQ2 ?&block
;on-frame/last LDA #01 AND ?&block
;blink-icn .Screen/addr DEO2
.Screen/x DEI2k #0010 SUB2 ROT DEO2
#05 .Screen/sprite DEO
.Screen/x DEI2k #0008 SUB2 ROT DEO2
&block
.Screen/x DEO2
( tab ) LDAk #09 NEQ ?&no-tab draw-tab &no-tab
( linebreak ) LDAk #0a NEQ ?&no-lb draw-linebreak &no-lb
walk-char POP
INC2 LDAk ?&while
POP2