diff options
| author | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2013-02-22 00:31:48 +0100 |
|---|---|---|
| committer | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2013-02-22 01:18:06 +0100 |
| commit | db1304d9183f3018d1729ef6ce91644f11159382 (patch) | |
| tree | 5281952408ccd87b0a42f95888abf4c07f2a6405 /lib/fnkeys.tes | |
| parent | 41362a9e75302c1ded15a59b6c688a36eb0ea920 (diff) | |
| download | sciteco-db1304d9183f3018d1729ef6ce91644f11159382.tar.gz | |
added some default function key macros
Diffstat (limited to 'lib/fnkeys.tes')
| -rw-r--r-- | lib/fnkeys.tes | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/lib/fnkeys.tes b/lib/fnkeys.tes new file mode 100644 index 0000000..fb7678c --- /dev/null +++ b/lib/fnkeys.tes @@ -0,0 +1,28 @@ +! Define some default function key macros ! + +! edit command line to move <n> chars, updating existing move ops ! +@#c{{U.c + <-A- ("=%.n|-A- )"=-%.n|0''">-D1;'-D> + ."> + -A- )"= -S(\U.v .,Z-2D 0A- C"=2DQ.v|2D-Q.v'%.c | I(Q.c ' + | I(Q.c ' + "> Q.c\IC) | -Q.c\IR) ' +}} + +! go <n> pages of lines down ! +@#p{ + U.c (ESLINESONSCREEN)*Q.cL +} + +! Function key macros ! +@{DC}{} +@{HOME}{(-(.-(0L.))M#c} +@{END}{(-(.-(:L"S.-1|Z'))M#c} +@{NPAGE}{(-(.-(M#p.))M#c} +@{PPAGE}{(-(.-(-M#p.))M#c} +@{LEFT}{(-M#c} +@{SLEFT}{(-(.--W.)M#c} +@{RIGHT}{(M#c} +@{SRIGHT}{(-(.-W.)M#c} +@{UP}{(-(.-B.)M#c} +@{DOWN}{(-(.-L.)M#c} |