awards/init.lua
2013-02-22 19:57:24 +00:00

90 lines
2.0 KiB
Lua

-- AWARDS
-- by Rubenwardy, CC-BY-SA
-------------------------------------------------------
-- this is the api definition file for the awards mod
-------------------------------------------------------
-- Table Save Load Functions
local function save_playerD()
local file = io.open(minetest.get_worldpath().."/awards.txt", "w")
if file then
file:write(minetest.serialize(player_data))
file:close()
end
end
local function load_playerD()
local file = io.open(minetest.get_worldpath().."/awards.txt", "r")
if file then
local table = minetest.deserialize(file:read("*all"))
if type(table) == "table" then
return table
end
end
return {}
end
-- The global award namespace
awards={}
player_data=load_playerD()
-- A table of award definitions
awards.def={}
-- Load files
dofile(minetest.get_modpath("awards").."/triggers.lua")
-- API Functions
function awards.register_achievement(name,data_table)
data_table["name"] = name
table.insert(awards.def,data_table);
end
function awards.register_onDig(func)
table.insert(awards.onDig,func);
end
function awards.give_achievement(name,award)
local data=player_data[name]
if not data['unlocked'] then
data['unlocked']={}
end
if not data['unlocked'][award] or data['unlocked'][award]~=award then
data['unlocked'][award]=award
minetest.chat_send_player(name, "Achievement Unlocked: "..award)
save_playerD()
end
end
-- List a player's achievements
minetest.register_chatcommand("list_awards", {
params = "",
description = "list_awards: list your awards",
func = function(name, param)
minetest.chat_send_player(name, "Your awards:");
for _, str in pairs(player_data[name].unlocked) do
minetest.chat_send_player(name, str);
end
end,
})
-- Example Achievements
awards.register_achievement("award_mesefind",{
title = "First Mese Find",
description = "Found some Mese!",
})
awards.register_onDig(function(player,data)
if not data['count']['default'] or not data['count']['default']['mese'] then
return
end
if data['count']['default']['mese'] > 0 then
return "award_mesefind"
end
end)