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
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
|
--local tblf = include("/../gamemodes/artery/gamemode/utility/mapfuncs.lua")
print("Hello from cl_ncpmap in core")
local drawmap = false
hook.Add( "ScoreboardShow", "ShowNPCMap", function()
print("Showing npc map")
drawmap = true
return true
end )
hook.Add( "ScoreboardHide", "ShowNPCMap", function()
print("Hiding npc map")
drawmap = false
end )
local white = Color( 255, 255, 255, 255 )
local mapicons = --[[mapicons or]] {
["global"] = {
["isleaf"] = false,
["border"] = { {-10000,-10000},
{-10000,10000},
{10000,10000},
{10000,-10000}
},
}
}
hook.Add( "HUDPaint", "paintsprites", function()
local function drawsubarea(node)
print("drawing")
PrintTable(node)
if node.isleaf then
render.SetMaterial( node.material )
render.DrawSprite( node.pos, 64, 64, white )
print("Actually drawing")
PrintTable(node)
else
if not node.icons then
print("found area without any icons!")
for k,v in pairs(node) do print(k,":",v) end
end
for k,v in pairs(node.icons or {}) do
drawsubarea(v)
end
end
end
if drawmap then
print("starting this draw")
cam.Start3D()
drawsubarea(mapicons["global"])
cam.End3D()
print("done with this draw")
end
end )
--When the player loads in, load the npcmap for this map
hook.Add("Initialize","loadmapicons",function()
LocalPlayer().MapIcons = LocalPlayer().MapIcons or {}
local mapname = game.GetMap()
if not file.Exists("artery/client/"..mapname,"DATA") then
file.CreateDir("artery/client/"..mapname)
end
local mapiconstxt = file.Read("artery/client/"..mapname.."/known.txt")
for k,v in pairs(string.Explode("\r?\n",mapiconstxt,true)) do
local isleaf = tobool(v[1])
local ttbl = string.Explode(",",v)
if isleaf then
local subarea = ttbl[2]
local material = ttbl[3]
local pos = Vector(ttbl[4],ttbl[5],ttbl[6])
else
local name = v[2]
local boundry = {}
for i = 3, #ttbl, 3 do
boundry[#boundry+1] = ttbl[i],ttbl[i + 1],ttbl[i + 2]
end
end
end
end)
--When the player disconnects (or changes levels) save the npcmap
--Add an icon to the map
local function addmapicon(material, subarea, position)
print("adding map icon, material:",material,"subarea:",subarea,"bordertbl:",bordertbl)
print("mat",material,"subarea",subarea,"position",position)
local parts = string.Explode(":",subarea)
print("parts:",parts)
PrintTable(parts)
local cursor = mapicons
for k,v in pairs(parts) do
print("Traverseing down tree:",k,v)
print("cursor was")
PrintTable(cursor)
if cursor[v] == nil then cursor[v] = {} end
cursor = cursor[v]
print("cursor is")
PrintTable(cursor)
end
if cursor.isleaf and v.pos == position then return end
cursor.icons = cursor.icons or {}
for k,v in pairs(cursor.icons) do
if v.pos == position then return end --This position already has an icon!
end
table.insert(cursor.icons,{
["isleaf"] = true,
["material"] = Material(material),
["pos"] = position,
})
assert(type(cursor) == "table","Attempted to add subarea that dosen't exist:" .. subarea)
end
local function addmaparea(material, subarea, bordertbl)
print("adding map area, material:",material,"subarea:",subarea,"bordertbl:",bordertbl)
local parts = string.Explode(":",subarea)
print("parts:",parts)
PrintTable(parts)
local cursor = mapicons
if #parts > 1 then
for k,v in pairs(parts) do
print("Traverseing down tree:",k,v)
cursor = cursor[v]
end
end
print("Cursor is",cursor)
if cursor ~= nil then
cursor[subarea] = {
["isleaf"] = false,
["material"] = "",
["border"] = bordertbl,
["subparts"] = {}
}
else
print("Error, cursor was nil!")
end
end
--[[
addmaparea("","global",{
{-10000,-10000},
{-10000,10000},
{10000,10000},
{10000,-10000}
})
]]
net.Receive("addmapicon",function()
print("got recieve for map icon")
local matstr = net.ReadString()
local subarea = net.ReadString()
local matpos = net.ReadVector()
addmapicon(matstr,subarea,matpos)
print("MapIcons is now")
PrintTable(mapicons)
end)
net.Receive("addmaparea",function()
print("got receive for map area")
local matstr = net.ReadString()
local subarea = net.ReadString()
local boarders = net.ReadTable()
end)
|
