~rabbits/left

033eab48b94a61c7d251ac31cc9d27f85b26fd68 — Devine Lu Linvega 13 days ago 1d97e36
Improved runes
2 files changed, 19 insertions(+), 15 deletions(-)

M src/assets.tal
M src/left.tal
M src/assets.tal => src/assets.tal +8 -4
@@ 24,10 24,14 @@
&end [
	80c0 e0f0 f8fc feff fffe fcf8 f0e0 c080 ]
@rune-icns [
0000 0000 0038 4482 8282 4438 0000 0000 0000 0000 00fe 8282 8282 82fe 0000 0000
0000 0000 0038 4482 9282 4438 0000 0000 0000 0000 00fe 8282 9282 82fe 0000 0000
0000 0000 0010 08fc 02fc 0810 0000 0000 0000 0000 00fe 82fe 82fe 82fe 0000 0000
0000 0000 0010 181c fe1c 1810 0000 0000 0000 0000 0010 2844 8244 2810 0000 0000 ]
0000 0000 0010 6c82 9282 6c10 0000 0000
0000 0000 0010 7cfe eefe 7c10 0000 0000
0000 0000 0038 4482 9282 4438 0000 0000
0000 0000 0038 7cfe eefe 7c38 0000 0000
0000 0000 007c 8282 fe82 827c 0000 0000
0000 0000 007c fefe 00fe fe7c 0000 0000
0000 0000 0010 18fc 7efc 1810 0000 0000
0000 0000 0010 18fc 02fc 1810 0000 0000 ]

@font ( cream12 )
0707 0707 0707 0707 070e 0707 0707 0707 0707 0707 0707 0707 0707 0707 0707 0707

M src/left.tal => src/left.tal +11 -11
@@ 65,20 65,20 @@ BRK
	( name ) "Left 0a
	( details ) "A 20 "Text 20 "Editor 0a
	( author ) "By 20 "Hundred 20 "Rabbits 0a
	( date ) "Feb 20 "23, 20 "2023 00
	( date ) "Feb 20 "28, 20 "2023 00
	02
		( icon ) 83 =appicon
		( mask ) 41 1705

@manifest
	06 "Left $1
	06 "Left $1 [
		01 "n =file-new "New $1
		01 "r =trap "Rename $1
		01 "o =file-open "Open $1
		01 "p =file-open-binary "Open 20 "Binary $1
		01 "s =file-save "Save $1
		01 "q =exit "Exit $1
	08 "Edit $1
		01 "q =exit "Exit $1 ]
	08 "Edit $1 [
		01 "c =edit-copy "Copy $1
		01 "v =edit-paste "Paste $1
		01 "x =edit-cut "Cut $1


@@ 86,15 86,15 @@ BRK
		00 7f =delete "Delete $1
		01 09 =edit-select-at "SelectWord $1
		00 1b =reset-all "SelectReset $1
		01 "t =edit-trim "Trim $1
	02 "Go $1
		01 "t =edit-trim "Trim $1 ]
	02 "Go $1 [
		01 "/ =go-directory "Directory $1
		01 0d =go-selection "Selection $1
	01 "Find $1
		01 "f =capture-selection "Selection $1
	02 "View $1
		01 0d =go-selection "Selection $1 ]
	01 "Find $1 [
		01 "f =capture-selection "Selection $1 ]
	02 "View $1 [
		01 "h =toggle-highlight "Highlight $1
		01 "m =toggle-monospace "Monospace $1
		01 "m =toggle-monospace "Monospace $1 ]
	$1

(