14c3c444f5
Further improvements to get models with broken orientations really work Make follow movegen place mob slightly above target position
494 lines
16 KiB
Lua
494 lines
16 KiB
Lua
-------------------------------------------------------------------------------
|
|
-- Mob Framework Mod by Sapier
|
|
--
|
|
-- You may copy, use, modify or do nearly anything except removing this
|
|
-- copyright notice.
|
|
-- And of course you are NOT allow to pretend you have written it.
|
|
--
|
|
--! @file debug.lua
|
|
--! @brief contains debug functions for mob framework
|
|
--! @copyright Sapier
|
|
--! @author Sapier
|
|
--! @date 2012-08-09
|
|
--!
|
|
-- Contact sapier a t gmx net
|
|
-------------------------------------------------------------------------------
|
|
|
|
mobf_assert_backtrace(mobf_debug == nil)
|
|
--! @defgroup debug_in_game In game debugging functions
|
|
--! @brief debugging functions to be called from in game
|
|
--! @ingroup framework_int
|
|
--! @{
|
|
mobf_debug = {}
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] print_usage(player,command,toadd)
|
|
--
|
|
--! @brief send errormessage to player
|
|
--
|
|
--! @param player name of player to print usage
|
|
--! @param command display usage for this command
|
|
--! @param toadd additional information to transfer to player
|
|
-------------------------------------------------------------------------------
|
|
function mobf_debug.print_usage(player, command, toadd)
|
|
|
|
if toadd == nil then
|
|
toadd = ""
|
|
end
|
|
|
|
if command == "spawnmob" then
|
|
print("CMD: ".. player .."> ".. "Usage: /spawnmob <mobname> <X,Y,Z> " .. toadd)
|
|
minetest.chat_send_player(player, "Usage: /spawnmob <mobname> <X,Y,Z> " .. toadd)
|
|
end
|
|
|
|
if command == "ukn_mob" then
|
|
print("CMD: ".. player .."> ".. "Unknown mob name "..toadd)
|
|
minetest.chat_send_player(player, "Unknown mob name "..toadd)
|
|
end
|
|
|
|
if command == "inv_pos" then
|
|
print("CMD: ".. player .."> ".. "Invalid position "..toadd)
|
|
minetest.chat_send_player(player, "Invalid position "..toadd)
|
|
end
|
|
|
|
if command == "mob_spawned" then
|
|
print("CMD: ".. player .."> ".. "Mob successfully spawned "..toadd)
|
|
minetest.chat_send_player(player, "Mob successfully spawned "..toadd)
|
|
end
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] spawn_mob(name,param)
|
|
--
|
|
--! @brief handle a spawn mob command
|
|
--
|
|
--! @param name name of player
|
|
--! @param param parameters received
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.spawn_mob(name,param)
|
|
local parameters = param:split(" ")
|
|
|
|
if #parameters ~= 1 and
|
|
#parameters ~= 2 then
|
|
mobf_debug.print_usage(name,"spawnmob")
|
|
return
|
|
end
|
|
|
|
if mobf_is_known_mob(parameters[1]) ~= true then
|
|
mobf_debug.print_usage(name,"ukn_mob", ">"..parameters[1].."<")
|
|
return true
|
|
end
|
|
|
|
if #parameters == 2 then
|
|
local pos_strings = parameters[2]:split(",")
|
|
|
|
if #pos_strings ~= 3 then
|
|
mobf_debug.print_usage(name,"spawmob")
|
|
return
|
|
end
|
|
|
|
|
|
|
|
local spawnpoint = {
|
|
x=tonumber(pos_strings[1]),
|
|
y=tonumber(pos_strings[2]),
|
|
z=tonumber(pos_strings[3])
|
|
}
|
|
|
|
if spawnpoint.x == nil or
|
|
spawnpoint.y == nil or
|
|
spawnpoint.z == nil then
|
|
mobf_debug.print_usage(name,"spawnmob")
|
|
return
|
|
end
|
|
|
|
spawning.spawn_and_check(parameters[1],spawnpoint,"mobf_debug_spawner")
|
|
else
|
|
--todo find random pos
|
|
|
|
local player = minetest.get_player_by_name(name)
|
|
|
|
if player == nil then
|
|
|
|
return
|
|
end
|
|
|
|
local pos = player:getpos()
|
|
|
|
if pos == nil then
|
|
return
|
|
end
|
|
|
|
local found = false
|
|
local maxtries = 10
|
|
|
|
while (found == false) and (maxtries > 0) do
|
|
local toadd = {}
|
|
toadd.x = pos.x + (math.random(20) -10)
|
|
toadd.z = pos.z + (math.random(20) -10)
|
|
|
|
local y = mobf_get_surface(toadd.x,toadd.z,pos.y-10,pos.y+10)
|
|
|
|
if y ~= nil then
|
|
toadd.y = y +2
|
|
if spawning.spawn_and_check(parameters[1],toadd,"mobf_debug_spawner") then
|
|
found = true
|
|
end
|
|
end
|
|
|
|
maxtries = maxtries -1
|
|
end
|
|
end
|
|
|
|
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] list_active_mobs(name,param)
|
|
--
|
|
--! @brief print list of all current active mobs
|
|
--
|
|
--! @param name name of player
|
|
--! @param param parameters received
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.list_active_mobs(name,param)
|
|
|
|
local count = 1
|
|
for index,value in pairs(minetest.luaentities) do
|
|
if value.data ~= nil and value.data.name ~= nil then
|
|
local tosend = count .. ": " .. value.data.name .. " at "
|
|
.. printpos(value.object:getpos())
|
|
print(tosend)
|
|
minetest.chat_send_player(name,tosend)
|
|
count = count +1
|
|
end
|
|
end
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] list_spawners(name,param)
|
|
--
|
|
--! @brief print list of all spawners around player
|
|
--
|
|
--! @param name name of player
|
|
--! @param param parameters received
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.list_spawners(name,param)
|
|
|
|
for index,value in pairs(minetest.luaentities) do
|
|
if value ~= nil and value.spawner_mob_name ~= nil then
|
|
local resultline = "SPW: "
|
|
.. mobf_fixed_size_string(value.spawner_mob_name,24) .. " "
|
|
.. mobf_fixed_size_string(printpos(value.object:getpos()),16)
|
|
.. " STATE: "
|
|
.. mobf_fixed_size_string(dump(value.spawner_last_result),32)
|
|
.. " TIME: " .. value.spawner_time_passed
|
|
|
|
print(resultline)
|
|
end
|
|
end
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] mob_count(name,param)
|
|
--
|
|
--! @brief count active mobs
|
|
--
|
|
--! @param name name of player
|
|
--! @param param parameters received
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.mob_count(name,param)
|
|
|
|
local count = 1
|
|
for index,value in pairs(minetest.luaentities) do
|
|
if value.data ~= nil and value.data.name ~= nil then
|
|
count = count +1
|
|
end
|
|
end
|
|
|
|
minetest.chat_send_player(name,"Active mobs: " .. count)
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] add_tools(name,param)
|
|
--
|
|
--! @brief add toolset for testing
|
|
--
|
|
--! @param name name of player
|
|
--! @param param parameters received
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.add_tools(name,param)
|
|
local player = minetest.get_player_by_name(name)
|
|
|
|
if player ~= nil then
|
|
player:get_inventory():add_item("main", "animalmaterials:lasso 20")
|
|
player:get_inventory():add_item("main", "animalmaterials:net 20")
|
|
player:get_inventory():add_item("main", "animalmaterials:scissors 1")
|
|
player:get_inventory():add_item("main", "vessels:drinking_glass 10")
|
|
end
|
|
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] list_defined_mobs(name,param)
|
|
--
|
|
--! @brief list all registred mobs
|
|
--
|
|
--! @param name name of player
|
|
--! @param param parameters received
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.list_defined_mobs(name,param)
|
|
|
|
local text = ""
|
|
for i,val in ipairs(mobf_rtd.registred_mob) do
|
|
text = text .. val .. " "
|
|
end
|
|
minetest.chat_send_player(name, "MOBF: "..text)
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] init()
|
|
--
|
|
--! @brief initialize debug commands chat handler
|
|
--
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.init()
|
|
|
|
minetest.register_chatcommand("spawnmob",
|
|
{
|
|
params = "<name> <pos>",
|
|
description = "spawn a mob at position(optional)" ,
|
|
privs = {mobfw_admin=true},
|
|
func = mobf_debug.spawn_mob
|
|
})
|
|
|
|
minetest.register_chatcommand("listactivemobs",
|
|
{
|
|
params = "",
|
|
description = "list all currently active mobs" ,
|
|
privs = {mobfw_admin=true},
|
|
func = mobf_debug.list_active_mobs
|
|
})
|
|
|
|
minetest.register_chatcommand("listdefinedmobs",
|
|
{
|
|
params = "",
|
|
description = "list all currently defined mobs" ,
|
|
privs = {mobfw_admin=true},
|
|
func = mobf_debug.list_defined_mobs
|
|
})
|
|
|
|
minetest.register_chatcommand("mob_add_tools",
|
|
{
|
|
params = "",
|
|
description = "add some mob specific tools to player" ,
|
|
privs = {mobfw_admin=true},
|
|
func = mobf_debug.add_tools
|
|
})
|
|
|
|
minetest.register_chatcommand("mobf_version",
|
|
{
|
|
params = "",
|
|
description = "show mobf version number" ,
|
|
privs = {},
|
|
func = function(name,param)
|
|
minetest.chat_send_player(name,"MOBF version: " .. mobf_version)
|
|
end
|
|
})
|
|
|
|
minetest.register_chatcommand("listspawners",
|
|
{
|
|
params = "",
|
|
description = "debug info about spawner entities" ,
|
|
privs = {mobfw_admin=true},
|
|
func = mobf_debug.list_spawners
|
|
})
|
|
|
|
minetest.register_chatcommand("mobf_count",
|
|
{
|
|
params = "",
|
|
description = "number of active mobs" ,
|
|
privs = {},
|
|
func = mobf_debug.mob_count
|
|
})
|
|
|
|
minetest.register_chatcommand("mobf_mobs_offline",
|
|
{
|
|
params = "",
|
|
description = "print offline mobs" ,
|
|
privs = {},
|
|
func = mobf_debug.print_offline_mobs
|
|
})
|
|
|
|
|
|
if mobf_rtd.luatrace_enabled then
|
|
minetest.register_chatcommand("traceon",
|
|
{
|
|
params = "",
|
|
description = "start luatrace tracing" ,
|
|
privs = {mobfw_admin=true},
|
|
func = function()
|
|
luatrace.tron(nil)
|
|
end
|
|
})
|
|
|
|
minetest.register_chatcommand("traceoff",
|
|
{
|
|
params = "",
|
|
description = "stop luatrace tracing" ,
|
|
privs = {mobfw_admin=true},
|
|
func = function()
|
|
luatrace.troff()
|
|
end
|
|
})
|
|
end
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] print_offline_mobs(name,message)
|
|
--
|
|
--! @brief spawn small house
|
|
--
|
|
--! @param name name of player
|
|
--! @param param parameters
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.print_offline_mobs(name,param)
|
|
|
|
local count = 0
|
|
|
|
for key,value in pairs(spawning.mob_spawn_data) do
|
|
for hash,enabled in pairs (value) do
|
|
count = count +1
|
|
local mobpos = mobf_hash_to_pos(hash)
|
|
|
|
print(string.format("%5d: ",count) .. key .. " " .. printpos(mobpos))
|
|
end
|
|
end
|
|
|
|
print("Total of " .. count .. " mobs stored as offline")
|
|
end
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- @function [parent=#mobf_debug] rightclick_callback(entity,player)
|
|
--
|
|
--! @brief show rightclick info
|
|
--
|
|
--! @param entity entity rightclicked
|
|
--! @param player player doing rightclick
|
|
------------------------------------------------------------------------------
|
|
function mobf_debug.rightclick_callback(entity,player)
|
|
local basepos = entity.getbasepos(entity)
|
|
local lifetime = mobf_get_current_time() - entity.dynamic_data.spawning.original_spawntime
|
|
print("MOBF: " .. entity.data.name .. " " .. tostring(entity) .. " is alive for " .. lifetime .. " seconds")
|
|
print("MOBF: \tAbsolute spawntime: " .. entity.dynamic_data.spawning.original_spawntime)
|
|
print("MOBF: \tCurrent state: " .. entity.dynamic_data.state.current.name )
|
|
print("MOBF: \tCurrent movgen: " .. entity.dynamic_data.current_movement_gen.name )
|
|
print("MOBF: \tHP: " .. entity.object:get_hp())
|
|
if entity.dynamic_data.current_movement_gen.name == "follow_mov_gen" or
|
|
entity.dynamic_data.current_movement_gen.name == "mgen_path" then
|
|
|
|
local targetpos = entity.dynamic_data.spawning.spawnpoint
|
|
if entity.dynamic_data.movement.target ~= nil then
|
|
if not mobf_is_pos(entity.dynamic_data.movement.target) then
|
|
targetpos = entity.dynamic_data.movement.target:getpos()
|
|
else
|
|
targetpos = entity.dynamic_data.movement.target
|
|
end
|
|
end
|
|
if targetpos ~= nil then
|
|
print("MOBF: \t\tmovement state: " .. mgen_follow.identify_movement_state(basepos,targetpos) )
|
|
else
|
|
print("MOBF: \t\tmovement state: invalid")
|
|
end
|
|
print("MOBF: \t\tguard spawnpoint: " .. dump(entity.dynamic_data.movement.guardspawnpoint))
|
|
print("MOBF: \t\ttarget: " .. dump(entity.dynamic_data.movement.target))
|
|
end
|
|
if entity.dynamic_data.current_movement_gen.name == "mgen_path" then
|
|
print("MOBF: \t\tpath index: " .. entity.dynamic_data.p_movement.next_path_index)
|
|
print("MOBF: \t\tpath: " .. dump(entity.dynamic_data.p_movement.path))
|
|
if entity.dynamic_data.p_movement.path ~= nil then
|
|
for i,v in ipairs(entity.dynamic_data.p_movement.path) do
|
|
local objects = minetest.get_objects_inside_radius(v,0.5)
|
|
local found = false;
|
|
for i=1,#objects,1 do
|
|
local luaentity = objects[i]:get_luaentity()
|
|
if luaentity ~= nil and
|
|
luaentity.name == "mobf:path_marker_entity" then
|
|
found = true
|
|
break
|
|
end
|
|
end
|
|
|
|
local node_at = minetest.get_node(v)
|
|
|
|
if not found and
|
|
node_at.name ~= nil and
|
|
node_at.name ~= "ignore" then
|
|
spawning.spawn_and_check("mobf:path_marker_entity",v,"mark_path")
|
|
end
|
|
end
|
|
print("MOBF: \t\tdistance to next point: " .. p_mov_gen.distance_to_next_point(entity,entity.object:getpos()))
|
|
end
|
|
end
|
|
|
|
local predicted_pos = movement_generic.predict_next_block(
|
|
basepos,
|
|
entity.object:getvelocity(),
|
|
entity.object:getacceleration())
|
|
if not ( entity.data.movement.canfly == true) then
|
|
predicted_pos.y = basepos.y
|
|
end
|
|
local pos_state = environment.pos_is_ok(predicted_pos,entity)
|
|
local pos_quality = environment.pos_quality(basepos,entity)
|
|
local predicted_quality = environment.pos_quality(predicted_pos,entity)
|
|
|
|
print("MOBF: \tTime to state change: " .. entity.dynamic_data.state.time_to_next_change .. " seconds")
|
|
print("MOBF: \tCurrent environmental state: " .. environment.pos_is_ok(entity.getbasepos(entity),entity))
|
|
if mobf_rtd.detailed_state then
|
|
print("MOBF: \tCurrent detailed state: " .. pos_quality:shortstring())
|
|
end
|
|
print("MOBF: \tCan fly: " .. dump(entity.data.movement.canfly))
|
|
print("MOBF: \tCurrent accel: " .. printpos(entity.object:getacceleration()))
|
|
print("MOBF: \tDefault gravity: " .. dump(environment.get_default_gravity(basepos, entity.environment.media, entity.data.movement.canfly)))
|
|
print("MOBF: \tCurrent speed: " .. printpos(entity.object:getvelocity()))
|
|
print("MOBF: \tSpawnpoint: " .. printpos(entity.dynamic_data.spawning.spawnpoint))
|
|
print("MOBF: \tSpawner: " .. dump(entity.dynamic_data.spawning.spawner))
|
|
print("MOBF: \tCurrent pos: " .. printpos(basepos))
|
|
print("MOBF: \tPredicted pos: " .. printpos(predicted_pos))
|
|
print("MOBF: \tPredicted state: " .. pos_state)
|
|
print("MOBF: \tMovement facedir offset: " .. dump(entity.automatic_face_movement_dir))
|
|
if entity.dynamic_data.sound ~= nil and entity.dynamic_data.sound.random_next ~= nil then
|
|
print("MOBF: \tNext random sound: " ..
|
|
(entity.dynamic_data.sound.random_next - mobf_get_current_time()))
|
|
end
|
|
if mobf_rtd.detailed_state then
|
|
print("MOBF: \tPredicted detail: " .. predicted_quality:shortstring())
|
|
end
|
|
if entity.dynamic_data.combat ~= nil then
|
|
print("MOBF: \tCurrent combat target: " .. fighting.get_target_name(entity.dynamic_data.combat.target))
|
|
end
|
|
if entity.dynamic_data.attention ~= nil then
|
|
print("MOBF: \t Current attention table:")
|
|
for k,v in pairs(entity.dynamic_data.attention.watched_objects) do
|
|
print("MOBF: \t\t " .. k .. ": " .. v.value)
|
|
end
|
|
|
|
if entity.dynamic_data.attention.most_relevant_target ~= nil then
|
|
local attention_name = tostring(entity.dynamic_data.attention.most_relevant_target)
|
|
|
|
if (entity.dynamic_data.attention.most_relevant_target:is_player()) then
|
|
attention_name = entity.dynamic_data.attention.most_relevant_target:get_player_name()
|
|
end
|
|
print("MOBF: \tTop attention object: " .. attention_name)
|
|
end
|
|
end
|
|
|
|
if entity.dynamic_data.graphics.last_fps ~= nil then
|
|
print("MOBF: Animating with: " .. entity.dynamic_data.graphics.last_fps .. " fps")
|
|
end
|
|
return false
|
|
end
|
|
|
|
|
|
--!@}
|