qf/quakeforge
0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/quakeforge synced 2025-01-31 13:10:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

[qwaq] Implement the remaining basic cursor motion

Browse source 
This gets all the basic cursor motion from my old editor working.
arrow keys: left/right/up/down char/line
home/end: beginning/end of line
page up/down

and ctrl versions where left/right are prev/next work, up/down skip over
indents, home/end are beginning/end of screen, and page up/down are
beginning/end of text.
This commit is contained in:
Bill Currie 2021-06-11 23:34:43 +09:00
parent 3cd0d68774
commit f09810b595
2 changed files with 131 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
ruamoko/qwaq/editor/editor.h
View file

@ -43,12 +43,18 @@
-scrollRight:(unsigned) count;
-pageUp;
-pageDown;
-linesUp;
-linesDown;
-charUp;
-charDown;
-charLeft;
-charRight;
-wordLeft;
-wordRight;
-moveBOT;
-moveEOT;
-moveBOS;
-moveEOS;
-moveBOL;
-moveEOL;

131
ruamoko/qwaq/editor/editor.r
View file

@ -173,16 +173,32 @@ handleEvent (Editor *self, qwaq_event_t *event)
} else if (event.what == qe_keydown) {
switch (event.key.code) {
case QFK_PAGEUP:
[self pageUp];
if (event.key.shift & qe_control) {
[self moveBOT];
} else {
[self pageUp];
}
return 1;
case QFK_PAGEDOWN:
[self pageDown];
if (event.key.shift & qe_control) {
[self moveEOT];
} else {
[self pageDown];
}
return 1;
case QFK_UP:
[self charUp];
if (event.key.shift & qe_control) {
[self linesUp];
} else {
[self charUp];
}
return 1;
case QFK_DOWN:
[self charDown];
if (event.key.shift & qe_control) {
[self linesDown];
} else {
[self charDown];
}
return 1;
case QFK_LEFT:
if (event.key.shift & qe_control) {
@ -199,10 +215,18 @@ handleEvent (Editor *self, qwaq_event_t *event)
}
return 1;
case QFK_HOME:
[self moveBOL];
if (event.key.shift & qe_control) {
[self moveBOS];
} else {
[self moveBOL];
}
return 1;
case QFK_END:
[self moveEOL];
if (event.key.shift & qe_control) {
[self moveEOS];
} else {
[self moveEOL];
}
return 1;
}
}
@ -330,6 +354,54 @@ handleEvent (Editor *self, qwaq_event_t *event)
return self;
}
-linesUp
{
while (line_index > 0) {
line_index = [buffer prevLine: line_index];
cursor.y--;
unsigned p = [buffer nextNonSpace: line_index];
if ([buffer getChar:p] == '\n') {
continue;
}
int x = [buffer charPos:line_index at:p];
if (x <= cursor.x) {
break;
}
}
char_index = [buffer charPtr:line_index at:cursor.x];
[self recenter:0];
[self trackCursor:1];
[self moveCursor: {cursor.x - base.x, cursor.y - base.y}];
return self;
}
-linesDown
{
unsigned end = [buffer getEOT];
unsigned last = [buffer getBOL:end];
while (line_index < last) {
line_index = [buffer nextLine: line_index];
cursor.y++;
unsigned p = [buffer nextNonSpace: line_index];
if (p >= end || [buffer getChar:p] == '\n') {
continue;
}
int x = [buffer charPos:line_index at:p];
if (x <= cursor.x) {
break;
}
}
char_index = [buffer charPtr:line_index at:cursor.x];
[self recenter:0];
[self trackCursor:1];
[self moveCursor: {cursor.x - base.x, cursor.y - base.y}];
return self;
}
-charUp
{
[self recenter:0];
@ -473,6 +545,53 @@ handleEvent (Editor *self, qwaq_event_t *event)
return self;
}
-moveBOT
{
line_index = base_index = char_index = 0;;
cursor = nil;
base.x = 0;
[vScrollBar setIndex:0];
[self trackCursor:1];
[self moveCursor: {cursor.x - base.x, cursor.y - base.y}];
return self;
}
-moveEOT
{
char_index = [buffer getEOT];
line_index = [buffer getBOL:char_index];
cursor.x = [buffer charPos:line_index at:char_index];
cursor.y = line_count;
[self recenter:0];
[self trackCursor:1];
[self moveCursor: {cursor.x - base.x, cursor.y - base.y}];
return self;
}
-moveBOS
{
line_index = base_index;
cursor.y = base.y;
char_index = [buffer charPtr:line_index at:cursor.x];
[self trackCursor:1];
[self moveCursor: {cursor.x - base.x, cursor.y - base.y}];
return self;
}
-moveEOS
{
unsigned count = line_count - base.y;
if (count > ylen - 1) {
count = ylen - 1;
}
line_index = [buffer nextLine:base_index :count];
cursor.y = base.y + count;
char_index = [buffer charPtr:line_index at:cursor.x];
[self trackCursor:1];
[self moveCursor: {cursor.x - base.x, cursor.y - base.y}];
return self;
}
-moveBOL
{
char_index = line_index;