#include <stdio.h>
#include "../_sdk/nedodefs.h" //C only
#define USE_HINTS
#define USE_COMMENTS
#include "../_sdk/emit.c" //эєцэю фы compile ш asm (шэрўх эх т√тхёЄш ю°шсъш)
#include "../_sdk/read.c" //эєцэю фы compile ш token
//#include "codetg.c"
//#include "regs.c"
#include "commands.c"
#include "compile.c"
#include "lbltype.c"
//#include "fmttg.h" //эєцэю фы token, asm, export
/**
struct zzz{
BYTE ba;
LONG lb;
STRUCT zzz* pc;
};
CONST struct zzz zuzu={
0x03,
5L,
&zuzu
};
*/
PROC writearray(PBYTE parray, UINT size, PCHAR filename)
{
VAR PBYTE file;
file
= fopen(filename
, "wb");
fwrite(parray
, size
, 1, file
);
}
int main(int argc,char* argv[])
{
int i;
char *filename;
//VAR STRUCT zzz* pzz1 = &zuzu;
//VAR PBYTE pp = &(pzz1->ba);
_ferr = openwrite("err.f");
_errs = +TRUE;
//filename = "_test.c";
//_asms = +TRUE;
_cmts = +FALSE;
_hints = +FALSE;
for (i=1; i<argc; i++) {
if ((argv[i][0]=='-')&&(argv[i][1]=='C')) {_cmts = +TRUE;
}else if((argv[i][0]=='-')&&(argv[i][1]=='H')) {_hints = +TRUE;
}else {
filename = argv[i];
compile(filename);
writearray((PBYTE)/**_lblbuf*/_lbls, /**_lblbufindex*//**_lblbuflen+0x200*/_LBLBUFSZ, "label.f");
/**
system("del asm.f");
system("copy _test.asm asm.f");
_fout = openwrite("tok.f"); //setfout( "ftok" ); //AssignFile(fout,'fout'); Rewrite(fout);
_curline = 1;
tokenize("asm.f");
tokenize_end();
closewrite(_fout); //closefout(); //CloseFile(fout);
asmcompile();
writearray((PBYTE)_labels0, _LABELPAGESIZE, "label0.f");
*/
};
}; //for
fclose(_ferr
);//closewrite(_ferr);
return 0;
}