write something there
This commit is contained in:
N-Nachtigal
commit
b4b6c08f4f
8546 changed files with 309825 additions and 0 deletions
598
mods/ethereal/fishing.lua
Normal file
598
mods/ethereal/fishing.lua
Normal file
|
|
@ -0,0 +1,598 @@
|
|||
--[[
|
||||
|
||||
This fishing routine is inspired by the great work Rootyjr did for MineClone2
|
||||
|
||||
]]--
|
||||
|
||||
-- fish and where they can be caught
|
||||
|
||||
local fish_items = {
|
||||
"ethereal:fish_bluefin",
|
||||
"ethereal:fish_blueram",
|
||||
"ethereal:fish_catfish",
|
||||
"ethereal:fish_plaice",
|
||||
"ethereal:fish_salmon",
|
||||
{"ethereal:fish_clownfish", "savanna"},
|
||||
{"ethereal:fish_pike", "grassland_ocean"},
|
||||
{"ethereal:fish_flathead", "rainforest"},
|
||||
{"ethereal:fish_pufferfish", "desert_ocean"},
|
||||
{"ethereal:fish_cichlid", "rainforest_ocean"},
|
||||
{"ethereal:fish_coy", "bamboo"},
|
||||
{"ethereal:fish_tilapia", "bamboo"},
|
||||
{"ethereal:fish_trevally", "bamboo"},
|
||||
{"ethereal:fish_angler", "ocean"},
|
||||
{"ethereal:fish_jellyfish", "ocean"},
|
||||
{"ethereal:fish_seahorse", "ocean"},
|
||||
{"ethereal:fish_seahorse_green", "rainforest_ocean"},
|
||||
{"ethereal:fish_seahorse_pink", "mushroom_ocean"},
|
||||
{"ethereal:fish_seahorse_blue", "coniferous_forest_ocean"},
|
||||
{"ethereal:fish_seahorse_yellow", "desert_ocean"},
|
||||
{"ethereal:fish_parrot", "desert"},
|
||||
{"ethereal:fish_piranha", "rainforest"},
|
||||
{"ethereal:fish_tuna", "rainforest"},
|
||||
{"ethereal:fish_trout", "ocean"},
|
||||
{"ethereal:fish_cod", "ocean"},
|
||||
{"ethereal:fish_flounder", "ocean"},
|
||||
{"ethereal:fish_redsnapper", "ocean"},
|
||||
{"ethereal:fish_squid", "ocean"},
|
||||
{"ethereal:fish_shrimp", "ocean"},
|
||||
{"ethereal:fish_carp", "swamp"},
|
||||
{"ethereal:fish_tetra", "grayness_ocean"},
|
||||
{"ethereal:fish_mackerel", "glacier"}
|
||||
}
|
||||
-- grassland_ocean, desert_ocean, bamboo_ocean, mesa_ocean, coniferous_forest_ocean,
|
||||
-- taiga_ocean, frost_ocean, deciduous_forest_ocean, grayness_ocean, grassytwo_ocean,
|
||||
-- prairie_ocean, jumble_ocean, rainforest_ocean, grove_ocean, mushroom_ocean,
|
||||
-- sandstone_desert_ocean, plains_ocean, savanna_ocean, fiery_ocean, swamp_ocean,
|
||||
-- glacier_ocean, tundra_ocean
|
||||
|
||||
-- translation and mod checks
|
||||
|
||||
local S = minetest.get_translator("ethereal")
|
||||
local mod_bonemeal = minetest.get_modpath("bonemeal")
|
||||
local mod_armor = minetest.get_modpath("3d_armor")
|
||||
local mod_mobs = minetest.get_modpath("mobs")
|
||||
|
||||
-- junk items to be found
|
||||
|
||||
local junk_items = {
|
||||
"ethereal:bowl",
|
||||
"default:stick",
|
||||
"farming:string",
|
||||
"default:papyrus",
|
||||
"dye:black",
|
||||
"flowers:waterlily",
|
||||
"default:paper",
|
||||
"flowers:mushroom_red",
|
||||
"vessels:glass_bottle",
|
||||
{"ethereal:bamboo", "bamboo"},
|
||||
mod_bonemeal and "bonemeal:bone" or "default:stick",
|
||||
mod_armor and "3d_armor:boots_wood 6000" or "default:stick"
|
||||
}
|
||||
|
||||
-- bonus items to be found
|
||||
|
||||
local bonus_items = {
|
||||
mod_mobs and "mobs:nametag" or "fireflies:bug_net",
|
||||
mod_mobs and "mobs:net" or "default:sapling",
|
||||
"fireflies:firefly_bottle",
|
||||
mod_mobs and "mobs:saddle" or "farming:cotton_wild",
|
||||
"default:book",
|
||||
{"ethereal:firethorn", "glacier"},
|
||||
{"ethereal:crystal_spike", "frost"},
|
||||
{"ethereal:banana_bunch", "grove"},
|
||||
"tnt:tnt_stick",
|
||||
"bucket:bucket_empty",
|
||||
"default:sword_steel 12000",
|
||||
"ethereal:fishing_rod 9000"
|
||||
}
|
||||
|
||||
-- helpers
|
||||
|
||||
local default_item = "default:dirt"
|
||||
local random = math.random -- yup we use this a lot
|
||||
|
||||
-- global add item function
|
||||
|
||||
ethereal.add_item = function(fish, junk, bonus)
|
||||
|
||||
if fish and fish ~= "" then table.insert(fish_items, fish) end
|
||||
|
||||
if junk and junk ~= "" then table.insert(junk_items, junk) end
|
||||
|
||||
if bonus and bonus ~= "" then table.insert(bonus_items, bonus) end
|
||||
end
|
||||
|
||||
-- bubble particle effect
|
||||
|
||||
local function effect(pos)
|
||||
|
||||
minetest.add_particle({
|
||||
pos = {
|
||||
x = pos.x + random() - 0.5,
|
||||
y = pos.y + 0.1,
|
||||
z = pos.z + random() - 0.5
|
||||
},
|
||||
velocity = {x = 0, y = 4, z = 0},
|
||||
acceleration = {x = 0, y = -5, z = 0},
|
||||
expirationtime = random() * 0.5,
|
||||
size = random(),
|
||||
collisiondetection = false,
|
||||
vertical = false,
|
||||
texture = "bubble.png"
|
||||
})
|
||||
end
|
||||
|
||||
-- fishing bob entity
|
||||
|
||||
minetest.register_entity("ethereal:bob_entity", {
|
||||
|
||||
initial_properties = {
|
||||
textures = {"ethereal_fishing_bob.png"},
|
||||
visual_size = {x = 0.5, y = 0.5},
|
||||
collisionbox = {-0.1, -0.1, -0.1, 0.1, 0.1, 0.1},
|
||||
physical = false,
|
||||
pointable = false,
|
||||
static_save = false
|
||||
},
|
||||
|
||||
timer = 0,
|
||||
|
||||
on_step = function(self, dtime)
|
||||
|
||||
local pos = self.object:get_pos()
|
||||
local node = minetest.get_node(pos)
|
||||
local def = minetest.registered_nodes[node.name]
|
||||
|
||||
-- casting rod into water
|
||||
if not self.cast then
|
||||
|
||||
-- remove if we hit something hard
|
||||
if (def and def.walkable) or node.name == "ignore" then
|
||||
|
||||
self.object:remove() ; --print("-- hit block")
|
||||
|
||||
return
|
||||
end
|
||||
|
||||
-- while bob is in water
|
||||
if def and def.liquidtype == "source"
|
||||
and minetest.get_item_group(node.name, "water") > 0 then
|
||||
|
||||
-- incase of lag find water level
|
||||
local free_fall, blocker = minetest.line_of_sight(
|
||||
{x = pos.x, y = pos.y + 2, z = pos.z},
|
||||
{x = pos.x, y = pos.y , z = pos.z})
|
||||
|
||||
-- do we have worms for bait, if so take one
|
||||
local player = self.fisher and minetest.get_player_by_name(self.fisher)
|
||||
local inv = player and player:get_inventory()
|
||||
local bait = 0
|
||||
|
||||
if inv and inv:contains_item("main", "caverealms:glow_bait") then
|
||||
inv:remove_item("main", "caverealms:glow_bait")
|
||||
bait = 40
|
||||
elseif inv and inv:contains_item("main", "ethereal:worm") then
|
||||
inv:remove_item("main", "ethereal:worm")
|
||||
bait = 20
|
||||
end
|
||||
|
||||
-- re-position fishing bob and set to cast
|
||||
pos = {x = pos.x, y = blocker.y + 0.45, z = pos.z}
|
||||
|
||||
self.object:set_acceleration({x = 0, y = 0, z = 0})
|
||||
self.object:set_velocity({x = 0, y = 0, z = 0})
|
||||
self.object:set_pos(pos)
|
||||
self.bait = bait
|
||||
self.cast = true
|
||||
|
||||
-- splash
|
||||
effect(pos) ; effect(pos) ; effect(pos) ; effect(pos)
|
||||
|
||||
minetest.sound_play("default_water_footstep",
|
||||
{pos = pos, gain = 0.1}, true)
|
||||
end
|
||||
|
||||
else -- already cast and waiting for fish
|
||||
|
||||
-- we need a name
|
||||
if self.fisher == nil or self.fisher == "" then
|
||||
|
||||
self.object:remove() ; --print("-- no name")
|
||||
|
||||
return
|
||||
end
|
||||
|
||||
local player = minetest.get_player_by_name(self.fisher)
|
||||
|
||||
-- we need an actual person
|
||||
if not player then
|
||||
|
||||
self.object:remove() ; --print("-- no player")
|
||||
|
||||
return
|
||||
end
|
||||
|
||||
local wield = player:get_wielded_item()
|
||||
|
||||
-- we also need a rod to fish with
|
||||
if not wield or wield:get_name() ~= "ethereal:fishing_rod" then
|
||||
|
||||
self.object:remove() ; --print("-- no rod")
|
||||
|
||||
return
|
||||
end
|
||||
|
||||
-- remove bob if player is too far away
|
||||
local pla_pos = player:get_pos()
|
||||
|
||||
if (pla_pos.y - pos.y) > 15 or (pla_pos.y - pos.y) < -15
|
||||
or (pla_pos.x - pos.x) > 15 or (pla_pos.x - pos.x) < -15
|
||||
or (pla_pos.z - pos.z) > 15 or (pla_pos.z - pos.z) < -15 then
|
||||
|
||||
self.object:remove() ; --print("-- out of range")
|
||||
|
||||
return
|
||||
end
|
||||
|
||||
-- when in water, bob.
|
||||
if def and def.liquidtype == "source"
|
||||
and minetest.get_item_group(def.name, "water") ~= 0 then
|
||||
|
||||
self.old_y = self.old_y or pos.y
|
||||
|
||||
-- choose random time to wait (minus bait time for worm)
|
||||
if not self.patience or self.patience <= 0 then
|
||||
|
||||
self.patience = random(10, (45 - self.bait))
|
||||
self.bait = 0
|
||||
end
|
||||
|
||||
-- add particles if bobber bobbing
|
||||
if self.bob then
|
||||
|
||||
effect(pos)
|
||||
|
||||
-- handle timer
|
||||
if self.timer < self.patience then
|
||||
self.timer = self.timer + dtime
|
||||
else
|
||||
self.patience = 0
|
||||
self.timer = 0
|
||||
self.bob = false
|
||||
end
|
||||
else
|
||||
-- handle timer
|
||||
if self.timer < self.patience then
|
||||
self.timer = self.timer + dtime
|
||||
else
|
||||
-- waiting over, bob that bobber and play splash sound
|
||||
self.bob = true
|
||||
self.patience = 1.4 -- timeframe to catch fish after bob
|
||||
self.timer = 0
|
||||
|
||||
self.object:set_velocity({x = 0, y = -1, z = 0})
|
||||
self.object:set_acceleration({x = 0, y = 3, z = 0})
|
||||
|
||||
minetest.sound_play("default_water_footstep", {
|
||||
pos = pos, gain = 0.1}, true)
|
||||
end
|
||||
end
|
||||
else
|
||||
-- reset to original position after dive.
|
||||
if self.old_y and pos.y > self.old_y then
|
||||
|
||||
self.object:set_velocity({x = 0, y = 0, z = 0})
|
||||
self.object:set_acceleration({x = 0, y = 0, z = 0})
|
||||
self.object:set_pos({x = pos.x, y = self.old_y, z = pos.z})
|
||||
--print("-- reset bob y pos")
|
||||
end
|
||||
|
||||
-- remove if not in water and not bobbing
|
||||
if not self.bob then
|
||||
self.object:remove() ; --print("-- not in water")
|
||||
end
|
||||
end
|
||||
|
||||
end -- if not self.cast
|
||||
|
||||
end -- on_step
|
||||
})
|
||||
|
||||
-- narrow item list depending on biome
|
||||
|
||||
local find_item = function(list, pos)
|
||||
|
||||
local item
|
||||
local items = {}
|
||||
local data= minetest.get_biome_data(pos)
|
||||
local biome = data and minetest.get_biome_name(data.biome) or ""
|
||||
|
||||
--print("--biome", biome)
|
||||
|
||||
for n = 1, #list do
|
||||
|
||||
item = list[n]
|
||||
|
||||
if type(item) == "string" then
|
||||
|
||||
table.insert(items, item)
|
||||
|
||||
elseif type(item) == "table" then
|
||||
|
||||
if item[2] == "" or biome:find(item[2]) then
|
||||
table.insert(items, item[1])
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
--print("==biome: " .. biome, dump(items))
|
||||
|
||||
if #items > 0 then return items[random(#items)] end
|
||||
|
||||
return ""
|
||||
end
|
||||
|
||||
-- fishing rod function that throws pre bob, places bob and catches fish when it moves
|
||||
|
||||
local use_rod = function(itemstack, player, pointed_thing)
|
||||
|
||||
local pos = player:get_pos()
|
||||
local objs = minetest.get_objects_inside_radius(pos, 15)
|
||||
local found = true
|
||||
local ent
|
||||
|
||||
-- loop through entities and look for bobs
|
||||
for n = 1, #objs do
|
||||
|
||||
ent = objs[n]:get_luaentity()
|
||||
|
||||
if ent and ent.fisher and ent.name == "ethereal:bob_entity"
|
||||
and player:get_player_name() == ent.fisher then
|
||||
|
||||
found = false
|
||||
|
||||
if ent.bob == true then
|
||||
|
||||
local item
|
||||
local r = random(100)
|
||||
local rodpos = ent.object:get_pos() or pos
|
||||
|
||||
-- lower position to be in water
|
||||
rodpos.y = rodpos.y - 1
|
||||
|
||||
-- chance between catching fish, bonuns item or junk
|
||||
if r < 86 then
|
||||
|
||||
item = find_item(fish_items, rodpos)
|
||||
|
||||
elseif r > 85 and r < 96 then
|
||||
|
||||
item = find_item(junk_items, rodpos)
|
||||
|
||||
else
|
||||
|
||||
item = find_item(bonus_items, rodpos)
|
||||
end
|
||||
|
||||
-- split into name and number (wear level or number of items)
|
||||
local item_name = item:split(" ")[1]
|
||||
local item_wear = item:split(" ")[2]
|
||||
|
||||
-- make sure item exists, if not replace with default item
|
||||
if not minetest.registered_items[item_name] then
|
||||
item = default_item
|
||||
end
|
||||
|
||||
--print ("---caught", item, r)
|
||||
|
||||
item = ItemStack(item) -- convert into itemstack
|
||||
|
||||
-- if tool then add wear
|
||||
if item_wear and minetest.registered_tools[item_name] then
|
||||
item:set_wear(65535 - item_wear)
|
||||
end
|
||||
|
||||
local inv = player:get_inventory()
|
||||
|
||||
if inv:room_for_item("main", item) then
|
||||
inv:add_item("main", item)
|
||||
else
|
||||
minetest.add_item(pos, item)
|
||||
end
|
||||
end
|
||||
|
||||
ent.object:remove()
|
||||
|
||||
return itemstack
|
||||
end
|
||||
end
|
||||
|
||||
-- loop through entities and look for bobs
|
||||
for n = 1, #objs do
|
||||
|
||||
ent = objs[n]:get_luaentity()
|
||||
|
||||
if ent and ent.fisher and ent.name == "ethereal:bob_entity"
|
||||
and player:get_player_name() == ent.fisher then
|
||||
|
||||
found = false
|
||||
|
||||
break
|
||||
end
|
||||
end
|
||||
|
||||
if found == true then
|
||||
|
||||
local playerpos = player:get_pos()
|
||||
local dir = player:get_look_dir()
|
||||
local pos = {x = playerpos.x, y = playerpos.y + 1.5, z = playerpos.z}
|
||||
|
||||
minetest.sound_play("ethereal_casting_rod",
|
||||
{pos = pos, gain = 1.0, max_hear_distance = 10}, true)
|
||||
|
||||
-- place actual bob
|
||||
local obj = minetest.add_entity(pos, "ethereal:bob_entity")
|
||||
|
||||
obj:set_velocity({x = dir.x * 8, y = dir.y * 8, z = dir.z * 8})
|
||||
obj:set_acceleration({x = dir.x * -3, y = -9.8, z = dir.z * -3})
|
||||
obj:get_luaentity().fisher = player and player:get_player_name()
|
||||
end
|
||||
|
||||
-- Add wear to fishing rod (65 uses)
|
||||
itemstack:add_wear(65535 / 65)
|
||||
|
||||
return itemstack
|
||||
end
|
||||
|
||||
-- scan area for bobs that belong to player and remove
|
||||
|
||||
local remove_bob = function(player)
|
||||
|
||||
local objs = minetest.get_objects_inside_radius(player:get_pos(), 15)
|
||||
local name = player:get_player_name()
|
||||
local ent
|
||||
|
||||
for n = 1, #objs do
|
||||
|
||||
ent = objs[n]:get_luaentity()
|
||||
|
||||
if ent and ent.name == "ethereal:bob_entity" then
|
||||
|
||||
-- only remove players own bob
|
||||
if ent.fisher and ent.fisher == name then
|
||||
ent.object:remove()
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- remove bob if player signs off
|
||||
|
||||
minetest.register_on_leaveplayer(function(player)
|
||||
remove_bob(player)
|
||||
end)
|
||||
|
||||
-- remove bob if player dies
|
||||
|
||||
minetest.register_on_dieplayer(function(player)
|
||||
remove_bob(player)
|
||||
end)
|
||||
|
||||
-- fishing rod
|
||||
|
||||
minetest.register_tool("ethereal:fishing_rod", {
|
||||
description = S("Fishing Rod (USE to cast and again when the time is right)"),
|
||||
groups = {tool = 1},
|
||||
inventory_image = "ethereal_fishing_rod.png",
|
||||
wield_image = "ethereal_fishing_rod.png^[transformFX",
|
||||
wield_scale = {x = 1.5, y = 1.5, z = 1},
|
||||
stack_max = 1,
|
||||
on_use = use_rod,
|
||||
sound = {breaks = "default_tool_breaks"}
|
||||
})
|
||||
|
||||
minetest.register_craft({
|
||||
output = "ethereal:fishing_rod",
|
||||
recipe = {
|
||||
{"","","group:stick"},
|
||||
{"","group:stick","farming:string"},
|
||||
{"group:stick","","farming:string"}
|
||||
}
|
||||
})
|
||||
|
||||
minetest.register_craft({
|
||||
type = "fuel",
|
||||
recipe = "ethereal:fishing_rod",
|
||||
burntime = 15
|
||||
})
|
||||
|
||||
-- table of fish and edibility
|
||||
|
||||
local fish = {
|
||||
{"Blue Fin", "bluefin", 2},
|
||||
{"Blue Ram Cichlid", "blueram", 2},
|
||||
{"Common Carp", "carp", 2},
|
||||
{"Cod", "cod", 2},
|
||||
{"Redtail Catfish", "catfish", 2},
|
||||
{"Clownfish", "clownfish", 2},
|
||||
{"Northern Pike", "pike", 2},
|
||||
{"Dusky Flathead", "flathead", 2},
|
||||
{"Plaice", "plaice", 2},
|
||||
{"Tiger Pufferfish", "pufferfish", -16},
|
||||
{"Coy", "coy", 2},
|
||||
{"European Flounder", "flounder", 2},
|
||||
{"Atlantic Salmon", "salmon", 2},
|
||||
{"Iceblue Zebra Cichlid", "cichlid", 2},
|
||||
{"Angler", "angler", 2},
|
||||
{"Moon Jellyfish", "jellyfish", 0},
|
||||
{"Pacific Mackerel", "mackerel", 2},
|
||||
{"Piranha", "piranha", 2},
|
||||
{"Rainbow Trout", "trout", 2},
|
||||
{"Red Snapper", "redsnapper", 2},
|
||||
{"Red Seahorse", "seahorse", 0},
|
||||
{"Green Seahorse", "seahorse_green", 0},
|
||||
{"Pink Seahorse", "seahorse_pink", 0},
|
||||
{"Blue Seahorse", "seahorse_blue", 0},
|
||||
{"Yellow Seahorse", "seahorse_yellow", 0},
|
||||
{"Yellowfin Tuna", "tuna", 2},
|
||||
{"Humboldt Squid", "squid", 0},
|
||||
{"White Shrimp", "shrimp", 0},
|
||||
{"Neon Tetra", "tetra", 1},
|
||||
{"Tilapia", "tilapia", 2},
|
||||
{"Golden Trevally", "trevally", 2},
|
||||
{"Stoplight Parrotfish", "parrot", 2}
|
||||
}
|
||||
|
||||
-- register above fish
|
||||
|
||||
for n = 1, #fish do
|
||||
|
||||
local usage
|
||||
local groups = nil
|
||||
|
||||
if fish[n][3] ~= 0 then
|
||||
usage = minetest.item_eat(fish[n][3])
|
||||
groups = {food_fish_raw = 1, ethereal_fish = 1}
|
||||
end
|
||||
|
||||
minetest.register_craftitem("ethereal:fish_" .. fish[n][2], {
|
||||
description = S(fish[n][1]),
|
||||
inventory_image = "ethereal_fish_" .. fish[n][2] .. ".png",
|
||||
on_use = usage,
|
||||
groups = groups
|
||||
})
|
||||
|
||||
if groups then
|
||||
ethereal.add_eatable("ethereal:fish_" .. fish[n][2], fish[n][3])
|
||||
end
|
||||
end
|
||||
|
||||
-- Make Neon Tetra glow slightly
|
||||
|
||||
minetest.override_item("ethereal:fish_tetra", {light_source = 3})
|
||||
|
||||
-- Pufferfish changes so it cannot be used in generic recipes
|
||||
|
||||
minetest.override_item("ethereal:fish_pufferfish", {groups = {flammable = 2}})
|
||||
|
||||
-- Worm
|
||||
|
||||
minetest.register_craftitem("ethereal:worm", {
|
||||
description = S("Worm"),
|
||||
inventory_image = "ethereal_worm.png",
|
||||
wield_image = "ethereal_worm.png"
|
||||
})
|
||||
|
||||
minetest.register_craft({
|
||||
output = "ethereal:worm",
|
||||
recipe = {
|
||||
{"default:dirt", "default:dirt"}
|
||||
}
|
||||
})
|
||||
|
||||
-- compatibility
|
||||
|
||||
minetest.register_alias("ethereal:fish_raw", "ethereal:fish_cichlid")
|
||||
minetest.register_alias("ethereal:fishing_rod_baited", "ethereal:fishing_rod")
|
||||
minetest.register_alias("ethereal:fish_chichlid", "ethereal:fish_cichlid")
|
||||
Loading…
Add table
Add a link
Reference in a new issue