advtrains/locale

--
-- Experimental things
--

-- For testing random stuff

experimental = {}

function experimental.print_to_everything(msg)
	minetest.log("action", msg)
	minetest.chat_send_all(msg)
end

--[[
experimental.player_visual_index = 0
function switch_player_visual()
	for _, obj in pairs(minetest.get_connected_players()) do
		if experimental.player_visual_index == 0 then
			obj:set_properties({visual="upright_sprite"})
		else
			obj:set_properties({visual="cube"})
		end
	end
	experimental.player_visual_index = (experimental.player_visual_index + 1) % 2
	minetest.after(1.0, switch_player_visual)
end
minetest.after(1.0, switch_player_visual)
]]

minetest.register_node("experimental:soundblock", {
	tile_images = {"unknown_node.png", "default_tnt_bottom.png",
			"default_tnt_side.png", "default_tnt_side.png",
			"default_tnt_side.png", "default_tnt_side.png"},
	inventory_image = minetest.inventorycube("unknown_node.png",
			"default_tnt_side.png", "default_tnt_side.png"),
	groups = {dig_immediate=3},
})

minetest.register_alias("sb", "experimental:soundblock")

minetest.register_abm({
	nodenames = {"experimental:soundblock"},
	interval = 1,
	chance = 1,
	action = function(p0, node, _, _)
		minetest.sound_play("default_grass_footstep", {pos=p0, gain=0.5})
	end,
})

--[[
stepsound = -1
function test_sound()
	print("test_sound")
	stepsound = minetest.sound_play("default_grass_footstep", {gain=1.0})
	minetest.after(2.0, test_sound)
	--minetest.after(0.1, test_sound_stop)
end
function test_sound_stop()
	print("test_sound_stop")
	minetest.sound_stop(stepsound)
	minetest.after(2.0, test_sound)
end
test_sound()
--]]

function on_step(dtime)
	-- print("experimental on_step")
	--[[
	objs = minetest.get_objects_inside_radius({x=0,y=0,z=0}, 10)
	for k, obj in pairs(objs) do
		name = obj:get_player_name()
		if name then
			print(name.." at "..dump(obj:getpos()))
			print(name.." dir: "..dump(obj:get_look_dir()))
			print(name.." pitch: "..dump(obj:get_look_pitch()))
			print(name.." yaw: "..dump(obj:get_look_yaw()))
		else
			print("Some object at "..dump(obj:getpos()))
		end
	end
	--]]
	--[[
	if experimental.t1 == nil then
		experimental.t1 = 0
	end
	experimental.t1 = experimental.t1 + dtime
	if experimental.t1 >= 2 then
		experimental.t1 = experimental.t1 - 2
		minetest.log("time of day is "..minetest.get_timeofday())
		if experimental.day then
			minetest.log("forcing day->night")
			experimental.day = false
			minetest.set_timeofday(0.0)
		else
			minetest.log("forcing night->day")
			experimental.day = true
			minetest.set_timeofday(0.5)
		end
		minetest.log("time of day is "..minetest.get_timeofday())
	end
	--]]
end
minetest.register_globalstep(on_step)

--
-- Random stuff
--

--
-- TNT (not functional)
--

minetest.register_craft({
	output = 'experimental:tnt',
	recipe = {
		{'default:wood'},
		{'default:coal_lump'},
		{'default:wood'}
	}
})

minetest.register_node("experimental:tnt", {
	tile_images = {"default_tnt_top.png", "default_tnt_bottom.png",
			"default_tnt_side.png", "default_tnt_side.png",
			"default_tnt_side.png", "default_tnt_side.png"},
	inventory_image = minetest.inventorycube("default_tnt_top.png",
			"default_tnt_side.png", "default_tnt_side.png"),
	drop = '', -- Get nothing
	material = {
		diggability = "not",
	},
})

minetest.register_on_punchnode(function(p, node)
	if node.name == "experimental:tnt" then
		minetest.remove_node(p)
		minetest.add_entity(p, "experimental:tnt")
		nodeupdate(p)
	end
end)

local TNT = {
	-- Static definition
	physical = true, -- Collides with things
	-- weight = 5,
	collisionbox = {-0.5,-0.5,-0.5, 0.5,0.5,0.5},
	visual = "cube",
	textures = {"default_tnt_top.png", "default_tnt_bottom.png",
			"default_tnt_side.png", "default_tnt_side.png",
			"default_tnt_side.png", "default_tnt_side.png"},
	-- Initial value for our timer
	timer = 0,
	-- Number of punches required to defuse
	health = 1,
	blinktimer = 0,
	blinkstatus = true,
}

-- Called when a TNT object is created
function TNT:on_activate(staticdata)
	print("TNT:on_activate()")
	self.object:setvelocity({x=0, y=4, z=0})
	self.object:setacceleration({x=0, y=-10, z=0})
	self.object:settexturemod("^[brighten")
	self.object:set_armor_groups({immortal=1})
end

-- Called periodically
function TNT:on_step(dtime)
	--print("TNT:on_step()")
	self.timer = self.timer + dtime
	self.blinktimer = self.blinktimer + dtime
	if self.blinktimer > 0.5 then
		self.blinktimer = self.blinktimer - 0.5
		if self.blinkstatus then
			self.object:settexturemod("")
		else
			self.object:settexturemod("^[brighten")
		end
		self.blinkstatus = not self.blinkstatus
	end
end

-- Called when object is punched
function TNT:on_punch(hitter)
	print("TNT:on_punch()")
	self.health = self.health - 1
	if self.health <= 0 then
		self.object:remove()
		hitter:get_inventory():add_item("main", "experimental:tnt")
		--hitter:set_hp(hitter:get_hp() - 1)
	end
end

-- Called when object is right-clicked
function TNT:on_rightclick(clicker)
	--pos = self.object:getpos()
	--pos = {x=pos.x, y=pos.y+0.1, z=pos.z}
	--self.object:moveto(pos, false)
end

--print("TNT dump: "..dump(TNT))
--print("Registering TNT");
minetest.register_entity("experimental:tnt", TNT)

-- Add TNT's old name also
minetest.register_alias("TNT", "experimental:tnt")

--
-- The dummyball!
--

minetest.register_entity("experimental:dummyball", {
	initial_properties = {
		hp_max = 20,
		physical = false,
		collisionbox = {-0.4,-0.4,-0.4, 0.4,0.4,0.4},
		visual = "sprite",
		visual_size = {x=1, y=1},
		textures = {"experimental_dummyball.png"},
		spritediv = {x=1, y=3},
		initial_sprite_basepos = {x=0, y=0},
	},

	phase = 0,
	phasetimer = 0,

	on_activate = function(self, staticdata)
		minetest.log("Dummyball activated!")
	end,

	on_step = function(self, dtime)
		self.phasetimer = self.phasetimer + dtime
		if self.phasetimer > 2.0 then
			self.phasetimer = self.phasetimer - 2.0
			self.phase = self.phase + 1
			if self.phase >= 3 then
				self.phase = 0
			end
			self.object:setsprite({x=0, y=self.phase})
			phasearmor = {
				[0]={cracky=3},
				[1]={crumbly=3},
				[2]={fleshy=3}
			}
			self.object:set_armor_groups(phasearmor[self.phase])
		end
	end,

	on_punch = function(self, hitter)
	end,
})

minetest.register_on_chat_message(function(name, message)
	local cmd = "/dummyball"
	if message:sub(0, #cmd) == cmd then
		count = tonumber(message:sub(#cmd+1)) or 1
		if not minetest.get_player_privs(name)["give"] then
			minetest.chat_send_player(name, "you don't have permission to spawn (give)")
			return true -- Handled chat message
		end
		if not minetest.get_player_privs(name)["interact"] then
			minetest.chat_send_player(name, "you don't have permission to interact")
			return true -- Handled chat message
		end
		if count >= 2 and not minetest.get_player_privs(name)["server"] then
			minetest.chat_send_player(name, "you don't have " ..