scummvm/main.cpp
Vincent Hamm 117674f387 Fix compilation of the lua lib (to include math io and str)
Fix compilation and link of resiudal under VC7
The xhash is fixed with an ugly hack at line 38, probably incorrect

Residual under pure win32 version now run up to the splash screen
2003-08-25 18:42:24 +00:00

100 lines
2.7 KiB
C++

// Residual - Virtual machine to run LucasArts' 3D adventure games
// Copyright (C) 2003 The ScummVM-Residual Team (www.scummvm.org)
//
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
// version 2.1 of the License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#include "stdafx.h"
#include <SDL.h>
#include <SDL_video.h>
#include <SDL_opengl.h>
#include "bitmap.h"
#include "resource.h"
#include "debug.h"
#include "lua.h"
#include "registry.h"
#include "engine.h"
#include "mixer.h"
#ifndef _MSC_VER
#include <unistd.h>
#endif
static void saveRegistry() {
Registry::instance()->save();
}
#ifdef WIN32
int PASCAL WinMain(HINSTANCE /*hInst*/, HINSTANCE /*hPrevInst*/, LPSTR /*lpCmdLine*/, int /*iShowCmd*/) {
return main(0, NULL);
}
#endif
int main(int /* argc */, char ** /* argv */) {
char GLDriver[1024];
if (SDL_Init(SDL_INIT_VIDEO) < 0)
return 1;
SDL_GL_SetAttribute(SDL_GL_RED_SIZE, 5);
SDL_GL_SetAttribute(SDL_GL_GREEN_SIZE, 5);
SDL_GL_SetAttribute(SDL_GL_BLUE_SIZE, 5);
SDL_GL_SetAttribute(SDL_GL_DEPTH_SIZE, 16);
SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1);
if (SDL_SetVideoMode(640, 480, 24, SDL_OPENGL) == 0)
error("Could not initialize video");
atexit(SDL_Quit);
atexit(saveRegistry);
sprintf(GLDriver, "Residual: %s/%s", glGetString(GL_VENDOR), glGetString(GL_RENDERER));
SDL_WM_SetCaption(GLDriver, "Residual");
Bitmap *splash_bm = ResourceLoader::instance()->loadBitmap("splash.bm");
SDL_Event event;
while (SDL_PollEvent(&event)) {
if (event.type == SDL_VIDEOEXPOSE) {
glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
Bitmap::prepareGL();
splash_bm->draw();
SDL_GL_SwapBuffers();
}
}
Mixer::instance()->start();
lua_open();
lua_beginblock();
//lua_iolibopen();
//lua_strlibopen();
//lua_mathlibopen();
lua_endblock();
lua_beginblock();
register_lua();
lua_endblock();
lua_beginblock();
bundle_dofile("_system.lua");
lua_endblock();
lua_beginblock();
lua_pushnil(); // resumeSave
lua_pushnumber(0); // bootParam
lua_call("BOOT");
lua_endblock();
Engine::instance()->mainLoop();
return 0;
}