mirror of
https://git.minetest.land/VoxeLibre/VoxeLibre.git
synced 2024-11-29 14:01:07 +01:00
Refactor watch mod to mcl_clock
This commit is contained in:
Wuzzy
parent
f8f6f57611
commit
2e732c9085
11 changed files with 92 additions and 566 deletions
|
|
@ -1,452 +0,0 @@
|
|||
--Para ser usado no gerador aleatório.
|
||||
domb.aleatorio = nil
|
||||
|
||||
--Inicialização da variável aleatoria para que seja usada quando necessário.
|
||||
minetest.after(0.01, function()
|
||||
domb.aleatorio=PseudoRandom(200 + (minetest.env:get_timeofday()*100000))
|
||||
end)
|
||||
|
||||
-- Identifica vizinhança de um ponto, os pontos retornados tem a parte superior como ponto 1.
|
||||
-- Totaliza atualmente água, lava e ar. Contabiliza totais e separando fontes de fluindo.
|
||||
|
||||
function DOM_vizinhos(ponto)
|
||||
local p = {}
|
||||
local vx=0
|
||||
local vy=0
|
||||
local vz=0
|
||||
local tipo = ''
|
||||
local pontos = 0
|
||||
-- p.total = 0
|
||||
p.total_ar = 0
|
||||
p.total_lava = 0
|
||||
p.total_lava_fonte = 0
|
||||
p.total_agua = 0
|
||||
p.total_agua_fonte = 0
|
||||
p.n = {'','','','','',''}
|
||||
|
||||
--Começa pelo y (altura) de baixo para cima, sendo assim os 3 últimos testes serão os
|
||||
for vy=-1,1 do
|
||||
for vx=-1, 1 do
|
||||
for vz=-1,1 do
|
||||
p.n[pontos] = ''
|
||||
tipo = minetest.env:get_node({x=(ponto.x + vx), y=(ponto.y + vy), z=(ponto.z + vz)}).name
|
||||
--print("Ponto pego: " .. tipo)
|
||||
-- Busca pontos onde dois eixos estejam zerados e um outro tenha valor.
|
||||
if vx==0 and vy==0 and vz==0 then
|
||||
-- Ignora caso seja exatamente o ponto testado.
|
||||
elseif (vx==0 and vy==0 and vz~= 0) or (vx==0 and vz==0 and vy~=0) or (vy==0 and vz==0 and vx~=0) then
|
||||
--print("Ponto: " .. tostring(vx) .. " " .. tostring(vy) .. " " .. tostring(vz) .. " (Pontos: " .. tostring(pontos) .. ")")
|
||||
--print("Tipo: " .. tipo)
|
||||
if tipo == "default:air" or tipo == "air" then
|
||||
p.total_ar = p.total_ar + 1
|
||||
--print("Ar contado, total de " .. tostring(p.total_ar))
|
||||
elseif tipo == "default:water_source" or tipo == "default:water_flowing" or tipo == "default:water" then
|
||||
p.total_agua = p.total_agua + 1
|
||||
--print("Agua contada, total de " .. tostring(p.total_agua) .. ", tipo:" .. tipo)
|
||||
if tipo == "default:water_source" then
|
||||
p.total_agua_fonte = p.total_agua_fonte + 1
|
||||
end
|
||||
elseif tipo == "default:lava_source" or tipo == "default:lava_flowing" then
|
||||
p.total_lava = p.total_lava + 1
|
||||
if tipo == "default:lava_source" then
|
||||
p.total_lava_fonte = p.total_lava_fonte + 1
|
||||
end
|
||||
end
|
||||
|
||||
p.n[pontos] = tipo
|
||||
pontos = pontos + 1
|
||||
--if(vx==0 and vz==0 and vy==-1) then
|
||||
--print("Ponto n para x=0, y=-1 e z=0 é o : " .. tostring(pontos))
|
||||
--end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
p.total_lava_corrente = p.total_lava - p.total_lava_fonte
|
||||
p.total_agua_corrente = p.total_agua - p.total_agua_fonte
|
||||
|
||||
-- print("Retornando total ar de :" .. tostring(p.total_ar))
|
||||
return(p)
|
||||
end
|
||||
|
||||
|
||||
--[[
|
||||
Rotina que pega o texto e remove eventuais símbolos não desejados.
|
||||
]]--
|
||||
|
||||
function DOM_remove_simbolos(texto)
|
||||
local t = ""
|
||||
|
||||
if texto == "" or texto == nil then
|
||||
return("")
|
||||
end
|
||||
|
||||
-- Remoção de símbolos proibidos.
|
||||
t=string.gsub(texto, "(%[)", "")
|
||||
t=string.gsub(t, "(%])", "")
|
||||
t=string.gsub(t, "(%()", "")
|
||||
t=string.gsub(t, "(%))", "")
|
||||
t=string.gsub(t, "(#)", "")
|
||||
t=string.gsub(t, "(@)", "")
|
||||
t=string.gsub(t, "(?)", "")
|
||||
t=string.gsub(t, "(!)", "")
|
||||
t=string.gsub(t, "($)", "")
|
||||
t=string.gsub(t, "(%%)", "")
|
||||
t=string.gsub(t, "(&)", "")
|
||||
t=string.gsub(t, "(*)", "")
|
||||
t=string.gsub(t, "(=)", "")
|
||||
|
||||
return(t)
|
||||
end
|
||||
|
||||
--[[
|
||||
Rotina que pega o texto e remove eventuais espaços no inicio, no final e espacos duplos no meio da string.
|
||||
]]--
|
||||
|
||||
function DOM_remove_espacos(texto)
|
||||
local t = ""
|
||||
|
||||
if texto == "" or texto == nil then
|
||||
return("")
|
||||
end
|
||||
t = texto
|
||||
|
||||
--Remove todos os espaços duplos que encontrar.
|
||||
while string.find(t," ") do
|
||||
t=string.gsub(texto, "( )", " ")
|
||||
end
|
||||
|
||||
--Remove espaços no final e no início do texto.
|
||||
t=string.trim(t)
|
||||
|
||||
return t
|
||||
end
|
||||
|
||||
|
||||
--[[
|
||||
Rotina usada para inspecionar elementos retornando um relatório na linha de comando.
|
||||
Aceita quantidade variável de parâmetros sendo:
|
||||
1) Arquivo
|
||||
2) Linha
|
||||
3) Teste
|
||||
4) Parâmetros
|
||||
|
||||
]]--
|
||||
function DOM_inspeciona_condicional(...)
|
||||
if(arg[3] ~= true) then return end
|
||||
|
||||
local a=0
|
||||
local linha= {tostring(debug.getinfo(2, 'l').currentline)}
|
||||
local arquivo = debug.getinfo(2, 'S').short_src or debug.getinfo(2,'S').source
|
||||
if string.len(arquivo) > 25 then
|
||||
arquivo = "..." arquivo:sub(string.len(arquivo)- 22)
|
||||
end
|
||||
|
||||
if arg[2] ~= nil then
|
||||
linha = arg[2]
|
||||
end
|
||||
|
||||
if arg[1] ~= nil then
|
||||
arquivo = arg[1]
|
||||
end
|
||||
|
||||
|
||||
|
||||
print("====================================== [DOM Inspeciona] =======")
|
||||
print(arquivo .. " [" .. linha .. "]")
|
||||
print(tostring(arg[4]))
|
||||
print("---------------------------------------------------------------")
|
||||
for a=5,#arg,1 do
|
||||
print(string.format("%s", dump(arg[a])))
|
||||
end
|
||||
print("");
|
||||
print("-------------------------------------- [DOM Inspeciona] ---Fim-")
|
||||
print(arquivo .. " [" .. linha .. "]")
|
||||
print("===============================================================")
|
||||
end
|
||||
|
||||
--[[
|
||||
Chama a rotina de inpecao sem a necessidade de passar a condicao.
|
||||
]]--
|
||||
|
||||
function DOM_inspeciona(...)
|
||||
local linha = debug.getinfo(2, 'l').currentline
|
||||
local arquivo = debug.getinfo(2, 'S').short_src or debug.getinfo(2,'S').source
|
||||
if string.len(arquivo) > 25 then
|
||||
arquivo = "..." .. arquivo:sub(arquivo:len(arquivo)- 22)
|
||||
end
|
||||
|
||||
DOM_inspeciona_condicional(arquivo,linha,true,...)
|
||||
end
|
||||
|
||||
--[[
|
||||
Inspeção simplificada que não necessita de valores adicionais, apenas o titulo. Mostra a linha
|
||||
--]]
|
||||
function DOM_inspeciona_r(titulo)
|
||||
if titulo == nil then
|
||||
titulo = ""
|
||||
end
|
||||
|
||||
local linha = debug.getinfo(2, 'l').currentline
|
||||
local arquivo = debug.getinfo(2, 'S').short_src or debug.getinfo(2,'S').source
|
||||
if string.len(arquivo) > 25 then
|
||||
arquivo = "..." arquivo:sub(string.len(arquivo)- 22)
|
||||
end
|
||||
|
||||
print(arquivo .. " [" .. linha .. "] " .. titulo)
|
||||
end
|
||||
|
||||
|
||||
--[[
|
||||
Realiza a união do string.format com o print simulando o printf do C++.
|
||||
--]]
|
||||
function DOM_print(...)
|
||||
print(string.format(...))
|
||||
end
|
||||
|
||||
--[[
|
||||
Permite envio de mensagens para o log no minitest ao invés do terminal, segue a formatação do string.format
|
||||
--]]
|
||||
function DOM_log(...)
|
||||
-- action, error, info
|
||||
minetest.log("action", "[DOM]"..string.format(...))
|
||||
end
|
||||
|
||||
|
||||
--[[
|
||||
Centraliza os valores na matriz 5x5 de acordo com a largura e altura recebidas gerando automaticamente uma margem ao redor da fórmula.
|
||||
--]]
|
||||
function DOM_centraliza_matriz_5x5(matriz, largura, altura)
|
||||
--Centraliza se largura ou altura forem menores que 5.
|
||||
--Largura ou Altura/Critério: 5/Ignora, 4/Ignora, 3/1 de margem, 2/1 de margem, 1/2 de margem
|
||||
local i = 0
|
||||
a=matriz[1][3]
|
||||
if a~=nil then
|
||||
if string.find(a,"gravel") then
|
||||
i = 1
|
||||
end
|
||||
end
|
||||
--DOM_inspeciona("Rotina centraliza matriz: ",matriz)
|
||||
|
||||
local margem_superior = math.floor((5-altura)/2)
|
||||
local margem_lateral = math.floor((5-largura)/2)
|
||||
local d_a = margem_lateral
|
||||
local d_b = margem_superior
|
||||
|
||||
if margem_superior > 0 or margem_lateral > 0 then
|
||||
for a=5,margem_lateral+1,-1 do --Colunas
|
||||
for b=5,margem_superior+1,-1 do --Linhas
|
||||
-- Transfere valor da posição original para a deslocada tornando o valor da posição original como nulo.
|
||||
matriz[a][b] = matriz[a-d_a][b-d_b]
|
||||
matriz[a-d_a][b-d_b] = nil
|
||||
end
|
||||
end
|
||||
end
|
||||
--DOM_inspeciona("Matriz convertida:",matriz)
|
||||
|
||||
---DOM_inspeciona("Saida da rotina centraliza matriz: ",matriz)
|
||||
return matriz
|
||||
end
|
||||
|
||||
--[[
|
||||
Cria matriz 5x5 a patir de uma linha de itens separados por virgulas
|
||||
- Ignora itens a partir do sexto...
|
||||
--]]
|
||||
function DOM_cria_matriz_5x5(itens)
|
||||
local m_5x5={{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil}},{{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil}},{{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil}},{{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil}},{{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil},{nil,nil,nil,nil,nil}}
|
||||
local i = {}
|
||||
local a = 0
|
||||
local largura = 0
|
||||
|
||||
if itens ~= "" and itens ~= nil then
|
||||
if itens.find(itens,",") then
|
||||
else
|
||||
table.insert(i,itens)
|
||||
a = a + 1
|
||||
end
|
||||
end
|
||||
|
||||
while string.find(itens,",") do
|
||||
lido = string.sub(itens,1,itens.find(","))
|
||||
itens = string.sub(itens,itens.find(",")+1)
|
||||
table.insert(i,lido)
|
||||
a = a + 1
|
||||
end
|
||||
|
||||
largura = a
|
||||
while a < 5 do
|
||||
table.insert(i,nil)
|
||||
a = a + 1
|
||||
end
|
||||
|
||||
for a=1,5,1 do --Colunas
|
||||
-- Transfere valores para a linha 3.
|
||||
m_5x5[3][a] = i[a]
|
||||
end
|
||||
|
||||
m_5x5 = DOM_centraliza_matriz_5x5(m_5x5,largura,5)
|
||||
|
||||
return m_5x5
|
||||
end
|
||||
|
||||
--[[
|
||||
Converte valor posicional xyz para valor em texto separados por virgulas e sem espaços:
|
||||
<classe> -> "x,y,z"
|
||||
]]--
|
||||
function DOM_de_xyz_para_texto(valor)
|
||||
if valor==nil then
|
||||
return "0,0,0"
|
||||
end
|
||||
|
||||
local r = ""
|
||||
r = tostring(valor.x)..",".. tostring(valor.y) ..",".. tostring(valor.z)
|
||||
return r
|
||||
end
|
||||
|
||||
|
||||
--[[
|
||||
Converte valor posicional de texto para a classe xyz:
|
||||
"x,y,z" -> <classe>
|
||||
|
||||
|
||||
Convert values x,y,z in text to the class xyz:
|
||||
"x,y,z" -> <classe>
|
||||
]]--
|
||||
function DOM_de_texto_para_xyz(valor)
|
||||
if valor==nil or recebido == "" then
|
||||
return {x=0,y=0,z=0}
|
||||
end
|
||||
|
||||
--print("Recebido:".. dump(valor))
|
||||
local r={x=0,y=0,z=0}
|
||||
local d=valor
|
||||
r.x=tonumber(d:sub(1,string.find(d,",")-1))
|
||||
|
||||
d=d:sub(string.find(d,",")+1)
|
||||
r.y= tonumber(d:sub(1,string.find(d,",")-1))
|
||||
|
||||
d=d:sub(string.find(d,",")+1)
|
||||
r.z= tonumber(d)
|
||||
--print("Retorno:".. dump(r))
|
||||
return r
|
||||
end
|
||||
|
||||
|
||||
--[[
|
||||
Mensagem básica de carga
|
||||
Recebe:
|
||||
nome do modulo, caminho do modulo
|
||||
|
||||
Basic load message
|
||||
Params:
|
||||
module name, path of the module
|
||||
]]--
|
||||
function DOM_mb(m,c)
|
||||
-- minetest.log("action", "[DOM]"..m.." loaded from "..minetest.get_modpath(minetest.get_current_modname()))
|
||||
minetest.log("action", "[DOM]"..m.." is ready.")
|
||||
end
|
||||
|
||||
|
||||
|
||||
--[[
|
||||
Registra comando para chamar rotinas de apoio pelo chat com o comando /dom_util <comando> <parametros...>
|
||||
Comandos:
|
||||
apaga x y z Apaga node no lugar especificado.
|
||||
|
||||
if comando == "comando" then -- Comando?
|
||||
minetest.chat_send_player(name, "[DOM]dom_util: ".."Comando?")
|
||||
elseif comando == "comando2" then -- Comando?
|
||||
minetest.chat_send_player(name, "[DOM]dom_util: ".."Comando2?")
|
||||
end
|
||||
end
|
||||
|
||||
--]]
|
||||
function DOM_registra_comandos_de_uso_geral()
|
||||
end
|
||||
|
||||
--[[
|
||||
Quebra texto em lista utilizando espaços como delimitadores.
|
||||
--]]
|
||||
function DOM_quebra_texto_em_lista (texto)
|
||||
local lista = {}
|
||||
|
||||
lista = DOM_quebra_texto_em_lista_por_delimitador (texto, " ")
|
||||
|
||||
return lista
|
||||
end
|
||||
|
||||
--[[
|
||||
Quebra texto em lista utilizando delimitador pedido.
|
||||
--]]
|
||||
function DOM_quebra_texto_em_lista_por_delimitador (texto, delimitador)
|
||||
local lista = {}
|
||||
lista.tamanho = 0
|
||||
local t = ""
|
||||
local fatia = ""
|
||||
|
||||
if texto==nil or texto =="" then return nil end -- Caso texto recebido não seja válido retorna nulo
|
||||
if delimitador==nil or delimitador =="" then return nil end -- Caso delimitador recebido não seja válido retorna nulo
|
||||
|
||||
--print("Texto: \'"..dump(texto).."\'")
|
||||
t = texto
|
||||
if not t:find(delimitador) then -- Cria lista com um item caso não seja encontrado nenhum delimitador.
|
||||
table.insert(lista, t)
|
||||
lista.tamanho = 1
|
||||
end
|
||||
|
||||
while t:find(delimitador) do -- Enquanto o delimitador puder ser encontrado no texto, fica no laço.
|
||||
fatia = t:sub(1,t:find(delimitador)-1)
|
||||
table.insert(lista,fatia)
|
||||
lista.tamanho= lista.tamanho + 1
|
||||
|
||||
t = t:sub(t:find(delimitador)+1)
|
||||
|
||||
if not t:find(delimitador) then -- Adiciona o item que sobra ao final após o último delimitador ser removido.
|
||||
table.insert(lista,t)
|
||||
lista.tamanho= lista.tamanho + 1
|
||||
end
|
||||
end
|
||||
|
||||
--print("saída: "..dump(table.tamanho).." => "..dump(table))
|
||||
return lista
|
||||
end
|
||||
|
||||
--[[
|
||||
Copia ponto evitando que seja passada matriz por referência
|
||||
--]]
|
||||
function DOM_copia_ponto(origem,destino)
|
||||
--DOM_inspeciona("Copia ponto:",origem,destino)
|
||||
if destino == nil then
|
||||
destino = {}
|
||||
end
|
||||
|
||||
destino.x = tonumber(origem.x)
|
||||
destino.y = tonumber(origem.y)
|
||||
destino.z = tonumber(origem.z)
|
||||
|
||||
return destino
|
||||
end
|
||||
|
||||
-- Pega valores meta de um item, provavelmente se aplica a nodos.
|
||||
function DOM_get_item_meta (item)
|
||||
local r = {}
|
||||
local v = item["metadata"]
|
||||
|
||||
if v==nil then
|
||||
return r
|
||||
end
|
||||
|
||||
if string.find(v,"return {") then
|
||||
r = minetest.deserialize(v)
|
||||
end
|
||||
|
||||
return r
|
||||
end
|
||||
|
||||
-- Associa valores meta a um item, provavelmente se aplica a nodos.
|
||||
function DOM_set_item_meta(i, v)
|
||||
local t = minetest.serialize(v)
|
||||
|
||||
i["metadata"]=t
|
||||
end
|
||||
|
|
@ -1,6 +0,0 @@
|
|||
domb = {}
|
||||
|
||||
--DOM base system library
|
||||
dofile(minetest.get_modpath("domb").."/domb.lua")
|
||||
|
||||
DOM_registra_comandos_de_uso_geral()
|
||||
|
|
@ -1,16 +0,0 @@
|
|||
--[[
|
||||
DOM, renew of the watch mod
|
||||
|
||||
Original from Echo, here: http://forum.minetest.net/viewtopic.php?id=3795
|
||||
]]--
|
||||
|
||||
local init = os.clock()
|
||||
|
||||
--Rotinas usadas pelo mod
|
||||
dofile(minetest.get_modpath("watch").."/rotinas.lua")
|
||||
|
||||
--Declarações dos objetos
|
||||
dofile(minetest.get_modpath("watch").."/itens.lua")
|
||||
|
||||
local time_to_load= os.clock() - init
|
||||
print(string.format("[MOD] "..minetest.get_current_modname().." loaded in %.4f s", time_to_load))
|
||||
|
|
@ -1,26 +0,0 @@
|
|||
-- Watch recipe
|
||||
minetest.register_craft({
|
||||
description = "Clock",
|
||||
output = 'watch:watch',
|
||||
groups = {not_in_creative_inventory=1},
|
||||
recipe = {
|
||||
{'', 'default:gold_ingot', ''},
|
||||
{'default:gold_ingot', 'mesecons:redstone_dust', 'default:gold_ingot'},
|
||||
{'', 'default:gold_ingot', ''}
|
||||
}
|
||||
})
|
||||
|
||||
|
||||
--Watch tool
|
||||
watch.registra_item("watch:watch",watch.images[3],true)
|
||||
|
||||
--Faces
|
||||
for a=0,63,1 do
|
||||
local b = a
|
||||
if b > 31 then
|
||||
b = b - 32
|
||||
else
|
||||
b = b + 32
|
||||
end
|
||||
watch.registra_item("watch:watch_"..tostring(a),watch.images[b+1],false)
|
||||
end
|
||||
|
|
@ -1,65 +0,0 @@
|
|||
--[[
|
||||
DOM, renew of the watch mod
|
||||
|
||||
Original from Echo, here: http://forum.minetest.net/viewtopic.php?id=3795
|
||||
]]--
|
||||
|
||||
watch = {}
|
||||
watch.ultimo_tempo = -1
|
||||
|
||||
-- Image of all 64 possible faces
|
||||
watch.images = {}
|
||||
for frame=0,63 do
|
||||
table.insert(watch.images, "clock_clock.png^[verticalframe:64:"..frame)
|
||||
end
|
||||
|
||||
local function round(num)
|
||||
return math.floor(num + 0.5)
|
||||
end
|
||||
|
||||
function watch.pega_hora()
|
||||
local t = 64 * minetest.get_timeofday()
|
||||
return tostring(round(t))
|
||||
end
|
||||
|
||||
-- Register itens
|
||||
function watch.registra_item(nome,imagem,aparece_nas_receitas)
|
||||
local g = 1
|
||||
if aparece_nas_receitas then
|
||||
g = 0
|
||||
end
|
||||
|
||||
minetest.register_tool(nome, {
|
||||
description = "Clock",
|
||||
inventory_image = imagem,
|
||||
groups = {not_in_creative_inventory=g},
|
||||
metadata = {w_type="d"},
|
||||
wield_image = "",
|
||||
stack_max = 1,
|
||||
})
|
||||
end
|
||||
|
||||
minetest.register_globalstep(function(dtime)
|
||||
|
||||
local now = watch.pega_hora()
|
||||
|
||||
if watch.ultimo_tempo == now then
|
||||
-- return
|
||||
end
|
||||
|
||||
watch.ultimo_tempo = now
|
||||
|
||||
local players = minetest.get_connected_players()
|
||||
for i,player in ipairs(players) do
|
||||
|
||||
if string.sub(player:get_wielded_item():get_name(), 0, 63) == "watch:watch" then
|
||||
player:set_wielded_item("watch:watch_"..now)
|
||||
end
|
||||
for i,stack in ipairs(player:get_inventory():get_list("main")) do
|
||||
if i<10 and string.sub(stack:get_name(), 0, 11) == "watch:watch" then
|
||||
player:get_inventory():remove_item("main", stack:get_name())
|
||||
player:get_inventory():add_item("main", "watch:watch_"..now)
|
||||
end
|
||||
end
|
||||
end
|
||||
end)
|
||||
59
mods/mcl_clock/clock.lua
Normal file
59
mods/mcl_clock/clock.lua
Normal file
|
|
@ -0,0 +1,59 @@
|
|||
--[[
|
||||
mcl_clock, renew of the renew of the watch mod
|
||||
|
||||
Original from Echo, here: http://forum.minetest.net/viewtopic.php?id=3795
|
||||
]]--
|
||||
|
||||
watch = {}
|
||||
watch.old_time = -1
|
||||
|
||||
-- Image of all 64 possible faces
|
||||
watch.images = {}
|
||||
for frame=0,63 do
|
||||
table.insert(watch.images, "mcl_clock_clock.png^[verticalframe:64:"..frame)
|
||||
end
|
||||
|
||||
local function round(num)
|
||||
return math.floor(num + 0.5)
|
||||
end
|
||||
|
||||
function watch.get_clock_frame()
|
||||
local t = 64 * minetest.get_timeofday()
|
||||
return tostring(round(t))
|
||||
end
|
||||
|
||||
-- Register items
|
||||
function watch.register_item(name, image, creative)
|
||||
local g = 1
|
||||
if creative then
|
||||
g = 0
|
||||
end
|
||||
minetest.register_tool(name, {
|
||||
description = "Clock",
|
||||
inventory_image = image,
|
||||
groups = {not_in_creative_inventory=g, clock=1},
|
||||
wield_image = "",
|
||||
stack_max = 1,
|
||||
})
|
||||
end
|
||||
|
||||
minetest.register_globalstep(function(dtime)
|
||||
local now = watch.get_clock_frame()
|
||||
|
||||
if watch.old_time == now then
|
||||
return
|
||||
end
|
||||
|
||||
watch.old_time = now
|
||||
|
||||
local players = minetest.get_connected_players()
|
||||
for p, player in ipairs(players) do
|
||||
for s, stack in ipairs(player:get_inventory():get_list("main")) do
|
||||
if stack:get_name() == "mcl_clock:clock" then
|
||||
player:get_inventory():set_stack("main", s, "mcl_clock:clock_"..now)
|
||||
elseif string.sub(stack:get_name(), 1, 16) == "mcl_clock:clock_" then
|
||||
player:get_inventory():set_stack("main", s, "mcl_clock:clock_"..now)
|
||||
end
|
||||
end
|
||||
end
|
||||
end)
|
||||
|
|
@ -1,3 +1,2 @@
|
|||
default
|
||||
domb
|
||||
mesecons
|
||||
8
mods/mcl_clock/init.lua
Normal file
8
mods/mcl_clock/init.lua
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
--[[
|
||||
mcl_clock, renew of the renew of the watch mod
|
||||
|
||||
Original from Echo, here: http://forum.minetest.net/viewtopic.php?id=3795
|
||||
]]--
|
||||
|
||||
dofile(minetest.get_modpath("mcl_clock").."/clock.lua")
|
||||
dofile(minetest.get_modpath("mcl_clock").."/items.lua")
|
||||
25
mods/mcl_clock/items.lua
Normal file
25
mods/mcl_clock/items.lua
Normal file
|
|
@ -0,0 +1,25 @@
|
|||
-- Clock recipe
|
||||
minetest.register_craft({
|
||||
description = "Clock",
|
||||
output = 'mcl_clock:clock',
|
||||
groups = {not_in_creative_inventory=1},
|
||||
recipe = {
|
||||
{'', 'default:gold_ingot', ''},
|
||||
{'default:gold_ingot', 'mesecons:redstone_dust', 'default:gold_ingot'},
|
||||
{'', 'default:gold_ingot', ''}
|
||||
}
|
||||
})
|
||||
|
||||
-- Clock tool
|
||||
watch.register_item("mcl_clock:clock", watch.images[1], true)
|
||||
|
||||
-- Faces
|
||||
for a=0,63,1 do
|
||||
local b = a
|
||||
if b > 31 then
|
||||
b = b - 32
|
||||
else
|
||||
b = b + 32
|
||||
end
|
||||
watch.register_item("mcl_clock:clock_"..tostring(a), watch.images[b+1], false)
|
||||
end
|
||||
|
Before Width: | Height: | Size: 6.4 KiB After Width: | Height: | Size: 6.4 KiB |
Loading…
Reference in a new issue