From 4edea23083af644df116bb99d7b899908509c772 Mon Sep 17 00:00:00 2001 From: Devine Lu Linvega Date: Tue, 4 Jun 2024 20:52:23 -0800 Subject: [PATCH] Faster draw-line --- gui/notepad/src/notepad.tal | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/gui/notepad/src/notepad.tal b/gui/notepad/src/notepad.tal index 70b6d8f..5b53f1f 100644 --- a/gui/notepad/src/notepad.tal +++ b/gui/notepad/src/notepad.tal @@ -253,8 +253,8 @@ ( dx ) #0001 #ffff ,&x2 LDR2 STH2kr SUB2k abs2 ,&dx STR2 ( sx ) SWP2 lts2 [ JMP SWP2 POP2 ] ,&sx STR2 ( y x -> x y ) SWP2r - ( dy ) #0000 ,&y2 LDR2 STH2kr SUB2 abs2 SUB2 ,&dy STR2 - ( sy ) #0001 #ffff STH2kr ,&y2 LDR2 lts2 [ JMP SWP2 POP2 ] ,&sy STR2 + ( dy ) #0001 #ffff ,&y2 LDR2 STH2kr SUB2k abs2 #0000 SWP2 SUB2 ,&dy STR2 + ( sy ) SWP2 lts2 [ JMP SWP2 POP2 ] ,&sy STR2 ,&dx LDR2 ,&dy LDR2 ADD2 &>while ( -- ) ( draw ) OVR2r STH2r STH2kr [ LIT &color $1 ]