Subversion Repositories SvarDOS

Compare Revisions

No changes between revisions

Ignore whitespace Rev 1324 → Rev 1325

/sved/trunk/deflang.c
1,8 → 1,8
/* THIS FILE HAS BEEN GENERATED BY TLUMACZ (PART OF THE SVARLANG LIBRARY) */
const unsigned short svarlang_memsz = 153u;
const unsigned short svarlang_string_count = 10u;
const unsigned short svarlang_memsz = 218u;
const unsigned short svarlang_string_count = 12u;
 
char svarlang_mem[153] = {
char svarlang_mem[218] = {
0x48,0x45,0x4c,0x50,0x00,
0x4e,0x45,0x57,0x20,0x46,0x49,0x4c,0x45,0x00,
0x53,0x41,0x56,0x45,0x44,0x00,
14,11 → 14,15
0x00,
0x46,0x31,0x30,0x20,0x3d,0x20,0x63,0x68,0x61,0x6e,0x67,0x65,0x20,0x6c,0x69,0x6e,
0x65,0x20,0x65,0x6e,0x64,0x69,0x6e,0x67,0x73,0x00,
0x43,0x54,0x52,0x4c,0x2b,0x52,0x69,0x67,0x68,0x74,0x20,0x3d,0x20,0x6a,0x75,0x6d,
0x70,0x20,0x74,0x6f,0x20,0x6e,0x65,0x78,0x74,0x20,0x77,0x6f,0x72,0x64,0x00,
0x43,0x54,0x52,0x4c,0x2b,0x4c,0x65,0x66,0x74,0x20,0x20,0x3d,0x20,0x6a,0x75,0x6d,
0x70,0x20,0x74,0x6f,0x20,0x70,0x72,0x65,0x76,0x20,0x77,0x6f,0x72,0x64,0x00,
0x45,0x53,0x43,0x20,0x3d,0x20,0x71,0x75,0x69,0x74,0x00,
0x50,0x72,0x65,0x73,0x73,0x20,0x61,0x6e,0x79,0x20,0x6b,0x65,0x79,0x00
};
 
unsigned short svarlang_dict[20] = {
unsigned short svarlang_dict[24] = {
0x0000,0x0000,
0x0001,0x0005,
0x0002,0x000e,
27,6 → 31,8
0x0800,0x0037,
0x0801,0x0047,
0x0802,0x0058,
0x080a,0x0072,
0x080b,0x007d
0x0803,0x0072,
0x0804,0x0091,
0x080a,0x00b0,
0x080b,0x00bb
};
/sved/trunk/nls/en_utf8.txt
23,5 → 23,7
8.0:F5 = save file
8.1:F6 = save as...
8.2:F10 = change line endings
8.3:CTRL+Right = jump to next word
8.4:CTRL+Left = jump to prev word
8.10:ESC = quit
8.11:Press any key
/sved/trunk/sved.c
181,19 → 181,21
static void ui_help(unsigned char screenw) {
#define MAXLINLEN 35
unsigned short i, offset;
offset = (screenw - MAXLINLEN + 1) >> 1;
offset = (screenw - MAXLINLEN + 2) >> 1;
mdr_cout_cursor_hide();
for (i = 2; i <= 12; i++) {
mdr_cout_char_rep(i, offset - 2, ' ', scheme[COL_STATUSBAR1], MAXLINLEN);
for (i = 2; i <= 15; i++) {
mdr_cout_char_rep(i, offset - 2, ' ', scheme[COL_STATUSBAR1], MAXLINLEN + 2);
}
 
mdr_cout_str(3, offset, svarlang_str(0, 0), scheme[COL_STATUSBAR1], MAXLINLEN);
for (i = 0; i <= 2; i++) {
for (i = 0; i <= 4; i++) {
mdr_cout_str(5 + i, offset, svarlang_str(8, i), scheme[COL_STATUSBAR1], MAXLINLEN);
}
mdr_cout_str(9, offset, svarlang_str(8, 10), scheme[COL_STATUSBAR1], MAXLINLEN);
mdr_cout_str(11, offset, svarlang_str(8, 11), scheme[COL_STATUSBAR1], MAXLINLEN);
mdr_cout_str(5 + 1 + i, offset, svarlang_str(8, 10), scheme[COL_STATUSBAR1], MAXLINLEN);
 
/* Press any key */
mdr_cout_str(14, offset, svarlang_str(8, 11), scheme[COL_STATUSBAR1], MAXLINLEN);
 
keyb_getkey();
mdr_cout_cursor_show();
#undef MAXLINLEN
696,6 → 698,38
db->lfonly ^= 1;
ui_basic(screenw, screenh, db);
 
} else if (k == 0x174) { /* CTRL+ArrRight - jump to next word */
/* if currently cursor is on a non-space, then fast-forward to nearest space or EOL */
for (;;) {
if (db->xoffset + db->cursorposx == db->cursor->len) break;
if (db->cursor->payload[db->xoffset + db->cursorposx] == ' ') break;
cursor_right(db, screenw, screenh, &uidirtyfrom, &uidirtyto);
}
/* now skip to next non-space or end of file */
for (;;) {
cursor_right(db, screenw, screenh, &uidirtyfrom, &uidirtyto);
if (db->cursor->payload[db->xoffset + db->cursorposx] != ' ') break;
if ((db->cursor->next == NULL) && (db->cursorposx + db->xoffset == db->cursor->len)) break;
}
 
} else if (k == 0x173) { /* CTRL+ArrLeft - jump to prev word */
cursor_left(db, screenw, &uidirtyfrom, &uidirtyto);
/* if currently cursor is on a space, then fast-forward to nearest non-space or start of line */
for (;;) {
if ((db->xoffset == 0) && (db->cursorposx == 0)) break;
if (db->cursor->payload[db->xoffset + db->cursorposx] != ' ') break;
cursor_left(db, screenw, &uidirtyfrom, &uidirtyto);
}
/* now skip to next space or start of file */
for (;;) {
cursor_left(db, screenw, &uidirtyfrom, &uidirtyto);
if (db->cursor->payload[db->xoffset + db->cursorposx] == ' ') {
cursor_right(db, screenw, screenh, &uidirtyfrom, &uidirtyto);
break;
}
if ((db->cursorposx == 0) && (db->xoffset == 0)) break;
}
 
} else { /* UNHANDLED KEY - TODO IGNORE THIS IN PRODUCTION RELEASE */
char buff[4];
const char *HEX = "0123456789ABCDEF";
/sved/trunk/sved.lng
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream