realcompass/init.lua

101 lines
3.0 KiB
Lua

-- realcompass 1.23
-- This fork written by David_G (kestral246@gmail.com)
--
-- 2020-02-20
local activewidth=8 --until I can find some way to get it from minetest
minetest.register_globalstep(function(dtime)
local players = minetest.get_connected_players()
for i,player in ipairs(players) do
local gotacompass=false
local wielded=false
local activeinv=nil
local stackidx=0
--first check to see if the user has a compass, because if they don't
--there is no reason to waste time calculating bookmarks or spawnpoints.
local wielded_item = player:get_wielded_item():get_name()
if string.sub(wielded_item, 0, 12) == "realcompass:" then
--if the player is wielding a compass, change the wielded image
wielded=true
stackidx=player:get_wield_index()
gotacompass=true
else
--check to see if compass is in active inventory
if player:get_inventory() then
--is there a way to only check the activewidth items instead of entire list?
--problem being that arrays are not sorted in lua
for i,stack in ipairs(player:get_inventory():get_list("main")) do
if i<=activewidth and string.sub(stack:get_name(), 0, 12) == "realcompass:" then
activeinv=stack --store the stack so we can update it later with new image
stackidx=i --store the index so we can add image at correct location
gotacompass=true
break
end --if i<=activewidth
end --for loop
end -- get_inventory
end --if wielded else
--dont mess with the rest of this if they don't have a compass
--update to remove legacy get_look_yaw function
if gotacompass then
local dir = player:get_look_horizontal()
local angle_relative = math.deg(dir)
local compass_image = math.floor((angle_relative/22.5) + 0.5)%16
--update compass image to point at target
if wielded then
player:set_wielded_item("realcompass:"..compass_image)
elseif activeinv then
player:get_inventory():set_stack("main",stackidx,"realcompass:"..compass_image)
end --if wielded elsif activin
end --if gotacompass
end --for i,player in ipairs(players)
end) -- register_globalstep
local images = {
"realcompass_0.png",
"realcompass_1.png",
"realcompass_2.png",
"realcompass_3.png",
"realcompass_4.png",
"realcompass_5.png",
"realcompass_6.png",
"realcompass_7.png",
"realcompass_8.png",
"realcompass_9.png",
"realcompass_10.png",
"realcompass_11.png",
"realcompass_12.png",
"realcompass_13.png",
"realcompass_14.png",
"realcompass_15.png",
}
local i
for i,img in ipairs(images) do
local inv = 1
if i == 1 then
inv = 0
end
minetest.register_tool("realcompass:"..(i-1), {
description = "Real Compass",
inventory_image = img,
wield_image = img,
groups = {not_in_creative_inventory=inv}
})
end
-- crafting recipe only works if default mod present.
if minetest.get_modpath("default") ~= nil then
minetest.register_craft({
output = 'realcompass:0',
recipe = {
{'', 'default:steel_ingot', ''},
{'default:copper_ingot', 'default:glass', 'default:copper_ingot'},
{'', 'default:copper_ingot', ''}
}
})
end