1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
-- 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)
if data_table['trigger'] and data_table['trigger']['type'] then
if data_table['trigger']['type']=="dig" then
local tmp={
award=name,
node=data_table['trigger']['node'],
target=data_table['trigger']['target'],
}
table.insert(awards.onDig,tmp)
elseif data_table['trigger']['type']=="place" then
local tmp={
award=name,
node=data_table['trigger']['node'],
target=data_table['trigger']['target'],
}
table.insert(awards.onPlace,tmp)
elseif data_table['trigger']['type']=="death" then
local tmp={
award=name,
target=data_table['trigger']['target'],
}
table.insert(awards.onDeath,tmp)
end
end
awards['def'][name] = data_table
end
function awards.register_onDig(func)
table.insert(awards.onDig,func);
end
function awards.register_onPlace(func)
table.insert(awards.onPlace,func);
end
function awards.register_onDeath(func)
table.insert(awards.onDeath,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
-- set player_data table
data['unlocked'][award]=award
-- define local award data
local title = award
local desc = ""
-- check definition table
if awards['def'][award] and awards['def'][award]['title'] then
title=awards['def'][award]['title']
end
if awards['def'][award] and awards['def'][award]['description'] then
desc=awards['def'][award]['description']
end
-- send award header
minetest.chat_send_player(name, "Achievement Unlocked: "..title)
-- send award content
if desc~="" then
minetest.chat_send_player(name, desc)
end
-- save playertable
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, name.."'s awards:");
for _, str in pairs(player_data[name].unlocked) do
minetest.chat_send_player(name, str);
end
end,
})
|
