aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/fnkeys.tes
blob: fb7678c37c05d2ecff7d5ec1900ae66b1092ac4b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
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}