nlua_gui.c

Go to the documentation of this file.

/*
 * See Licensing and Copyright notice in naev.h
 */
#include <lauxlib.h>
 
#include "naev.h"
#include "nlua_gui.h"
 
#include "gui.h"
#include "gui_omsg.h"
#include "gui_osd.h"
#include "log.h"
#include "map_overlay.h"
#include "nlua_tex.h"
#include "nluadef.h"
 
/* GUI methods. */
static int guiL_viewport( lua_State *L );
static int guiL_fpsPos( lua_State *L );
static int guiL_osdInit( lua_State *L );
static int guiL_mesgInit( lua_State *L );
static int guiL_omsgInit( lua_State *L );
static int guiL_radarInit( lua_State *L );
static int guiL_radarRender( lua_State *L );
static int guiL_targetSpobGFX( lua_State *L );
static int guiL_targetPilotGFX( lua_State *L );
static int guiL_mouseClickEnable( lua_State *L );
static int guiL_mouseMoveEnable( lua_State *L );
static int guiL_setMapOverlayBounds( lua_State *L );
static const luaL_Reg guiL_methods[] = {
   { "viewport", guiL_viewport },
   { "fpsPos", guiL_fpsPos },
   { "osdInit", guiL_osdInit },
   { "mesgInit", guiL_mesgInit },
   { "omsgInit", guiL_omsgInit },
   { "radarInit", guiL_radarInit },
   { "radarRender", guiL_radarRender },
   { "targetSpobGFX", guiL_targetSpobGFX },
   { "targetPilotGFX", guiL_targetPilotGFX },
   { "mouseClickEnable", guiL_mouseClickEnable },
   { "mouseMoveEnable", guiL_mouseMoveEnable },
   { "setMapOverlayBounds", guiL_setMapOverlayBounds },
   {0,0}
}; 
int nlua_loadGUI( nlua_env env )
{
   /* Register the values */
   nlua_register(env, "gui", guiL_methods, 0);
 
   return 0;
}
 
static int guiL_viewport( lua_State *L )
{
   /* Parameters. */
   double x = luaL_checknumber(L,1);
   double y = luaL_checknumber(L,2);
   double w = luaL_checknumber(L,3);
   double h = luaL_checknumber(L,4);
 
   /* Set the viewport. */
   gui_setViewport( x, y, w, h );
   return 0;
}
 
static int guiL_fpsPos( lua_State *L )
{
   double x = luaL_checknumber(L,1);
   double y = luaL_checknumber(L,2);
   fps_setPos( x, y );
   return 0;
}
 
static int guiL_osdInit( lua_State *L )
{
   /* Parameters. */
   int x = luaL_checkinteger(L,1);
   int y = luaL_checkinteger(L,2);
   int w = luaL_checkinteger(L,3);
   int h = luaL_checkinteger(L,4);
 
   /* Set up. */
   osd_setup( x, y, w, h );
   return 0;
}
 
static int guiL_mesgInit( lua_State *L )
{
   /* Parse parameters. */
   int w = luaL_checkinteger( L, 1 );
   int x = luaL_checkinteger( L, 2 );
   int y = luaL_checkinteger( L, 3 );
 
   /* Initialize. */
   gui_messageInit( w, x, y );
   return 0;
}
 
static int guiL_omsgInit( lua_State *L )
{
   /* Parse parameters. */
   double w = luaL_checkinteger( L, 1 );
   double x = luaL_checkinteger( L, 2 );
   double y = luaL_checkinteger( L, 3 );
 
   /* Initialize. */
   omsg_position( x, y, w );
   return 0;
}
 
static int guiL_radarInit( lua_State *L )
{
   int id, circle, width, height;
 
 
   /* Parse parameters. */
   circle = lua_toboolean( L, 1 );
   width = luaL_checkinteger( L, 2 );
   if (!circle)
      height = luaL_checkinteger( L, 3 );
   else
      height = width;
 
   /* Create the radar. */
   id = gui_radarInit( circle, width, height );
   lua_pushnumber( L, id );
   return 1;
}
 
static int guiL_radarRender( lua_State *L )
{
   /* Parse parameters. */
   double x = luaL_checknumber( L, 1 );
   double y = luaL_checknumber( L, 2 );
 
   /* Render the radar. */
   gui_radarRender( x, y );
   return 0;
}
 
static int guiL_targetSpobGFX( lua_State *L )
{
   gui_targetSpobGFX( luaL_checktex( L, 1 ) );
   return 0;
}
 
static int guiL_targetPilotGFX( lua_State *L )
{
   gui_targetPilotGFX( luaL_checktex( L, 1 ) );
   return 0;
}
 
static int guiL_mouseClickEnable( lua_State *L )
{
   int b;
   if (lua_gettop(L) > 0)
      b = lua_toboolean(L,1);
   else
      b = 1;
   gui_mouseClickEnable( b );
   return 0;
}
 
static int guiL_mouseMoveEnable( lua_State *L )
{
   int b;
   if (lua_gettop(L) > 0)
      b = lua_toboolean(L,1);
   else
      b = 1;
   gui_mouseMoveEnable( b );
   return 0;
}
 
static int guiL_setMapOverlayBounds( lua_State *L )
{
   int top    = luaL_checkinteger(L,1);
   int right  = luaL_checkinteger(L,2);
   int bottom = luaL_checkinteger(L,3);
   int left   = luaL_checkinteger(L,4);
 
   ovr_boundsSet( top, right, bottom, left );
   return 0;
}