forked from Mirrorlandia_minetest/minetest
249 lines
7.3 KiB
C++
249 lines
7.3 KiB
C++
/*
|
|
Minetest
|
|
Copyright (C) 2013 celeron55, Perttu Ahola <celeron55@gmail.com>
|
|
|
|
This program 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 program 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 program; if not, write to the Free Software Foundation, Inc.,
|
|
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
*/
|
|
|
|
#include "lua_api/l_particles.h"
|
|
#include "lua_api/l_internal.h"
|
|
#include "common/c_converter.h"
|
|
#include "server.h"
|
|
|
|
// add_particle({pos=, velocity=, acceleration=, expirationtime=,
|
|
// size=, collisiondetection=, vertical=, texture=, player=})
|
|
// pos/velocity/acceleration = {x=num, y=num, z=num}
|
|
// expirationtime = num (seconds)
|
|
// size = num
|
|
// collisiondetection = bool
|
|
// vertical = bool
|
|
// texture = e.g."default_wood.png"
|
|
int ModApiParticles::l_add_particle(lua_State *L)
|
|
{
|
|
// Get parameters
|
|
v3f pos, vel, acc;
|
|
pos= vel= acc= v3f(0, 0, 0);
|
|
float expirationtime, size;
|
|
expirationtime= size= 1;
|
|
bool collisiondetection, vertical;
|
|
collisiondetection= vertical= false;
|
|
std::string texture = "";
|
|
const char *playername = "";
|
|
|
|
if (lua_gettop(L) > 1) // deprecated
|
|
{
|
|
log_deprecated(L,"Deprecated add_particle call with individual parameters instead of definition");
|
|
pos = check_v3f(L, 1);
|
|
vel = check_v3f(L, 2);
|
|
acc = check_v3f(L, 3);
|
|
expirationtime = luaL_checknumber(L, 4);
|
|
size = luaL_checknumber(L, 5);
|
|
collisiondetection = lua_toboolean(L, 6);
|
|
texture = luaL_checkstring(L, 7);
|
|
if (lua_gettop(L) == 8) // only spawn for a single player
|
|
playername = luaL_checkstring(L, 8);
|
|
}
|
|
else if (lua_istable(L, 1))
|
|
{
|
|
int table = lua_gettop(L);
|
|
lua_pushnil(L);
|
|
while (lua_next(L, table) != 0)
|
|
{
|
|
const char *key = lua_tostring(L, -2);
|
|
if(strcmp(key,"pos")==0){
|
|
pos=check_v3f(L, -1);
|
|
}else if(strcmp(key,"vel")==0){
|
|
vel=check_v3f(L, -1);
|
|
}else if(strcmp(key,"acc")==0){
|
|
acc=check_v3f(L, -1);
|
|
}else if(strcmp(key,"expirationtime")==0){
|
|
expirationtime=luaL_checknumber(L, -1);
|
|
}else if(strcmp(key,"size")==0){
|
|
size=luaL_checknumber(L, -1);
|
|
}else if(strcmp(key,"collisiondetection")==0){
|
|
collisiondetection=lua_toboolean(L, -1);
|
|
}else if(strcmp(key,"vertical")==0){
|
|
vertical=lua_toboolean(L, -1);
|
|
}else if(strcmp(key,"texture")==0){
|
|
texture=luaL_checkstring(L, -1);
|
|
}else if(strcmp(key,"playername")==0){
|
|
playername=luaL_checkstring(L, -1);
|
|
}
|
|
lua_pop(L, 1);
|
|
}
|
|
}
|
|
if (strcmp(playername, "")==0) // spawn for all players
|
|
{
|
|
getServer(L)->spawnParticleAll(pos, vel, acc,
|
|
expirationtime, size, collisiondetection, vertical, texture);
|
|
}
|
|
else
|
|
{
|
|
getServer(L)->spawnParticle(playername,
|
|
pos, vel, acc, expirationtime,
|
|
size, collisiondetection, vertical, texture);
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
// add_particlespawner({amount=, time=,
|
|
// minpos=, maxpos=,
|
|
// minvel=, maxvel=,
|
|
// minacc=, maxacc=,
|
|
// minexptime=, maxexptime=,
|
|
// minsize=, maxsize=,
|
|
// collisiondetection=,
|
|
// vertical=,
|
|
// texture=,
|
|
// player=})
|
|
// minpos/maxpos/minvel/maxvel/minacc/maxacc = {x=num, y=num, z=num}
|
|
// minexptime/maxexptime = num (seconds)
|
|
// minsize/maxsize = num
|
|
// collisiondetection = bool
|
|
// vertical = bool
|
|
// texture = e.g."default_wood.png"
|
|
int ModApiParticles::l_add_particlespawner(lua_State *L)
|
|
{
|
|
// Get parameters
|
|
u16 amount = 1;
|
|
v3f minpos, maxpos, minvel, maxvel, minacc, maxacc;
|
|
minpos= maxpos= minvel= maxvel= minacc= maxacc= v3f(0, 0, 0);
|
|
float time, minexptime, maxexptime, minsize, maxsize;
|
|
time= minexptime= maxexptime= minsize= maxsize= 1;
|
|
bool collisiondetection, vertical;
|
|
collisiondetection= vertical= false;
|
|
std::string texture = "";
|
|
const char *playername = "";
|
|
|
|
if (lua_gettop(L) > 1) //deprecated
|
|
{
|
|
log_deprecated(L,"Deprecated add_particlespawner call with individual parameters instead of definition");
|
|
amount = luaL_checknumber(L, 1);
|
|
time = luaL_checknumber(L, 2);
|
|
minpos = check_v3f(L, 3);
|
|
maxpos = check_v3f(L, 4);
|
|
minvel = check_v3f(L, 5);
|
|
maxvel = check_v3f(L, 6);
|
|
minacc = check_v3f(L, 7);
|
|
maxacc = check_v3f(L, 8);
|
|
minexptime = luaL_checknumber(L, 9);
|
|
maxexptime = luaL_checknumber(L, 10);
|
|
minsize = luaL_checknumber(L, 11);
|
|
maxsize = luaL_checknumber(L, 12);
|
|
collisiondetection = lua_toboolean(L, 13);
|
|
texture = luaL_checkstring(L, 14);
|
|
if (lua_gettop(L) == 15) // only spawn for a single player
|
|
playername = luaL_checkstring(L, 15);
|
|
}
|
|
else if (lua_istable(L, 1))
|
|
{
|
|
int table = lua_gettop(L);
|
|
lua_pushnil(L);
|
|
while (lua_next(L, table) != 0)
|
|
{
|
|
const char *key = lua_tostring(L, -2);
|
|
if(strcmp(key,"amount")==0){
|
|
amount=luaL_checknumber(L, -1);
|
|
}else if(strcmp(key,"time")==0){
|
|
time=luaL_checknumber(L, -1);
|
|
}else if(strcmp(key,"minpos")==0){
|
|
minpos=check_v3f(L, -1);
|
|
}else if(strcmp(key,"maxpos")==0){
|
|
maxpos=check_v3f(L, -1);
|
|
}else if(strcmp(key,"minvel")==0){
|
|
minvel=check_v3f(L, -1);
|
|
}else if(strcmp(key,"maxvel")==0){
|
|
maxvel=check_v3f(L, -1);
|
|
}else if(strcmp(key,"minacc")==0){
|
|
minacc=check_v3f(L, -1);
|
|
}else if(strcmp(key,"maxacc")==0){
|
|
maxacc=check_v3f(L, -1);
|
|
}else if(strcmp(key,"minexptime")==0){
|
|
minexptime=luaL_checknumber(L, -1);
|
|
}else if(strcmp(key,"maxexptime")==0){
|
|
maxexptime=luaL_checknumber(L, -1);
|
|
}else if(strcmp(key,"minsize")==0){
|
|
minsize=luaL_checknumber(L, -1);
|
|
}else if(strcmp(key,"maxsize")==0){
|
|
maxsize=luaL_checknumber(L, -1);
|
|
}else if(strcmp(key,"collisiondetection")==0){
|
|
collisiondetection=lua_toboolean(L, -1);
|
|
}else if(strcmp(key,"vertical")==0){
|
|
vertical=lua_toboolean(L, -1);
|
|
}else if(strcmp(key,"texture")==0){
|
|
texture=luaL_checkstring(L, -1);
|
|
}else if(strcmp(key,"playername")==0){
|
|
playername=luaL_checkstring(L, -1);
|
|
}
|
|
lua_pop(L, 1);
|
|
}
|
|
}
|
|
if (strcmp(playername, "")==0) //spawn for all players
|
|
{
|
|
u32 id = getServer(L)->addParticleSpawnerAll( amount, time,
|
|
minpos, maxpos,
|
|
minvel, maxvel,
|
|
minacc, maxacc,
|
|
minexptime, maxexptime,
|
|
minsize, maxsize,
|
|
collisiondetection,
|
|
vertical,
|
|
texture);
|
|
lua_pushnumber(L, id);
|
|
}
|
|
else
|
|
{
|
|
u32 id = getServer(L)->addParticleSpawner(playername,
|
|
amount, time,
|
|
minpos, maxpos,
|
|
minvel, maxvel,
|
|
minacc, maxacc,
|
|
minexptime, maxexptime,
|
|
minsize, maxsize,
|
|
collisiondetection,
|
|
vertical,
|
|
texture);
|
|
lua_pushnumber(L, id);
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
// delete_particlespawner(id, player)
|
|
// player (string) is optional
|
|
int ModApiParticles::l_delete_particlespawner(lua_State *L)
|
|
{
|
|
// Get parameters
|
|
u32 id = luaL_checknumber(L, 1);
|
|
|
|
if (lua_gettop(L) == 2) // only delete for one player
|
|
{
|
|
const char *playername = luaL_checkstring(L, 2);
|
|
getServer(L)->deleteParticleSpawner(playername, id);
|
|
}
|
|
else // delete for all players
|
|
{
|
|
getServer(L)->deleteParticleSpawnerAll(id);
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
void ModApiParticles::Initialize(lua_State *L, int top)
|
|
{
|
|
API_FCT(add_particle);
|
|
API_FCT(add_particlespawner);
|
|
API_FCT(delete_particlespawner);
|
|
}
|
|
|