HybridDog

local function trianglesphere(pos, r, edgecnt)
	-- Positions on the unit sphere
	local nodes = {
		{0, 1, 0},
		{1/math.sqrt(2), -1/math.sqrt(2), 0},
		{-1/math.sqrt(3), -1/math.sqrt(3), -1/math.sqrt(3)},
		{-1/math.sqrt(3), -1/math.sqrt(3), 1/math.sqrt(3)},
	}
	-- Indices to nodes: from, to and opposite points for triangles
	-- Invariance: e[1] < e[2] and e[3] < e[4]

HybridDog

-- See daynightratio.h:23
local dnrvalues = {
	{4250 + 125, 150},
	{4500 + 125, 150},
	{4750 + 125, 250},
	{5000 + 125, 350},
	{5250 + 125, 500},
	{5500 + 125, 675},
	{5750 + 125, 875},

HybridDog

// this is two times as fast when compiled with -Ofast

// see https://graphics.ethz.ch/~cengizo/Files/Sig15PerceptualDownscaling.pdf

#include <stdlib.h> // malloc, EXIT_*
#include <string.h> // memset
#include <math.h>
#include <png.h>

#define SQR_NP 2 // squareroot of the patch size, recommended: 2

HybridDog

-- note that there's also minetest.get_dig_params
local mindelay = 0.15 -- game.cpp:3888
-- copied from tool.cpp:90
local function get_dig_time(groups, toolcaps)
	-- dig_immediate have a fixed time
	if groups.dig_immediate == 2 then
		return 0.5
	end
	if groups.dig_immediate == 3 then
		return mindelay

HybridDog

local function fine_pointed(pos, camera_pos, pos_off, look_dir)
	local offset, nc
	local oc = {}
	for c,v in pairs(pos_off) do
		if v == 0 then
			oc[#oc + 1] = c
		else
			offset = v
			nc = c

HybridDog

local t
minetest.register_on_chat_message(function()
	t = minetest.get_us_time()
end)
for _ = 1,1000 do
	minetest.register_on_chat_message(function() end)
end
minetest.register_on_chat_message(function()
	print("direct: " .. minetest.get_us_time() - t .. " ms")
end)

HybridDog

local function subtt(str)
	local t = {}
	for i = 1, #str do
		t[i] = str:sub(i, i)
	end
	return t
end

local function gsubtt(str)
	local t = {}

HybridDog

local TIME = 0.5

local clock = minetest.get_us_time
local us = TIME * 1000000
local function benchmark_function(fct, ...)
	local start = clock()
	local fin = start
	local total = 0
	while fin - start < us do
		fct(...)

HybridDog

-- maximum distance a protector can have
local MAX_DISTANCE = 10

local function get(tab, pname,z,y,x)
	local data = tab[pname]
	if data then
		local data = tab[z]
		if data then
			data = data[y]
			if data then

HybridDog

local os_clock = minetest.get_us_time
local TIME = 3*1000000
local function time_sth(fct, ...)
	local start = os_clock()
	local fin = start
	local total = 0
	while fin-start < TIME do
		fct(...)

		total = total + 1