mirror of
https://github.com/sys4-fr/server-nalc.git
synced 2024-08-30 09:10:35 +02:00
172 lines
6.2 KiB
Lua
Executable File
172 lines
6.2 KiB
Lua
Executable File
-----------------------------------------------------------------------------------------------
|
|
-- Fishing Pole
|
|
-----------------------------------------------------------------------------------------------
|
|
|
|
local function rod_wear(itemstack, user, pointed_thing, uses)
|
|
itemstack:add_wear(65535/(uses-1))
|
|
return itemstack
|
|
end
|
|
|
|
fishing_setting.poles = {}
|
|
fishing_setting.poles.wood = {["name"] = "wood", ["max_use"] = 30, ["desc"] = fishing_setting.func.S("Fishing Pole"),["bobber_max"] = 2 }
|
|
fishing_setting.poles.perfect = {["name"] = "perfect", ["max_use"] = 1500, ["desc"] = fishing_setting.func.S("Perfect Fishing Pole"),["bobber_max"] = 5}
|
|
|
|
|
|
for _,pole in pairs(fishing_setting.poles) do
|
|
local bobbermax = pole["bobber_max"]
|
|
minetest.register_tool("fishing:pole_".. pole.name, {
|
|
description = pole.desc,
|
|
groups = {},
|
|
inventory_image = "fishing_pole_".. pole.name ..".png",
|
|
wield_image = "fishing_pole_".. pole.name ..".png^[transformFXR270",
|
|
stack_max = 1,
|
|
liquids_pointable = true,
|
|
|
|
on_use = function (itemstack, user, pointed_thing)
|
|
if pointed_thing and pointed_thing.under then
|
|
local pt = pointed_thing
|
|
local node = minetest.get_node(pt.under)
|
|
if not node or string.find(node.name, "water_source") == nil then return nil end
|
|
local player_name = user:get_player_name()
|
|
local inv = user:get_inventory()
|
|
local bait = inv:get_stack("main", user:get_wield_index()+1 ):get_name()
|
|
if fishing_setting.baits[bait] == nil then return nil end
|
|
|
|
--if contest then player must have only 2 boober
|
|
local bobber_nb = 0
|
|
local bobber_max
|
|
if fishing_setting.contest["contest"] ~= nil and fishing_setting.contest["contest"] == true then
|
|
bobber_max = fishing_setting.contest["bobber_nb"]
|
|
else
|
|
bobber_max = bobbermax
|
|
end
|
|
|
|
for m, obj in pairs(minetest.get_objects_inside_radius(pt.under, 20)) do
|
|
if obj:get_luaentity() ~= nil and string.find(obj:get_luaentity().name, "fishing:bobber") ~= nil then
|
|
if obj:get_luaentity().owner == player_name then
|
|
bobber_nb = bobber_nb + 1
|
|
end
|
|
end
|
|
end
|
|
if bobber_nb >= bobber_max then
|
|
if fishing_setting.settings["message"] == true then
|
|
minetest.chat_send_player(player_name, fishing_setting.func.S("You don't have mores %s bobbers!"):format(bobber_max))
|
|
end
|
|
return nil
|
|
end
|
|
|
|
local bobbers = {}
|
|
local objs = minetest.get_objects_inside_radius(pt.under, 3)
|
|
for m, obj in pairs(objs) do
|
|
if obj:get_luaentity() ~= nil and string.find(obj:get_luaentity().name, "fishing:bobber") ~= nil then
|
|
bobbers[m] = obj
|
|
end
|
|
end
|
|
|
|
local nodes = {}
|
|
local i = 1
|
|
for _,k in pairs({ 1, 0, -1}) do
|
|
for _,l in pairs({ -1, 0, 1}) do
|
|
local node_name = minetest.get_node({x=pt.under.x+l, y=pt.under.y, z=pt.under.z+k}).name
|
|
if node and string.find(node_name, "water_source") ~= nil
|
|
and minetest.get_node({x=pt.under.x+l, y=pt.under.y+1, z=pt.under.z+k}).name == "air" then
|
|
local empty = true
|
|
for o, obj in pairs(bobbers) do
|
|
local p = obj:getpos()
|
|
local dist = ((p.x-pt.under.x)^2 + (p.y-pt.under.y)^2 + (p.z-pt.under.z)^2)^0.5
|
|
if dist < 2 then
|
|
empty = false
|
|
break
|
|
end
|
|
end
|
|
if empty then
|
|
nodes[i] = {x=pt.under.x+l, y=pt.under.y, z=pt.under.z+k}
|
|
i = i+1
|
|
end
|
|
end
|
|
end
|
|
end
|
|
--if water == -3 nodes
|
|
if #nodes < 2 then
|
|
if fishing_setting.settings["message"] == true then minetest.chat_send_player(player_name, fishing_setting.func.S("You don't fishing in a bottle!")) end
|
|
return nil
|
|
end
|
|
local new_pos = nodes[math.random(1, #nodes)]
|
|
new_pos.y=new_pos.y+(45/64)
|
|
local ent = minetest.add_entity({interval = 1,x=new_pos.x, y=new_pos.y, z=new_pos.z}, fishing_setting.baits[bait].bobber)
|
|
if not ent then return nil end
|
|
local luaentity = ent:get_luaentity()
|
|
luaentity.owner = player_name
|
|
luaentity.bait = bait
|
|
luaentity.old_pos = new_pos
|
|
luaentity.old_pos2 = true
|
|
if not fishing_setting.is_creative_mode then
|
|
inv:remove_item("main", bait)
|
|
end
|
|
minetest.sound_play("fishing_bobber2", {pos = new_pos, gain = 0.5})
|
|
if fishing_setting.settings["wear_out"] == true and not fishing_setting.is_creative_mode then
|
|
return rod_wear(itemstack, user, pointed_thing, pole.max_use)
|
|
else
|
|
return {name="fishing:pole_".. pole.name, count=1, wear=0, metadata=""}
|
|
end
|
|
end
|
|
return nil
|
|
end,
|
|
|
|
on_place = function(itemstack, placer, pointed_thing)
|
|
if fishing_setting.settings["simple_deco_fishing_pole"] == false then return end
|
|
local pt = pointed_thing
|
|
local pt_under_name = minetest.get_node(pt.under).name
|
|
if string.find(pt_under_name, "water_") == nil then
|
|
local wear = itemstack:get_wear()
|
|
local direction = minetest.dir_to_facedir(placer:get_look_dir())
|
|
local meta = minetest.get_meta(pt.above)
|
|
minetest.set_node(pt.above, {name="fishing:pole_".. pole.name .."_deco", param2=direction})
|
|
meta:set_int("wear", wear)
|
|
if not fishing_setting.is_creative_mode then
|
|
itemstack:take_item()
|
|
end
|
|
end
|
|
return itemstack
|
|
end,
|
|
})
|
|
|
|
minetest.register_node("fishing:pole_".. pole.name .."_deco", {
|
|
description = pole.desc,
|
|
inventory_image = "fishing_pole_".. pole.name ..".png",
|
|
wield_image = "fishing_pole.png^[transformFXR270",
|
|
drawtype = "nodebox",
|
|
paramtype = "light",
|
|
paramtype2 = "facedir",
|
|
tiles = {
|
|
"fishing_pole_".. pole.name .."_simple.png",
|
|
"fishing_pole_".. pole.name .."_simple.png",
|
|
"fishing_pole_".. pole.name .."_simple.png",
|
|
"fishing_pole_".. pole.name .."_simple.png^[transformFX",
|
|
},
|
|
groups = { snappy=3, flammable=2, not_in_creative_inventory=1 },
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{ 0 , -1/2 , 0 , 0 , 1/2 , 1 },
|
|
}
|
|
},
|
|
selection_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-1/16 , -1/2 , 0 , 1/16 , 1/2 , 1 },
|
|
}
|
|
},
|
|
sounds = default.node_sound_wood_defaults(),
|
|
on_dig = function(pos, node, digger)
|
|
if digger:is_player() and digger:get_inventory() then
|
|
local meta = minetest.get_meta(pos)
|
|
local wear_out = meta:get_int("wear")
|
|
digger:get_inventory():add_item("main", {name="fishing:pole_".. pole.name, count=1, wear=wear_out, metadata=""})
|
|
end
|
|
minetest.remove_node(pos)
|
|
end,
|
|
})
|
|
|
|
end
|