Use common mods
@@ -1,107 +0,0 @@
 | 
			
		||||
Minetest 0.4 mod: default
 | 
			
		||||
==========================
 | 
			
		||||
 | 
			
		||||
License of source code:
 | 
			
		||||
-----------------------
 | 
			
		||||
Copyright (C) 2011-2012 celeron55, Perttu Ahola <celeron55@gmail.com>
 | 
			
		||||
 | 
			
		||||
This program is free software; you can redistribute it and/or modify
 | 
			
		||||
it under the terms of the GNU Lesser General Public License as published by
 | 
			
		||||
the Free Software Foundation; either version 2.1 of the License, or
 | 
			
		||||
(at your option) any later version.
 | 
			
		||||
 | 
			
		||||
http://www.gnu.org/licenses/lgpl-2.1.html
 | 
			
		||||
 | 
			
		||||
License of media (textures and sounds)
 | 
			
		||||
--------------------------------------
 | 
			
		||||
Attribution-ShareAlike 3.0 Unported (CC BY-SA 3.0)                                 
 | 
			
		||||
http://creativecommons.org/licenses/by-sa/3.0/
 | 
			
		||||
 | 
			
		||||
Authors of media files
 | 
			
		||||
-----------------------
 | 
			
		||||
Everything not listed in here:
 | 
			
		||||
Copyright (C) 2010-2012 celeron55, Perttu Ahola <celeron55@gmail.com>
 | 
			
		||||
 | 
			
		||||
Originating from work by kddekadenz/Dogers:
 | 
			
		||||
  default_grass_footstep.{1,2,3}.ogg
 | 
			
		||||
  default_dig_crumbly.{1,2}.ogg
 | 
			
		||||
 | 
			
		||||
Cisoun's WTFPL texture pack:
 | 
			
		||||
  default_chest_front.png
 | 
			
		||||
  default_chest_lock.png
 | 
			
		||||
  default_chest_side.png
 | 
			
		||||
  default_chest_top.png
 | 
			
		||||
  default_stone_brick.png
 | 
			
		||||
  default_dirt.png
 | 
			
		||||
  default_grass.png
 | 
			
		||||
  default_grass_side.png
 | 
			
		||||
  default_jungletree.png
 | 
			
		||||
  default_jungletree_top.png
 | 
			
		||||
  default_lava.png
 | 
			
		||||
  default_leaves.png
 | 
			
		||||
  default_sand.png
 | 
			
		||||
  default_sapling.png
 | 
			
		||||
  default_sign_wall.png
 | 
			
		||||
  default_stone.png
 | 
			
		||||
  default_tool_mesepick.png
 | 
			
		||||
  default_tool_steelpick.png
 | 
			
		||||
  default_tool_steelshovel.png
 | 
			
		||||
  default_tool_stonepick.png
 | 
			
		||||
  default_tool_stoneshovel.png
 | 
			
		||||
  default_tool_woodpick.png
 | 
			
		||||
  default_tool_woodshovel.png
 | 
			
		||||
  default_tree.png
 | 
			
		||||
  default_tree_top.png
 | 
			
		||||
  default_water.png
 | 
			
		||||
 | 
			
		||||
Originating from G4JC's Almost MC Texture Pack:
 | 
			
		||||
  default_wood.png
 | 
			
		||||
  default_torch.png
 | 
			
		||||
  default_torch_on_ceiling.png
 | 
			
		||||
  default_torch_on_floor.png
 | 
			
		||||
  default_cobble.png
 | 
			
		||||
 | 
			
		||||
VanessaE's animated torches (WTFPL):
 | 
			
		||||
  default_torch_animated.png
 | 
			
		||||
  default_torch_on_ceiling_animated.png
 | 
			
		||||
  default_torch_on_floor_animated.png
 | 
			
		||||
  default_torch_on_floor.png
 | 
			
		||||
 | 
			
		||||
RealBadAngel's animated water (WTFPL):
 | 
			
		||||
  default_water_source_animated.png
 | 
			
		||||
  default_water_flowing_animated.png
 | 
			
		||||
 | 
			
		||||
VanessaE (WTFPL):
 | 
			
		||||
  default_nc_back.png
 | 
			
		||||
  default_nc_front.png
 | 
			
		||||
  default_nc_rb.png
 | 
			
		||||
  default_nc_side.png
 | 
			
		||||
  default_grass_*.png
 | 
			
		||||
 | 
			
		||||
Calinou's improved default textures (CC BY-SA):
 | 
			
		||||
  default_brick.png
 | 
			
		||||
  default_clay_brick.png
 | 
			
		||||
  default_papyrus.png
 | 
			
		||||
  default_tool_steelsword.png
 | 
			
		||||
 | 
			
		||||
MirceaKitsune (WTFPL):
 | 
			
		||||
  character.x
 | 
			
		||||
 | 
			
		||||
Jordach (CC BY-SA 3.0):
 | 
			
		||||
  character.png
 | 
			
		||||
 | 
			
		||||
PilzAdam (WTFPL):
 | 
			
		||||
  default_jungleleaves.png
 | 
			
		||||
  default_junglesapling.png
 | 
			
		||||
  default_junglewood.png
 | 
			
		||||
  default_obsidian_glass.png
 | 
			
		||||
  default_obsidian_shard.png
 | 
			
		||||
  default_mossycobble.png
 | 
			
		||||
 | 
			
		||||
jojoa1997 (WTFPL):
 | 
			
		||||
  default_obsidian.png
 | 
			
		||||
 | 
			
		||||
Glass breaking sounds (CC BY 3.0):
 | 
			
		||||
  1: http://www.freesound.org/people/cmusounddesign/sounds/71947/
 | 
			
		||||
  2: http://www.freesound.org/people/Tomlija/sounds/97669/
 | 
			
		||||
  3: http://www.freesound.org/people/lsprice/sounds/88808/
 | 
			
		||||
@@ -1,93 +0,0 @@
 | 
			
		||||
-- minetest/default/leafdecay.lua
 | 
			
		||||
 | 
			
		||||
-- To enable leaf decay for a node, add it to the "leafdecay" group.
 | 
			
		||||
--
 | 
			
		||||
-- The rating of the group determines how far from a node in the group "tree"
 | 
			
		||||
-- the node can be without decaying.
 | 
			
		||||
--
 | 
			
		||||
-- If param2 of the node is ~= 0, the node will always be preserved. Thus, if
 | 
			
		||||
-- the player places a node of that kind, you will want to set param2=1 or so.
 | 
			
		||||
 | 
			
		||||
default.leafdecay_trunk_cache = {}
 | 
			
		||||
default.leafdecay_enable_cache = true
 | 
			
		||||
-- Spread the load of finding trunks
 | 
			
		||||
default.leafdecay_trunk_find_allow_accumulator = 0
 | 
			
		||||
 | 
			
		||||
minetest.register_globalstep(function(dtime)
 | 
			
		||||
	local finds_per_second = 5000
 | 
			
		||||
	default.leafdecay_trunk_find_allow_accumulator =
 | 
			
		||||
			math.floor(dtime * finds_per_second)
 | 
			
		||||
end)
 | 
			
		||||
 | 
			
		||||
minetest.register_abm({
 | 
			
		||||
	nodenames = {"group:leafdecay"},
 | 
			
		||||
	neighbors = {"air", "group:liquid"},
 | 
			
		||||
	-- A low interval and a high inverse chance spreads the load
 | 
			
		||||
	interval = 2,
 | 
			
		||||
	chance = 5,
 | 
			
		||||
 | 
			
		||||
	action = function(p0, node, _, _)
 | 
			
		||||
		--print("leafdecay ABM at "..p0.x..", "..p0.y..", "..p0.z..")")
 | 
			
		||||
		local do_preserve = false
 | 
			
		||||
		local d = minetest.registered_nodes[node.name].groups.leafdecay
 | 
			
		||||
		if not d or d == 0 then
 | 
			
		||||
			--print("not groups.leafdecay")
 | 
			
		||||
			return
 | 
			
		||||
		end
 | 
			
		||||
		local n0 = minetest.env:get_node(p0)
 | 
			
		||||
		if n0.param2 ~= 0 then
 | 
			
		||||
			--print("param2 ~= 0")
 | 
			
		||||
			return
 | 
			
		||||
		end
 | 
			
		||||
		local p0_hash = nil
 | 
			
		||||
		if default.leafdecay_enable_cache then
 | 
			
		||||
			p0_hash = minetest.hash_node_position(p0)
 | 
			
		||||
			local trunkp = default.leafdecay_trunk_cache[p0_hash]
 | 
			
		||||
			if trunkp then
 | 
			
		||||
				local n = minetest.env:get_node(trunkp)
 | 
			
		||||
				local reg = minetest.registered_nodes[n.name]
 | 
			
		||||
				-- Assume ignore is a trunk, to make the thing work at the border of the active area
 | 
			
		||||
				if n.name == "ignore" or (reg and reg.groups.tree and reg.groups.tree ~= 0) then
 | 
			
		||||
					--print("cached trunk still exists")
 | 
			
		||||
					return
 | 
			
		||||
				end
 | 
			
		||||
				--print("cached trunk is invalid")
 | 
			
		||||
				-- Cache is invalid
 | 
			
		||||
				table.remove(default.leafdecay_trunk_cache, p0_hash)
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
		if default.leafdecay_trunk_find_allow_accumulator <= 0 then
 | 
			
		||||
			return
 | 
			
		||||
		end
 | 
			
		||||
		default.leafdecay_trunk_find_allow_accumulator =
 | 
			
		||||
				default.leafdecay_trunk_find_allow_accumulator - 1
 | 
			
		||||
		-- Assume ignore is a trunk, to make the thing work at the border of the active area
 | 
			
		||||
		local p1 = minetest.env:find_node_near(p0, d, {"ignore", "group:tree"})
 | 
			
		||||
		if p1 then
 | 
			
		||||
			do_preserve = true
 | 
			
		||||
			if default.leafdecay_enable_cache then
 | 
			
		||||
				--print("caching trunk")
 | 
			
		||||
				-- Cache the trunk
 | 
			
		||||
				default.leafdecay_trunk_cache[p0_hash] = p1
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
		if not do_preserve then
 | 
			
		||||
			-- Drop stuff other than the node itself
 | 
			
		||||
			itemstacks = minetest.get_node_drops(n0.name)
 | 
			
		||||
			for _, itemname in ipairs(itemstacks) do
 | 
			
		||||
				if itemname ~= n0.name then
 | 
			
		||||
					local p_drop = {
 | 
			
		||||
						x = p0.x - 0.5 + math.random(),
 | 
			
		||||
						y = p0.y - 0.5 + math.random(),
 | 
			
		||||
						z = p0.z - 0.5 + math.random(),
 | 
			
		||||
					}
 | 
			
		||||
					minetest.env:add_item(p_drop, itemname)
 | 
			
		||||
				end
 | 
			
		||||
			end
 | 
			
		||||
			-- Remove node
 | 
			
		||||
			minetest.env:remove_node(p0)
 | 
			
		||||
			nodeupdate(p0)
 | 
			
		||||
		end
 | 
			
		||||
	end
 | 
			
		||||
})
 | 
			
		||||
 | 
			
		||||
@@ -1,306 +0,0 @@
 | 
			
		||||
-- minetest/default/mapgen.lua
 | 
			
		||||
 | 
			
		||||
--
 | 
			
		||||
-- Aliases for map generator outputs
 | 
			
		||||
--
 | 
			
		||||
 | 
			
		||||
minetest.register_alias("mapgen_air", "air")
 | 
			
		||||
minetest.register_alias("mapgen_stone", "default:stone")
 | 
			
		||||
minetest.register_alias("mapgen_tree", "default:tree")
 | 
			
		||||
minetest.register_alias("mapgen_leaves", "default:leaves")
 | 
			
		||||
minetest.register_alias("mapgen_jungletree", "default:jungletree")
 | 
			
		||||
minetest.register_alias("mapgen_jungleleaves", "default:jungleleaves")
 | 
			
		||||
minetest.register_alias("mapgen_apple", "default:apple")
 | 
			
		||||
minetest.register_alias("mapgen_water_source", "default:water_source")
 | 
			
		||||
minetest.register_alias("mapgen_dirt", "default:dirt")
 | 
			
		||||
minetest.register_alias("mapgen_sand", "default:sand")
 | 
			
		||||
minetest.register_alias("mapgen_gravel", "default:gravel")
 | 
			
		||||
minetest.register_alias("mapgen_clay", "default:clay")
 | 
			
		||||
minetest.register_alias("mapgen_lava_source", "default:lava_source")
 | 
			
		||||
minetest.register_alias("mapgen_cobble", "default:cobble")
 | 
			
		||||
minetest.register_alias("mapgen_mossycobble", "default:mossycobble")
 | 
			
		||||
minetest.register_alias("mapgen_dirt_with_grass", "default:dirt_with_grass")
 | 
			
		||||
minetest.register_alias("mapgen_junglegrass", "default:junglegrass")
 | 
			
		||||
minetest.register_alias("mapgen_stone_with_coal", "default:stone_with_coal")
 | 
			
		||||
minetest.register_alias("mapgen_stone_with_iron", "default:stone_with_iron")
 | 
			
		||||
minetest.register_alias("mapgen_mese", "default:mese")
 | 
			
		||||
minetest.register_alias("mapgen_desert_sand", "default:desert_sand")
 | 
			
		||||
minetest.register_alias("mapgen_desert_stone", "default:desert_stone")
 | 
			
		||||
 | 
			
		||||
--
 | 
			
		||||
-- Ore generation
 | 
			
		||||
--
 | 
			
		||||
 | 
			
		||||
function default.generate_ore(name, wherein, minp, maxp, seed, chunks_per_volume, chunk_size, ore_per_chunk, height_min, height_max)
 | 
			
		||||
	if maxp.y < height_min or minp.y > height_max then
 | 
			
		||||
		return
 | 
			
		||||
	end
 | 
			
		||||
	local y_min = math.max(minp.y, height_min)
 | 
			
		||||
	local y_max = math.min(maxp.y, height_max)
 | 
			
		||||
	local volume = (maxp.x-minp.x+1)*(y_max-y_min+1)*(maxp.z-minp.z+1)
 | 
			
		||||
	local pr = PseudoRandom(seed)
 | 
			
		||||
	local num_chunks = math.floor(chunks_per_volume * volume)
 | 
			
		||||
	local inverse_chance = math.floor(chunk_size*chunk_size*chunk_size / ore_per_chunk)
 | 
			
		||||
	--print("generate_ore num_chunks: "..dump(num_chunks))
 | 
			
		||||
	for i=1,num_chunks do
 | 
			
		||||
		local y0 = pr:next(y_min, y_max-chunk_size+1)
 | 
			
		||||
		if y0 >= height_min and y0 <= height_max then
 | 
			
		||||
			local x0 = pr:next(minp.x, maxp.x-chunk_size+1)
 | 
			
		||||
			local z0 = pr:next(minp.z, maxp.z-chunk_size+1)
 | 
			
		||||
			local p0 = {x=x0, y=y0, z=z0}
 | 
			
		||||
			for x1=0,chunk_size-1 do
 | 
			
		||||
			for y1=0,chunk_size-1 do
 | 
			
		||||
			for z1=0,chunk_size-1 do
 | 
			
		||||
				if pr:next(1,inverse_chance) == 1 then
 | 
			
		||||
					local x2 = x0+x1
 | 
			
		||||
					local y2 = y0+y1
 | 
			
		||||
					local z2 = z0+z1
 | 
			
		||||
					local p2 = {x=x2, y=y2, z=z2}
 | 
			
		||||
					if minetest.env:get_node(p2).name == wherein then
 | 
			
		||||
						minetest.env:set_node(p2, {name=name})
 | 
			
		||||
					end
 | 
			
		||||
				end
 | 
			
		||||
			end
 | 
			
		||||
			end
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
	end
 | 
			
		||||
	--print("generate_ore done")
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
function default.make_papyrus(pos, size)
 | 
			
		||||
	for y=0,size-1 do
 | 
			
		||||
		local p = {x=pos.x, y=pos.y+y, z=pos.z}
 | 
			
		||||
		local nn = minetest.env:get_node(p).name
 | 
			
		||||
		if minetest.registered_nodes[nn] and
 | 
			
		||||
			minetest.registered_nodes[nn].buildable_to then
 | 
			
		||||
			minetest.env:set_node(p, {name="default:papyrus"})
 | 
			
		||||
		else
 | 
			
		||||
			return
 | 
			
		||||
		end
 | 
			
		||||
	end
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
function default.make_cactus(pos, size)
 | 
			
		||||
	for y=0,size-1 do
 | 
			
		||||
		local p = {x=pos.x, y=pos.y+y, z=pos.z}
 | 
			
		||||
		local nn = minetest.env:get_node(p).name
 | 
			
		||||
		if minetest.registered_nodes[nn] and
 | 
			
		||||
			minetest.registered_nodes[nn].buildable_to then
 | 
			
		||||
			minetest.env:set_node(p, {name="default:cactus"})
 | 
			
		||||
		else
 | 
			
		||||
			return
 | 
			
		||||
		end
 | 
			
		||||
	end
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
-- facedir: 0/1/2/3 (head node facedir value)
 | 
			
		||||
-- length: length of rainbow tail
 | 
			
		||||
function default.make_nyancat(pos, facedir, length)
 | 
			
		||||
	local tailvec = {x=0, y=0, z=0}
 | 
			
		||||
	if facedir == 0 then
 | 
			
		||||
		tailvec.z = 1
 | 
			
		||||
	elseif facedir == 1 then
 | 
			
		||||
		tailvec.x = 1
 | 
			
		||||
	elseif facedir == 2 then
 | 
			
		||||
		tailvec.z = -1
 | 
			
		||||
	elseif facedir == 3 then
 | 
			
		||||
		tailvec.x = -1
 | 
			
		||||
	else
 | 
			
		||||
		print("default.make_nyancat(): Invalid facedir: "+dump(facedir))
 | 
			
		||||
		facedir = 0
 | 
			
		||||
		tailvec.z = 1
 | 
			
		||||
	end
 | 
			
		||||
	local p = {x=pos.x, y=pos.y, z=pos.z}
 | 
			
		||||
	minetest.env:set_node(p, {name="default:nyancat", param2=facedir})
 | 
			
		||||
	for i=1,length do
 | 
			
		||||
		p.x = p.x + tailvec.x
 | 
			
		||||
		p.z = p.z + tailvec.z
 | 
			
		||||
		minetest.env:set_node(p, {name="default:nyancat_rainbow"})
 | 
			
		||||
	end
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
function generate_nyancats(seed, minp, maxp)
 | 
			
		||||
	local height_min = -31000
 | 
			
		||||
	local height_max = -32
 | 
			
		||||
	if maxp.y < height_min or minp.y > height_max then
 | 
			
		||||
		return
 | 
			
		||||
	end
 | 
			
		||||
	local y_min = math.max(minp.y, height_min)
 | 
			
		||||
	local y_max = math.min(maxp.y, height_max)
 | 
			
		||||
	local volume = (maxp.x-minp.x+1)*(y_max-y_min+1)*(maxp.z-minp.z+1)
 | 
			
		||||
	local pr = PseudoRandom(seed + 9324342)
 | 
			
		||||
	local max_num_nyancats = math.floor(volume / (16*16*16))
 | 
			
		||||
	for i=1,max_num_nyancats do
 | 
			
		||||
		if pr:next(0, 1000) == 0 then
 | 
			
		||||
			local x0 = pr:next(minp.x, maxp.x)
 | 
			
		||||
			local y0 = pr:next(minp.y, maxp.y)
 | 
			
		||||
			local z0 = pr:next(minp.z, maxp.z)
 | 
			
		||||
			local p0 = {x=x0, y=y0, z=z0}
 | 
			
		||||
			default.make_nyancat(p0, pr:next(0,3), pr:next(3,15))
 | 
			
		||||
		end
 | 
			
		||||
	end
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
minetest.register_on_generated(function(minp, maxp, seed)
 | 
			
		||||
	-- Generate regular ores
 | 
			
		||||
	default.generate_ore("default:stone_with_coal", "default:stone", minp, maxp, seed+0, 1/8/8/8,    3, 8, -31000,  64)
 | 
			
		||||
	default.generate_ore("default:stone_with_iron", "default:stone", minp, maxp, seed+1, 1/12/12/12, 2, 3,    -15,   2)
 | 
			
		||||
	default.generate_ore("default:stone_with_iron", "default:stone", minp, maxp, seed+2, 1/9/9/9,    3, 5,    -63, -16)
 | 
			
		||||
	default.generate_ore("default:stone_with_iron", "default:stone", minp, maxp, seed+3, 1/7/7/7,    3, 5, -31000, -64)
 | 
			
		||||
	
 | 
			
		||||
	default.generate_ore("default:stone_with_mese", "default:stone", minp, maxp, seed+4, 1/16/16/16, 2, 3,   -127,  -64)
 | 
			
		||||
	default.generate_ore("default:stone_with_mese", "default:stone", minp, maxp, seed+5, 1/9/9/9,    3, 5, -31000, -128)
 | 
			
		||||
	default.generate_ore("default:mese",            "default:stone", minp, maxp, seed+8, 1/16/16/16, 2, 3, -31000,-1024)
 | 
			
		||||
	
 | 
			
		||||
	default.generate_ore("default:stone_with_coal", "default:stone", minp, maxp, seed+7, 1/24/24/24, 6,27, -31000,  0)
 | 
			
		||||
	default.generate_ore("default:stone_with_iron", "default:stone", minp, maxp, seed+6, 1/24/24/24, 6,27, -31000, -64)
 | 
			
		||||
 | 
			
		||||
	if maxp.y >= 2 and minp.y <= 0 then
 | 
			
		||||
		-- Generate clay
 | 
			
		||||
		-- Assume X and Z lengths are equal
 | 
			
		||||
		local divlen = 4
 | 
			
		||||
		local divs = (maxp.x-minp.x)/divlen+1;
 | 
			
		||||
		for divx=0+1,divs-1-1 do
 | 
			
		||||
		for divz=0+1,divs-1-1 do
 | 
			
		||||
			local cx = minp.x + math.floor((divx+0.5)*divlen)
 | 
			
		||||
			local cz = minp.z + math.floor((divz+0.5)*divlen)
 | 
			
		||||
			if minetest.env:get_node({x=cx,y=1,z=cz}).name == "default:water_source" and
 | 
			
		||||
					minetest.env:get_node({x=cx,y=0,z=cz}).name == "default:sand" then
 | 
			
		||||
				local is_shallow = true
 | 
			
		||||
				local num_water_around = 0
 | 
			
		||||
				if minetest.env:get_node({x=cx-divlen*2,y=1,z=cz+0}).name == "default:water_source" then
 | 
			
		||||
					num_water_around = num_water_around + 1 end
 | 
			
		||||
				if minetest.env:get_node({x=cx+divlen*2,y=1,z=cz+0}).name == "default:water_source" then
 | 
			
		||||
					num_water_around = num_water_around + 1 end
 | 
			
		||||
				if minetest.env:get_node({x=cx+0,y=1,z=cz-divlen*2}).name == "default:water_source" then
 | 
			
		||||
					num_water_around = num_water_around + 1 end
 | 
			
		||||
				if minetest.env:get_node({x=cx+0,y=1,z=cz+divlen*2}).name == "default:water_source" then
 | 
			
		||||
					num_water_around = num_water_around + 1 end
 | 
			
		||||
				if num_water_around >= 2 then
 | 
			
		||||
					is_shallow = false
 | 
			
		||||
				end	
 | 
			
		||||
				if is_shallow then
 | 
			
		||||
					for x1=-divlen,divlen do
 | 
			
		||||
					for z1=-divlen,divlen do
 | 
			
		||||
						if minetest.env:get_node({x=cx+x1,y=0,z=cz+z1}).name == "default:sand" then
 | 
			
		||||
							minetest.env:set_node({x=cx+x1,y=0,z=cz+z1}, {name="default:clay"})
 | 
			
		||||
						end
 | 
			
		||||
					end
 | 
			
		||||
					end
 | 
			
		||||
				end
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
		end
 | 
			
		||||
		-- Generate papyrus
 | 
			
		||||
		local perlin1 = minetest.env:get_perlin(354, 3, 0.7, 100)
 | 
			
		||||
		-- Assume X and Z lengths are equal
 | 
			
		||||
		local divlen = 8
 | 
			
		||||
		local divs = (maxp.x-minp.x)/divlen+1;
 | 
			
		||||
		for divx=0,divs-1 do
 | 
			
		||||
		for divz=0,divs-1 do
 | 
			
		||||
			local x0 = minp.x + math.floor((divx+0)*divlen)
 | 
			
		||||
			local z0 = minp.z + math.floor((divz+0)*divlen)
 | 
			
		||||
			local x1 = minp.x + math.floor((divx+1)*divlen)
 | 
			
		||||
			local z1 = minp.z + math.floor((divz+1)*divlen)
 | 
			
		||||
			-- Determine papyrus amount from perlin noise
 | 
			
		||||
			local papyrus_amount = math.floor(perlin1:get2d({x=x0, y=z0}) * 45 - 20)
 | 
			
		||||
			-- Find random positions for papyrus based on this random
 | 
			
		||||
			local pr = PseudoRandom(seed+1)
 | 
			
		||||
			for i=0,papyrus_amount do
 | 
			
		||||
				local x = pr:next(x0, x1)
 | 
			
		||||
				local z = pr:next(z0, z1)
 | 
			
		||||
				if minetest.env:get_node({x=x,y=1,z=z}).name == "default:dirt_with_grass" and
 | 
			
		||||
						minetest.env:find_node_near({x=x,y=1,z=z}, 1, "default:water_source") then
 | 
			
		||||
					default.make_papyrus({x=x,y=2,z=z}, pr:next(2, 4))
 | 
			
		||||
				end
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
		end
 | 
			
		||||
		-- Generate cactuses
 | 
			
		||||
		local perlin1 = minetest.env:get_perlin(230, 3, 0.6, 100)
 | 
			
		||||
		-- Assume X and Z lengths are equal
 | 
			
		||||
		local divlen = 16
 | 
			
		||||
		local divs = (maxp.x-minp.x)/divlen+1;
 | 
			
		||||
		for divx=0,divs-1 do
 | 
			
		||||
		for divz=0,divs-1 do
 | 
			
		||||
			local x0 = minp.x + math.floor((divx+0)*divlen)
 | 
			
		||||
			local z0 = minp.z + math.floor((divz+0)*divlen)
 | 
			
		||||
			local x1 = minp.x + math.floor((divx+1)*divlen)
 | 
			
		||||
			local z1 = minp.z + math.floor((divz+1)*divlen)
 | 
			
		||||
			-- Determine cactus amount from perlin noise
 | 
			
		||||
			local cactus_amount = math.floor(perlin1:get2d({x=x0, y=z0}) * 6 - 3)
 | 
			
		||||
			-- Find random positions for cactus based on this random
 | 
			
		||||
			local pr = PseudoRandom(seed+1)
 | 
			
		||||
			for i=0,cactus_amount do
 | 
			
		||||
				local x = pr:next(x0, x1)
 | 
			
		||||
				local z = pr:next(z0, z1)
 | 
			
		||||
				-- Find ground level (0...15)
 | 
			
		||||
				local ground_y = nil
 | 
			
		||||
				for y=30,0,-1 do
 | 
			
		||||
					if minetest.env:get_node({x=x,y=y,z=z}).name ~= "air" then
 | 
			
		||||
						ground_y = y
 | 
			
		||||
						break
 | 
			
		||||
					end
 | 
			
		||||
				end
 | 
			
		||||
				-- If desert sand, make cactus
 | 
			
		||||
				if ground_y and minetest.env:get_node({x=x,y=ground_y,z=z}).name == "default:desert_sand" then
 | 
			
		||||
					default.make_cactus({x=x,y=ground_y+1,z=z}, pr:next(3, 4))
 | 
			
		||||
				end
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
		end
 | 
			
		||||
		-- Generate grass
 | 
			
		||||
		local perlin1 = minetest.env:get_perlin(329, 3, 0.6, 100)
 | 
			
		||||
		-- Assume X and Z lengths are equal
 | 
			
		||||
		local divlen = 16
 | 
			
		||||
		local divs = (maxp.x-minp.x)/divlen+1;
 | 
			
		||||
		for divx=0,divs-1 do
 | 
			
		||||
		for divz=0,divs-1 do
 | 
			
		||||
			local x0 = minp.x + math.floor((divx+0)*divlen)
 | 
			
		||||
			local z0 = minp.z + math.floor((divz+0)*divlen)
 | 
			
		||||
			local x1 = minp.x + math.floor((divx+1)*divlen)
 | 
			
		||||
			local z1 = minp.z + math.floor((divz+1)*divlen)
 | 
			
		||||
			-- Determine grass amount from perlin noise
 | 
			
		||||
			local grass_amount = math.floor(perlin1:get2d({x=x0, y=z0}) ^ 3 * 9)
 | 
			
		||||
			-- Find random positions for grass based on this random
 | 
			
		||||
			local pr = PseudoRandom(seed+1)
 | 
			
		||||
			for i=0,grass_amount do
 | 
			
		||||
				local x = pr:next(x0, x1)
 | 
			
		||||
				local z = pr:next(z0, z1)
 | 
			
		||||
				-- Find ground level (0...15)
 | 
			
		||||
				local ground_y = nil
 | 
			
		||||
				for y=30,0,-1 do
 | 
			
		||||
					if minetest.env:get_node({x=x,y=y,z=z}).name ~= "air" then
 | 
			
		||||
						ground_y = y
 | 
			
		||||
						break
 | 
			
		||||
					end
 | 
			
		||||
				end
 | 
			
		||||
				
 | 
			
		||||
				if ground_y then
 | 
			
		||||
					local p = {x=x,y=ground_y+1,z=z}
 | 
			
		||||
					local nn = minetest.env:get_node(p).name
 | 
			
		||||
					-- Check if the node can be replaced
 | 
			
		||||
					if minetest.registered_nodes[nn] and
 | 
			
		||||
						minetest.registered_nodes[nn].buildable_to then
 | 
			
		||||
						nn = minetest.env:get_node({x=x,y=ground_y,z=z}).name
 | 
			
		||||
						-- If desert sand, add dry shrub
 | 
			
		||||
						if nn == "default:desert_sand" then
 | 
			
		||||
							minetest.env:set_node(p,{name="default:dry_shrub"})
 | 
			
		||||
							
 | 
			
		||||
						-- If dirt with grass, add grass
 | 
			
		||||
						elseif nn == "default:dirt_with_grass" then
 | 
			
		||||
							minetest.env:set_node(p,{name="default:grass_"..pr:next(1, 5)})
 | 
			
		||||
						end
 | 
			
		||||
					end
 | 
			
		||||
				end
 | 
			
		||||
				
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
		end
 | 
			
		||||
	end
 | 
			
		||||
 | 
			
		||||
	-- Generate nyan cats
 | 
			
		||||
	generate_nyancats(seed, minp, maxp)
 | 
			
		||||
end)
 | 
			
		||||
 | 
			
		||||
| 
		 Before Width: | Height: | Size: 3.2 KiB  | 
@@ -1,132 +0,0 @@
 | 
			
		||||
-- Minetest 0.4 mod: player
 | 
			
		||||
-- See README.txt for licensing and other information.
 | 
			
		||||
 | 
			
		||||
--
 | 
			
		||||
-- Start of configuration area:
 | 
			
		||||
--
 | 
			
		||||
 | 
			
		||||
-- Player animation speed
 | 
			
		||||
animation_speed = 30
 | 
			
		||||
 | 
			
		||||
-- Player animation blending
 | 
			
		||||
-- Note: This is currently broken due to a bug in Irrlicht, leave at 0
 | 
			
		||||
animation_blend = 0
 | 
			
		||||
 | 
			
		||||
-- Default player appearance
 | 
			
		||||
default_model = "character.x"
 | 
			
		||||
default_textures = {"character.png", }
 | 
			
		||||
 | 
			
		||||
-- Frame ranges for each player model
 | 
			
		||||
function player_get_animations(model)
 | 
			
		||||
	if model == "character.x" then
 | 
			
		||||
		return {
 | 
			
		||||
		stand_START = 0,
 | 
			
		||||
		stand_END = 79,
 | 
			
		||||
		sit_START = 81,
 | 
			
		||||
		sit_END = 160,
 | 
			
		||||
		lay_START = 162,
 | 
			
		||||
		lay_END = 166,
 | 
			
		||||
		walk_START = 168,
 | 
			
		||||
		walk_END = 187,
 | 
			
		||||
		mine_START = 189,
 | 
			
		||||
		mine_END = 198,
 | 
			
		||||
		walk_mine_START = 200,
 | 
			
		||||
		walk_mine_END = 219
 | 
			
		||||
		}
 | 
			
		||||
	end
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
--
 | 
			
		||||
-- End of configuration area.
 | 
			
		||||
--
 | 
			
		||||
 | 
			
		||||
-- Player stats and animations
 | 
			
		||||
local player_model = {}
 | 
			
		||||
local player_anim = {}
 | 
			
		||||
local player_sneak = {}
 | 
			
		||||
local ANIM_STAND = 1
 | 
			
		||||
local ANIM_SIT = 2
 | 
			
		||||
local ANIM_LAY = 3
 | 
			
		||||
local ANIM_WALK  = 4
 | 
			
		||||
local ANIM_WALK_MINE = 5
 | 
			
		||||
local ANIM_MINE = 6
 | 
			
		||||
 | 
			
		||||
-- Called when a player's appearance needs to be updated
 | 
			
		||||
function player_update_visuals(pl)
 | 
			
		||||
	local name = pl:get_player_name()
 | 
			
		||||
 | 
			
		||||
	player_model[name] = default_model
 | 
			
		||||
	player_anim[name] = 0 -- Animation will be set further below immediately
 | 
			
		||||
	player_sneak[name] = false
 | 
			
		||||
	prop = {
 | 
			
		||||
		mesh = default_model,
 | 
			
		||||
		textures = default_textures,
 | 
			
		||||
		visual = "mesh",
 | 
			
		||||
		visual_size = {x=1, y=1},
 | 
			
		||||
	}
 | 
			
		||||
	pl:set_properties(prop)
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
-- Update appearance when the player joins
 | 
			
		||||
minetest.register_on_joinplayer(player_update_visuals)
 | 
			
		||||
 | 
			
		||||
-- Check each player and apply animations
 | 
			
		||||
function player_step(dtime)
 | 
			
		||||
	for _, pl in pairs(minetest.get_connected_players()) do
 | 
			
		||||
		local name = pl:get_player_name()
 | 
			
		||||
		local anim = player_get_animations(player_model[name])
 | 
			
		||||
		local controls = pl:get_player_control()
 | 
			
		||||
		local walking = false
 | 
			
		||||
		local animation_speed_mod = animation_speed
 | 
			
		||||
 | 
			
		||||
		-- Determine if the player is walking
 | 
			
		||||
		if controls.up or controls.down or controls.left or controls.right then
 | 
			
		||||
			walking = true
 | 
			
		||||
		end
 | 
			
		||||
 | 
			
		||||
		-- Determine if the player is sneaking, and reduce animation speed if so
 | 
			
		||||
		if controls.sneak and pl:get_hp() ~= 0 and (walking or controls.LMB) then
 | 
			
		||||
			animation_speed_mod = animation_speed_mod / 2
 | 
			
		||||
			-- Refresh player animation below if sneak state changed
 | 
			
		||||
			if not player_sneak[name] then
 | 
			
		||||
				player_anim[name] = 0
 | 
			
		||||
				player_sneak[name] = true
 | 
			
		||||
			end
 | 
			
		||||
		else
 | 
			
		||||
			-- Refresh player animation below if sneak state changed
 | 
			
		||||
			if player_sneak[name] then
 | 
			
		||||
				player_anim[name] = 0
 | 
			
		||||
				player_sneak[name] = false
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
 | 
			
		||||
		-- Apply animations based on what the player is doing
 | 
			
		||||
		if pl:get_hp() == 0 then
 | 
			
		||||
			if player_anim[name] ~= ANIM_LAY then
 | 
			
		||||
				pl:set_animation({x=anim.lay_START, y=anim.lay_END}, animation_speed_mod, animation_blend)
 | 
			
		||||
				player_anim[name] = ANIM_LAY
 | 
			
		||||
			end
 | 
			
		||||
		elseif walking and controls.LMB then
 | 
			
		||||
			if player_anim[name] ~= ANIM_WALK_MINE then
 | 
			
		||||
				pl:set_animation({x=anim.walk_mine_START, y=anim.walk_mine_END}, animation_speed_mod, animation_blend)
 | 
			
		||||
				player_anim[name] = ANIM_WALK_MINE
 | 
			
		||||
			end
 | 
			
		||||
		elseif walking then
 | 
			
		||||
			if player_anim[name] ~= ANIM_WALK then
 | 
			
		||||
				pl:set_animation({x=anim.walk_START, y=anim.walk_END}, animation_speed_mod, animation_blend)
 | 
			
		||||
				player_anim[name] = ANIM_WALK
 | 
			
		||||
			end
 | 
			
		||||
		elseif controls.LMB then
 | 
			
		||||
			if player_anim[name] ~= ANIM_MINE then
 | 
			
		||||
				pl:set_animation({x=anim.mine_START, y=anim.mine_END}, animation_speed_mod, animation_blend)
 | 
			
		||||
				player_anim[name] = ANIM_MINE
 | 
			
		||||
			end
 | 
			
		||||
		elseif player_anim[name] ~= ANIM_STAND then
 | 
			
		||||
			pl:set_animation({x=anim.stand_START, y=anim.stand_END}, animation_speed_mod, animation_blend)
 | 
			
		||||
			player_anim[name] = ANIM_STAND
 | 
			
		||||
		end
 | 
			
		||||
	end
 | 
			
		||||
end
 | 
			
		||||
minetest.register_globalstep(player_step)
 | 
			
		||||
 | 
			
		||||
-- END
 | 
			
		||||
| 
		 Before Width: | Height: | Size: 1.1 KiB  | 
| 
		 Before Width: | Height: | Size: 283 B  | 
| 
		 Before Width: | Height: | Size: 292 B  | 
| 
		 Before Width: | Height: | Size: 597 B  | 
| 
		 Before Width: | Height: | Size: 626 B  | 
| 
		 Before Width: | Height: | Size: 763 B  | 
| 
		 Before Width: | Height: | Size: 682 B  | 
| 
		 Before Width: | Height: | Size: 769 B  | 
| 
		 Before Width: | Height: | Size: 871 B  | 
| 
		 Before Width: | Height: | Size: 714 B  | 
| 
		 Before Width: | Height: | Size: 628 B  | 
| 
		 Before Width: | Height: | Size: 613 B  | 
| 
		 Before Width: | Height: | Size: 271 B  | 
| 
		 Before Width: | Height: | Size: 339 B  | 
| 
		 Before Width: | Height: | Size: 118 B  | 
| 
		 Before Width: | Height: | Size: 255 B  | 
| 
		 Before Width: | Height: | Size: 589 B  | 
| 
		 Before Width: | Height: | Size: 627 B  | 
| 
		 Before Width: | Height: | Size: 517 B  | 
| 
		 Before Width: | Height: | Size: 962 B  | 
| 
		 Before Width: | Height: | Size: 450 B  | 
| 
		 Before Width: | Height: | Size: 539 B  | 
| 
		 Before Width: | Height: | Size: 731 B  | 
| 
		 Before Width: | Height: | Size: 313 B  | 
| 
		 Before Width: | Height: | Size: 865 B  | 
| 
		 Before Width: | Height: | Size: 651 B  | 
| 
		 Before Width: | Height: | Size: 826 B  | 
| 
		 Before Width: | Height: | Size: 731 B  | 
| 
		 Before Width: | Height: | Size: 731 B  | 
| 
		 Before Width: | Height: | Size: 978 B  | 
| 
		 Before Width: | Height: | Size: 794 B  | 
| 
		 Before Width: | Height: | Size: 206 B  | 
| 
		 Before Width: | Height: | Size: 252 B  | 
| 
		 Before Width: | Height: | Size: 282 B  | 
| 
		 Before Width: | Height: | Size: 303 B  | 
| 
		 Before Width: | Height: | Size: 326 B  | 
| 
		 Before Width: | Height: | Size: 856 B  | 
| 
		 Before Width: | Height: | Size: 567 B  | 
| 
		 Before Width: | Height: | Size: 591 B  | 
| 
		 Before Width: | Height: | Size: 237 B  | 
| 
		 Before Width: | Height: | Size: 554 B  | 
| 
		 Before Width: | Height: | Size: 418 B  | 
| 
		 Before Width: | Height: | Size: 351 B  | 
| 
		 Before Width: | Height: | Size: 758 B  | 
| 
		 Before Width: | Height: | Size: 899 B  | 
| 
		 Before Width: | Height: | Size: 351 B  | 
| 
		 Before Width: | Height: | Size: 395 B  | 
| 
		 Before Width: | Height: | Size: 772 B  | 
| 
		 Before Width: | Height: | Size: 8.5 KiB  | 
| 
		 Before Width: | Height: | Size: 3.4 KiB  | 
| 
		 Before Width: | Height: | Size: 451 B  | 
| 
		 Before Width: | Height: | Size: 482 B  | 
| 
		 Before Width: | Height: | Size: 417 B  | 
| 
		 Before Width: | Height: | Size: 212 B  | 
| 
		 Before Width: | Height: | Size: 952 B  | 
| 
		 Before Width: | Height: | Size: 1.6 KiB  | 
| 
		 Before Width: | Height: | Size: 488 B  | 
| 
		 Before Width: | Height: | Size: 966 B  | 
| 
		 Before Width: | Height: | Size: 317 B  | 
| 
		 Before Width: | Height: | Size: 378 B  | 
| 
		 Before Width: | Height: | Size: 206 B  | 
| 
		 Before Width: | Height: | Size: 231 B  | 
| 
		 Before Width: | Height: | Size: 322 B  | 
| 
		 Before Width: | Height: | Size: 431 B  | 
| 
		 Before Width: | Height: | Size: 242 B  | 
| 
		 Before Width: | Height: | Size: 242 B  | 
| 
		 Before Width: | Height: | Size: 664 B  | 
| 
		 Before Width: | Height: | Size: 507 B  | 
| 
		 Before Width: | Height: | Size: 555 B  | 
| 
		 Before Width: | Height: | Size: 545 B  |