aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/fnkeys.tes
diff options
context:
space:
mode:
Diffstat (limited to 'lib/fnkeys.tes')
-rw-r--r--lib/fnkeys.tes12
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/fnkeys.tes b/lib/fnkeys.tes
index fd6b332..ab78025 100644
--- a/lib/fnkeys.tes
+++ b/lib/fnkeys.tes
@@ -36,7 +36,7 @@
*!
@[HOME]{
- ESLINEFROMPOSITIONESPOSITIONFROMLINE:U.p
+ 0+.U.p
Q.pU.l <Q.l-."U 1; ' Q.l-.AU.c Q.c- "N Q.c-9"N Q.lU.p 1; '' %.l>
Q.pESGETCOLUMN,4EJ
Q.p-.M#c
@@ -45,7 +45,7 @@
1U[ HOME]
@[END]{
- ESLINEFROMPOSITIONESGETLINEENDPOSITIONU.p
+ :-1ESGETLINEENDPOSITIONU.p
Q.pESGETCOLUMN,4EJ
Q.p:-.M#c
}
@@ -54,7 +54,7 @@
@[NPAGE]{
0,4EJ
- ESLINEFROMPOSITION+(ESLINESONSCREEN)
+ :-1+ESLINESONSCREEN
ESPOSITIONFROMLINEU.p
Q.p"< Z | Q.p: '-.M#c
}
@@ -63,7 +63,7 @@
@[PPAGE]{
0,4EJ
- ESLINEFROMPOSITION-(ESLINESONSCREEN)U.l
+ :-1-ESLINESONSCREENU.l
Q.l"< 0 | Q.lESPOSITIONFROMLINE: '-.M#c
}
@[ PPAGE]{(M[PPAGE]}
@@ -102,13 +102,13 @@
1U[ SRIGHT]
@[UP]{
- 4EJ(ESLINEFROMPOSITION-1)ESFINDCOLUMN:-.M#c
+ 4EJ,:-2ESFINDCOLUMN:-.M#c
}
@[ UP]{(M[UP]}
1U[ UP]
@[DOWN]{
- 4EJ(ESLINEFROMPOSITION+1)ESFINDCOLUMN:-.M#c
+ 4EJ,:ESFINDCOLUMN:-.M#c
}
@[ DOWN]{(M[DOWN]}
1U[ DOWN]