Subversion Repositories SvarDOS

Compare Revisions

No changes between revisions

Ignore whitespace Rev 1386 → Rev 1387

/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