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

Faster draw-line

This commit is contained in:
Devine Lu Linvega 2024-06-04 20:52:23 -08:00
parent df9c33f075
commit 4edea23083
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gui/notepad/src/notepad.tal
View File

@ -253,8 +253,8 @@
( dx ) #0001 #ffff ,&x2 LDR2 STH2kr SUB2k abs2 ,&dx STR2 ( dx ) #0001 #ffff ,&x2 LDR2 STH2kr SUB2k abs2 ,&dx STR2
( sx ) SWP2 lts2 [ JMP SWP2 POP2 ] ,&sx STR2 ( sx ) SWP2 lts2 [ JMP SWP2 POP2 ] ,&sx STR2
( y x -> x y ) SWP2r ( y x -> x y ) SWP2r
( dy ) #0000 ,&y2 LDR2 STH2kr SUB2 abs2 SUB2 ,&dy STR2 ( dy ) #0001 #ffff ,&y2 LDR2 STH2kr SUB2k abs2 #0000 SWP2 SUB2 ,&dy STR2
( sy ) #0001 #ffff STH2kr ,&y2 LDR2 lts2 [ JMP SWP2 POP2 ] ,&sy STR2 ( sy ) SWP2 lts2 [ JMP SWP2 POP2 ] ,&sy STR2
,&dx LDR2 ,&dy LDR2 ADD2 ,&dx LDR2 ,&dy LDR2 ADD2
&>while ( -- ) &>while ( -- )
( draw ) OVR2r STH2r STH2kr [ LIT &color $1 ] <set-pixel> ( draw ) OVR2r STH2r STH2kr [ LIT &color $1 ] <set-pixel>