/svarcom/trunk/rmodcore.h |
---|
File deleted |
/svarcom/trunk/makefile |
---|
23,14 → 23,14 |
all: command.com |
command.com: deflang.h rmodcore.h command.obj cmd.obj doserr.obj env.obj redir.obj rmodinit.obj sayonara.obj helpers.obj |
command.com: deflang.h rmod.h command.obj cmd.obj doserr.obj env.obj redir.obj rmodinit.obj sayonara.obj helpers.obj |
*wcl $(LDFLAGS) command.obj cmd.obj doserr.obj env.obj redir.obj rmodinit.obj sayonara.obj helpers.obj |
.c.obj: |
wcc $(CFLAGS) $< |
rmodcore.h: file2c.com rmod.com |
file2c rmod.com rmodcore.h rmodcore |
rmod.h: file2c.com rmod.com |
file2c /c rmod.com rmod.h rmod |
deflang.h: file2c.com tlumacz\default.lng |
file2c /l4096 tlumacz\default.lng deflang.h langblock |
/svarcom/trunk/rmod.h |
---|
0,0 → 1,28 |
const char rmod[] = { |
131, 25,133, 25, 23, 32, 25, 32, 0, 0, 0, 0, 0, 0, 64, 58, |
92, 67, 79, 77, 77, 65, 78, 68, 46, 67, 79, 77, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,140,200,142,216,142, |
192,142,208,188,145, 2,128, 14, 43, 1, 0,116, 19,184, 0, 75, |
186, 43, 1,187, 29, 1,205, 33, 46,198, 6, 43, 1, 0,235,219, |
180, 77,205, 33, 48,228,163, 10, 1,176, 0,185, 14, 0,191, 29, |
1,252,243,170,186, 14, 1,131, 14, 12, 1, 0,116, 8,142, 6, |
44, 0,139, 22, 12, 1,161, 44, 0,163, 29, 1,199, 6, 31, 1, |
42, 2,140, 14, 33, 1,184, 0, 75, 6, 31, 14, 7,187, 29, 1, |
205, 33,115,151,140,203,142,219, 4, 48,162, 49, 2,180, 9,186, |
45, 2,205, 33,180, 8,205, 33,235,129, 1, 10, 13, 69, 82, 82, |
32,120, 44, 32, 70, 65, 73, 76, 69, 68, 32, 84, 79, 32, 76, 79, |
65, 68, 32, 67, 79, 77, 77, 65, 78, 68, 46, 67, 79, 77, 13, 10, |
36, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, |
70, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, |
70, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, |
70, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, |
70,120,120}; |
#define rmod_len 403 |
/svarcom/trunk/rmodinit.c |
---|
28,7 → 28,7 |
#include "env.h" |
#include "helpers.h" |
#include "rmodcore.h" |
#include "rmod.h" |
#include "rmodinit.h" |
37,7 → 37,7 |
struct rmod_props far *rmod_install(unsigned short envsize) { |
char far *myptr, far *mcb; |
unsigned short far *owner; |
const unsigned short sizeof_rmodandprops_paras = (0x100 + rmodcore_len + sizeof(struct rmod_props) + 15) / 16; |
const unsigned short sizeof_rmodandprops_paras = (0x100 + rmod_len + sizeof(struct rmod_props) + 15) / 16; |
unsigned short rmodseg = 0xffff; |
unsigned short envseg, origenvseg; |
struct rmod_props far *res; |
114,7 → 114,7 |
for (i = 0; i < 0x100; i++) myptr[i] = mypsp[i]; |
} |
myptr = MK_FP(rmodseg, 0x100); |
_fmemcpy(myptr, rmodcore, rmodcore_len); |
_fmemcpy(myptr, rmod, rmod_len); |
/* mark rmod memory as "self owned" */ |
mcb = MK_FP(rmodseg - 1, 0); |
136,7 → 136,7 |
} |
/* prepare result (rmod props) */ |
res = MK_FP(rmodseg, 0x100 + rmodcore_len); |
res = MK_FP(rmodseg, 0x100 + rmod_len); |
_fmemset(res, 0, sizeof(*res)); /* zero out */ |
res->rmodseg = rmodseg; /* rmod segment */ |
res->inputbuf[0] = 128; /* input buffer for INT 0x21, AH=0Ah*/ |
199,7 → 199,7 |
cmdtail[0] = 0; |
cmdtail[1] = '\r'; |
/* */ |
return(MK_FP(*parent, 0x100 + rmodcore_len)); |
return(MK_FP(*parent, 0x100 + rmod_len)); |
} |