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

Added pagination shortcuts

This commit is contained in:
Devine Lu Linvega 2024-05-27 20:01:57 -07:00
parent 30b6b85b6e
commit 372976e425
3 changed files with 1014 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1007
gui/notepad/bin/res.tal Normal file
View File

File diff suppressed because it is too large Load Diff

2
gui/notepad/makefile
View File

@ -20,7 +20,7 @@ uninstall:
archive: all archive: all
@ cat src/${ID}.tal src/assets.tal | sed 's/~[^[:space:]]\+//' > bin/res.tal @ cat src/${ID}.tal src/assets.tal | sed 's/~[^[:space:]]\+//' > bin/res.tal
@ ${ASM} bin/res.tal bin/res.rom && ${EMU} bin/res.rom @ ${ASM} bin/res.tal bin/res.rom && ${EMU} bin/res.rom
@ cp bin/res.tal ../oscean/etc/${ID}.tal.txt @ cp bin/res.tal ../../../oscean/etc/${ID}.tal.txt
.PHONY: all clean lint run install uninstall archive .PHONY: all clean lint run install uninstall archive

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

@ -4,13 +4,13 @@
|90 @Mouse &vector $2 &x $2 &y $2 &state $1 &chord $1 |90 @Mouse &vector $2 &x $2 &y $2 &state $1 &chord $1
|a0 @File &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2 |a0 @File &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2
|0000 |000
@page $1 @page $1
@collapsed $1 @collapsed $1
@selection &a $2 &b $2 &length $2 @selection &a $2 &b $2 &length $2
|0100 |100
( meta ) ( meta )
;meta #06 DEO2 ;meta #06 DEO2
@ -37,7 +37,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 ) "May 20 "23, 20 "2024 00 ( date ) "May 20 "27, 20 "2024 00
01 01
( icon ) 83 =appicon ( icon ) 83 =appicon
@ -61,6 +61,9 @@ BRK
DUP #80 NEQ ?&no-r select-right &no-r DUP #80 NEQ ?&no-r select-right &no-r
DUP #42 NEQ ?&no-sbl .selection/b LDZ2 #0001 SUB2 find-word-start select-variable &no-sbl DUP #42 NEQ ?&no-sbl .selection/b LDZ2 #0001 SUB2 find-word-start select-variable &no-sbl
DUP #82 NEQ ?&no-sbr .selection/b LDZ2 INC2 find-word-end select-variable &no-sbr DUP #82 NEQ ?&no-sbr .selection/b LDZ2 INC2 find-word-end select-variable &no-sbr
( pagination )
DUP #21 NEQ OVR #81 NEQ AND ?{ next-page }
DUP #11 NEQ OVR #41 NEQ AND ?{ prev-page }
POP POP
( key ) ( key )
DUP #08 NEQ ?&no-bs erase &no-bs DUP #08 NEQ ?&no-bs erase &no-bs