nlua_bkg.c

Go to the documentation of this file.

/*
 * See Licensing and Copyright notice in naev.h
 */
#include <lauxlib.h>
 
#include "naev.h"
#include "nlua_bkg.h"
 
#include "background.h"
#include "log.h"
#include "nlua_colour.h"
#include "nlua_tex.h"
#include "nluadef.h"
 
/* Background methods. */
static int bkgL_clear( lua_State *L );
static int bkgL_image( lua_State *L );
static const luaL_Reg bkgL_methods[] = {
   { "clear", bkgL_clear },
   { "image", bkgL_image },
   {0,0}
}; 
int nlua_loadBackground( nlua_env env )
{
   nlua_register(env, "bkg", bkgL_methods, 0);
   return 0;
}
 
static int bkgL_clear( lua_State *L )
{
   (void) L;
   background_clear();
   return 0;
}
 
static int bkgL_image( lua_State *L )
{
   glTexture *tex;
   double x,y, move, scale, angle;
   const glColour *col;
   unsigned int id;
   int foreground;
 
 
   /* Parse parameters. */
   tex   = luaL_checktex(L,1);
   x     = luaL_checknumber(L,2);
   y     = luaL_checknumber(L,3);
   move  = luaL_optnumber(L,4,0.);
   scale = luaL_optnumber(L,5,1.);
   angle = luaL_optnumber(L,6,0.);
   col   = luaL_optcolour(L,7,&cWhite);
   foreground = lua_toboolean(L,8);
 
   /* Create image. */
   id = background_addImage( tex, x, y, move, scale, angle, col, foreground );
   lua_pushnumber(L,id);
   return 1;
}