BRN_Systems/mod-sneeker
1
0
Fork 0
forked from Mirrorlandia_minetest/mod-sneeker
Code Issues Pull Requests Projects Releases Wiki Activity

Cleanup

Browse Source
This commit is contained in:
Jordan Irwin 2021-05-08 11:42:35 -07:00
parent b082a746fa
commit be4c3617af
3 changed files with 100 additions and 101 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

141
init.lua
View File

@ -1,45 +1,42 @@
sneeker = {}
--[[
-- DISABLED!!!
do return end
--]]
sneeker = {}
dofile(minetest.get_modpath("sneeker").."/tnt_function.lua")
dofile(minetest.get_modpath("sneeker").."/spawn.lua")
local function jump(self,pos,direction)
local function jump(self, pos, direction)
local velocity = self.object:get_velocity()
if minetest.registered_nodes[minetest.get_node(pos).name].climbable then
self.object:set_velocity({x=velocity.x,y=4,z=velocity.z})
if core.registered_nodes[core.get_node(pos).name].climbable then
self.object:set_velocity({x=velocity.x, y=4, z=velocity.z})
return
end
local spos = {x=pos.x+direction.x,y=pos.y,z=pos.z+direction.z}
local node = minetest.get_node_or_nil(spos)
local spos = {x=pos.x+direction.x, y=pos.y, z=pos.z+direction.z}
local node = core.get_node_or_nil(spos)
spos.y = spos.y+1
local node2 = minetest.get_node_or_nil(spos)
local def,def2 = {}
local node2 = core.get_node_or_nil(spos)
local def, def2 = {}
if node and node.name then
def = minetest.registered_items[node.name]
def = core.registered_items[node.name]
end
if node2 and node2.name then
def2 = minetest.registered_items[node2.name]
def2 = core.registered_items[node2.name]
end
if def and def.walkable
and def2 and not def2.walkable
and def.drawtype ~= "fencelike" then
self.object:set_velocity({
x=velocity.x*2.2,
y=self.jump_height,
z=velocity.z*2.2
x = velocity.x*2.2,
y = self.jump_height,
z = velocity.z*2.2
})
end
end
local function random_turn(self)
if self.turn_timer > math.random(2,5) then
local select_turn = math.random(1,3)
if self.turn_timer > math.random(2, 5) then
local select_turn = math.random(1, 3)
if select_turn == 1 then
self.turn = "left"
elseif select_turn == 2 then
@ -55,7 +52,7 @@ end
local def = {
hp_max = 20,
physical = true,
collisionbox = {-0.25,-0.7,-0.25, 0.25,0.8,0.25},
collisionbox = {-0.25, -0.7, -0.25, 0.25, 0.8, 0.25},
visual = "mesh",
mesh = "character.b3d",
textures = {"sneeker.png"},
@ -74,7 +71,7 @@ local def = {
knockback_level = 2
}
def.on_activate = function(self,staticdata)
def.on_activate = function(self, staticdata)
self.yaw = 0
self.anim = 1
self.timer = 0
@ -84,17 +81,17 @@ def.on_activate = function(self,staticdata)
self.turn_speed = 0
self.powered = false
self.knockback = false
self.state = math.random(1,2)
self.state = math.random(1, 2)
self.old_y = self.object:get_pos().y
local data = minetest.deserialize(staticdata)
local data = core.deserialize(staticdata)
if data and type(data) == "table" then
if data.powered == true then
self.powered = true
self.object:set_properties({textures = {"sneeker_powered.png"}})
end
else
if math.random(0,20) == 20 then
if math.random(0, 20) == 20 then
self.powered = true
self.object:set_properties({textures = {"sneeker_powered.png"}})
end
@ -116,7 +113,7 @@ def.on_step = function(self, dtime)
local pos = self.object:get_pos()
local yaw = self.object:get_yaw()
local inside = minetest.get_objects_inside_radius(pos,10)
local inside = core.get_objects_inside_radius(pos, 10)
local walk_speed = self.walk_speed
local animation = self.animation
local anim_speed = self.animation_speed
@ -127,7 +124,7 @@ def.on_step = function(self, dtime)
self.jump_timer = self.jump_timer+0.01
if not self.chase
and self.timer > math.random(2,5) then
and self.timer > math.random(2, 5) then
if math.random() > 0.8 then
self.state = "stand"
else
@ -146,24 +143,24 @@ def.on_step = function(self, dtime)
if self.chase and self.visualx < 2 then
if self.hiss == false then
minetest.sound_play("sneeker_hiss",{pos=pos,gain=1.5,max_hear_distance=2*64})
core.sound_play("sneeker_hiss", {pos=pos, gain=1.5, max_hear_distance=2*64})
end
self.visualx = self.visualx+0.05
self.object:set_properties({
visual_size = {x=self.visualx,y=1}
visual_size = {x=self.visualx, y=1}
})
self.hiss = true
elseif self.visualx > 1 then
self.visualx = self.visualx-0.05
self.object:set_properties({
visual_size = {x=self.visualx,y=1}
visual_size = {x=self.visualx, y=1}
})
self.hiss = false
end
self.chase = false
for _,object in ipairs(inside) do
for _, object in ipairs(inside) do
if object:is_player() then
self.state = "chase"
end
@ -171,7 +168,7 @@ def.on_step = function(self, dtime)
if self.state == "stand" then
if self.anim ~= ANIM_STAND then
self.object:set_animation({x=animation.stand_START,y=animation.stand_END},anim_speed,0)
self.object:set_animation({x=animation.stand_START, y=animation.stand_END}, anim_speed, 0)
self.anim = ANIM_STAND
end
@ -179,19 +176,19 @@ def.on_step = function(self, dtime)
if velocity.x ~= 0
or velocity.z ~= 0 then
self.object:set_velocity({x=0,y=velocity.y,z=0})
self.object:set_velocity({x=0, y=velocity.y, z=0})
end
end
if self.state == "walk" then
if self.anim ~= ANIM_WALK then
self.object:set_animation({x=animation.walk_START,y=animation.walk_END},anim_speed,0)
self.object:set_animation({x=animation.walk_START, y=animation.walk_END}, anim_speed, 0)
self.anim = ANIM_WALK
end
self.direction = {x=math.sin(yaw)*-1,y=-10,z=math.cos(yaw)}
self.direction = {x=math.sin(yaw)*-1, y=-10, z=math.cos(yaw)}
if self.direction then
self.object:set_velocity({x=self.direction.x*walk_speed,y=velocity.y,z=self.direction.z*walk_speed})
self.object:set_velocity({x=self.direction.x*walk_speed, y=velocity.y, z=self.direction.z*walk_speed})
end
random_turn(self)
@ -200,10 +197,10 @@ def.on_step = function(self, dtime)
if self.turn_timer > 1 then
local direction = self.direction
local npos = {x=pos.x+direction.x,y=pos.y+0.2,z=pos.z+direction.z}
local npos = {x=pos.x+direction.x, y=pos.y+0.2, z=pos.z+direction.z}
if velocity.x == 0 or velocity.z == 0
or minetest.registered_nodes[minetest.get_node(npos).name].walkable then
local select_turn = math.random(1,2)
or core.registered_nodes[core.get_node(npos).name].walkable then
local select_turn = math.random(1, 2)
if select_turn == 1 then
self.turn = "left"
elseif select_turn == 2 then
@ -216,60 +213,60 @@ def.on_step = function(self, dtime)
-- Jump
if self.jump_timer > 0.2 then
jump(self,pos,self.direction)
jump(self, pos, self.direction)
end
end
if self.state == "chase" then
if self.anim ~= ANIM_WALK then
self.object:set_animation({x=animation.walk_START,y=animation.walk_END},anim_speed,0)
self.object:set_animation({x=animation.walk_START, y=animation.walk_END}, anim_speed, 0)
self.anim = ANIM_WALK
end
self.turn = "straight"
local inside_2 = minetest.get_objects_inside_radius(pos,2)
local inside_2 = core.get_objects_inside_radius(pos, 2)
-- Boom
if #inside_2 ~= 0 then
for _,object in ipairs(inside_2) do
for _, object in ipairs(inside_2) do
if object:is_player() and object:get_hp() ~= 0 then
self.chase = true
if self.visualx >= 2 then
self.object:remove()
sneeker.boom(pos,self.powered)
minetest.sound_play("sneeker_explode",{pos=pos,gain=1.5,max_hear_distance=2*64})
sneeker.boom(pos, self.powered)
core.sound_play("sneeker_explode", {pos=pos, gain=1.5, max_hear_distance=2*64})
end
end
end
end
if #inside ~= 0 then
for _,object in ipairs(inside) do
for _, object in ipairs(inside) do
if object:is_player() and object:get_hp() ~= 0 then
if #inside_2 ~= 0 then
for _,object in ipairs(inside_2) do
for _, object in ipairs(inside_2) do
-- Stop move
if object:is_player() then
if self.anim ~= ANIM_STAND then
self.object:set_animation({x=animation.stand_START,y=animation.stand_END},anim_speed,0)
self.object:set_animation({x=animation.stand_START, y=animation.stand_END}, anim_speed, 0)
self.anim = ANIM_STAND
end
self.object:set_velocity({x=0,y=velocity.y,z=0})
self.object:set_velocity({x=0, y=velocity.y, z=0})
return
end
end
end
local ppos = object:get_pos()
self.vec = {x=ppos.x-pos.x,y=ppos.y-pos.y,z=ppos.z-pos.z}
self.vec = {x=ppos.x-pos.x, y=ppos.y-pos.y, z=ppos.z-pos.z}
self.yaw = math.atan(self.vec.z/self.vec.x)+math.pi^2
if ppos.x > pos.x then
self.yaw = self.yaw+math.pi
end
self.yaw = self.yaw-2
self.object:set_yaw(self.yaw)
self.direction = {x=math.sin(self.yaw)*-1,y=0,z=math.cos(self.yaw)}
self.direction = {x=math.sin(self.yaw)*-1, y=0, z=math.cos(self.yaw)}
local direction = self.direction
@ -283,12 +280,12 @@ def.on_step = function(self, dtime)
end
if can_set then
self.object:set_velocity({x=direction.x*2.5,y=velocity.y,z=direction.z*2.5})
self.object:set_velocity({x=direction.x*2.5, y=velocity.y, z=direction.z*2.5})
end
-- Jump
if self.jump_timer > 0.2 then
jump(self,pos,direction)
jump(self, pos, direction)
end
end
end
@ -298,60 +295,60 @@ def.on_step = function(self, dtime)
end
-- Swim
local node = minetest.get_node(pos)
if minetest.get_item_group(node.name,"water") ~= 0 then
self.object:set_acceleration({x=0,y=1,z=0})
local node = core.get_node(pos)
if core.get_item_group(node.name, "water") ~= 0 then
self.object:set_acceleration({x=0, y=1, z=0})
local velocity = self.object:get_velocity()
if self.object:get_velocity().y > 5 then
self.object:set_velocity({x=0,y=velocity.y-velocity.y/2,z=0})
self.object:set_velocity({x=0, y=velocity.y-velocity.y/2, z=0})
else
self.object:set_velocity({x=0,y=velocity.y+1,z=0})
self.object:set_velocity({x=0, y=velocity.y+1, z=0})
end
else
self.object:set_acceleration({x=0,y=-10,z=0})
self.object:set_acceleration({x=0, y=-10, z=0})
end
end
def.on_punch = function(self,puncher,time_from_last_punch,tool_capabilities,dir)
def.on_punch = function(self, puncher, time_from_last_punch, tool_capabilities, dir)
if self.knockback == false then
local knockback_level = self.knockback_level
self.object:set_velocity({x=dir.x*knockback_level,y=3,z=dir.z*knockback_level})
self.object:set_velocity({x=dir.x*knockback_level, y=3, z=dir.z*knockback_level})
self.knockback = true
minetest.after(0.6,function()
core.after(0.6, function()
self.knockback = false
end)
end
if self.object:get_hp() < 1 then
local pos = self.object:get_pos()
local x = 1/math.random(1,5)*dir.x
local z = 1/math.random(1,5)*dir.z
local p = {x=pos.x+x,y=pos.y,z=pos.z+z}
local node = minetest.get_node_or_nil(p)
local x = 1/math.random(1, 5)*dir.x
local z = 1/math.random(1, 5)*dir.z
local p = {x=pos.x+x, y=pos.y, z=pos.z+z}
local node = core.get_node_or_nil(p)
if node == nil or not node.name or node.name ~= "air" then
p = pos
end
local obj = minetest.add_item(p, {name="tnt:gunpowder",count=math.random(0,2)})
local obj = core.add_item(p, {name="tnt:gunpowder", count=math.random(0, 2)})
end
end
def.get_staticdata = function(self)
return minetest.serialize({
return core.serialize({
powered = self.powered
})
end
minetest.register_entity("sneeker:sneeker",def)
core.register_entity("sneeker:sneeker", def)
minetest.register_craftitem("sneeker:spawnegg",{
core.register_craftitem("sneeker:spawnegg", {
description = "Sneeker Spawn Egg",
inventory_image = "sneeker_spawnegg.png",
stack_max = 64,
on_place = function(itemstack,placer,pointed_thing)
on_place = function(itemstack, placer, pointed_thing)
if pointed_thing.type == "node" then
local pos = pointed_thing.above
pos.y = pos.y+1
minetest.add_entity(pos,"sneeker:sneeker")
if not minetest.setting_getbool("creative_mode") then
core.add_entity(pos, "sneeker:sneeker")
if not core.setting_getbool("creative_mode") then
itemstack:take_item()
end
return itemstack

17
spawn.lua
View File

@ -1,5 +1,6 @@
minetest.register_abm({
nodenames = {"default:dirt_with_grass","default:stone"},
core.register_abm({
nodenames = {"default:dirt_with_grass", "default:stone"},
neighbors = {"air"},
interval = 30,
chance = 9000,
@ -8,25 +9,25 @@ minetest.register_abm({
return
end
pos.y = pos.y+1
if not minetest.get_node_light(pos) then
if not core.get_node_light(pos) then
return
end
if minetest.get_node_light(pos) > 5 then
if core.get_node_light(pos) > 5 then
return
end
if minetest.get_node_light(pos) < -1 then
if core.get_node_light(pos) < -1 then
return
end
if pos.y > 31000 then
return
end
if minetest.get_node(pos).name ~= "air" then
if core.get_node(pos).name ~= "air" then
return
end
pos.y = pos.y+1
if minetest.get_node(pos).name ~= "air" then
if core.get_node(pos).name ~= "air" then
return
end
minetest.add_entity(pos,"sneeker:sneeker")
core.add_entity(pos, "sneeker:sneeker")
end
})

43
tnt_function.lua
View File

@ -1,14 +1,15 @@
-- From TNT
local cid_data = {}
local radius = tonumber(minetest.setting_get("tnt_radius") or 3)
local radius = tonumber(core.setting_get("tnt_radius") or 3)
local large_radius = 5
local loss_prob = {
["default:cobble"] = 3,
["default:dirt"] = 4,
}
minetest.after(0, function()
for name, def in pairs(minetest.registered_nodes) do
cid_data[minetest.get_content_id(name)] = {
core.after(0, function()
for name, def in pairs(core.registered_nodes) do
cid_data[core.get_content_id(name)] = {
name = name,
drops = def.drops,
flammable = def.groups.flammable,
@ -34,7 +35,7 @@ local function eject_drops(drops, pos, radius)
item:set_count(count)
end
rand_pos(pos, drop_pos, radius)
local obj = minetest.add_item(drop_pos, item)
local obj = core.add_item(drop_pos, item)
if obj then
obj:get_luaentity().collect = true
obj:set_acceleration({x=0, y=-10, z=0})
@ -62,7 +63,7 @@ local function add_drop(drops, item)
end
local function destroy(drops, pos, cid)
if minetest.is_protected(pos, "") then
if core.is_protected(pos, "") then
return
end
local def = cid_data[cid]
@ -70,9 +71,9 @@ local function destroy(drops, pos, cid)
def.on_blast(vector.new(pos), 1)
return
end
minetest.remove_node(pos)
core.remove_node(pos)
if def then
local node_drops = minetest.get_node_drops(def.name, "")
local node_drops = core.get_node_drops(def.name, "")
for _, item in ipairs(node_drops) do
add_drop(drops, item)
end
@ -98,7 +99,7 @@ end
local function entity_physics(pos, radius)
-- Make the damage radius larger than the destruction radius
radius = radius * 2
local objs = minetest.get_objects_inside_radius(pos, radius)
local objs = core.get_objects_inside_radius(pos, radius)
for _, obj in pairs(objs) do
local obj_pos = obj:get_pos()
local obj_vel = obj:get_velocity()
@ -115,7 +116,7 @@ local function entity_physics(pos, radius)
end
local function add_effects(pos, radius)
minetest.add_particlespawner({
core.add_particlespawner({
amount = 128,
time = 1,
minpos = vector.subtract(pos, radius / 2),
@ -146,16 +147,16 @@ local function explode(pos, radius)
local drops = {}
local p = {}
local c_air = minetest.get_content_id("air")
local c_air = core.get_content_id("air")
local c_tnt = nil
if minetest.settings:get_bool("enable_tnt", false) then
c_tnt = minetest.get_content_id("tnt:tnt")
if core.settings:get_bool("enable_tnt", false) then
c_tnt = core.get_content_id("tnt:tnt")
end
local c_tnt_burning = minetest.get_content_id("tnt:tnt_burning")
local c_gunpowder = minetest.get_content_id("tnt:gunpowder")
local c_gunpowder_burning = minetest.get_content_id("tnt:gunpowder_burning")
local c_boom = minetest.get_content_id("tnt:boom")
local c_tnt_burning = core.get_content_id("tnt:tnt_burning")
local c_gunpowder = core.get_content_id("tnt:gunpowder")
local c_gunpowder_burning = core.get_content_id("tnt:gunpowder_burning")
local c_boom = core.get_content_id("tnt:boom")
for z = -radius, radius do
for y = -radius, radius do
@ -184,14 +185,14 @@ local function explode(pos, radius)
return drops
end
function sneeker.boom(pos,large)
function sneeker.boom(pos, large)
local radius = radius
if large then
radius = large_radius
end
minetest.sound_play("sneeker_explode", {pos=pos, gain=1.5, max_hear_distance=2*64})
minetest.set_node(pos, {name="tnt:boom"})
minetest.get_node_timer(pos):start(0.5)
core.sound_play("sneeker_explode", {pos=pos, gain=1.5, max_hear_distance=2*64})
core.set_node(pos, {name="tnt:boom"})
core.get_node_timer(pos):start(0.5)
local drops = explode(pos, radius)
entity_physics(pos, radius)
eject_drops(drops, pos, radius)