/sved/trunk/edit.lng |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
Property changes: |
Deleted: svn:mime-type |
-application/octet-stream |
\ No newline at end of property |
/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 = 347u; |
const unsigned short svarlang_string_count = 19u; |
const unsigned short svarlang_memsz = 399u; |
const unsigned short svarlang_string_count = 21u; |
char svarlang_mem[347] = { |
char svarlang_mem[399] = { |
0x45,0x53,0x43,0x3d,0x4d,0x45,0x4e,0x55,0x00, |
0x55,0x4e,0x4e,0x41,0x4d,0x45,0x44,0x20,0x46,0x49,0x4c,0x45,0x00, |
0x53,0x41,0x56,0x45,0x44,0x00, |
18,10 → 18,11 |
0x45,0x52,0x52,0x4f,0x52,0x00, |
0x46,0x49,0x4c,0x45,0x20,0x4e,0x4f,0x54,0x20,0x46,0x4f,0x55,0x4e,0x44,0x00, |
0x54,0x6f,0x6f,0x20,0x6d,0x61,0x6e,0x79,0x20,0x66,0x69,0x6c,0x65,0x73,0x00, |
0x75,0x73,0x61,0x67,0x65,0x3a,0x20,0x73,0x76,0x65,0x64,0x20,0x5b,0x66,0x69,0x6c, |
0x65,0x31,0x2e,0x74,0x78,0x74,0x5d,0x20,0x5b,0x66,0x69,0x6c,0x65,0x32,0x2e,0x74, |
0x78,0x74,0x5d,0x20,0x2e,0x2e,0x2e,0x20,0x5b,0x66,0x69,0x6c,0x65,0x31,0x30,0x2e, |
0x74,0x78,0x74,0x5d,0x00, |
0x75,0x73,0x61,0x67,0x65,0x3a,0x00, |
0x5b,0x66,0x69,0x6c,0x65,0x31,0x2e,0x74,0x78,0x74,0x5d,0x20,0x5b,0x66,0x69,0x6c, |
0x65,0x32,0x2e,0x74,0x78,0x74,0x5d,0x20,0x2e,0x2e,0x2e,0x20,0x5b,0x66,0x69,0x6c, |
0x65,0x31,0x30,0x2e,0x74,0x78,0x74,0x5d,0x00, |
0x4c,0x6f,0x61,0x64,0x69,0x6e,0x67,0x00, |
0x4f,0x70,0x65,0x6e,0x20,0x66,0x69,0x6c,0x65,0x00, |
0x53,0x61,0x76,0x65,0x00, |
0x53,0x61,0x76,0x65,0x20,0x61,0x73,0x2e,0x2e,0x2e,0x00, |
30,7 → 31,7 |
0x51,0x75,0x69,0x74,0x00 |
}; |
unsigned short svarlang_dict[38] = { |
unsigned short svarlang_dict[42] = { |
0x0000,0x0000, |
0x0001,0x0009, |
0x0002,0x0016, |
44,10 → 45,12 |
0x000b,0x008a, |
0x000c,0x0099, |
0x0100,0x00a8, |
0x0800,0x00dd, |
0x0801,0x00e7, |
0x0802,0x00ec, |
0x0803,0x00f7, |
0x0804,0x0102, |
0x0805,0x010d |
0x0101,0x00af, |
0x0102,0x00d8, |
0x0800,0x00e0, |
0x0801,0x00ea, |
0x0802,0x00ef, |
0x0803,0x00fa, |
0x0804,0x0105, |
0x0805,0x0110 |
}; |
/sved/trunk/makefile |
---|
2,38 → 2,55 |
# sved Makefile -- requires OpenWatcom (wmake) |
# Copyright (C) 2023 Mateusz Viste |
# |
# usage: |
# wmake builds the sved.com binary |
# wmake release builds distribuable packages (svp, zip, sources...) |
CC = wcc |
CFLAGS = -0 -ms -os -wx -we -d0 -I=mdr\inc |
CFLAGS += -s |
LDFLAGS = -lr -mt -fm=edit.map -fe=edit.com |
LDFLAGS = -lr -mt -fm=edit.map -fe=sved.com |
LDLIBS = svarlang\svarlngs.lib mdr\mdrs2023.lib |
all: edit.com |
all: sved.com |
edit.com: sved.obj deflang.obj |
sved.com: sved.obj deflang.obj |
wcl $(LDLIBS) sved.obj deflang.obj $(LDFLAGS) |
upx -9 --8086 edit.com |
upx -9 --8086 sved.com |
.c.obj: .autodepend |
$(CC) $(CFLAGS) $*.C |
pkg: edit.com .symbolic |
# builds a SvarDOS package |
sved.svp: sved.com |
IF EXIST SVED.SVP DEL SVED.SVP |
mkdir bin |
mkdir appinfo |
mkdir doc |
mkdir doc\sved |
copy edit.com bin |
copy edit.lng bin |
copy sved.txt doc\sved |
copy sved.com bin\edit.com |
copy sved.lng bin\edit.lng |
copy sved.txt doc\sved\ |
echo version: 2023.0 > appinfo\sved.lsm |
echo description: SvarDOS text editor >> appinfo\sved.lsm |
zip -9rkDX -m sved.zip bin appinfo doc |
zip -9rkDX -m sved.svp bin appinfo doc |
rmdir doc\sved |
rmdir doc |
rmdir bin |
rmdir appinfo |
# "normal" DOS distribution, ie. bunch of binaries in a zip file |
sved.zip: sved.com |
IF EXIST SVED.ZIP DEL SVED.ZIP |
zip -9rkDX sved.zip sved.com sved.lng sved.txt |
# source package (no binaries) |
sved_src.zip: |
IF EXIST SVED_SRC.ZIP DEL SVED_SRC.ZIP |
zip -9rkDX sved_src.zip *.txt *.c *.h *.lng makefile mdr nls svarlang |
release: sved.svp sved.zip sved_src.zip .symbolic |
clean: .symbolic |
del *.obj |
del edit.com |
del sved.com |
/sved/trunk/nls/en_utf8.txt |
---|
21,11 → 21,13 |
0.12:Too many files |
################ |
# USAGE SCREEN # |
################ |
#################### |
# CONSOLE MESSAGES # |
#################### |
1.0:usage: sved [file1.txt] [file2.txt] ... [file10.txt] |
1.0:usage: |
1.1:[file1.txt] [file2.txt] ... [file10.txt] |
1.2:Loading |
######## |
/sved/trunk/nls/regen.bat |
---|
4,7 → 4,7 |
utf8tocp maz pl_utf8.txt > pl.txt |
..\svarlang\tlumacz en pl |
move /y out.lng ..\edit.lng |
move /y out.lng ..\sved.lng |
move /y deflang.c .. |
del ??.txt |
/sved/trunk/sved.c |
---|
648,9 → 648,25 |
/* look at the arg now */ |
if (*arg == '/') { |
mdr_coutraw_puts("Sved ver " PVER " Copyright (C) " PDATE " Mateusz Viste"); |
mdr_coutraw_puts(""); |
mdr_coutraw_puts(svarlang_str(1,0)); /* usage: sved file.txt */ |
const char far *self = mdr_dos_selfexe(); |
unsigned short i; |
if (self == NULL) self = "sved"; |
for (i = 0; self[i] != 0; i++) { |
if (self[i] == '\\') { |
self += i + 1; |
i = 0; |
} |
} |
mdr_coutraw_puts("sved ver " PVER " copyright (C) " PDATE " Mateusz Viste"); |
mdr_coutraw_crlf(); |
mdr_coutraw_str(svarlang_str(1,0)); /* usage: */ |
mdr_coutraw_char(' '); |
while (*self != 0) { |
mdr_coutraw_char(*self); |
self++; |
} |
mdr_coutraw_char(' '); |
mdr_coutraw_puts(svarlang_str(1,1)); /* args syntax */ |
return(-1); |
} |
661,6 → 677,8 |
} |
/* try loading it */ |
mdr_coutraw_str(svarlang_str(1,2)); |
mdr_coutraw_char(' '); |
mdr_coutraw_puts(arg); |
err = loadfile(&(dbarr[count]), arg); |
if (err) { |
/sved/trunk/sved.lng |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
Property changes: |
Added: svn:mime-type |
+application/octet-stream |
\ No newline at end of property |