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

Housekeeping

This commit is contained in:
Devine Lu Linvega 2024-06-04 20:45:22 -08:00
parent d5819e0d25
commit 15653b98ee
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -250,9 +250,10 @@
,&x2 STR2
STH2
STH2
( dx ) SWP2r ,&x2 LDR2 OVR2r STH2r SUB2 abs2 ,&dx STR2
( dx ) ,&x2 LDR2 STH2kr SUB2 abs2 ,&dx STR2
( sx ) #0001 #ffff STH2kr ,&x2 LDR2 lts2 [ JMP SWP2 POP2 ] ,&sx STR2
( y x -> x y ) SWP2r
( dy ) #0000 ,&y2 LDR2 STH2kr SUB2 abs2 SUB2 ,&dy STR2
( sx ) #0001 #ffff OVR2r STH2r ,&x2 LDR2 lts2 [ JMP SWP2 POP2 ] ,&sx STR2
( sy ) #0001 #ffff STH2kr ,&y2 LDR2 lts2 [ JMP SWP2 POP2 ] ,&sy STR2
,&dx LDR2 ,&dy LDR2 ADD2
&>while ( -- )