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

Removed placeholders

This commit is contained in:
Devine Lu Linvega 2023-04-27 09:08:55 -07:00
parent 2b0f747b02
commit 3bfbcb4570
1 changed files with 14 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
gui/notepad/notepad.tal
View File

@ -32,7 +32,12 @@
;on-mouse-body .Mouse/vector DEO2
;on-frame .Screen/vector DEO2
;on-control .Controller/vector DEO2
( init )
( initialize memory )
#0801
&l
#00 OVR #2000 MUL2 ;mem ADD2 STH2 #20 STH2r STA
INC GTHk ?&l
POP2
get-page select-from
draw-header
draw-note
@ -353,14 +358,16 @@ JMP2r
@prev-page ( -- )
.page LDZ #01 SUB #07 AND .page STZ
get-page scap #0001 SUB2
!redraw
!select-from
@next-page ( -- )
.page LDZ INC #07 AND .page STZ
get-page scap #0001 SUB2
!redraw
!select-from
@pos-to-line ( y* -- line )
@ -783,13 +790,10 @@ JMP2r
0000 0068 b000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 00ff 0000 0000 0000 0000 ffff ffff ffff ffff ]
|8000 @mem
$1
@mem ( placeholder )
"Keep 20 "up 20 "to 20 "eight 20 "pages 20 "of 20 "notes 20 "in 20 "the 20 "Note 20 "Pad. 20
"Click 20 "on 20 "the 20 "dog-ear 20 "to 20 "turn 20 "to 20 "the 20 "next 20 "following 20 "page. 20
"Click 20 "in 20 "the 20 "lower 20 "left 20 "corner 20 "to 20 "turn 20 "to 20 "the 20 "next 20 "previous 20 "page.
$1 &end
|a000 "An 20 "unknown 20 "character: 20 f8 0a 09 "> 20 "Tabbed. 0a 09 "> 20 "Tabbed. $1
|c000 "The 20 "third 20 "page.
"Click 20 "in 20 "the 20 "lower 20 "left 20 "corner 20 "to 20 "turn 20 "to 20 "the 20 "next 20 "previous 20 "page. 20 $1