ReC98/th02/main02_1.cpp

42 lines
746 B
C++

/* ReC98
* -----
* 1st part of code segment #2 of TH02's MAIN.EXE
*/
#pragma codeseg SHARED
#pragma option -3
extern "C" {
#include "th02/th02.h"
#include "th02/hardware/frmdelay.h"
#include "th02/formats/pi.h"
#include "th02/hardware/keydelay.c"
int pascal mptn_load_inner(const char *fn);
int pascal mptn_load(const char *fn)
{
int ret;
mptn_show_palette_on_load = 0;
ret = mptn_load_inner(fn);
mptn_show_palette_on_load = 1;
return ret;
}
void pascal mptn_free(void)
{
if(mptn_buffer) {
hmem_free(FP_SEG(mptn_buffer));
}
mptn_buffer = 0;
}
#include "th01/hardware/vplanset.c"
#include "th02/formats/pi_load.c"
#include "th02/math/vector.cpp"
#include "th02/hardware/frmdely1.c"
}