(notepad) Fixed drawing bug

This commit is contained in:
Devine Lu Linvega 2023-07-27 15:26:13 -07:00
parent 9ee28d3cd2
commit 87ab45e0c0
1 changed files with 4 additions and 1 deletions

View File

@ -36,7 +36,7 @@ BRK
( name ) "Note 20 "Pad 0a ( name ) "Note 20 "Pad 0a
( details ) "Original 20 "by 20 "Donn 20 "Denman 0a ( details ) "Original 20 "by 20 "Donn 20 "Denman 0a
( author ) "By 20 "Devine 20 "Lu 20 "Linvega 0a ( author ) "By 20 "Devine 20 "Lu 20 "Linvega 0a
( date ) "Apr 20 "28, 20 "2023 00 ( date ) "Jul 20 "27, 20 "2023 00
01 01
( icon ) 83 =appicon ( icon ) 83 =appicon
@ -704,6 +704,7 @@ JMP2r
@update-cursor ( color addr* -- ) @update-cursor ( color addr* -- )
[ LIT2 15 -Screen/auto ] DEO [ LIT2 15 -Screen/auto ] DEO
;fill-icn .Screen/addr DEO2
#40 draw-cursor #40 draw-cursor
.Mouse/x DEI2 ,draw-cursor/x STR2 .Mouse/x DEI2 ,draw-cursor/x STR2
.Mouse/y DEI2 ,draw-cursor/y STR2 .Mouse/y DEI2 ,draw-cursor/y STR2
@ -742,6 +743,8 @@ JMP2r
( (
@|assets ) @|assets )
@fill-icn [
ffff ffff ffff ffff ffff ffff ffff ffff ]
@error-icn [ @error-icn [
aa55 aa55 aa55 aa55 aa55 aa55 aa55 aa55 ] aa55 aa55 aa55 aa55 aa55 aa55 aa55 aa55 ]
@blink-icn [ @blink-icn [