blob: fc651fcf94e6a8b2f5b7bf4a8c4303515d6d28fc (
plain)
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
|
--[[
Quests must have an Arcs field
]]
local reg = nrequire("inventory/inventory.lua")
local itm = nrequire("item.lua")
local inv = {}
if CLIENT then
inv = nrequire("cl_quests.lua")
end
inv.Name = "Quests"
inv.track = {}
function inv:FindPlaceFor(item)
if item.Arcs ~= nil then
return {#self.track + 1}
end
return nil
end
function inv:CanFitIn(pos,item)
return pos[1] == #self.track + 1
end
function inv:Put(pos,item)
print("Added a quest:")
PrintTable(item)
self.track[pos[1]] = item
end
function inv:Has(a)
if type(a) == "string" then
for k,v in pairs(self.track) do
if v == a then return {k} end
end
elseif type(a) == "function" then
for k,v in pairs(self.track) do
if a(v) then return {k} end
end
end
return nil
end
function inv:Remove(pos)
for i = 1,pos[1] do
self.track[i] = self.track[i + 1]
end
end
function inv:Get(pos)
return self.track[pos[1]]
end
function inv:Serialize()
local ret = {}
for k,v in pairs(self.track) do
ret[v.Name] = v:Serialize()
end
return util.TableToJSON(ret)
end
function inv:DeSerialize(str)
self.track = {}
local tbl = util.JSONToTable(str)
tbl = tbl or {}
for k,v in pairs(tbl) do
local quest = itm.GetItemByName(k):DeSerialize(v)
self.track[#self.track + 1] = quest
end
return self
end
reg.RegisterInventory(inv)
|
