1
0
Fork 0
LithOS3/lithos_c/src/main.c

52 lines
1.2 KiB
C

//-----------------------------------------------------------------------------
//
// Copyright © 2016 Project Golan
//
// See "LICENSE" for more information.
//
//-----------------------------------------------------------------------------
//
// Program entry point.
//
//-----------------------------------------------------------------------------
#include "Lth.h"
#include <ACS_ZDoom.h>
#include <stdlib.h>
// Static Functions ----------------------------------------------------------|
[[__call("ScriptS"), __script("Enter")]]
static void main()
{
Lth_Context *ctx = Lth_ContextNew(320, 200, 0x5000, 0x1000);
Lth_ContextManifestLoad_extern(ctx, "lithos_fs/Base.lthm");
ctx->mapspace.x = ctx->mapspace.y = 32;
Lth_Window *window[] = {
Lth_WindowNew("test window", -1, -1, 50, 100),
Lth_WindowNew("test window 2", -1, -1, 100, 100),
Lth_WindowNew("test window 3", -1, -1, 100, 30),
Lth_WindowNew("test window 4", -1, -1, 100, 100),
};
for(int i = 0; i < sizeof(window) / sizeof(*window); i++)
Lth_ContextMap(ctx, window[i]);
ACS_Delay(1);
for(;;)
{
Lth_ContextRun(ctx);
ACS_Delay(1);
}
Lth_ContextDestroy(ctx);
}
// EOF