diff options
| author | bearbin <bearbin@gmail.com> | 2013-07-29 14:55:26 +0200 |
|---|---|---|
| committer | bearbin <bearbin@gmail.com> | 2013-07-29 14:55:26 +0200 |
| commit | fb1044c4e55c726753d094b66756a1cb3bc60ee8 (patch) | |
| tree | c61e56725da7dff0154d566722651e2c39c9d6c6 /MCServer | |
| parent | WebAdmin: Removed the duplicate memory usage querying (diff) | |
| parent | Changed everyting to Unix line endings. (diff) | |
| download | cuberite-fb1044c4e55c726753d094b66756a1cb3bc60ee8.tar cuberite-fb1044c4e55c726753d094b66756a1cb3bc60ee8.tar.gz cuberite-fb1044c4e55c726753d094b66756a1cb3bc60ee8.tar.bz2 cuberite-fb1044c4e55c726753d094b66756a1cb3bc60ee8.tar.lz cuberite-fb1044c4e55c726753d094b66756a1cb3bc60ee8.tar.xz cuberite-fb1044c4e55c726753d094b66756a1cb3bc60ee8.tar.zst cuberite-fb1044c4e55c726753d094b66756a1cb3bc60ee8.zip | |
Diffstat (limited to '')
29 files changed, 4793 insertions, 4793 deletions
diff --git a/MCServer/Plugins/ChatLog/plugin.lua b/MCServer/Plugins/ChatLog/plugin.lua index c8358a6d3..c2f6fb81a 100644 --- a/MCServer/Plugins/ChatLog/plugin.lua +++ b/MCServer/Plugins/ChatLog/plugin.lua @@ -1,32 +1,32 @@ -
--- plugin.lua
-
--- Implements the main entrypoint for the plugin, as well as all the handling needed
-
--- ChatLog plugin logs all chat messages into the server log
-
-
-
-
-
-function Initialize(Plugin)
- Plugin:SetName("ChatLog")
- Plugin:SetVersion(3)
-
- PluginManager = cRoot:Get():GetPluginManager()
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHAT)
-
- LOG("Initialized " .. Plugin:GetName() .. " v." .. Plugin:GetVersion())
- return true
-end
-
-
-
-
-
-function OnChat(Player, Message)
- -- Lets get loggin'
- LOGINFO("[" .. Player:GetName() .. "]: " .. StripColorCodes(Message));
-
- return false
+ +-- plugin.lua + +-- Implements the main entrypoint for the plugin, as well as all the handling needed + +-- ChatLog plugin logs all chat messages into the server log + + + + + +function Initialize(Plugin) + Plugin:SetName("ChatLog") + Plugin:SetVersion(3) + + PluginManager = cRoot:Get():GetPluginManager() + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHAT) + + LOG("Initialized " .. Plugin:GetName() .. " v." .. Plugin:GetVersion()) + return true +end + + + + + +function OnChat(Player, Message) + -- Lets get loggin' + LOGINFO("[" .. Player:GetName() .. "]: " .. StripColorCodes(Message)); + + return false end
\ No newline at end of file diff --git a/MCServer/Plugins/ChunkWorx/chunkworx_web.lua b/MCServer/Plugins/ChunkWorx/chunkworx_web.lua index aeccb9719..e9a930c92 100644 --- a/MCServer/Plugins/ChunkWorx/chunkworx_web.lua +++ b/MCServer/Plugins/ChunkWorx/chunkworx_web.lua @@ -1,257 +1,257 @@ -local function Buttons_Player( Name )
- return "<form method='POST'><input type='hidden' name='PlayerName' value='"..Name.."'><input type='submit' name='PlayerExact' value='Exact'><input type='submit' name='Player3x3' value='3x3'></form>"
-end
-
-local function Button_World( Name )
- return "<form method='POST'><input type='hidden' name='WorldName' value='"..Name.."'><input type='submit' name='SelectWorld' value='Select'></form>"
-end
-
-function HandleRequest_Generation( Request )
- local Content = ""
- if (Request.PostParams["AGHRRRR"] ~= nil) then
- GENERATION_STATE = 0
- WW_instance:SaveAllChunks()
- WW_instance:UnloadUnusedChunks()
- LOGERROR("" .. PLUGIN:GetName() .. " v" .. PLUGIN:GetVersion() .. ": works ABORTED by admin")
- end
- --Content = Content .. "<head><meta http-equiv=\"refresh\" content=\"2;\"></head>"
- -- PROCESSING
- --------------------------------------------------------------------------------------------------
- local function ProcessingContent()
- local _small_content = ""
- _small_content = _small_content .. "<head><meta http-equiv=\"refresh\" content=\"2;\"></head>"
- _small_content = _small_content .. "<h4>World for operations:</h4>"..WORK_WORLD
- if (OPERATION_CODE == 0) then
- _small_content = _small_content .. "<h4>Operation:</h4>Generation"
- elseif (OPERATION_CODE == 1) then
- _small_content = _small_content .. "<h4>Operation:</h4>Regeneration"
- end
- _small_content = _small_content .. "<h4>Area: </h4>["..AreaStartX..":"..AreaStartZ.."] ["..AreaEndX..":"..AreaEndZ.."]"
- _small_content = _small_content .. "<h4>Progress:</h4>"..CURRENT.."/"..TOTAL
- _small_content = _small_content .. "<br>"
- _small_content = _small_content .. "<form method='POST'>"
- _small_content = _small_content .. "<input type='submit' name='AGHRRRR' value='Stop'>"
- _small_content = _small_content .. "</form>"
- return _small_content
- end
- if (GENERATION_STATE == 2 or GENERATION_STATE == 4) then
- Content = ProcessingContent()
- return Content
- end
- -- SELECTING
- --------------------------------------------------------------------------------------------------
- if ( Request.PostParams["FormSetWorld"] ) then
- WORK_WORLD = Request.PostParams["FormWorldName"]
- WW_instance = cRoot:Get():GetWorld(WORK_WORLD)
- end
-
- if( Request.PostParams["SelectWorld"] ~= nil
- and Request.PostParams["WorldName"] ~= nil ) then -- World is selected!
- WORK_WORLD = Request.PostParams["WorldName"]
- WW_instance = cRoot:Get():GetWorld(WORK_WORLD)
- end
-
- if(Request.PostParams["OperationGenerate"] ~= nil) then
- OPERATION_CODE = 0
- end
- if(Request.PostParams["OperationReGenerate"] ~= nil) then
- OPERATION_CODE = 1
- end
-
- if (GENERATION_STATE == 0) then
- if( Request.PostParams["FormAreaStartX"] ~= nil
- and Request.PostParams["FormAreaStartZ"] ~= nil
- and Request.PostParams["FormAreaEndX"] ~= nil
- and Request.PostParams["FormAreaEndZ"] ~= nil ) then --(Re)Generation valid!
- -- COMMON (Re)gen
- if( Request.PostParams["StartArea"]) then
- AreaStartX = tonumber(Request.PostParams["FormAreaStartX"])
- AreaStartZ = tonumber(Request.PostParams["FormAreaStartZ"])
- AreaEndX = tonumber(Request.PostParams["FormAreaEndX"])
- AreaEndZ = tonumber(Request.PostParams["FormAreaEndZ"])
-
- PLUGIN.IniFile:DeleteValue("Area data", "StartX")
- PLUGIN.IniFile:DeleteValue("Area data", "StartZ")
- PLUGIN.IniFile:DeleteValue("Area data", "EndX")
- PLUGIN.IniFile:DeleteValue("Area data", "EndZ")
- PLUGIN.IniFile:SetValueI("Area data", "StartX", AreaStartX)
- PLUGIN.IniFile:SetValueI("Area data", "StartZ", AreaStartZ)
- PLUGIN.IniFile:SetValueI("Area data", "EndX", AreaEndX)
- PLUGIN.IniFile:SetValueI("Area data", "EndZ", AreaEndZ)
- if (OPERATION_CODE == 0) then
- GENERATION_STATE = 1
- elseif (OPERATION_CODE == 1) then
- GENERATION_STATE = 3
- end
- PLUGIN.IniFile:WriteFile()
- Content = ProcessingContent()
- return Content
- end
- end
- if( Request.PostParams["FormRadialX"] ~= nil
- and Request.PostParams["FormRadialZ"] ~= nil
- and Request.PostParams["FormRadius"] ~= nil ) then --(Re)Generation valid!
- -- COMMON (Re)gen
- if( Request.PostParams["StartRadial"]) then
- RadialX = tonumber(Request.PostParams["FormRadialX"])
- RadialZ = tonumber(Request.PostParams["FormRadialZ"])
- Radius = tonumber(Request.PostParams["FormRadius"])
- AreaStartX = RadialX - Radius
- AreaStartZ = RadialZ - Radius
- AreaEndX = RadialX + Radius
- AreaEndZ = RadialZ + Radius
-
- PLUGIN.IniFile:DeleteValue("Radial data", "RadialX")
- PLUGIN.IniFile:DeleteValue("Radial data", "RadialZ")
- PLUGIN.IniFile:DeleteValue("Radial data", "Radius")
- PLUGIN.IniFile:SetValueI("Radial data", "RadialX", RadialX)
- PLUGIN.IniFile:SetValueI("Radial data", "RadialZ", RadialZ)
- PLUGIN.IniFile:SetValueI("Radial data", "Radius", Radius)
- if (OPERATION_CODE == 0) then
- GENERATION_STATE = 1
- elseif (OPERATION_CODE == 1) then
- GENERATION_STATE = 3
- end
- PLUGIN.IniFile:WriteFile()
- Content = ProcessingContent()
- return Content
- end
- end
- -- POINT REGEN!
- if( Request.PostParams["FormPointX"] ~= nil
- and Request.PostParams["FormPointZ"] ~= nil ) then --ReGeneration valid!
- -- EXACT
- if ( Request.PostParams["PointExact"] ~= nil) then
- AreaStartX = tonumber(Request.PostParams["FormPointX"])
- AreaStartZ = tonumber(Request.PostParams["FormPointZ"])
- AreaEndX = AreaStartX
- AreaEndZ = AreaStartZ
- GENERATION_STATE = 3
- Content = ProcessingContent()
- return Content
- end
- -- 3x3
- if ( Request.PostParams["Point3x3"] ~= nil) then
- AreaStartX = tonumber(Request.PostParams["FormPointX"]) - 1
- AreaStartZ = tonumber(Request.PostParams["FormPointZ"]) - 1
- AreaEndX = AreaStartX + 2
- AreaEndZ = AreaStartZ + 2
- GENERATION_STATE = 3
- Content = ProcessingContent()
- return Content
- end
- end
-
- local GetAreaByPlayer = function(Player)
- -- Player is valid only within this function, it cannot be stord and used later!
- AreaStartX = Player:GetChunkX()
- AreaStartZ = Player:GetChunkZ()
- end
- -- PLAYERS REGEN!
- if( Request.PostParams["PlayerExact"] ~= nil
- and Request.PostParams["PlayerName"] ~= nil ) then -- Making BOOM! I meant, regenereate...
- cRoot:Get():GetWorld(WORK_WORLD):DoWithPlayer(Request.PostParams["PlayerName"],GetAreaByPlayer)
- AreaEndX = AreaStartX
- AreaEndZ = AreaStartZ
- GENERATION_STATE = 3
- Content = ProcessingContent()
- return Content
- end
- if( Request.PostParams["Player3x3"] ~= nil
- and Request.PostParams["PlayerName"] ~= nil ) then -- Making BOOM! I meant, regenereate...
- cRoot:Get():GetWorld(WORK_WORLD):DoWithPlayer(Request.PostParams["PlayerName"],GetAreaByPlayer)
- AreaStartX = AreaStartX - 1
- AreaStartZ = AreaStartZ - 1
- AreaEndX = AreaStartX + 2
- AreaEndZ = AreaStartZ + 2
- GENERATION_STATE = 3
- Content = ProcessingContent()
- return Content
- end
- end
-
- --Content = Content .. "<h4>World for operations: " .. WORK_WORLD .. "</h4>"
- --Content = Content .. "<form method='POST'>"
- --Content = Content .. "<input type='text' name='FormWorldName' value='Input world name here'><input type='submit' name='FormSetWorld' value='Set world'>"
- --Content = Content .. "</form>"
-
- -- SELECTING WORK_WORLD
- Content = Content .. "<h4>World for operations: " .. WORK_WORLD .. "</h4>"
- Content = Content .. "<table>"
- local WorldNum = 0
- local AddWorldToTable = function(World)
- WorldNum = WorldNum + 1
- Content = Content .. "<tr>"
- Content = Content .. "<td style='width: 10px;'>" .. WorldNum .. ".</td>"
- Content = Content .. "<td>" .. World:GetName() .. "</td>"
- Content = Content .. "<td>" .. Button_World(World:GetName()) .. "</td>"
- Content = Content .. "</tr>"
- end
- cRoot:Get():ForEachWorld(AddWorldToTable)
- if( WorldNum == 0 ) then
- Content = Content .. "<tr><td>No worlds! O_O</td></tr>"
- end
- Content = Content .. "</table>"
- Content = Content .. "<br>"
-
- -- SELECTING OPERATION
- if (OPERATION_CODE == 0) then
- Content = Content .. "<h4>Operation: Generation</h4>"
- elseif (OPERATION_CODE == 1) then
- Content = Content .. "<h4>Operation: Regeneration</h4>"
- end
- Content = Content .. "<form method='POST'>"
- Content = Content .. "<input type='submit' name='OperationGenerate' value='Generation'>"
- Content = Content .. "<input type='submit' name='OperationReGenerate' value='Regeneration'>"
- Content = Content .. "</form>"
-
- -- SELECTING AREA
- Content = Content .. "<h4>Area: </h4>Start X, Start Z; End X, End Z"
- Content = Content .. "<form method='POST'>"
- Content = Content .. "<input type='text' name='FormAreaStartX' value='" .. AreaStartX .. "'><input type='text' name='FormAreaStartZ' value='" .. AreaStartZ .. "'>"
- Content = Content .. "<input type='text' name='FormAreaEndX' value='" .. AreaEndX .. "'><input type='text' name='FormAreaEndZ' value='" .. AreaEndZ .. "'>"
- Content = Content .. "<input type='submit' name='StartArea' value='Start'>"
- Content = Content .. "</form>"
-
- -- SELECTING RADIAL
- Content = Content .. "<h4>Radial: </h4>Center X, Center Z, Raduis (0 to any)"
- Content = Content .. "<form method='POST'>"
- Content = Content .. "<input type='text' name='FormRadialX' value='" .. RadialX .. "'><input type='text' name='FormRadialZ' value='" .. RadialZ .. "'><input type='text' name='FormRadius' value='" .. Radius .. "'>"
- Content = Content .. "<input type='submit' name='StartRadial' value='Start'>"
- Content = Content .. "</form>"
- Content = Content .. "<br>"
- Content = Content .. "<br>"
- Content = Content .. "<br>"
-
- -- SELECTING POINT
- Content = Content .. "<h4>Point regeneration:</h4> X, Z"
- Content = Content .. "<form method='POST'>"
- Content = Content .. "<input type='text' name='FormPointX' value='0'><input type='text' name='FormPointZ' value='0'>"
- Content = Content .. "<input type='submit' name='PointExact' value='Exact'>"
- Content = Content .. "<input type='submit' name='Point3x3' value='3x3'>"
- Content = Content .. "</form>"
-
- -- SELECTING PLAYERS
- Content = Content .. "<h4>Player-based regeneration:</h4>"
- Content = Content .. "<table>"
- local PlayerNum = 0
- local AddPlayerToTable = function( Player )
- PlayerNum = PlayerNum + 1
- Content = Content .. "<tr>"
- Content = Content .. "<td style='width: 10px;'>" .. PlayerNum .. ".</td>"
- Content = Content .. "<td>" .. Player:GetName() .. "</td>"
- Content = Content .. "<td>" .. Buttons_Player(Player:GetName()) .. "</td>"
- Content = Content .. "</tr>"
- end
- if (cRoot:Get():GetWorld(WORK_WORLD) == nil) then
- Content = Content .. "<tr><td>Incorrect world selection</td></tr>"
- else
- cRoot:Get():GetWorld(WORK_WORLD):ForEachPlayer( AddPlayerToTable )
- if( PlayerNum == 0 ) then
- Content = Content .. "<tr><td>No connected players</td></tr>"
- end
- end
- Content = Content .. "</table>"
- Content = Content .. "<br>"
- return Content
+local function Buttons_Player( Name ) + return "<form method='POST'><input type='hidden' name='PlayerName' value='"..Name.."'><input type='submit' name='PlayerExact' value='Exact'><input type='submit' name='Player3x3' value='3x3'></form>" +end + +local function Button_World( Name ) + return "<form method='POST'><input type='hidden' name='WorldName' value='"..Name.."'><input type='submit' name='SelectWorld' value='Select'></form>" +end + +function HandleRequest_Generation( Request ) + local Content = "" + if (Request.PostParams["AGHRRRR"] ~= nil) then + GENERATION_STATE = 0 + WW_instance:SaveAllChunks() + WW_instance:UnloadUnusedChunks() + LOGERROR("" .. PLUGIN:GetName() .. " v" .. PLUGIN:GetVersion() .. ": works ABORTED by admin") + end + --Content = Content .. "<head><meta http-equiv=\"refresh\" content=\"2;\"></head>" + -- PROCESSING + -------------------------------------------------------------------------------------------------- + local function ProcessingContent() + local _small_content = "" + _small_content = _small_content .. "<head><meta http-equiv=\"refresh\" content=\"2;\"></head>" + _small_content = _small_content .. "<h4>World for operations:</h4>"..WORK_WORLD + if (OPERATION_CODE == 0) then + _small_content = _small_content .. "<h4>Operation:</h4>Generation" + elseif (OPERATION_CODE == 1) then + _small_content = _small_content .. "<h4>Operation:</h4>Regeneration" + end + _small_content = _small_content .. "<h4>Area: </h4>["..AreaStartX..":"..AreaStartZ.."] ["..AreaEndX..":"..AreaEndZ.."]" + _small_content = _small_content .. "<h4>Progress:</h4>"..CURRENT.."/"..TOTAL + _small_content = _small_content .. "<br>" + _small_content = _small_content .. "<form method='POST'>" + _small_content = _small_content .. "<input type='submit' name='AGHRRRR' value='Stop'>" + _small_content = _small_content .. "</form>" + return _small_content + end + if (GENERATION_STATE == 2 or GENERATION_STATE == 4) then + Content = ProcessingContent() + return Content + end + -- SELECTING + -------------------------------------------------------------------------------------------------- + if ( Request.PostParams["FormSetWorld"] ) then + WORK_WORLD = Request.PostParams["FormWorldName"] + WW_instance = cRoot:Get():GetWorld(WORK_WORLD) + end + + if( Request.PostParams["SelectWorld"] ~= nil + and Request.PostParams["WorldName"] ~= nil ) then -- World is selected! + WORK_WORLD = Request.PostParams["WorldName"] + WW_instance = cRoot:Get():GetWorld(WORK_WORLD) + end + + if(Request.PostParams["OperationGenerate"] ~= nil) then + OPERATION_CODE = 0 + end + if(Request.PostParams["OperationReGenerate"] ~= nil) then + OPERATION_CODE = 1 + end + + if (GENERATION_STATE == 0) then + if( Request.PostParams["FormAreaStartX"] ~= nil + and Request.PostParams["FormAreaStartZ"] ~= nil + and Request.PostParams["FormAreaEndX"] ~= nil + and Request.PostParams["FormAreaEndZ"] ~= nil ) then --(Re)Generation valid! + -- COMMON (Re)gen + if( Request.PostParams["StartArea"]) then + AreaStartX = tonumber(Request.PostParams["FormAreaStartX"]) + AreaStartZ = tonumber(Request.PostParams["FormAreaStartZ"]) + AreaEndX = tonumber(Request.PostParams["FormAreaEndX"]) + AreaEndZ = tonumber(Request.PostParams["FormAreaEndZ"]) + + PLUGIN.IniFile:DeleteValue("Area data", "StartX") + PLUGIN.IniFile:DeleteValue("Area data", "StartZ") + PLUGIN.IniFile:DeleteValue("Area data", "EndX") + PLUGIN.IniFile:DeleteValue("Area data", "EndZ") + PLUGIN.IniFile:SetValueI("Area data", "StartX", AreaStartX) + PLUGIN.IniFile:SetValueI("Area data", "StartZ", AreaStartZ) + PLUGIN.IniFile:SetValueI("Area data", "EndX", AreaEndX) + PLUGIN.IniFile:SetValueI("Area data", "EndZ", AreaEndZ) + if (OPERATION_CODE == 0) then + GENERATION_STATE = 1 + elseif (OPERATION_CODE == 1) then + GENERATION_STATE = 3 + end + PLUGIN.IniFile:WriteFile() + Content = ProcessingContent() + return Content + end + end + if( Request.PostParams["FormRadialX"] ~= nil + and Request.PostParams["FormRadialZ"] ~= nil + and Request.PostParams["FormRadius"] ~= nil ) then --(Re)Generation valid! + -- COMMON (Re)gen + if( Request.PostParams["StartRadial"]) then + RadialX = tonumber(Request.PostParams["FormRadialX"]) + RadialZ = tonumber(Request.PostParams["FormRadialZ"]) + Radius = tonumber(Request.PostParams["FormRadius"]) + AreaStartX = RadialX - Radius + AreaStartZ = RadialZ - Radius + AreaEndX = RadialX + Radius + AreaEndZ = RadialZ + Radius + + PLUGIN.IniFile:DeleteValue("Radial data", "RadialX") + PLUGIN.IniFile:DeleteValue("Radial data", "RadialZ") + PLUGIN.IniFile:DeleteValue("Radial data", "Radius") + PLUGIN.IniFile:SetValueI("Radial data", "RadialX", RadialX) + PLUGIN.IniFile:SetValueI("Radial data", "RadialZ", RadialZ) + PLUGIN.IniFile:SetValueI("Radial data", "Radius", Radius) + if (OPERATION_CODE == 0) then + GENERATION_STATE = 1 + elseif (OPERATION_CODE == 1) then + GENERATION_STATE = 3 + end + PLUGIN.IniFile:WriteFile() + Content = ProcessingContent() + return Content + end + end + -- POINT REGEN! + if( Request.PostParams["FormPointX"] ~= nil + and Request.PostParams["FormPointZ"] ~= nil ) then --ReGeneration valid! + -- EXACT + if ( Request.PostParams["PointExact"] ~= nil) then + AreaStartX = tonumber(Request.PostParams["FormPointX"]) + AreaStartZ = tonumber(Request.PostParams["FormPointZ"]) + AreaEndX = AreaStartX + AreaEndZ = AreaStartZ + GENERATION_STATE = 3 + Content = ProcessingContent() + return Content + end + -- 3x3 + if ( Request.PostParams["Point3x3"] ~= nil) then + AreaStartX = tonumber(Request.PostParams["FormPointX"]) - 1 + AreaStartZ = tonumber(Request.PostParams["FormPointZ"]) - 1 + AreaEndX = AreaStartX + 2 + AreaEndZ = AreaStartZ + 2 + GENERATION_STATE = 3 + Content = ProcessingContent() + return Content + end + end + + local GetAreaByPlayer = function(Player) + -- Player is valid only within this function, it cannot be stord and used later! + AreaStartX = Player:GetChunkX() + AreaStartZ = Player:GetChunkZ() + end + -- PLAYERS REGEN! + if( Request.PostParams["PlayerExact"] ~= nil + and Request.PostParams["PlayerName"] ~= nil ) then -- Making BOOM! I meant, regenereate... + cRoot:Get():GetWorld(WORK_WORLD):DoWithPlayer(Request.PostParams["PlayerName"],GetAreaByPlayer) + AreaEndX = AreaStartX + AreaEndZ = AreaStartZ + GENERATION_STATE = 3 + Content = ProcessingContent() + return Content + end + if( Request.PostParams["Player3x3"] ~= nil + and Request.PostParams["PlayerName"] ~= nil ) then -- Making BOOM! I meant, regenereate... + cRoot:Get():GetWorld(WORK_WORLD):DoWithPlayer(Request.PostParams["PlayerName"],GetAreaByPlayer) + AreaStartX = AreaStartX - 1 + AreaStartZ = AreaStartZ - 1 + AreaEndX = AreaStartX + 2 + AreaEndZ = AreaStartZ + 2 + GENERATION_STATE = 3 + Content = ProcessingContent() + return Content + end + end + + --Content = Content .. "<h4>World for operations: " .. WORK_WORLD .. "</h4>" + --Content = Content .. "<form method='POST'>" + --Content = Content .. "<input type='text' name='FormWorldName' value='Input world name here'><input type='submit' name='FormSetWorld' value='Set world'>" + --Content = Content .. "</form>" + + -- SELECTING WORK_WORLD + Content = Content .. "<h4>World for operations: " .. WORK_WORLD .. "</h4>" + Content = Content .. "<table>" + local WorldNum = 0 + local AddWorldToTable = function(World) + WorldNum = WorldNum + 1 + Content = Content .. "<tr>" + Content = Content .. "<td style='width: 10px;'>" .. WorldNum .. ".</td>" + Content = Content .. "<td>" .. World:GetName() .. "</td>" + Content = Content .. "<td>" .. Button_World(World:GetName()) .. "</td>" + Content = Content .. "</tr>" + end + cRoot:Get():ForEachWorld(AddWorldToTable) + if( WorldNum == 0 ) then + Content = Content .. "<tr><td>No worlds! O_O</td></tr>" + end + Content = Content .. "</table>" + Content = Content .. "<br>" + + -- SELECTING OPERATION + if (OPERATION_CODE == 0) then + Content = Content .. "<h4>Operation: Generation</h4>" + elseif (OPERATION_CODE == 1) then + Content = Content .. "<h4>Operation: Regeneration</h4>" + end + Content = Content .. "<form method='POST'>" + Content = Content .. "<input type='submit' name='OperationGenerate' value='Generation'>" + Content = Content .. "<input type='submit' name='OperationReGenerate' value='Regeneration'>" + Content = Content .. "</form>" + + -- SELECTING AREA + Content = Content .. "<h4>Area: </h4>Start X, Start Z; End X, End Z" + Content = Content .. "<form method='POST'>" + Content = Content .. "<input type='text' name='FormAreaStartX' value='" .. AreaStartX .. "'><input type='text' name='FormAreaStartZ' value='" .. AreaStartZ .. "'>" + Content = Content .. "<input type='text' name='FormAreaEndX' value='" .. AreaEndX .. "'><input type='text' name='FormAreaEndZ' value='" .. AreaEndZ .. "'>" + Content = Content .. "<input type='submit' name='StartArea' value='Start'>" + Content = Content .. "</form>" + + -- SELECTING RADIAL + Content = Content .. "<h4>Radial: </h4>Center X, Center Z, Raduis (0 to any)" + Content = Content .. "<form method='POST'>" + Content = Content .. "<input type='text' name='FormRadialX' value='" .. RadialX .. "'><input type='text' name='FormRadialZ' value='" .. RadialZ .. "'><input type='text' name='FormRadius' value='" .. Radius .. "'>" + Content = Content .. "<input type='submit' name='StartRadial' value='Start'>" + Content = Content .. "</form>" + Content = Content .. "<br>" + Content = Content .. "<br>" + Content = Content .. "<br>" + + -- SELECTING POINT + Content = Content .. "<h4>Point regeneration:</h4> X, Z" + Content = Content .. "<form method='POST'>" + Content = Content .. "<input type='text' name='FormPointX' value='0'><input type='text' name='FormPointZ' value='0'>" + Content = Content .. "<input type='submit' name='PointExact' value='Exact'>" + Content = Content .. "<input type='submit' name='Point3x3' value='3x3'>" + Content = Content .. "</form>" + + -- SELECTING PLAYERS + Content = Content .. "<h4>Player-based regeneration:</h4>" + Content = Content .. "<table>" + local PlayerNum = 0 + local AddPlayerToTable = function( Player ) + PlayerNum = PlayerNum + 1 + Content = Content .. "<tr>" + Content = Content .. "<td style='width: 10px;'>" .. PlayerNum .. ".</td>" + Content = Content .. "<td>" .. Player:GetName() .. "</td>" + Content = Content .. "<td>" .. Buttons_Player(Player:GetName()) .. "</td>" + Content = Content .. "</tr>" + end + if (cRoot:Get():GetWorld(WORK_WORLD) == nil) then + Content = Content .. "<tr><td>Incorrect world selection</td></tr>" + else + cRoot:Get():GetWorld(WORK_WORLD):ForEachPlayer( AddPlayerToTable ) + if( PlayerNum == 0 ) then + Content = Content .. "<tr><td>No connected players</td></tr>" + end + end + Content = Content .. "</table>" + Content = Content .. "<br>" + return Content end
\ No newline at end of file diff --git a/MCServer/Plugins/Debuggers/Debuggers.lua b/MCServer/Plugins/Debuggers/Debuggers.lua index 1bc625c35..53b192656 100644 --- a/MCServer/Plugins/Debuggers/Debuggers.lua +++ b/MCServer/Plugins/Debuggers/Debuggers.lua @@ -1,744 +1,744 @@ -
--- Global variables
-PLUGIN = {}; -- Reference to own plugin object
-ShouldDumpFunctions = true; -- If set to true, all available functions are written to the API.txt file upon plugin initialization
-
-g_DropSpensersToActivate = {}; -- A list of dispensers and droppers (as {World, X, Y Z} quadruplets) that are to be activated every tick
-
-g_HungerReportTick = 10;
-
-
-
-
-
-function Initialize(Plugin)
- PLUGIN = Plugin
-
- Plugin:SetName("Debuggers")
- Plugin:SetVersion(1)
-
- PluginManager = cRoot:Get():GetPluginManager()
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USING_BLOCK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USING_ITEM);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_TAKE_DAMAGE);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_TICK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHAT);
-
- PluginManager:BindCommand("/le", "debuggers", HandleListEntitiesCmd, "Shows a list of all the loaded entities");
- PluginManager:BindCommand("/ke", "debuggers", HandleKillEntitiesCmd, "Kills all the loaded entities");
- PluginManager:BindCommand("/wool", "debuggers", HandleWoolCmd, "Sets all your armor to blue wool");
- PluginManager:BindCommand("/testwnd", "debuggers", HandleTestWndCmd, "Opens up a window using plugin API");
- PluginManager:BindCommand("/gc", "debuggers", HandleGCCmd, "Activates the Lua garbage collector");
- PluginManager:BindCommand("/fast", "debuggers", HandleFastCmd, "Switches between fast and normal movement speed");
- PluginManager:BindCommand("/dash", "debuggers", HandleDashCmd, "Switches between fast and normal sprinting speed");
- PluginManager:BindCommand("/hunger", "debuggers", HandleHungerCmd, "Lists the current hunger-related variables");
- PluginManager:BindCommand("/poison", "debuggers", HandlePoisonCmd, "Sets food-poisoning for 15 seconds");
- PluginManager:BindCommand("/starve", "debuggers", HandleStarveCmd, "Sets the food level to zero");
- PluginManager:BindCommand("/fl", "debuggers", HandleFoodLevelCmd, "Sets the food level to the given value");
-
- -- Enable the following line for BlockArea / Generator interface testing:
- -- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_GENERATED);
-
- LOG("Initialized " .. Plugin:GetName() .. " v." .. Plugin:GetVersion())
-
- -- dump all available API functions and objects:
- if (ShouldDumpFunctions) then
- DumpAPI();
- end
-
-
- -- TestBlockAreas();
- -- TestSQLiteBindings();
- -- TestExpatBindings();
-
- return true
-end;
-
-
-
-
-
-function DumpAPI()
- LOG("Dumping all available functions to API.txt...");
- function dump (prefix, a, Output)
- for i, v in pairs (a) do
- if (type(v) == "table") then
- if (GetChar(i, 1) ~= ".") then
- if (v == _G) then
- LOG(prefix .. i .. " == _G, CYCLE, ignoring");
- elseif (v == _G.package) then
- LOG(prefix .. i .. " == _G.package, ignoring");
- else
- dump(prefix .. i .. ".", v, Output)
- end
- end
- elseif (type(v) == "function") then
- if (string.sub(i, 1, 2) ~= "__") then
- table.insert(Output, prefix .. i .. "()");
- end
- end
- end
- end
-
- local Output = {};
- dump("", _G, Output);
-
- table.sort(Output);
- local f = io.open("API.txt", "w");
- for i, n in ipairs(Output) do
- f:write(n, "\n");
- end
- f:close();
- LOG("API.txt written.");
-end
-
-
-
-
-
-function TestBlockAreas()
- LOG("Testing block areas...");
-
- -- Debug block area merging:
- local BA1 = cBlockArea();
- local BA2 = cBlockArea();
- if (BA1:LoadFromSchematicFile("schematics/test.schematic")) then
- if (BA2:LoadFromSchematicFile("schematics/fountain.schematic")) then
- BA2:SetRelBlockType(0, 0, 0, E_BLOCK_LAPIS_BLOCK);
- BA2:SetRelBlockType(1, 0, 0, E_BLOCK_LAPIS_BLOCK);
- BA2:SetRelBlockType(2, 0, 0, E_BLOCK_LAPIS_BLOCK);
- BA1:Merge(BA2, 1, 10, 1, cBlockArea.msImprint);
- BA1:SaveToSchematicFile("schematics/merge.schematic");
- end
- else
- BA1:Create(16, 16, 16);
- end
-
- -- Debug block area cuboid filling:
- BA1:FillRelCuboid(2, 9, 2, 8, 2, 8, cBlockArea.baTypes, E_BLOCK_GOLD_BLOCK);
- BA1:RelLine(2, 2, 2, 9, 8, 8, cBlockArea.baTypes or cBlockArea.baMetas, E_BLOCK_SAPLING, E_META_SAPLING_BIRCH);
- BA1:SaveToSchematicFile("schematics/fillrel.schematic");
-
- -- Debug block area mirroring:
- if (BA1:LoadFromSchematicFile("schematics/lt.schematic")) then
- BA1:MirrorXYNoMeta();
- BA1:SaveToSchematicFile("schematics/lt_XY.schematic");
- BA1:MirrorXYNoMeta();
- BA1:SaveToSchematicFile("schematics/lt_XY2.schematic");
-
- BA1:MirrorXZNoMeta();
- BA1:SaveToSchematicFile("schematics/lt_XZ.schematic");
- BA1:MirrorXZNoMeta();
- BA1:SaveToSchematicFile("schematics/lt_XZ2.schematic");
-
- BA1:MirrorYZNoMeta();
- BA1:SaveToSchematicFile("schematics/lt_YZ.schematic");
- BA1:MirrorYZNoMeta();
- BA1:SaveToSchematicFile("schematics/lt_YZ2.schematic");
- end
-
- -- Debug block area rotation:
- if (BA1:LoadFromSchematicFile("schematics/rot.schematic")) then
- BA1:RotateCWNoMeta();
- BA1:SaveToSchematicFile("schematics/rot1.schematic");
- BA1:RotateCWNoMeta();
- BA1:SaveToSchematicFile("schematics/rot2.schematic");
- BA1:RotateCWNoMeta();
- BA1:SaveToSchematicFile("schematics/rot3.schematic");
- BA1:RotateCWNoMeta();
- BA1:SaveToSchematicFile("schematics/rot4.schematic");
- end
-
- -- Debug block area rotation:
- if (BA1:LoadFromSchematicFile("schematics/rotm.schematic")) then
- BA1:RotateCCW();
- BA1:SaveToSchematicFile("schematics/rotm1.schematic");
- BA1:RotateCCW();
- BA1:SaveToSchematicFile("schematics/rotm2.schematic");
- BA1:RotateCCW();
- BA1:SaveToSchematicFile("schematics/rotm3.schematic");
- BA1:RotateCCW();
- BA1:SaveToSchematicFile("schematics/rotm4.schematic");
- end
-
- -- Debug block area mirroring:
- if (BA1:LoadFromSchematicFile("schematics/ltm.schematic")) then
- BA1:MirrorXY();
- BA1:SaveToSchematicFile("schematics/ltm_XY.schematic");
- BA1:MirrorXY();
- BA1:SaveToSchematicFile("schematics/ltm_XY2.schematic");
-
- BA1:MirrorXZ();
- BA1:SaveToSchematicFile("schematics/ltm_XZ.schematic");
- BA1:MirrorXZ();
- BA1:SaveToSchematicFile("schematics/ltm_XZ2.schematic");
-
- BA1:MirrorYZ();
- BA1:SaveToSchematicFile("schematics/ltm_YZ.schematic");
- BA1:MirrorYZ();
- BA1:SaveToSchematicFile("schematics/ltm_YZ2.schematic");
- end
-
- LOG("Block areas test ended");
-end
-
-
-
-
-
-
-function TestSQLiteBindings()
- LOG("Testing SQLite bindings...");
-
- -- Debug SQLite binding
- local TestDB, ErrCode, ErrMsg = sqlite3.open("test.sqlite");
- if (TestDB ~= nil) then
- local function ShowRow(UserData, NumCols, Values, Names)
- assert(UserData == 'UserData');
- LOG("New row");
- for i = 1, NumCols do
- LOG(" " .. Names[i] .. " = " .. Values[i]);
- end
- return 0;
- end
- local sql = [=[
- CREATE TABLE numbers(num1,num2,str);
- INSERT INTO numbers VALUES(1, 11, "ABC");
- INSERT INTO numbers VALUES(2, 22, "DEF");
- INSERT INTO numbers VALUES(3, 33, "UVW");
- INSERT INTO numbers VALUES(4, 44, "XYZ");
- SELECT * FROM numbers;
- ]=]
- local Res = TestDB:exec(sql, ShowRow, 'UserData');
- if (Res ~= sqlite3.OK) then
- LOG("TestDB:exec() failed: " .. Res .. " (" .. TestDB:errmsg() .. ")");
- end;
- TestDB:close();
- else
- -- This happens if for example SQLite cannot open the file (eg. a folder with the same name exists)
- LOG("SQLite3 failed to open DB! (" .. ErrCode .. ", " .. ErrMsg ..")");
- end
-
- LOG("SQLite bindings test ended");
-end
-
-
-
-
-
-function TestExpatBindings()
- LOG("Testing Expat bindings...");
-
- -- Debug LuaExpat bindings:
- local count = 0
- callbacks = {
- StartElement = function (parser, name)
- LOG("+ " .. string.rep(" ", count) .. name);
- count = count + 1;
- end,
- EndElement = function (parser, name)
- count = count - 1;
- LOG("- " .. string.rep(" ", count) .. name);
- end
- }
-
- local p = lxp.new(callbacks);
- p:parse("<elem1>\nnext line\nanother line");
- p:parse("text\n");
- p:parse("<elem2/>\n");
- p:parse("more text");
- p:parse("</elem1>");
- p:parse("\n");
- p:parse(); -- finishes the document
- p:close(); -- closes the parser
-
- LOG("Expat bindings test ended");
-end
-
-
-
-
-
-function OnUsingBlazeRod(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ)
- -- Magic rod of query: show block types and metas for both neighbors of the pointed face
- local Type, Meta, Valid = Player:GetWorld():GetBlockTypeMeta(BlockX, BlockY, BlockZ, Type, Meta);
-
- if (Type == E_BLOCK_AIR) then
- Player:SendMessage(cChatColor.LightGray .. "Block {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}: air:" .. Meta);
- else
- local TempItem = cItem(Type, 1, Meta);
- Player:SendMessage(cChatColor.LightGray .. "Block {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}: " .. ItemToFullString(TempItem) .. " (" .. Type .. ":" .. Meta .. ")");
- end
-
- local X, Y, Z = AddFaceDirection(BlockX, BlockY, BlockZ, BlockFace);
- Valid, Type, Meta = Player:GetWorld():GetBlockTypeMeta(X, Y, Z, Type, Meta);
- if (Type == E_BLOCK_AIR) then
- Player:SendMessage(cChatColor.LightGray .. "Block {" .. X .. ", " .. Y .. ", " .. Z .. "}: air:" .. Meta);
- else
- local TempItem = cItem(Type, 1, Meta);
- Player:SendMessage(cChatColor.LightGray .. "Block {" .. X .. ", " .. Y .. ", " .. Z .. "}: " .. ItemToFullString(TempItem) .. " (" .. Type .. ":" .. Meta .. ")");
- end
- return false;
-end
-
-
-
-
-
-function OnUsingDiamond(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ)
- -- Rclk with a diamond to test block area cropping and expanding
- local Area = cBlockArea();
- Area:Read(Player:GetWorld(),
- BlockX - 19, BlockX + 19,
- BlockY - 7, BlockY + 7,
- BlockZ - 19, BlockZ + 19
- );
-
- LOG("Size before cropping: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ());
- Area:DumpToRawFile("crop0.dat");
-
- Area:Crop(2, 3, 0, 0, 0, 0);
- LOG("Size after cropping 1: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ());
- Area:DumpToRawFile("crop1.dat");
-
- Area:Crop(2, 3, 0, 0, 0, 0);
- LOG("Size after cropping 2: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ());
- Area:DumpToRawFile("crop2.dat");
-
- Area:Expand(2, 3, 0, 0, 0, 0);
- LOG("Size after expanding 1: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ());
- Area:DumpToRawFile("expand1.dat");
-
- Area:Expand(3, 2, 1, 1, 0, 0);
- LOG("Size after expanding 2: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ());
- Area:DumpToRawFile("expand2.dat");
-
- Area:Crop(0, 0, 0, 0, 3, 2);
- LOG("Size after cropping 3: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ());
- Area:DumpToRawFile("crop3.dat");
-
- Area:Crop(0, 0, 3, 2, 0, 0);
- LOG("Size after cropping 4: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ());
- Area:DumpToRawFile("crop4.dat");
-
- LOG("Crop test done");
- Player:SendMessage("Crop / expand test done.");
- return false;
-end
-
-
-
-
-
-function OnUsingEyeOfEnder(Player, BlockX, BlockY, BlockZ)
- -- Rclk with an eye of ender places a predefined schematic at the cursor
- local Area = cBlockArea();
- if not(Area:LoadFromSchematicFile("schematics/test.schematic")) then
- LOG("Loading failed");
- return false;
- end
- LOG("Schematic loaded, placing now.");
- Area:Write(Player:GetWorld(), BlockX, BlockY, BlockZ);
- LOG("Done.");
- return false;
-end
-
-
-
-
-
-function OnUsingEnderPearl(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ)
- -- Rclk with an ender pearl saves a predefined area around the cursor into a .schematic file. Also tests area copying
- local Area = cBlockArea();
- if not(Area:Read(Player:GetWorld(),
- BlockX - 8, BlockX + 8, BlockY - 8, BlockY + 8, BlockZ - 8, BlockZ + 8)
- ) then
- LOG("LUA: Area couldn't be read");
- return false;
- end
- LOG("LUA: Area read, copying now.");
- local Area2 = cBlockArea();
- Area2:CopyFrom(Area);
- LOG("LUA: Copied, now saving.");
- if not(Area2:SaveToSchematicFile("schematics/test.schematic")) then
- LOG("LUA: Cannot save schematic file.");
- return false;
- end
- LOG("LUA: Done.");
- return false;
-end
-
-
-
-
-
-function OnUsingRedstoneTorch(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ)
- -- Redstone torch activates a rapid dispenser / dropper discharge (at every tick):
- local BlockType = Player:GetWorld():GetBlock(BlockX, BlockY, BlockZ);
- if (BlockType == E_BLOCK_DISPENSER) then
- table.insert(g_DropSpensersToActivate, {World = Player:GetWorld(), x = BlockX, y = BlockY, z = BlockZ});
- Player:SendMessage("Dispenser at {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "} discharging");
- return true;
- elseif (BlockType == E_BLOCK_DROPPER) then
- table.insert(g_DropSpensersToActivate, {World = Player:GetWorld(), x = BlockX, y = BlockY, z = BlockZ});
- Player:SendMessage("Dropper at {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "} discharging");
- return true;
- else
- Player:SendMessage("Neither a dispenser nor a dropper at {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}: " .. BlockType);
- end
- return false;
-end
-
-
-
-
-
-function OnPlayerUsingItem(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ)
-
- -- dont check if the direction is in the air
- if (BlockFace == BLOCK_FACE_NONE) then
- return false
- end
-
- local HeldItem = Player:GetEquippedItem();
- local HeldItemType = HeldItem.m_ItemType;
-
- if (HeldItemType == E_ITEM_STICK) then
- -- Magic sTick of ticking: set the pointed block for ticking at the next tick
- Player:SendMessage(cChatColor.LightGray .. "Setting next block tick to {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}")
- Player:GetWorld():SetNextBlockTick(BlockX, BlockY, BlockZ);
- return true
- elseif (HeldItemType == E_ITEM_BLAZE_ROD) then
- return OnUsingBlazeRod(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ);
- elseif (HeldItemType == E_ITEM_DIAMOND) then
- return OnUsingDiamond(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ);
- elseif (HeldItemType == E_ITEM_EYE_OF_ENDER) then
- return OnUsingEyeOfEnder(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ);
- elseif (HeldItemType == E_ITEM_ENDER_PEARL) then
- return OnUsingEnderPearl(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ);
- end
- return false;
-end
-
-
-
-
-
-function OnPlayerUsingBlock(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ, BlockType, BlockMeta)
- -- dont check if the direction is in the air
- if (BlockFace == BLOCK_FACE_NONE) then
- return false
- end
-
- local HeldItem = Player:GetEquippedItem();
- local HeldItemType = HeldItem.m_ItemType;
-
- if (HeldItemType == E_BLOCK_REDSTONE_TORCH_ON) then
- return OnUsingRedstoneTorch(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ);
- end
-end
-
-
-
-
-
-function OnTakeDamage(Receiver, TDI)
- -- Receiver is cPawn
- -- TDI is TakeDamageInfo
-
- LOG(Receiver:GetClass() .. " was dealt " .. DamageTypeToString(TDI.DamageType) .. " damage: Raw " .. TDI.RawDamage .. ", Final " .. TDI.FinalDamage .. " (" .. (TDI.RawDamage - TDI.FinalDamage) .. " covered by armor)");
- return false;
-end
-
-
-
-
-
---- When set to a positive number, the following OnTick() will perform GC and decrease until 0 again
-GCOnTick = 0;
-
-
-
-
-
-function OnTick()
- -- Activate all dropspensers in the g_DropSpensersToActivate list:
- local ActivateDrSp = function(DropSpenser)
- if (DropSpenser:GetContents():GetFirstUsedSlot() == -1) then
- return true;
- end
- DropSpenser:Activate();
- return false;
- end
- -- Walk the list backwards, because we're removing some items
- local idx = #g_DropSpensersToActivate;
- for i = idx, 1, -1 do
- local DrSp = g_DropSpensersToActivate[i];
- if not(DrSp.World:DoWithDropSpenserAt(DrSp.x, DrSp.y, DrSp.z, ActivateDrSp)) then
- table.remove(g_DropSpensersToActivate, i);
- end
- end
-
-
- -- If GCOnTick > 0, do a garbage-collect and decrease by one
- if (GCOnTick > 0) then
- collectgarbage();
- GCOnTick = GCOnTick - 1;
- end
-
- --[[
- if (g_HungerReportTick > 0) then
- g_HungerReportTick = g_HungerReportTick - 1;
- else
- g_HungerReportTick = 10;
- cRoot:Get():GetDefaultWorld():ForEachPlayer(
- function(a_Player)
- a_Player:SendMessage("FoodStat: " .. a_Player:GetFoodLevel() .. " / " .. a_Player:GetFoodExhaustionLevel());
- end
- );
- end
- ]]
-
- return false;
-end
-
-
-
-
-
-function OnChunkGenerated(World, ChunkX, ChunkZ, ChunkDesc)
- -- Test ChunkDesc / BlockArea interaction
- local BlockArea = cBlockArea();
- ChunkDesc:ReadBlockArea(BlockArea, 0, 15, 50, 70, 0, 15);
-
- -- BlockArea:SaveToSchematicFile("ChunkBlocks_" .. ChunkX .. "_" .. ChunkZ .. ".schematic");
-
- ChunkDesc:WriteBlockArea(BlockArea, 5, 115, 5);
- return false;
-end
-
-
-
-
-
-function OnChat(a_Player, a_Message)
- return false, "blabla " .. a_Message;
-end
-
-
-
-
-
--- Function "round" copied from http://lua-users.org/wiki/SimpleRound
-function round(num, idp)
- local mult = 10^(idp or 0)
- if num >= 0 then return math.floor(num * mult + 0.5) / mult
- else return math.ceil(num * mult - 0.5) / mult end
-end
-
-
-
-
-
-function HandleListEntitiesCmd(Split, Player)
- local NumEntities = 0;
-
- local ListEntity = function(Entity)
- if (Entity:IsDestroyed()) then
- -- The entity has already been destroyed, don't list it
- return false;
- end;
- Player:SendMessage(" " .. Entity:GetUniqueID() .. ": " .. Entity:GetClass() .. " {" .. round(Entity:GetPosX(), 2) .. ", " .. round(Entity:GetPosY(), 2) .. ", " .. round(Entity:GetPosZ(), 2) .."}");
- NumEntities = NumEntities + 1;
- end
-
- Player:SendMessage("Listing all entities...");
- Player:GetWorld():ForEachEntity(ListEntity);
- Player:SendMessage("List finished, " .. NumEntities .. " entities listed");
- return true;
-end
-
-
-
-
-
-function HandleKillEntitiesCmd(Split, Player)
- local NumEntities = 0;
-
- local KillEntity = function(Entity)
- -- kill everything except for players:
- if (Entity:GetEntityType() ~= cEntity.etPlayer) then
- Entity:Destroy();
- NumEntities = NumEntities + 1;
- end;
- end
-
- Player:SendMessage("Killing all entities...");
- Player:GetWorld():ForEachEntity(KillEntity);
- Player:SendMessage("Killed " .. NumEntities .. " entities.");
- return true;
-end
-
-
-
-
-
-function HandleWoolCmd(Split, Player)
- local Wool = cItem(E_BLOCK_WOOL, 1, E_META_WOOL_BLUE);
- Player:GetInventory():SetArmorSlot(0, Wool);
- Player:GetInventory():SetArmorSlot(1, Wool);
- Player:GetInventory():SetArmorSlot(2, Wool);
- Player:GetInventory():SetArmorSlot(3, Wool);
- Player:SendMessage("You have been bluewooled :)");
- return true;
-end
-
-
-
-
-
-function HandleTestWndCmd(a_Split, a_Player)
- local WindowType = cWindow.Hopper;
- local WindowSizeX = 5;
- local WindowSizeY = 1;
- if (#a_Split == 4) then
- WindowType = tonumber(a_Split[2]);
- WindowSizeX = tonumber(a_Split[3]);
- WindowSizeY = tonumber(a_Split[4]);
- elseif (#a_Split ~= 1) then
- a_Player:SendMessage("Usage: /testwnd [WindowType WindowSizeX WindowSizeY]");
- return true;
- end
-
- -- Test out the OnClosing callback's ability to refuse to close the window
- local attempt = 1;
- local OnClosing = function(Window, Player, CanRefuse)
- Player:SendMessage("Window closing attempt #" .. attempt .. "; CanRefuse = " .. tostring(CanRefuse));
- attempt = attempt + 1;
- return CanRefuse and (attempt <= 3); -- refuse twice, then allow, unless CanRefuse is set to true
- end
-
- -- Log the slot changes
- local OnSlotChanged = function(Window, SlotNum)
- LOG("Window \"" .. Window:GetWindowTitle() .. "\" slot " .. SlotNum .. " changed.");
- end
-
- local Window = cLuaWindow(WindowType, WindowSizeX, WindowSizeY, "TestWnd");
- local Item2 = cItem(E_ITEM_DIAMOND_SWORD, 1, 0, "1=1");
- local Item3 = cItem(E_ITEM_DIAMOND_SHOVEL);
- Item3.m_Enchantments:SetLevel(cEnchantments.enchUnbreaking, 4);
- local Item4 = cItem(Item3); -- Copy
- Item4.m_Enchantments:SetLevel(cEnchantments.enchEfficiency, 3); -- Add enchantment
- Item4.m_Enchantments:SetLevel(cEnchantments.enchUnbreaking, 5); -- Overwrite existing level
- local Item5 = cItem(E_ITEM_DIAMOND_CHESTPLATE, 1, 0, "thorns=1;unbreaking=3");
- Window:SetSlot(a_Player, 0, cItem(E_ITEM_DIAMOND, 64));
- Window:SetSlot(a_Player, 1, Item2);
- Window:SetSlot(a_Player, 2, Item3);
- Window:SetSlot(a_Player, 3, Item4);
- Window:SetSlot(a_Player, 4, Item5);
- Window:SetOnClosing(OnClosing);
- Window:SetOnSlotChanged(OnSlotChanged);
-
- a_Player:OpenWindow(Window);
-
- -- To make sure that the object has the correct life-management in Lua,
- -- let's garbage-collect in the following few ticks
- GCOnTick = 10;
-
- return true;
-end
-
-
-
-
-
-function HandleGCCmd(a_Split, a_Player)
- collectgarbage();
- return true;
-end
-
-
-
-
-
-
-function HandleFastCmd(a_Split, a_Player)
- if (a_Player:GetNormalMaxSpeed() <= 0.11) then
- -- The player has normal speed, set double speed:
- a_Player:SetNormalMaxSpeed(0.2);
- a_Player:SendMessage("You are now fast");
- else
- -- The player has fast speed, set normal speed:
- a_Player:SetNormalMaxSpeed(0.1);
- a_Player:SendMessage("Back to normal speed");
- end
- return true;
-end
-
-
-
-
-
-function HandleDashCmd(a_Split, a_Player)
- if (a_Player:GetSprintingMaxSpeed() <= 0.14) then
- -- The player has normal sprinting speed, set double Sprintingspeed:
- a_Player:SetSprintingMaxSpeed(0.4);
- a_Player:SendMessage("You can now sprint very fast");
- else
- -- The player has fast sprinting speed, set normal sprinting speed:
- a_Player:SetSprintingMaxSpeed(0.13);
- a_Player:SendMessage("Back to normal sprinting");
- end
- return true;
-end;
-
-
-
-
-
-function HandleHungerCmd(a_Split, a_Player)
- a_Player:SendMessage("FoodLevel: " .. a_Player:GetFoodLevel());
- a_Player:SendMessage("FoodSaturationLevel: " .. a_Player:GetFoodSaturationLevel());
- a_Player:SendMessage("FoodTickTimer: " .. a_Player:GetFoodTickTimer());
- a_Player:SendMessage("FoodExhaustionLevel: " .. a_Player:GetFoodExhaustionLevel());
- a_Player:SendMessage("FoodPoisonedTicksRemaining: " .. a_Player:GetFoodPoisonedTicksRemaining());
- return true;
-end
-
-
-
-
-
-function HandlePoisonCmd(a_Split, a_Player)
- a_Player:FoodPoison(15 * 20);
- return true;
-end
-
-
-
-
-
-function HandleStarveCmd(a_Split, a_Player)
- a_Player:SetFoodLevel(0);
- a_Player:SendMessage("You are now starving");
- return true;
-end
-
-
-
-
-
-function HandleFoodLevelCmd(a_Split, a_Player)
- if (#a_Split ~= 2) then
- a_Player:SendMessage("Missing an argument: the food level to set");
- return true;
- end
-
- a_Player:SetFoodLevel(tonumber(a_Split[2]));
- a_Player:SendMessage("Food level set to " .. a_Player:GetFoodLevel());
- return true;
-end
-
-
-
-
+ +-- Global variables +PLUGIN = {}; -- Reference to own plugin object +ShouldDumpFunctions = true; -- If set to true, all available functions are written to the API.txt file upon plugin initialization + +g_DropSpensersToActivate = {}; -- A list of dispensers and droppers (as {World, X, Y Z} quadruplets) that are to be activated every tick + +g_HungerReportTick = 10; + + + + + +function Initialize(Plugin) + PLUGIN = Plugin + + Plugin:SetName("Debuggers") + Plugin:SetVersion(1) + + PluginManager = cRoot:Get():GetPluginManager() + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USING_BLOCK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USING_ITEM); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_TAKE_DAMAGE); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_TICK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHAT); + + PluginManager:BindCommand("/le", "debuggers", HandleListEntitiesCmd, "Shows a list of all the loaded entities"); + PluginManager:BindCommand("/ke", "debuggers", HandleKillEntitiesCmd, "Kills all the loaded entities"); + PluginManager:BindCommand("/wool", "debuggers", HandleWoolCmd, "Sets all your armor to blue wool"); + PluginManager:BindCommand("/testwnd", "debuggers", HandleTestWndCmd, "Opens up a window using plugin API"); + PluginManager:BindCommand("/gc", "debuggers", HandleGCCmd, "Activates the Lua garbage collector"); + PluginManager:BindCommand("/fast", "debuggers", HandleFastCmd, "Switches between fast and normal movement speed"); + PluginManager:BindCommand("/dash", "debuggers", HandleDashCmd, "Switches between fast and normal sprinting speed"); + PluginManager:BindCommand("/hunger", "debuggers", HandleHungerCmd, "Lists the current hunger-related variables"); + PluginManager:BindCommand("/poison", "debuggers", HandlePoisonCmd, "Sets food-poisoning for 15 seconds"); + PluginManager:BindCommand("/starve", "debuggers", HandleStarveCmd, "Sets the food level to zero"); + PluginManager:BindCommand("/fl", "debuggers", HandleFoodLevelCmd, "Sets the food level to the given value"); + + -- Enable the following line for BlockArea / Generator interface testing: + -- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_GENERATED); + + LOG("Initialized " .. Plugin:GetName() .. " v." .. Plugin:GetVersion()) + + -- dump all available API functions and objects: + if (ShouldDumpFunctions) then + DumpAPI(); + end + + + -- TestBlockAreas(); + -- TestSQLiteBindings(); + -- TestExpatBindings(); + + return true +end; + + + + + +function DumpAPI() + LOG("Dumping all available functions to API.txt..."); + function dump (prefix, a, Output) + for i, v in pairs (a) do + if (type(v) == "table") then + if (GetChar(i, 1) ~= ".") then + if (v == _G) then + LOG(prefix .. i .. " == _G, CYCLE, ignoring"); + elseif (v == _G.package) then + LOG(prefix .. i .. " == _G.package, ignoring"); + else + dump(prefix .. i .. ".", v, Output) + end + end + elseif (type(v) == "function") then + if (string.sub(i, 1, 2) ~= "__") then + table.insert(Output, prefix .. i .. "()"); + end + end + end + end + + local Output = {}; + dump("", _G, Output); + + table.sort(Output); + local f = io.open("API.txt", "w"); + for i, n in ipairs(Output) do + f:write(n, "\n"); + end + f:close(); + LOG("API.txt written."); +end + + + + + +function TestBlockAreas() + LOG("Testing block areas..."); + + -- Debug block area merging: + local BA1 = cBlockArea(); + local BA2 = cBlockArea(); + if (BA1:LoadFromSchematicFile("schematics/test.schematic")) then + if (BA2:LoadFromSchematicFile("schematics/fountain.schematic")) then + BA2:SetRelBlockType(0, 0, 0, E_BLOCK_LAPIS_BLOCK); + BA2:SetRelBlockType(1, 0, 0, E_BLOCK_LAPIS_BLOCK); + BA2:SetRelBlockType(2, 0, 0, E_BLOCK_LAPIS_BLOCK); + BA1:Merge(BA2, 1, 10, 1, cBlockArea.msImprint); + BA1:SaveToSchematicFile("schematics/merge.schematic"); + end + else + BA1:Create(16, 16, 16); + end + + -- Debug block area cuboid filling: + BA1:FillRelCuboid(2, 9, 2, 8, 2, 8, cBlockArea.baTypes, E_BLOCK_GOLD_BLOCK); + BA1:RelLine(2, 2, 2, 9, 8, 8, cBlockArea.baTypes or cBlockArea.baMetas, E_BLOCK_SAPLING, E_META_SAPLING_BIRCH); + BA1:SaveToSchematicFile("schematics/fillrel.schematic"); + + -- Debug block area mirroring: + if (BA1:LoadFromSchematicFile("schematics/lt.schematic")) then + BA1:MirrorXYNoMeta(); + BA1:SaveToSchematicFile("schematics/lt_XY.schematic"); + BA1:MirrorXYNoMeta(); + BA1:SaveToSchematicFile("schematics/lt_XY2.schematic"); + + BA1:MirrorXZNoMeta(); + BA1:SaveToSchematicFile("schematics/lt_XZ.schematic"); + BA1:MirrorXZNoMeta(); + BA1:SaveToSchematicFile("schematics/lt_XZ2.schematic"); + + BA1:MirrorYZNoMeta(); + BA1:SaveToSchematicFile("schematics/lt_YZ.schematic"); + BA1:MirrorYZNoMeta(); + BA1:SaveToSchematicFile("schematics/lt_YZ2.schematic"); + end + + -- Debug block area rotation: + if (BA1:LoadFromSchematicFile("schematics/rot.schematic")) then + BA1:RotateCWNoMeta(); + BA1:SaveToSchematicFile("schematics/rot1.schematic"); + BA1:RotateCWNoMeta(); + BA1:SaveToSchematicFile("schematics/rot2.schematic"); + BA1:RotateCWNoMeta(); + BA1:SaveToSchematicFile("schematics/rot3.schematic"); + BA1:RotateCWNoMeta(); + BA1:SaveToSchematicFile("schematics/rot4.schematic"); + end + + -- Debug block area rotation: + if (BA1:LoadFromSchematicFile("schematics/rotm.schematic")) then + BA1:RotateCCW(); + BA1:SaveToSchematicFile("schematics/rotm1.schematic"); + BA1:RotateCCW(); + BA1:SaveToSchematicFile("schematics/rotm2.schematic"); + BA1:RotateCCW(); + BA1:SaveToSchematicFile("schematics/rotm3.schematic"); + BA1:RotateCCW(); + BA1:SaveToSchematicFile("schematics/rotm4.schematic"); + end + + -- Debug block area mirroring: + if (BA1:LoadFromSchematicFile("schematics/ltm.schematic")) then + BA1:MirrorXY(); + BA1:SaveToSchematicFile("schematics/ltm_XY.schematic"); + BA1:MirrorXY(); + BA1:SaveToSchematicFile("schematics/ltm_XY2.schematic"); + + BA1:MirrorXZ(); + BA1:SaveToSchematicFile("schematics/ltm_XZ.schematic"); + BA1:MirrorXZ(); + BA1:SaveToSchematicFile("schematics/ltm_XZ2.schematic"); + + BA1:MirrorYZ(); + BA1:SaveToSchematicFile("schematics/ltm_YZ.schematic"); + BA1:MirrorYZ(); + BA1:SaveToSchematicFile("schematics/ltm_YZ2.schematic"); + end + + LOG("Block areas test ended"); +end + + + + + + +function TestSQLiteBindings() + LOG("Testing SQLite bindings..."); + + -- Debug SQLite binding + local TestDB, ErrCode, ErrMsg = sqlite3.open("test.sqlite"); + if (TestDB ~= nil) then + local function ShowRow(UserData, NumCols, Values, Names) + assert(UserData == 'UserData'); + LOG("New row"); + for i = 1, NumCols do + LOG(" " .. Names[i] .. " = " .. Values[i]); + end + return 0; + end + local sql = [=[ + CREATE TABLE numbers(num1,num2,str); + INSERT INTO numbers VALUES(1, 11, "ABC"); + INSERT INTO numbers VALUES(2, 22, "DEF"); + INSERT INTO numbers VALUES(3, 33, "UVW"); + INSERT INTO numbers VALUES(4, 44, "XYZ"); + SELECT * FROM numbers; + ]=] + local Res = TestDB:exec(sql, ShowRow, 'UserData'); + if (Res ~= sqlite3.OK) then + LOG("TestDB:exec() failed: " .. Res .. " (" .. TestDB:errmsg() .. ")"); + end; + TestDB:close(); + else + -- This happens if for example SQLite cannot open the file (eg. a folder with the same name exists) + LOG("SQLite3 failed to open DB! (" .. ErrCode .. ", " .. ErrMsg ..")"); + end + + LOG("SQLite bindings test ended"); +end + + + + + +function TestExpatBindings() + LOG("Testing Expat bindings..."); + + -- Debug LuaExpat bindings: + local count = 0 + callbacks = { + StartElement = function (parser, name) + LOG("+ " .. string.rep(" ", count) .. name); + count = count + 1; + end, + EndElement = function (parser, name) + count = count - 1; + LOG("- " .. string.rep(" ", count) .. name); + end + } + + local p = lxp.new(callbacks); + p:parse("<elem1>\nnext line\nanother line"); + p:parse("text\n"); + p:parse("<elem2/>\n"); + p:parse("more text"); + p:parse("</elem1>"); + p:parse("\n"); + p:parse(); -- finishes the document + p:close(); -- closes the parser + + LOG("Expat bindings test ended"); +end + + + + + +function OnUsingBlazeRod(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ) + -- Magic rod of query: show block types and metas for both neighbors of the pointed face + local Type, Meta, Valid = Player:GetWorld():GetBlockTypeMeta(BlockX, BlockY, BlockZ, Type, Meta); + + if (Type == E_BLOCK_AIR) then + Player:SendMessage(cChatColor.LightGray .. "Block {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}: air:" .. Meta); + else + local TempItem = cItem(Type, 1, Meta); + Player:SendMessage(cChatColor.LightGray .. "Block {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}: " .. ItemToFullString(TempItem) .. " (" .. Type .. ":" .. Meta .. ")"); + end + + local X, Y, Z = AddFaceDirection(BlockX, BlockY, BlockZ, BlockFace); + Valid, Type, Meta = Player:GetWorld():GetBlockTypeMeta(X, Y, Z, Type, Meta); + if (Type == E_BLOCK_AIR) then + Player:SendMessage(cChatColor.LightGray .. "Block {" .. X .. ", " .. Y .. ", " .. Z .. "}: air:" .. Meta); + else + local TempItem = cItem(Type, 1, Meta); + Player:SendMessage(cChatColor.LightGray .. "Block {" .. X .. ", " .. Y .. ", " .. Z .. "}: " .. ItemToFullString(TempItem) .. " (" .. Type .. ":" .. Meta .. ")"); + end + return false; +end + + + + + +function OnUsingDiamond(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ) + -- Rclk with a diamond to test block area cropping and expanding + local Area = cBlockArea(); + Area:Read(Player:GetWorld(), + BlockX - 19, BlockX + 19, + BlockY - 7, BlockY + 7, + BlockZ - 19, BlockZ + 19 + ); + + LOG("Size before cropping: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ()); + Area:DumpToRawFile("crop0.dat"); + + Area:Crop(2, 3, 0, 0, 0, 0); + LOG("Size after cropping 1: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ()); + Area:DumpToRawFile("crop1.dat"); + + Area:Crop(2, 3, 0, 0, 0, 0); + LOG("Size after cropping 2: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ()); + Area:DumpToRawFile("crop2.dat"); + + Area:Expand(2, 3, 0, 0, 0, 0); + LOG("Size after expanding 1: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ()); + Area:DumpToRawFile("expand1.dat"); + + Area:Expand(3, 2, 1, 1, 0, 0); + LOG("Size after expanding 2: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ()); + Area:DumpToRawFile("expand2.dat"); + + Area:Crop(0, 0, 0, 0, 3, 2); + LOG("Size after cropping 3: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ()); + Area:DumpToRawFile("crop3.dat"); + + Area:Crop(0, 0, 3, 2, 0, 0); + LOG("Size after cropping 4: " .. Area:GetSizeX() .. " x " .. Area:GetSizeY() .. " x " .. Area:GetSizeZ()); + Area:DumpToRawFile("crop4.dat"); + + LOG("Crop test done"); + Player:SendMessage("Crop / expand test done."); + return false; +end + + + + + +function OnUsingEyeOfEnder(Player, BlockX, BlockY, BlockZ) + -- Rclk with an eye of ender places a predefined schematic at the cursor + local Area = cBlockArea(); + if not(Area:LoadFromSchematicFile("schematics/test.schematic")) then + LOG("Loading failed"); + return false; + end + LOG("Schematic loaded, placing now."); + Area:Write(Player:GetWorld(), BlockX, BlockY, BlockZ); + LOG("Done."); + return false; +end + + + + + +function OnUsingEnderPearl(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ) + -- Rclk with an ender pearl saves a predefined area around the cursor into a .schematic file. Also tests area copying + local Area = cBlockArea(); + if not(Area:Read(Player:GetWorld(), + BlockX - 8, BlockX + 8, BlockY - 8, BlockY + 8, BlockZ - 8, BlockZ + 8) + ) then + LOG("LUA: Area couldn't be read"); + return false; + end + LOG("LUA: Area read, copying now."); + local Area2 = cBlockArea(); + Area2:CopyFrom(Area); + LOG("LUA: Copied, now saving."); + if not(Area2:SaveToSchematicFile("schematics/test.schematic")) then + LOG("LUA: Cannot save schematic file."); + return false; + end + LOG("LUA: Done."); + return false; +end + + + + + +function OnUsingRedstoneTorch(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ) + -- Redstone torch activates a rapid dispenser / dropper discharge (at every tick): + local BlockType = Player:GetWorld():GetBlock(BlockX, BlockY, BlockZ); + if (BlockType == E_BLOCK_DISPENSER) then + table.insert(g_DropSpensersToActivate, {World = Player:GetWorld(), x = BlockX, y = BlockY, z = BlockZ}); + Player:SendMessage("Dispenser at {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "} discharging"); + return true; + elseif (BlockType == E_BLOCK_DROPPER) then + table.insert(g_DropSpensersToActivate, {World = Player:GetWorld(), x = BlockX, y = BlockY, z = BlockZ}); + Player:SendMessage("Dropper at {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "} discharging"); + return true; + else + Player:SendMessage("Neither a dispenser nor a dropper at {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}: " .. BlockType); + end + return false; +end + + + + + +function OnPlayerUsingItem(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ) + + -- dont check if the direction is in the air + if (BlockFace == BLOCK_FACE_NONE) then + return false + end + + local HeldItem = Player:GetEquippedItem(); + local HeldItemType = HeldItem.m_ItemType; + + if (HeldItemType == E_ITEM_STICK) then + -- Magic sTick of ticking: set the pointed block for ticking at the next tick + Player:SendMessage(cChatColor.LightGray .. "Setting next block tick to {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}") + Player:GetWorld():SetNextBlockTick(BlockX, BlockY, BlockZ); + return true + elseif (HeldItemType == E_ITEM_BLAZE_ROD) then + return OnUsingBlazeRod(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ); + elseif (HeldItemType == E_ITEM_DIAMOND) then + return OnUsingDiamond(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ); + elseif (HeldItemType == E_ITEM_EYE_OF_ENDER) then + return OnUsingEyeOfEnder(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ); + elseif (HeldItemType == E_ITEM_ENDER_PEARL) then + return OnUsingEnderPearl(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ); + end + return false; +end + + + + + +function OnPlayerUsingBlock(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ, BlockType, BlockMeta) + -- dont check if the direction is in the air + if (BlockFace == BLOCK_FACE_NONE) then + return false + end + + local HeldItem = Player:GetEquippedItem(); + local HeldItemType = HeldItem.m_ItemType; + + if (HeldItemType == E_BLOCK_REDSTONE_TORCH_ON) then + return OnUsingRedstoneTorch(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ); + end +end + + + + + +function OnTakeDamage(Receiver, TDI) + -- Receiver is cPawn + -- TDI is TakeDamageInfo + + LOG(Receiver:GetClass() .. " was dealt " .. DamageTypeToString(TDI.DamageType) .. " damage: Raw " .. TDI.RawDamage .. ", Final " .. TDI.FinalDamage .. " (" .. (TDI.RawDamage - TDI.FinalDamage) .. " covered by armor)"); + return false; +end + + + + + +--- When set to a positive number, the following OnTick() will perform GC and decrease until 0 again +GCOnTick = 0; + + + + + +function OnTick() + -- Activate all dropspensers in the g_DropSpensersToActivate list: + local ActivateDrSp = function(DropSpenser) + if (DropSpenser:GetContents():GetFirstUsedSlot() == -1) then + return true; + end + DropSpenser:Activate(); + return false; + end + -- Walk the list backwards, because we're removing some items + local idx = #g_DropSpensersToActivate; + for i = idx, 1, -1 do + local DrSp = g_DropSpensersToActivate[i]; + if not(DrSp.World:DoWithDropSpenserAt(DrSp.x, DrSp.y, DrSp.z, ActivateDrSp)) then + table.remove(g_DropSpensersToActivate, i); + end + end + + + -- If GCOnTick > 0, do a garbage-collect and decrease by one + if (GCOnTick > 0) then + collectgarbage(); + GCOnTick = GCOnTick - 1; + end + + --[[ + if (g_HungerReportTick > 0) then + g_HungerReportTick = g_HungerReportTick - 1; + else + g_HungerReportTick = 10; + cRoot:Get():GetDefaultWorld():ForEachPlayer( + function(a_Player) + a_Player:SendMessage("FoodStat: " .. a_Player:GetFoodLevel() .. " / " .. a_Player:GetFoodExhaustionLevel()); + end + ); + end + ]] + + return false; +end + + + + + +function OnChunkGenerated(World, ChunkX, ChunkZ, ChunkDesc) + -- Test ChunkDesc / BlockArea interaction + local BlockArea = cBlockArea(); + ChunkDesc:ReadBlockArea(BlockArea, 0, 15, 50, 70, 0, 15); + + -- BlockArea:SaveToSchematicFile("ChunkBlocks_" .. ChunkX .. "_" .. ChunkZ .. ".schematic"); + + ChunkDesc:WriteBlockArea(BlockArea, 5, 115, 5); + return false; +end + + + + + +function OnChat(a_Player, a_Message) + return false, "blabla " .. a_Message; +end + + + + + +-- Function "round" copied from http://lua-users.org/wiki/SimpleRound +function round(num, idp) + local mult = 10^(idp or 0) + if num >= 0 then return math.floor(num * mult + 0.5) / mult + else return math.ceil(num * mult - 0.5) / mult end +end + + + + + +function HandleListEntitiesCmd(Split, Player) + local NumEntities = 0; + + local ListEntity = function(Entity) + if (Entity:IsDestroyed()) then + -- The entity has already been destroyed, don't list it + return false; + end; + Player:SendMessage(" " .. Entity:GetUniqueID() .. ": " .. Entity:GetClass() .. " {" .. round(Entity:GetPosX(), 2) .. ", " .. round(Entity:GetPosY(), 2) .. ", " .. round(Entity:GetPosZ(), 2) .."}"); + NumEntities = NumEntities + 1; + end + + Player:SendMessage("Listing all entities..."); + Player:GetWorld():ForEachEntity(ListEntity); + Player:SendMessage("List finished, " .. NumEntities .. " entities listed"); + return true; +end + + + + + +function HandleKillEntitiesCmd(Split, Player) + local NumEntities = 0; + + local KillEntity = function(Entity) + -- kill everything except for players: + if (Entity:GetEntityType() ~= cEntity.etPlayer) then + Entity:Destroy(); + NumEntities = NumEntities + 1; + end; + end + + Player:SendMessage("Killing all entities..."); + Player:GetWorld():ForEachEntity(KillEntity); + Player:SendMessage("Killed " .. NumEntities .. " entities."); + return true; +end + + + + + +function HandleWoolCmd(Split, Player) + local Wool = cItem(E_BLOCK_WOOL, 1, E_META_WOOL_BLUE); + Player:GetInventory():SetArmorSlot(0, Wool); + Player:GetInventory():SetArmorSlot(1, Wool); + Player:GetInventory():SetArmorSlot(2, Wool); + Player:GetInventory():SetArmorSlot(3, Wool); + Player:SendMessage("You have been bluewooled :)"); + return true; +end + + + + + +function HandleTestWndCmd(a_Split, a_Player) + local WindowType = cWindow.Hopper; + local WindowSizeX = 5; + local WindowSizeY = 1; + if (#a_Split == 4) then + WindowType = tonumber(a_Split[2]); + WindowSizeX = tonumber(a_Split[3]); + WindowSizeY = tonumber(a_Split[4]); + elseif (#a_Split ~= 1) then + a_Player:SendMessage("Usage: /testwnd [WindowType WindowSizeX WindowSizeY]"); + return true; + end + + -- Test out the OnClosing callback's ability to refuse to close the window + local attempt = 1; + local OnClosing = function(Window, Player, CanRefuse) + Player:SendMessage("Window closing attempt #" .. attempt .. "; CanRefuse = " .. tostring(CanRefuse)); + attempt = attempt + 1; + return CanRefuse and (attempt <= 3); -- refuse twice, then allow, unless CanRefuse is set to true + end + + -- Log the slot changes + local OnSlotChanged = function(Window, SlotNum) + LOG("Window \"" .. Window:GetWindowTitle() .. "\" slot " .. SlotNum .. " changed."); + end + + local Window = cLuaWindow(WindowType, WindowSizeX, WindowSizeY, "TestWnd"); + local Item2 = cItem(E_ITEM_DIAMOND_SWORD, 1, 0, "1=1"); + local Item3 = cItem(E_ITEM_DIAMOND_SHOVEL); + Item3.m_Enchantments:SetLevel(cEnchantments.enchUnbreaking, 4); + local Item4 = cItem(Item3); -- Copy + Item4.m_Enchantments:SetLevel(cEnchantments.enchEfficiency, 3); -- Add enchantment + Item4.m_Enchantments:SetLevel(cEnchantments.enchUnbreaking, 5); -- Overwrite existing level + local Item5 = cItem(E_ITEM_DIAMOND_CHESTPLATE, 1, 0, "thorns=1;unbreaking=3"); + Window:SetSlot(a_Player, 0, cItem(E_ITEM_DIAMOND, 64)); + Window:SetSlot(a_Player, 1, Item2); + Window:SetSlot(a_Player, 2, Item3); + Window:SetSlot(a_Player, 3, Item4); + Window:SetSlot(a_Player, 4, Item5); + Window:SetOnClosing(OnClosing); + Window:SetOnSlotChanged(OnSlotChanged); + + a_Player:OpenWindow(Window); + + -- To make sure that the object has the correct life-management in Lua, + -- let's garbage-collect in the following few ticks + GCOnTick = 10; + + return true; +end + + + + + +function HandleGCCmd(a_Split, a_Player) + collectgarbage(); + return true; +end + + + + + + +function HandleFastCmd(a_Split, a_Player) + if (a_Player:GetNormalMaxSpeed() <= 0.11) then + -- The player has normal speed, set double speed: + a_Player:SetNormalMaxSpeed(0.2); + a_Player:SendMessage("You are now fast"); + else + -- The player has fast speed, set normal speed: + a_Player:SetNormalMaxSpeed(0.1); + a_Player:SendMessage("Back to normal speed"); + end + return true; +end + + + + + +function HandleDashCmd(a_Split, a_Player) + if (a_Player:GetSprintingMaxSpeed() <= 0.14) then + -- The player has normal sprinting speed, set double Sprintingspeed: + a_Player:SetSprintingMaxSpeed(0.4); + a_Player:SendMessage("You can now sprint very fast"); + else + -- The player has fast sprinting speed, set normal sprinting speed: + a_Player:SetSprintingMaxSpeed(0.13); + a_Player:SendMessage("Back to normal sprinting"); + end + return true; +end; + + + + + +function HandleHungerCmd(a_Split, a_Player) + a_Player:SendMessage("FoodLevel: " .. a_Player:GetFoodLevel()); + a_Player:SendMessage("FoodSaturationLevel: " .. a_Player:GetFoodSaturationLevel()); + a_Player:SendMessage("FoodTickTimer: " .. a_Player:GetFoodTickTimer()); + a_Player:SendMessage("FoodExhaustionLevel: " .. a_Player:GetFoodExhaustionLevel()); + a_Player:SendMessage("FoodPoisonedTicksRemaining: " .. a_Player:GetFoodPoisonedTicksRemaining()); + return true; +end + + + + + +function HandlePoisonCmd(a_Split, a_Player) + a_Player:FoodPoison(15 * 20); + return true; +end + + + + + +function HandleStarveCmd(a_Split, a_Player) + a_Player:SetFoodLevel(0); + a_Player:SendMessage("You are now starving"); + return true; +end + + + + + +function HandleFoodLevelCmd(a_Split, a_Player) + if (#a_Split ~= 2) then + a_Player:SendMessage("Missing an argument: the food level to set"); + return true; + end + + a_Player:SetFoodLevel(tonumber(a_Split[2])); + a_Player:SendMessage("Food level set to " .. a_Player:GetFoodLevel()); + return true; +end + + + + diff --git a/MCServer/Plugins/DiamondMover/DiamondMover.lua b/MCServer/Plugins/DiamondMover/DiamondMover.lua index eaced1058..c89a3394f 100644 --- a/MCServer/Plugins/DiamondMover/DiamondMover.lua +++ b/MCServer/Plugins/DiamondMover/DiamondMover.lua @@ -1,83 +1,83 @@ -
--- DiamondMover.lua
-
--- An example Lua plugin using the cBlockArea object
--- When a player rclks with a diamond in their hand, an area around the clicked block is moved in the direction the player is facing
-
-
-
-
-
--- Global variables
-PLUGIN = {} -- Reference to own plugin object
-MOVER_SIZE_X = 4;
-MOVER_SIZE_Y = 4;
-MOVER_SIZE_Z = 4;
-
-
-
-
-
-function Initialize(Plugin)
- PLUGIN = Plugin;
-
- Plugin:SetName("DiamondMover");
- Plugin:SetVersion(1);
-
- PluginManager = cRoot:Get():GetPluginManager();
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USED_ITEM);
- return true;
-end
-
-
-
-
-
-function OnPlayerUsedItem(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ)
-
- -- Don't check if the direction is in the air
- if (BlockFace == -1) then
- return false;
- end;
-
- if (Player:HasPermission("diamondmover.move") == false) then
- return true;
- end;
-
- -- Rclk with a diamond to push in the direction the player is facing
- if (Player:GetEquippedItem().m_ItemType == E_ITEM_DIAMOND) then
- local Area = cBlockArea();
- Area:Read(Player:GetWorld(),
- BlockX - MOVER_SIZE_X, BlockX + MOVER_SIZE_X,
- BlockY - MOVER_SIZE_Y, BlockY + MOVER_SIZE_Y,
- BlockZ - MOVER_SIZE_Z, BlockZ + MOVER_SIZE_Z
- );
-
- local PlayerPitch = Player:GetPitch();
- if (PlayerPitch < -70) then -- looking up
- BlockY = BlockY + 1;
- else
- if (PlayerPitch > 70) then -- looking down
- BlockY = BlockY - 1;
- else
- local PlayerRot = Player:GetRotation() + 180; -- Convert [-180, 180] into [0, 360] for simpler conditions
- if ((PlayerRot < 45) or (PlayerRot > 315)) then
- BlockZ = BlockZ - 1;
- else
- if (PlayerRot < 135) then
- BlockX = BlockX + 1;
- else
- if (PlayerRot < 225) then
- BlockZ = BlockZ + 1;
- else
- BlockX = BlockX - 1;
- end;
- end;
- end;
- end;
- end;
-
- Area:Write(Player:GetWorld(), BlockX - MOVER_SIZE_X, BlockY - MOVER_SIZE_Y, BlockZ - MOVER_SIZE_Z);
- return false;
- end
+ +-- DiamondMover.lua + +-- An example Lua plugin using the cBlockArea object +-- When a player rclks with a diamond in their hand, an area around the clicked block is moved in the direction the player is facing + + + + + +-- Global variables +PLUGIN = {} -- Reference to own plugin object +MOVER_SIZE_X = 4; +MOVER_SIZE_Y = 4; +MOVER_SIZE_Z = 4; + + + + + +function Initialize(Plugin) + PLUGIN = Plugin; + + Plugin:SetName("DiamondMover"); + Plugin:SetVersion(1); + + PluginManager = cRoot:Get():GetPluginManager(); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USED_ITEM); + return true; +end + + + + + +function OnPlayerUsedItem(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ) + + -- Don't check if the direction is in the air + if (BlockFace == -1) then + return false; + end; + + if (Player:HasPermission("diamondmover.move") == false) then + return true; + end; + + -- Rclk with a diamond to push in the direction the player is facing + if (Player:GetEquippedItem().m_ItemType == E_ITEM_DIAMOND) then + local Area = cBlockArea(); + Area:Read(Player:GetWorld(), + BlockX - MOVER_SIZE_X, BlockX + MOVER_SIZE_X, + BlockY - MOVER_SIZE_Y, BlockY + MOVER_SIZE_Y, + BlockZ - MOVER_SIZE_Z, BlockZ + MOVER_SIZE_Z + ); + + local PlayerPitch = Player:GetPitch(); + if (PlayerPitch < -70) then -- looking up + BlockY = BlockY + 1; + else + if (PlayerPitch > 70) then -- looking down + BlockY = BlockY - 1; + else + local PlayerRot = Player:GetRotation() + 180; -- Convert [-180, 180] into [0, 360] for simpler conditions + if ((PlayerRot < 45) or (PlayerRot > 315)) then + BlockZ = BlockZ - 1; + else + if (PlayerRot < 135) then + BlockX = BlockX + 1; + else + if (PlayerRot < 225) then + BlockZ = BlockZ + 1; + else + BlockX = BlockX - 1; + end; + end; + end; + end; + end; + + Area:Write(Player:GetWorld(), BlockX - MOVER_SIZE_X, BlockY - MOVER_SIZE_Y, BlockZ - MOVER_SIZE_Z); + return false; + end end
\ No newline at end of file diff --git a/MCServer/Plugins/Handy/handy.lua b/MCServer/Plugins/Handy/handy.lua index c2330abab..6d226ccaf 100644 --- a/MCServer/Plugins/Handy/handy.lua +++ b/MCServer/Plugins/Handy/handy.lua @@ -1,28 +1,28 @@ --- Global variables
-PLUGIN = {} -- Reference to own plugin object
-CHEST_WIDTH = 9
-HANDY_VERSION = 1
---[[
-
-Handy is a plugin for other plugins. It contain no commands, no hooks, but functions to ease plugins developers' life.
-
-API:
-
-
-TODO:
-1. GetChestSlot wrapper, so it will detect double chest neighbour chest and will be able to access it.
-]]
-
-function Initialize(Plugin)
- PLUGIN = Plugin
- PLUGIN:SetName("Handy")
- PLUGIN:SetVersion(HANDY_VERSION)
-
- PluginManager = cRoot:Get():GetPluginManager()
- LOG("Initialized " .. PLUGIN:GetName() .. " v" .. PLUGIN:GetVersion())
- return true
-end
-
-function OnDisable()
- LOG(PLUGIN:GetName() .. " v" .. PLUGIN:GetVersion() .. " is shutting down...")
+-- Global variables +PLUGIN = {} -- Reference to own plugin object +CHEST_WIDTH = 9 +HANDY_VERSION = 1 +--[[ + +Handy is a plugin for other plugins. It contain no commands, no hooks, but functions to ease plugins developers' life. + +API: + + +TODO: +1. GetChestSlot wrapper, so it will detect double chest neighbour chest and will be able to access it. +]] + +function Initialize(Plugin) + PLUGIN = Plugin + PLUGIN:SetName("Handy") + PLUGIN:SetVersion(HANDY_VERSION) + + PluginManager = cRoot:Get():GetPluginManager() + LOG("Initialized " .. PLUGIN:GetName() .. " v" .. PLUGIN:GetVersion()) + return true +end + +function OnDisable() + LOG(PLUGIN:GetName() .. " v" .. PLUGIN:GetVersion() .. " is shutting down...") end
\ No newline at end of file diff --git a/MCServer/Plugins/Handy/handy_functions.lua b/MCServer/Plugins/Handy/handy_functions.lua index f8423312f..a76980c6e 100644 --- a/MCServer/Plugins/Handy/handy_functions.lua +++ b/MCServer/Plugins/Handy/handy_functions.lua @@ -1,355 +1,355 @@ ---[[
-General stuff
-]]
--- Returns Handy plugin version number
-function GetHandyVersion()
- return HANDY_VERSION
-end
--- Checks if handy is in proper version
-function CheckForRequiedVersion(IN_version)
- if (IN_version > HANDY_VERSION) then return false end
- return true
-end
---[[
-MCS-specific _functions and nasty hacks :D
-]]
--- There's a "GetChestHeight" function inside source code, but it's not lua-exported
-function GetChestHeightCheat(IN_chest)
- if (IN_chest:GetSlot(28) == nil) then -- this means we're trying to get double chest slot and FAIL
- LOGWARN("HANDY: single chest checked")
- return 3
- end
- LOGWARN("HANDY: double chest checked")
- return 6
-end
--- Those two checks how many items of given IN_itemID chest and player have, and how much they could fit inside them
-function ReadChestForItem(IN_chest, IN_itemID)
- local _items_found = 0
- local _free_space = 0
- -- stalk through chest slots...
- local _slot_counter = 0
- local _slot_item
- local _item_max_stack = GetItemMaxStack(IN_itemID)
- while true do
- _slot_item = IN_chest:GetSlot(_slot_counter)
- if (_slot_item ~= nil) then
- if (_slot_item.m_ItemID == IN_itemID) then
- _items_found = _items_found + _slot_item.m_ItemCount
- _free_space = _free_space + (_item_max_stack - _slot_item.m_ItemCount)
- end
- if (_slot_item:IsEmpty() == true) then
- _free_space = _free_space + _item_max_stack
- end
- end
- _slot_counter = _slot_counter + 1
- if (_slot_counter == CHEST_WIDTH*GetChestHeightCheat(IN_chest)) then
- break
- end
- end
- return _items_found, _free_space
-end
-function ReadPlayerForItem(IN_player, IN_itemID)
- local _items_found = 0
- local _free_space = 0
- -- stalk through IN_player inventory slots...
- local _slot_counter = 9
- if (ItemIsArmor(IN_itemID) == true) then _slot_counter = 5 end
- local _slot_item
- local _item_max_stack = GetItemMaxStack(IN_itemID)
- while true do
- _slot_item = IN_player:GetInventory():GetSlot(_slot_counter)
- if (_slot_item ~= nil) then
- if (_slot_item.m_ItemID == IN_itemID) then
- _items_found = _items_found + _slot_item.m_ItemCount
- _free_space = _free_space + (_item_max_stack - _slot_item.m_ItemCount)
- end
- if (_slot_item:IsEmpty() == true) then
- _free_space = _free_space + _item_max_stack
- end
- end
- _slot_counter = _slot_counter + 1
- if (_slot_counter == 45) then
- break
- end
- end
- return _items_found, _free_space
-end
--- Following functions are for chest-related operations (since noone was bothered writing them in MCS code)
--- BEWARE! Those assume you did checked if chest has items/space in it!
-function TakeItemsFromChest(IN_chest, IN_itemID, IN_ammount) -- UNSAFE! CHECK FOR ITEMS FIRST!!
- -- stalk through chest slots...
- local _slot_counter = 0
- local _slot_item
- local _take_count = IN_ammount
- while true do
- _slot_item = IN_chest:GetSlot(_slot_counter)
- if (_slot_item ~= nil) then
- if (_slot_item.m_ItemID == IN_itemID) then
- -- assuming player have enought money
- if (_take_count > 0) then
- if (_take_count > _slot_item.m_ItemCount) then
- _take_count = _take_count - _slot_item.m_ItemCount
- IN_chest:SetSlot(_slot_counter, cItem()) -- a bit hacky, can't make cItem:Clear() work(
- else
- local _left_count = _slot_item.m_ItemCount - _take_count
- IN_chest:SetSlot(_slot_counter, cItem(_slot_item.m_ItemID, _left_count)) -- a bit hacky
- _take_count = 0
- end
- end
- if (_take_count == 0) then
- break
- end
- end
- end
- _slot_counter = _slot_counter + 1
- if (_slot_counter == CHEST_WIDTH*GetChestHeightCheat(IN_chest)) then
- break
- end
- end
-end
-function PutItemsToChest(IN_chest, IN_itemID, IN_ammount) -- UNSAFE! CHECK FOR SPACE FIRST!!
- -- stalk through chest slots...
- local _slot_counter = 0
- local _slot_item
- local _put_count = IN_ammount
- local _max_stack = GetItemMaxStack(IN_itemID)
- while true do
- _slot_item = IN_chest:GetSlot(_slot_counter)
- local _portion = 0
- local _ammount_to_set = 0
- if (_slot_item ~= nil) then
- if (_slot_item:IsEmpty() == true) then
- _portion = math.min(_max_stack, _put_count)
- _ammount_to_set = _portion
- else
- if (_slot_item.m_ItemID == IN_itemID) then
- -- choose between how much we need to put and how much free space left
- _portion = math.min(_put_count, _max_stack - _slot_item.m_ItemCount)
- _ammount_to_set = _slot_item.m_ItemCount + _portion
- end
- end
- end
- IN_chest:SetSlot(_slot_counter, cItem(IN_itemID, _ammount_to_set)) -- we add max stack to chest
- _put_count = _put_count - _portion
- if (_put_count == 0) then break end
- _slot_counter = _slot_counter + 1
- if (_slot_counter == CHEST_WIDTH*GetChestHeightCheat(IN_chest)) then
- break
- end
- end
-end
--- Similar to chest-related.
-function TakeItemsFromPlayer(IN_player, IN_itemID, IN_ammount) -- UNSAFE! CHECK FIRST!
- local _put_count = IN_ammount
- local _max_stack = GetItemMaxStack(IN_itemID)
- while true do
- local _portion = math.min(_max_stack, _put_count)
- IN_player:GetInventory():RemoveItem(cItem(IN_itemID, _portion))
- _put_count = _put_count - _portion
- if (_put_count == 0) then break end
- end
-end
-function GiveItemsToPlayer(IN_player, IN_itemID, IN_ammount) -- UNSAFE! CHECK FIRST!
- local _put_count = IN_ammount
- local _max_stack = GetItemMaxStack(IN_itemID)
- while true do
- local _portion = math.min(_max_stack, _put_count)
- IN_player:GetInventory():AddItem(cItem(IN_itemID, _portion))
- _put_count = _put_count - _portion
- if (_put_count == 0) then break end
- end
-end
--- This function returns item max stack for a given itemID. It uses vanilla max stack size, and uses several non-common items notations;
--- Those are:
--- oneonerecord (because aparently 11record wasn't the best idea in lua scripting application)
--- carrotonastick (because it wasn't added to items.txt yet)
--- waitrecord (for same reason)
--- Feel free to ignore the difference, or to add those to items.txt
-function GetItemMaxStack(IN_itemID)
- local _result = 64
- -- Tools and swords
- if (IN_itemID == woodensword) then _result = 1 end
- if (IN_itemID == woodenshovel) then _result = 1 end
- if (IN_itemID == woodenpickaxe) then _result = 1 end
- if (IN_itemID == woodenaxe) then _result = 1 end
- if (IN_itemID == woodenhoe) then _result = 1 end
- if (IN_itemID == stonesword) then _result = 1 end
- if (IN_itemID == stoneshovel) then _result = 1 end
- if (IN_itemID == stonepickaxe) then _result = 1 end
- if (IN_itemID == stoneaxe) then _result = 1 end
- if (IN_itemID == stonehoe) then _result = 1 end
- if (IN_itemID == ironsword) then _result = 1 end
- if (IN_itemID == ironshovel) then _result = 1 end
- if (IN_itemID == ironpickaxe) then _result = 1 end
- if (IN_itemID == ironaxe) then _result = 1 end
- if (IN_itemID == ironhoe) then _result = 1 end
- if (IN_itemID == diamondsword) then _result = 1 end
- if (IN_itemID == diamondshovel) then _result = 1 end
- if (IN_itemID == diamondpickaxe) then _result = 1 end
- if (IN_itemID == diamondaxe) then _result = 1 end
- if (IN_itemID == diamondhoe) then _result = 1 end
- if (IN_itemID == goldensword) then _result = 1 end
- if (IN_itemID == goldenshovel) then _result = 1 end
- if (IN_itemID == goldenpickaxe) then _result = 1 end
- if (IN_itemID == goldenaxe) then _result = 1 end
- if (IN_itemID == goldenhoe) then _result = 1 end
-
- if (IN_itemID == flintandsteel) then _result = 1 end
- if (IN_itemID == bow) then _result = 1 end
- if (IN_itemID == sign) then _result = 16 end
- if (IN_itemID == woodendoor) then _result = 1 end
- if (IN_itemID == irondoor) then _result = 1 end
- if (IN_itemID == cake) then _result = 1 end
- if (IN_itemID == cauldron) then _result = 1 end
- if (IN_itemID == mushroomstew) then _result = 1 end
- if (IN_itemID == painting) then _result = 1 end
- if (IN_itemID == bucket) then _result = 16 end
- if (IN_itemID == waterbucket) then _result = 1 end
- if (IN_itemID == lavabucket) then _result = 1 end
- if (IN_itemID == minecart) then _result = 1 end
- if (IN_itemID == saddle) then _result = 1 end
- if (IN_itemID == snowball) then _result = 16 end
- if (IN_itemID == boat) then _result = 1 end
- if (IN_itemID == milkbucket) then _result = 1 end
- if (IN_itemID == storageminecart) then _result = 1 end
- if (IN_itemID == poweredminecart) then _result = 1 end
- if (IN_itemID == egg) then _result = 16 end
- if (IN_itemID == fishingrod) then _result = 1 end
- if (IN_itemID == bed) then _result = 1 end
- if (IN_itemID == map) then _result = 1 end
- if (IN_itemID == shears) then _result = 1 end
- if (IN_itemID == enderpearl) then _result = 16 end
- if (IN_itemID == potion) then _result = 1 end
- if (IN_itemID == spawnegg) then _result = 1 end
- if (IN_itemID == bookandquill) then _result = 1 end
- if (IN_itemID == writtenbook) then _result = 1 end
- if (IN_itemID == carrotonastick) then _result = 1 end
-
- if (IN_itemID == goldrecord) then _result = 1 end
- if (IN_itemID == greenrecord) then _result = 1 end
- if (IN_itemID == blocksrecord) then _result = 1 end
- if (IN_itemID == chirprecord) then _result = 1 end
- if (IN_itemID == farrecord) then _result = 1 end
- if (IN_itemID == mallrecord) then _result = 1 end
- if (IN_itemID == mellohirecord) then _result = 1 end
- if (IN_itemID == stalrecord) then _result = 1 end
- if (IN_itemID == stradrecord) then _result = 1 end
- if (IN_itemID == wardrecord) then _result = 1 end
- if (IN_itemID == oneonerecord) then _result = 1 end
- if (IN_itemID == waitrecord) then _result = 1 end
-
- --if (IN_itemID == xxxxxxxxx) then _result = 1 end
-
- if (IN_itemID == leatherhelmet) then _result = 1 end
- if (IN_itemID == leatherchestplate) then _result = 1 end
- if (IN_itemID == leatherpants) then _result = 1 end
- if (IN_itemID == leatherboots) then _result = 1 end
-
- if (IN_itemID == chainmailhelmet) then _result = 1 end
- if (IN_itemID == chainmailchestplate) then _result = 1 end
- if (IN_itemID == chainmailpants) then _result = 1 end
- if (IN_itemID == chainmailboots) then _result = 1 end
-
- if (IN_itemID == ironhelmet) then _result = 1 end
- if (IN_itemID == ironchestplate) then _result = 1 end
- if (IN_itemID == ironpants) then _result = 1 end
- if (IN_itemID == ironboots) then _result = 1 end
-
- if (IN_itemID == diamondhelmet) then _result = 1 end
- if (IN_itemID == diamondchestplate) then _result = 1 end
- if (IN_itemID == diamondpants) then _result = 1 end
- if (IN_itemID == diamondboots) then _result = 1 end
-
- if (IN_itemID == goldenhelmet) then _result = 1 end
- if (IN_itemID == goldenchestplate) then _result = 1 end
- if (IN_itemID == goldenpants) then _result = 1 end
- if (IN_itemID == goldenboots) then _result = 1 end
- return _result
-end
-function ItemIsArmor(IN_itemID)
- local _result = false
- if (IN_itemID == leatherhelmet) then _result = true end
- if (IN_itemID == leatherchestplate) then _result = true end
- if (IN_itemID == leatherpants) then _result = true end
- if (IN_itemID == leatherboots) then _result = true end
-
- if (IN_itemID == chainmailhelmet) then _result = true end
- if (IN_itemID == chainmailchestplate) then _result = true end
- if (IN_itemID == chainmailpants) then _result = true end
- if (IN_itemID == chainmailboots) then _result = true end
-
- if (IN_itemID == ironhelmet) then _result = true end
- if (IN_itemID == ironchestplate) then _result = true end
- if (IN_itemID == ironpants) then _result = true end
- if (IN_itemID == ironboots) then _result = true end
-
- if (IN_itemID == diamondhelmet) then _result = true end
- if (IN_itemID == diamondchestplate) then _result = true end
- if (IN_itemID == diamondpants) then _result = true end
- if (IN_itemID == diamondboots) then _result = true end
-
- if (IN_itemID == goldenhelmet) then _result = true end
- if (IN_itemID == goldenchestplate) then _result = true end
- if (IN_itemID == goldenpants) then _result = true end
- if (IN_itemID == goldenboots) then _result = true end
- return _result
-end
--- Returns full-length playername for a short name (usefull for parsing commands)
-function GetExactPlayername(IN_playername)
- local _result = IN_playername
- local function SetProcessingPlayername(IN_player)
- _result = IN_player:GetName()
- end
- cRoot:Get():FindAndDoWithPlayer(IN_playername, SetProcessingPlayername)
- return _result
-end
-function GetPlayerByName(IN_playername)
- local _player
- local PlayerSetter = function (Player)
- _player = Player
- end
- cRoot:Get():FindAndDoWithPlayer(IN_playername, PlayerSetter)
- return _player
-end
---[[
-Not-so-usual math _functions
-]]
--- Rounds floating point number. Because lua guys think this function doesn't deserve to be presented in lua's math
-function round(IN_x)
- if (IN_x%2 ~= 0.5) then
- return math.floor(IN_x+0.5)
- end
- return IN_x-0.5
-end
---[[
-Functions I use for filework and stringswork
-]]
-function PluralString(IN_value, IN_singular_string, IN_plural_string)
- local _value_string = tostring(IN_value)
- if (_value_string[#_value_string] == "1") then
- return IN_singular_string
- end
- return IN_plural_string
-end
-function PluralItemName(IN_itemID, IN_ammount) -- BEWARE! TEMPORAL SOLUTION THERE! :D
- local _value_string = tostring(IN_value)
- local _name = ""
- if (_value_string[#_value_string] == "1") then
- -- singular names
- _name = ItemTypeToString(IN_itemID)
- else
- -- plural names
- _name = ItemTypeToString(IN_itemID).."s"
- end
- return _name
-end
--- for filewriting purposes. 0 = false, 1 = true
-function StringToBool(value)
- if value=="1" then return true end
- return false
-end
--- same, but reversal
-function BoolToString(value)
- if value==true then return 1 end
- return 0
+--[[ +General stuff +]] +-- Returns Handy plugin version number +function GetHandyVersion() + return HANDY_VERSION +end +-- Checks if handy is in proper version +function CheckForRequiedVersion(IN_version) + if (IN_version > HANDY_VERSION) then return false end + return true +end +--[[ +MCS-specific _functions and nasty hacks :D +]] +-- There's a "GetChestHeight" function inside source code, but it's not lua-exported +function GetChestHeightCheat(IN_chest) + if (IN_chest:GetSlot(28) == nil) then -- this means we're trying to get double chest slot and FAIL + LOGWARN("HANDY: single chest checked") + return 3 + end + LOGWARN("HANDY: double chest checked") + return 6 +end +-- Those two checks how many items of given IN_itemID chest and player have, and how much they could fit inside them +function ReadChestForItem(IN_chest, IN_itemID) + local _items_found = 0 + local _free_space = 0 + -- stalk through chest slots... + local _slot_counter = 0 + local _slot_item + local _item_max_stack = GetItemMaxStack(IN_itemID) + while true do + _slot_item = IN_chest:GetSlot(_slot_counter) + if (_slot_item ~= nil) then + if (_slot_item.m_ItemID == IN_itemID) then + _items_found = _items_found + _slot_item.m_ItemCount + _free_space = _free_space + (_item_max_stack - _slot_item.m_ItemCount) + end + if (_slot_item:IsEmpty() == true) then + _free_space = _free_space + _item_max_stack + end + end + _slot_counter = _slot_counter + 1 + if (_slot_counter == CHEST_WIDTH*GetChestHeightCheat(IN_chest)) then + break + end + end + return _items_found, _free_space +end +function ReadPlayerForItem(IN_player, IN_itemID) + local _items_found = 0 + local _free_space = 0 + -- stalk through IN_player inventory slots... + local _slot_counter = 9 + if (ItemIsArmor(IN_itemID) == true) then _slot_counter = 5 end + local _slot_item + local _item_max_stack = GetItemMaxStack(IN_itemID) + while true do + _slot_item = IN_player:GetInventory():GetSlot(_slot_counter) + if (_slot_item ~= nil) then + if (_slot_item.m_ItemID == IN_itemID) then + _items_found = _items_found + _slot_item.m_ItemCount + _free_space = _free_space + (_item_max_stack - _slot_item.m_ItemCount) + end + if (_slot_item:IsEmpty() == true) then + _free_space = _free_space + _item_max_stack + end + end + _slot_counter = _slot_counter + 1 + if (_slot_counter == 45) then + break + end + end + return _items_found, _free_space +end +-- Following functions are for chest-related operations (since noone was bothered writing them in MCS code) +-- BEWARE! Those assume you did checked if chest has items/space in it! +function TakeItemsFromChest(IN_chest, IN_itemID, IN_ammount) -- UNSAFE! CHECK FOR ITEMS FIRST!! + -- stalk through chest slots... + local _slot_counter = 0 + local _slot_item + local _take_count = IN_ammount + while true do + _slot_item = IN_chest:GetSlot(_slot_counter) + if (_slot_item ~= nil) then + if (_slot_item.m_ItemID == IN_itemID) then + -- assuming player have enought money + if (_take_count > 0) then + if (_take_count > _slot_item.m_ItemCount) then + _take_count = _take_count - _slot_item.m_ItemCount + IN_chest:SetSlot(_slot_counter, cItem()) -- a bit hacky, can't make cItem:Clear() work( + else + local _left_count = _slot_item.m_ItemCount - _take_count + IN_chest:SetSlot(_slot_counter, cItem(_slot_item.m_ItemID, _left_count)) -- a bit hacky + _take_count = 0 + end + end + if (_take_count == 0) then + break + end + end + end + _slot_counter = _slot_counter + 1 + if (_slot_counter == CHEST_WIDTH*GetChestHeightCheat(IN_chest)) then + break + end + end +end +function PutItemsToChest(IN_chest, IN_itemID, IN_ammount) -- UNSAFE! CHECK FOR SPACE FIRST!! + -- stalk through chest slots... + local _slot_counter = 0 + local _slot_item + local _put_count = IN_ammount + local _max_stack = GetItemMaxStack(IN_itemID) + while true do + _slot_item = IN_chest:GetSlot(_slot_counter) + local _portion = 0 + local _ammount_to_set = 0 + if (_slot_item ~= nil) then + if (_slot_item:IsEmpty() == true) then + _portion = math.min(_max_stack, _put_count) + _ammount_to_set = _portion + else + if (_slot_item.m_ItemID == IN_itemID) then + -- choose between how much we need to put and how much free space left + _portion = math.min(_put_count, _max_stack - _slot_item.m_ItemCount) + _ammount_to_set = _slot_item.m_ItemCount + _portion + end + end + end + IN_chest:SetSlot(_slot_counter, cItem(IN_itemID, _ammount_to_set)) -- we add max stack to chest + _put_count = _put_count - _portion + if (_put_count == 0) then break end + _slot_counter = _slot_counter + 1 + if (_slot_counter == CHEST_WIDTH*GetChestHeightCheat(IN_chest)) then + break + end + end +end +-- Similar to chest-related. +function TakeItemsFromPlayer(IN_player, IN_itemID, IN_ammount) -- UNSAFE! CHECK FIRST! + local _put_count = IN_ammount + local _max_stack = GetItemMaxStack(IN_itemID) + while true do + local _portion = math.min(_max_stack, _put_count) + IN_player:GetInventory():RemoveItem(cItem(IN_itemID, _portion)) + _put_count = _put_count - _portion + if (_put_count == 0) then break end + end +end +function GiveItemsToPlayer(IN_player, IN_itemID, IN_ammount) -- UNSAFE! CHECK FIRST! + local _put_count = IN_ammount + local _max_stack = GetItemMaxStack(IN_itemID) + while true do + local _portion = math.min(_max_stack, _put_count) + IN_player:GetInventory():AddItem(cItem(IN_itemID, _portion)) + _put_count = _put_count - _portion + if (_put_count == 0) then break end + end +end +-- This function returns item max stack for a given itemID. It uses vanilla max stack size, and uses several non-common items notations; +-- Those are: +-- oneonerecord (because aparently 11record wasn't the best idea in lua scripting application) +-- carrotonastick (because it wasn't added to items.txt yet) +-- waitrecord (for same reason) +-- Feel free to ignore the difference, or to add those to items.txt +function GetItemMaxStack(IN_itemID) + local _result = 64 + -- Tools and swords + if (IN_itemID == woodensword) then _result = 1 end + if (IN_itemID == woodenshovel) then _result = 1 end + if (IN_itemID == woodenpickaxe) then _result = 1 end + if (IN_itemID == woodenaxe) then _result = 1 end + if (IN_itemID == woodenhoe) then _result = 1 end + if (IN_itemID == stonesword) then _result = 1 end + if (IN_itemID == stoneshovel) then _result = 1 end + if (IN_itemID == stonepickaxe) then _result = 1 end + if (IN_itemID == stoneaxe) then _result = 1 end + if (IN_itemID == stonehoe) then _result = 1 end + if (IN_itemID == ironsword) then _result = 1 end + if (IN_itemID == ironshovel) then _result = 1 end + if (IN_itemID == ironpickaxe) then _result = 1 end + if (IN_itemID == ironaxe) then _result = 1 end + if (IN_itemID == ironhoe) then _result = 1 end + if (IN_itemID == diamondsword) then _result = 1 end + if (IN_itemID == diamondshovel) then _result = 1 end + if (IN_itemID == diamondpickaxe) then _result = 1 end + if (IN_itemID == diamondaxe) then _result = 1 end + if (IN_itemID == diamondhoe) then _result = 1 end + if (IN_itemID == goldensword) then _result = 1 end + if (IN_itemID == goldenshovel) then _result = 1 end + if (IN_itemID == goldenpickaxe) then _result = 1 end + if (IN_itemID == goldenaxe) then _result = 1 end + if (IN_itemID == goldenhoe) then _result = 1 end + + if (IN_itemID == flintandsteel) then _result = 1 end + if (IN_itemID == bow) then _result = 1 end + if (IN_itemID == sign) then _result = 16 end + if (IN_itemID == woodendoor) then _result = 1 end + if (IN_itemID == irondoor) then _result = 1 end + if (IN_itemID == cake) then _result = 1 end + if (IN_itemID == cauldron) then _result = 1 end + if (IN_itemID == mushroomstew) then _result = 1 end + if (IN_itemID == painting) then _result = 1 end + if (IN_itemID == bucket) then _result = 16 end + if (IN_itemID == waterbucket) then _result = 1 end + if (IN_itemID == lavabucket) then _result = 1 end + if (IN_itemID == minecart) then _result = 1 end + if (IN_itemID == saddle) then _result = 1 end + if (IN_itemID == snowball) then _result = 16 end + if (IN_itemID == boat) then _result = 1 end + if (IN_itemID == milkbucket) then _result = 1 end + if (IN_itemID == storageminecart) then _result = 1 end + if (IN_itemID == poweredminecart) then _result = 1 end + if (IN_itemID == egg) then _result = 16 end + if (IN_itemID == fishingrod) then _result = 1 end + if (IN_itemID == bed) then _result = 1 end + if (IN_itemID == map) then _result = 1 end + if (IN_itemID == shears) then _result = 1 end + if (IN_itemID == enderpearl) then _result = 16 end + if (IN_itemID == potion) then _result = 1 end + if (IN_itemID == spawnegg) then _result = 1 end + if (IN_itemID == bookandquill) then _result = 1 end + if (IN_itemID == writtenbook) then _result = 1 end + if (IN_itemID == carrotonastick) then _result = 1 end + + if (IN_itemID == goldrecord) then _result = 1 end + if (IN_itemID == greenrecord) then _result = 1 end + if (IN_itemID == blocksrecord) then _result = 1 end + if (IN_itemID == chirprecord) then _result = 1 end + if (IN_itemID == farrecord) then _result = 1 end + if (IN_itemID == mallrecord) then _result = 1 end + if (IN_itemID == mellohirecord) then _result = 1 end + if (IN_itemID == stalrecord) then _result = 1 end + if (IN_itemID == stradrecord) then _result = 1 end + if (IN_itemID == wardrecord) then _result = 1 end + if (IN_itemID == oneonerecord) then _result = 1 end + if (IN_itemID == waitrecord) then _result = 1 end + + --if (IN_itemID == xxxxxxxxx) then _result = 1 end + + if (IN_itemID == leatherhelmet) then _result = 1 end + if (IN_itemID == leatherchestplate) then _result = 1 end + if (IN_itemID == leatherpants) then _result = 1 end + if (IN_itemID == leatherboots) then _result = 1 end + + if (IN_itemID == chainmailhelmet) then _result = 1 end + if (IN_itemID == chainmailchestplate) then _result = 1 end + if (IN_itemID == chainmailpants) then _result = 1 end + if (IN_itemID == chainmailboots) then _result = 1 end + + if (IN_itemID == ironhelmet) then _result = 1 end + if (IN_itemID == ironchestplate) then _result = 1 end + if (IN_itemID == ironpants) then _result = 1 end + if (IN_itemID == ironboots) then _result = 1 end + + if (IN_itemID == diamondhelmet) then _result = 1 end + if (IN_itemID == diamondchestplate) then _result = 1 end + if (IN_itemID == diamondpants) then _result = 1 end + if (IN_itemID == diamondboots) then _result = 1 end + + if (IN_itemID == goldenhelmet) then _result = 1 end + if (IN_itemID == goldenchestplate) then _result = 1 end + if (IN_itemID == goldenpants) then _result = 1 end + if (IN_itemID == goldenboots) then _result = 1 end + return _result +end +function ItemIsArmor(IN_itemID) + local _result = false + if (IN_itemID == leatherhelmet) then _result = true end + if (IN_itemID == leatherchestplate) then _result = true end + if (IN_itemID == leatherpants) then _result = true end + if (IN_itemID == leatherboots) then _result = true end + + if (IN_itemID == chainmailhelmet) then _result = true end + if (IN_itemID == chainmailchestplate) then _result = true end + if (IN_itemID == chainmailpants) then _result = true end + if (IN_itemID == chainmailboots) then _result = true end + + if (IN_itemID == ironhelmet) then _result = true end + if (IN_itemID == ironchestplate) then _result = true end + if (IN_itemID == ironpants) then _result = true end + if (IN_itemID == ironboots) then _result = true end + + if (IN_itemID == diamondhelmet) then _result = true end + if (IN_itemID == diamondchestplate) then _result = true end + if (IN_itemID == diamondpants) then _result = true end + if (IN_itemID == diamondboots) then _result = true end + + if (IN_itemID == goldenhelmet) then _result = true end + if (IN_itemID == goldenchestplate) then _result = true end + if (IN_itemID == goldenpants) then _result = true end + if (IN_itemID == goldenboots) then _result = true end + return _result +end +-- Returns full-length playername for a short name (usefull for parsing commands) +function GetExactPlayername(IN_playername) + local _result = IN_playername + local function SetProcessingPlayername(IN_player) + _result = IN_player:GetName() + end + cRoot:Get():FindAndDoWithPlayer(IN_playername, SetProcessingPlayername) + return _result +end +function GetPlayerByName(IN_playername) + local _player + local PlayerSetter = function (Player) + _player = Player + end + cRoot:Get():FindAndDoWithPlayer(IN_playername, PlayerSetter) + return _player +end +--[[ +Not-so-usual math _functions +]] +-- Rounds floating point number. Because lua guys think this function doesn't deserve to be presented in lua's math +function round(IN_x) + if (IN_x%2 ~= 0.5) then + return math.floor(IN_x+0.5) + end + return IN_x-0.5 +end +--[[ +Functions I use for filework and stringswork +]] +function PluralString(IN_value, IN_singular_string, IN_plural_string) + local _value_string = tostring(IN_value) + if (_value_string[#_value_string] == "1") then + return IN_singular_string + end + return IN_plural_string +end +function PluralItemName(IN_itemID, IN_ammount) -- BEWARE! TEMPORAL SOLUTION THERE! :D + local _value_string = tostring(IN_value) + local _name = "" + if (_value_string[#_value_string] == "1") then + -- singular names + _name = ItemTypeToString(IN_itemID) + else + -- plural names + _name = ItemTypeToString(IN_itemID).."s" + end + return _name +end +-- for filewriting purposes. 0 = false, 1 = true +function StringToBool(value) + if value=="1" then return true end + return false +end +-- same, but reversal +function BoolToString(value) + if value==true then return 1 end + return 0 end
\ No newline at end of file diff --git a/MCServer/Plugins/HookNotify/HookNotify.lua b/MCServer/Plugins/HookNotify/HookNotify.lua index ed463c5ca..09759451d 100644 --- a/MCServer/Plugins/HookNotify/HookNotify.lua +++ b/MCServer/Plugins/HookNotify/HookNotify.lua @@ -1,404 +1,404 @@ -
--- Global variables
-PLUGIN = {} -- Reference to own plugin object
-
-
-
-
-
-function Initialize(Plugin)
- PLUGIN = Plugin
-
- Plugin:SetName("HookNotify");
- Plugin:SetVersion(1);
-
- PluginManager = cPluginManager:Get();
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_BLOCK_TO_PICKUPS);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHAT);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_AVAILABLE);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_GENERATED);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_GENERATING);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_UNLOADED);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_UNLOADING);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_COLLECTING_PICKUP);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_CRAFTING_NO_RECIPE);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_DISCONNECT);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_EXECUTE_COMMAND);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_HANDSHAKE);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_KILLING);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_LOGIN);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_BREAKING_BLOCK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_BROKEN_BLOCK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_EATING);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_JOINED);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_LEFT_CLICK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_MOVING);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_PLACED_BLOCK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_PLACING_BLOCK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_RIGHT_CLICK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_SHOOTING);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_SPAWNED);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_TOSSING_ITEM);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USED_BLOCK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USED_ITEM);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USING_BLOCK);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USING_ITEM);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_POST_CRAFTING);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_PRE_CRAFTING);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_TAKE_DAMAGE);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_UPDATED_SIGN);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_UPDATING_SIGN);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_WEATHER_CHANGED);
- PluginManager:AddHook(Plugin, cPluginManager.HOOK_WEATHER_CHANGING);
-
- LOGINFO("HookNotify plugin is installed, beware, the log output may be quite large!");
- LOGINFO("You want this plugin enabled only when developing another plugin, not for regular gameplay.");
-
- return true
-end
-
-
-
-
-
-function LogHook(FnName, ...)
- LOG(FnName .. "(");
- for i, v in ipairs(arg) do
- local vt = tostring(v);
- local TypeString = type(v);
- if (type(v) == "userdata") then
- TypeString = tolua.type(v);
- end;
- LOG(" " .. tostring(i) .. ": " .. TypeString .. ": " .. tostring(v));
- end
- LOG(")");
-end
-
-
-
-
-
-function OnBlockToPickups(...)
- LogHook("OnBlockToPickups", unpack(arg));
- local World, Digger, BlockX, BlockY, BlockZ, BlockType, BlockMeta, Pickups = unpack(arg);
- if (Pickups ~= nil) then
- local Name = "NULL";
- if (Digger ~= nil) then
- Name = Digger:GetName()
- end
- LOG("Got cItems from " .. Name .. ", trying to manipulate them.");
- Pickups:Add(cItem:new(E_ITEM_DIAMOND_SHOVEL, 1));
- LOG("Current size: " .. Pickups:Size());
- end;
-end;
-
-
-
-
-
-function OnChat(...)
- LogHook("OnChat", unpack(arg));
-end
-
-
-
-
-
-function OnChunkAvailable(...)
- LogHook("OnChunkAvailable", unpack(arg));
-end
-
-
-
-
-
-function OnChunkGenerated(...)
- LogHook("OnChunkGenerated", unpack(arg));
-end
-
-
-
-
-
-function OnChunkGenerating(...)
- LogHook("OnChunkGenerating", unpack(arg));
-end
-
-
-
-
-
-function OnChunkUnloaded(...)
- LogHook("OnChunkUnloaded", unpack(arg));
-end
-
-
-
-
-
-function OnChunkUnloading(...)
- LogHook("OnChunkUnloading", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerUsingItem(...)
- LogHook("OnPlayerUsingItem", unpack(arg));
-end
-
-
-
-
-
-function OnCollectingPickup(...)
- LogHook("OnCollectingPickup", unpack(arg));
-end
-
-
-
-
-function OnCraftingNoRecipe(...)
- LogHook("OnCraftingNoRecipe", unpack(arg));
-end
-
-
-
-
-
-function OnDisconnect(...)
- LogHook("OnDisconnect", unpack(arg));
-end
-
-
-
-
-
-function OnExecuteCommand(...)
- LogHook("OnExecuteCommand", unpack(arg));
-
- -- For some reason logging doesn't work for this callback, so list some stuff manually to verify:
- LOG("arg1 type: " .. type(arg[1]));
- if (arg[1] ~= nil) then
- LOG("Player name: " .. arg[1]:GetName());
- end
- LOG("Command: " .. arg[2][1]);
-end
-
-
-
-
-
-function OnHandshake(...)
- LogHook("OnHandshake", unpack(arg));
-end
-
-
-
-
-
-function OnKilling(...)
- LogHook("OnKilling", unpack(arg));
-end
-
-
-
-
-
-function OnLogin(...)
- LogHook("OnLogin", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerBreakingBlock(...)
- LogHook("OnPlayerBreakingBlock", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerBrokenBlock(...)
- LogHook("OnPlayerBrokenBlock", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerEating(...)
- LogHook("OnPlayerEating", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerJoined(...)
- LogHook("OnPlayerJoined", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerLeftClick(...)
- LogHook("OnPlayerLeftClick", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerMoving(...)
- LogHook("OnPlayerMoving", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerPlacedBlock(...)
- LogHook("OnPlayerPlacedBlock", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerPlacingBlock(...)
- LogHook("OnPlayerPlacingBlock", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerRightClick(...)
- LogHook("OnPlayerRightClick", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerShooting(...)
- LogHook("OnPlayerShooting", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerSpawned(...)
- LogHook("OnPlayerSpawned", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerTossingItem(...)
- LogHook("OnPlayerTossingItem", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerUsedBlock(...)
- LogHook("OnPlayerUsedBlock", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerUsedItem(...)
- LogHook("OnPlayerUsedItem", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerUsingBlock(...)
- LogHook("OnPlayerUsingBlock", unpack(arg));
-end
-
-
-
-
-
-function OnPlayerUsingItem(...)
- LogHook("OnPlayerUsingItem", unpack(arg));
-end
-
-
-
-
-
-function OnPostCrafting(...)
- LogHook("OnPostCrafting", unpack(arg));
-end
-
-
-
-
-
-function OnPreCrafting(...)
- LogHook("OnPreCrafting", unpack(arg));
-end
-
-
-
-
-
-function OnUpdatedSign(...)
- LogHook("OnUpdatedSign", unpack(arg));
-end
-
-
-
-
-
-function OnUpdatingSign(...)
- LogHook("OnUpdatingSign", unpack(arg));
-end
-
-
-
-
-
-function OnWeatherChanged(...)
- LogHook("OnWeatherChanged", unpack(arg));
-end
-
-
-
-
-
-function OnWeatherChanging(...)
- LogHook("OnWeatherChanging", unpack(arg));
-end
-
-
-
-
-
-------------------------------------------------------------------
--- Special handling for OnTakeDamage to print the contents of TDI:
-
-function OnTakeDamage(Receiver, TDI)
- -- Receiver is cPawn
- -- TDI is TakeDamageInfo
-
- LOG("OnTakeDamage(): " .. Receiver:GetClass() .. " was dealt RawDamage " .. TDI.RawDamage .. ", FinalDamage " .. TDI.FinalDamage .. " (that is, " .. (TDI.RawDamage - TDI.FinalDamage) .. " HPs covered by armor)");
-end
-
-
-
+ +-- Global variables +PLUGIN = {} -- Reference to own plugin object + + + + + +function Initialize(Plugin) + PLUGIN = Plugin + + Plugin:SetName("HookNotify"); + Plugin:SetVersion(1); + + PluginManager = cPluginManager:Get(); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_BLOCK_TO_PICKUPS); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHAT); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_AVAILABLE); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_GENERATED); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_GENERATING); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_UNLOADED); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_UNLOADING); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_COLLECTING_PICKUP); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_CRAFTING_NO_RECIPE); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_DISCONNECT); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_EXECUTE_COMMAND); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_HANDSHAKE); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_KILLING); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_LOGIN); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_BREAKING_BLOCK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_BROKEN_BLOCK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_EATING); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_JOINED); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_LEFT_CLICK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_MOVING); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_PLACED_BLOCK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_PLACING_BLOCK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_RIGHT_CLICK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_SHOOTING); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_SPAWNED); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_TOSSING_ITEM); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USED_BLOCK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USED_ITEM); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USING_BLOCK); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USING_ITEM); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_POST_CRAFTING); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_PRE_CRAFTING); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_TAKE_DAMAGE); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_UPDATED_SIGN); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_UPDATING_SIGN); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_WEATHER_CHANGED); + PluginManager:AddHook(Plugin, cPluginManager.HOOK_WEATHER_CHANGING); + + LOGINFO("HookNotify plugin is installed, beware, the log output may be quite large!"); + LOGINFO("You want this plugin enabled only when developing another plugin, not for regular gameplay."); + + return true +end + + + + + +function LogHook(FnName, ...) + LOG(FnName .. "("); + for i, v in ipairs(arg) do + local vt = tostring(v); + local TypeString = type(v); + if (type(v) == "userdata") then + TypeString = tolua.type(v); + end; + LOG(" " .. tostring(i) .. ": " .. TypeString .. ": " .. tostring(v)); + end + LOG(")"); +end + + + + + +function OnBlockToPickups(...) + LogHook("OnBlockToPickups", unpack(arg)); + local World, Digger, BlockX, BlockY, BlockZ, BlockType, BlockMeta, Pickups = unpack(arg); + if (Pickups ~= nil) then + local Name = "NULL"; + if (Digger ~= nil) then + Name = Digger:GetName() + end + LOG("Got cItems from " .. Name .. ", trying to manipulate them."); + Pickups:Add(cItem:new(E_ITEM_DIAMOND_SHOVEL, 1)); + LOG("Current size: " .. Pickups:Size()); + end; +end; + + + + + +function OnChat(...) + LogHook("OnChat", unpack(arg)); +end + + + + + +function OnChunkAvailable(...) + LogHook("OnChunkAvailable", unpack(arg)); +end + + + + + +function OnChunkGenerated(...) + LogHook("OnChunkGenerated", unpack(arg)); +end + + + + + +function OnChunkGenerating(...) + LogHook("OnChunkGenerating", unpack(arg)); +end + + + + + +function OnChunkUnloaded(...) + LogHook("OnChunkUnloaded", unpack(arg)); +end + + + + + +function OnChunkUnloading(...) + LogHook("OnChunkUnloading", unpack(arg)); +end + + + + + +function OnPlayerUsingItem(...) + LogHook("OnPlayerUsingItem", unpack(arg)); +end + + + + + +function OnCollectingPickup(...) + LogHook("OnCollectingPickup", unpack(arg)); +end + + + + +function OnCraftingNoRecipe(...) + LogHook("OnCraftingNoRecipe", unpack(arg)); +end + + + + + +function OnDisconnect(...) + LogHook("OnDisconnect", unpack(arg)); +end + + + + + +function OnExecuteCommand(...) + LogHook("OnExecuteCommand", unpack(arg)); + + -- For some reason logging doesn't work for this callback, so list some stuff manually to verify: + LOG("arg1 type: " .. type(arg[1])); + if (arg[1] ~= nil) then + LOG("Player name: " .. arg[1]:GetName()); + end + LOG("Command: " .. arg[2][1]); +end + + + + + +function OnHandshake(...) + LogHook("OnHandshake", unpack(arg)); +end + + + + + +function OnKilling(...) + LogHook("OnKilling", unpack(arg)); +end + + + + + +function OnLogin(...) + LogHook("OnLogin", unpack(arg)); +end + + + + + +function OnPlayerBreakingBlock(...) + LogHook("OnPlayerBreakingBlock", unpack(arg)); +end + + + + + +function OnPlayerBrokenBlock(...) + LogHook("OnPlayerBrokenBlock", unpack(arg)); +end + + + + + +function OnPlayerEating(...) + LogHook("OnPlayerEating", unpack(arg)); +end + + + + + +function OnPlayerJoined(...) + LogHook("OnPlayerJoined", unpack(arg)); +end + + + + + +function OnPlayerLeftClick(...) + LogHook("OnPlayerLeftClick", unpack(arg)); +end + + + + + +function OnPlayerMoving(...) + LogHook("OnPlayerMoving", unpack(arg)); +end + + + + + +function OnPlayerPlacedBlock(...) + LogHook("OnPlayerPlacedBlock", unpack(arg)); +end + + + + + +function OnPlayerPlacingBlock(...) + LogHook("OnPlayerPlacingBlock", unpack(arg)); +end + + + + + +function OnPlayerRightClick(...) + LogHook("OnPlayerRightClick", unpack(arg)); +end + + + + + +function OnPlayerShooting(...) + LogHook("OnPlayerShooting", unpack(arg)); +end + + + + + +function OnPlayerSpawned(...) + LogHook("OnPlayerSpawned", unpack(arg)); +end + + + + + +function OnPlayerTossingItem(...) + LogHook("OnPlayerTossingItem", unpack(arg)); +end + + + + + +function OnPlayerUsedBlock(...) + LogHook("OnPlayerUsedBlock", unpack(arg)); +end + + + + + +function OnPlayerUsedItem(...) + LogHook("OnPlayerUsedItem", unpack(arg)); +end + + + + + +function OnPlayerUsingBlock(...) + LogHook("OnPlayerUsingBlock", unpack(arg)); +end + + + + + +function OnPlayerUsingItem(...) + LogHook("OnPlayerUsingItem", unpack(arg)); +end + + + + + +function OnPostCrafting(...) + LogHook("OnPostCrafting", unpack(arg)); +end + + + + + +function OnPreCrafting(...) + LogHook("OnPreCrafting", unpack(arg)); +end + + + + + +function OnUpdatedSign(...) + LogHook("OnUpdatedSign", unpack(arg)); +end + + + + + +function OnUpdatingSign(...) + LogHook("OnUpdatingSign", unpack(arg)); +end + + + + + +function OnWeatherChanged(...) + LogHook("OnWeatherChanged", unpack(arg)); +end + + + + + +function OnWeatherChanging(...) + LogHook("OnWeatherChanging", unpack(arg)); +end + + + + + +------------------------------------------------------------------ +-- Special handling for OnTakeDamage to print the contents of TDI: + +function OnTakeDamage(Receiver, TDI) + -- Receiver is cPawn + -- TDI is TakeDamageInfo + + LOG("OnTakeDamage(): " .. Receiver:GetClass() .. " was dealt RawDamage " .. TDI.RawDamage .. ", FinalDamage " .. TDI.FinalDamage .. " (that is, " .. (TDI.RawDamage - TDI.FinalDamage) .. " HPs covered by armor)"); +end + + + diff --git a/MCServer/Plugins/MagicCarpet/objects.lua b/MCServer/Plugins/MagicCarpet/objects.lua index 7c19fc232..8d81623a5 100644 --- a/MCServer/Plugins/MagicCarpet/objects.lua +++ b/MCServer/Plugins/MagicCarpet/objects.lua @@ -1,97 +1,97 @@ --- Location object
-cLocation = {}
-function cLocation:new( x, y, z )
- local object = { x = x, y = y, z = z }
- setmetatable(object, { __index = cLocation })
- return object
-end
-
--- Offsets
-cFibers = { }
-function cFibers:new()
- local object = {
- cLocation:new( 2, -1, 2 ),
- cLocation:new( 2, -1, 1 ),
- cLocation:new( 2, -1, 0 ),
- cLocation:new( 2, -1, -1 ),
- cLocation:new( 2, -1, -2 ),
- cLocation:new( 1, -1, 2 ),
- cLocation:new( 1, -1, 1 ),
- cLocation:new( 1, -1, 0 ),
- cLocation:new( 1, -1, -1 ),
- cLocation:new( 1, -1, -2 ),
- cLocation:new( 0, -1, 2 ),
- cLocation:new( 0, -1, 1 ),
- cLocation:new( 0, -1, 0 ),
- cLocation:new( 0, -1, -1 ),
- cLocation:new( 0, -1, -2 ),
- cLocation:new( -1, -1, 2 ),
- cLocation:new( -1, -1, 1 ),
- cLocation:new( -1, -1, 0 ),
- cLocation:new( -1, -1, -1 ),
- cLocation:new( -1, -1, -2 ),
- cLocation:new( -2, -1, 2 ),
- cLocation:new( -2, -1, 1 ),
- cLocation:new( -2, -1, 0 ),
- cLocation:new( -2, -1, -1 ),
- cLocation:new( -2, -1, -2 ),
- imadeit = false,
- }
- setmetatable(object, { __index = cFibers })
- return object;
-end
-
--- Carpet object
-cCarpet = {}
-function cCarpet:new()
- local object = { Location = cLocation:new(0,0,0),
- Fibers = cFibers:new(),
- }
- setmetatable(object, { __index = cCarpet })
- return object
-end
-
-function cCarpet:remove()
- local World = cRoot:Get():GetDefaultWorld()
- for i, fib in ipairs( self.Fibers ) do
- local x = self.Location.x + fib.x
- local y = self.Location.y + fib.y
- local z = self.Location.z + fib.z
- local BlockID = World:GetBlock( x, y, z )
- if( fib.imadeit == true and BlockID == E_BLOCK_GLASS ) then
- World:SetBlock( x, y, z, 0, 0 )
- fib.imadeit = false
- end
- end
-end
-
-function cCarpet:draw()
- local World = cRoot:Get():GetDefaultWorld()
- for i, fib in ipairs( self.Fibers ) do
- local x = self.Location.x + fib.x
- local y = self.Location.y + fib.y
- local z = self.Location.z + fib.z
- local BlockID = World:GetBlock( x, y, z )
- if( BlockID == 0 ) then
- fib.imadeit = true
- World:SetBlock( x, y, z, E_BLOCK_GLASS, 0 )
- else
- fib.imadeit = false
- end
- end
-end
-
-function cCarpet:moveTo( NewPos )
- local x = math.floor( NewPos.x )
- local y = math.floor( NewPos.y )
- local z = math.floor( NewPos.z )
- if( self.Location.x ~= x or self.Location.y ~= y or self.Location.z ~= z ) then
- self:remove()
- self.Location = cLocation:new( x, y, z )
- self:draw()
- end
-end
-
-function cCarpet:getY()
- return self.Location.y
+-- Location object +cLocation = {} +function cLocation:new( x, y, z ) + local object = { x = x, y = y, z = z } + setmetatable(object, { __index = cLocation }) + return object +end + +-- Offsets +cFibers = { } +function cFibers:new() + local object = { + cLocation:new( 2, -1, 2 ), + cLocation:new( 2, -1, 1 ), + cLocation:new( 2, -1, 0 ), + cLocation:new( 2, -1, -1 ), + cLocation:new( 2, -1, -2 ), + cLocation:new( 1, -1, 2 ), + cLocation:new( 1, -1, 1 ), + cLocation:new( 1, -1, 0 ), + cLocation:new( 1, -1, -1 ), + cLocation:new( 1, -1, -2 ), + cLocation:new( 0, -1, 2 ), + cLocation:new( 0, -1, 1 ), + cLocation:new( 0, -1, 0 ), + cLocation:new( 0, -1, -1 ), + cLocation:new( 0, -1, -2 ), + cLocation:new( -1, -1, 2 ), + cLocation:new( -1, -1, 1 ), + cLocation:new( -1, -1, 0 ), + cLocation:new( -1, -1, -1 ), + cLocation:new( -1, -1, -2 ), + cLocation:new( -2, -1, 2 ), + cLocation:new( -2, -1, 1 ), + cLocation:new( -2, -1, 0 ), + cLocation:new( -2, -1, -1 ), + cLocation:new( -2, -1, -2 ), + imadeit = false, + } + setmetatable(object, { __index = cFibers }) + return object; +end + +-- Carpet object +cCarpet = {} +function cCarpet:new() + local object = { Location = cLocation:new(0,0,0), + Fibers = cFibers:new(), + } + setmetatable(object, { __index = cCarpet }) + return object +end + +function cCarpet:remove() + local World = cRoot:Get():GetDefaultWorld() + for i, fib in ipairs( self.Fibers ) do + local x = self.Location.x + fib.x + local y = self.Location.y + fib.y + local z = self.Location.z + fib.z + local BlockID = World:GetBlock( x, y, z ) + if( fib.imadeit == true and BlockID == E_BLOCK_GLASS ) then + World:SetBlock( x, y, z, 0, 0 ) + fib.imadeit = false + end + end +end + +function cCarpet:draw() + local World = cRoot:Get():GetDefaultWorld() + for i, fib in ipairs( self.Fibers ) do + local x = self.Location.x + fib.x + local y = self.Location.y + fib.y + local z = self.Location.z + fib.z + local BlockID = World:GetBlock( x, y, z ) + if( BlockID == 0 ) then + fib.imadeit = true + World:SetBlock( x, y, z, E_BLOCK_GLASS, 0 ) + else + fib.imadeit = false + end + end +end + +function cCarpet:moveTo( NewPos ) + local x = math.floor( NewPos.x ) + local y = math.floor( NewPos.y ) + local z = math.floor( NewPos.z ) + if( self.Location.x ~= x or self.Location.y ~= y or self.Location.z ~= z ) then + self:remove() + self.Location = cLocation:new( x, y, z ) + self:draw() + end +end + +function cCarpet:getY() + return self.Location.y end
\ No newline at end of file diff --git a/MCServer/Plugins/ProtectionAreas/CommandHandlers.lua b/MCServer/Plugins/ProtectionAreas/CommandHandlers.lua index b943df060..26df73075 100644 --- a/MCServer/Plugins/ProtectionAreas/CommandHandlers.lua +++ b/MCServer/Plugins/ProtectionAreas/CommandHandlers.lua @@ -1,322 +1,322 @@ -
--- CommandHandlers.lua
--- Defines the individual command handlers
-
-
-
-
-
-function InitializeCommandHandlers()
- local PlgMgr = cRoot:Get():GetPluginManager();
- for idx, Cmd in ipairs(CommandReg()) do
- PlgMgr:BindCommand(Cmd[2], Cmd[3], Cmd[1], Cmd[4]);
- end
-end
-
-
-
-
-
---- Handles the ProtAdd command
-function HandleAddArea(a_Split, a_Player)
- -- Command syntax: ProtAdd username1 [username2] [username3] ...
- if (#a_Split < 2) then
- a_Player:SendMessage(g_Msgs.ErrExpectedListOfUsernames);
- return true;
- end
-
- -- Get the cuboid that the player had selected
- local CmdState = GetCommandStateForPlayer(a_Player);
- if (CmdState == nil) then
- a_Player:SendMessage(g_Msgs.ErrCmdStateNilAddArea);
- return true;
- end
- local Cuboid = CmdState:GetCurrentCuboid();
- if (Cuboid == nil) then
- a_Player:SendMessage(g_Msgs.ErrNoAreaWanded);
- return true;
- end
-
- -- Put all allowed players into a table:
- AllowedNames = {};
- for i = 2, #a_Split do
- table.insert(AllowedNames, a_Split[i]);
- end
-
- -- Add the area to the storage
- local AreaID = g_Storage:AddArea(Cuboid, a_Player:GetWorld():GetName(), a_Player:GetName(), AllowedNames);
- a_Player:SendMessage(string.format(g_Msgs.AreaAdded, AreaID));
-
- -- Reload all currently logged in players
- ReloadAllPlayersInWorld(a_Player:GetWorld():GetName());
-
- return true;
-end
-
-
-
-
-
-function HandleAddAreaCoords(a_Split, a_Player)
- -- Command syntax: ProtAddCoords x1 z1 x2 z2 username1 [username2] [username3] ...
- if (#a_Split < 6) then
- a_Player:SendMessage(g_Msgs.ErrExpectedCoordsUsernames);
- return true;
- end
-
- -- Convert the coords to a cCuboid
- local x1, z1 = tonumber(a_Split[2]), tonumber(a_Split[3]);
- local x2, z2 = tonumber(a_Split[4]), tonumber(a_Split[5]);
- if ((x1 == nil) or (z1 == nil) or (x2 == nil) or (z2 == nil)) then
- a_Player:SendMessage(g_Msgs.ErrParseCoords);
- return true;
- end
- local Cuboid = cCuboid(x1, 0, z1, x2, 255, z1);
- Cuboid:Sort();
-
- -- Put all allowed players into a table:
- AllowedNames = {};
- for i = 6, #a_Split do
- table.insert(AllowedNames, a_Split[i]);
- end
-
- -- Add the area to the storage
- local AreaID = g_Storage:AddArea(Cuboid, a_Player:GetWorld():GetName(), a_Player:GetName(), AllowedNames);
- a_Player:SendMessage(string.format(g_Msgs.AreaAdded, AreaID));
-
- -- Reload all currently logged in players
- ReloadAllPlayersInWorld(a_Player:GetWorld():GetName());
-
- return true;
-end
-
-
-
-
-
-function HandleAddAreaUser(a_Split, a_Player)
- -- Command syntax: ProtAddUser AreaID username1 [username2] [username3] ...
- if (#a_Split < 3) then
- a_Player:SendMessage(g_Msgs.ErrExpectedAreaIDUsernames);
- return true;
- end
-
- -- Put all allowed players into a table:
- AllowedNames = {};
- for i = 3, #a_Split do
- table.insert(AllowedNames, a_Split[i]);
- end
-
- -- Add the area to the storage
- if (not(g_Storage:AddAreaUsers(
- tonumber(a_Split[2]), a_Player:GetWorld():GetName(), a_Player:GetName(), AllowedNames))
- ) then
- LOGWARNING("g_Storage:AddAreaUsers failed");
- a_Player:SendMessage(g_Msgs.ErrDBFailAddUsers);
- return true;
- end
- if (#AllowedNames == 0) then
- a_Player:SendMessage(g_Msgs.AllUsersAlreadyAllowed);
- else
- a_Player:SendMessage(string.format(g_Msgs.UsersAdded, table.concat(AllowedNames, ", ")));
- end
-
- -- Reload all currently logged in players
- ReloadAllPlayersInWorld(a_Player:GetWorld():GetName());
-
- return true;
-end
-
-
-
-
-
-function HandleDelArea(a_Split, a_Player)
- -- Command syntax: ProtDelArea AreaID
- if (#a_Split ~= 2) then
- a_Player:SendMessage(g_Msgs.ErrExpectedAreaID);
- return true;
- end
-
- -- Parse the AreaID
- local AreaID = tonumber(a_Split[2]);
- if (AreaID == nil) then
- a_Player:SendMessage(g_Msgs.ErrParseAreaID);
- return true;
- end
-
- -- Delete the area
- g_Storage:DelArea(a_Player:GetWorld():GetName(), AreaID);
-
- a_Player:SendMessage(string.format(g_Msgs.AreaDeleted, AreaID));
- -- Reload all currently logged in players
- ReloadAllPlayersInWorld(a_Player:GetWorld():GetName());
-
- return true;
-end
-
-
-
-
-
-function HandleGiveWand(a_Split, a_Player)
- local NumGiven = a_Player:GetInventory():AddItem(cConfig:GetWandItem());
- if (NumGiven == 1) then
- a_Player:SendMessage(g_Msgs.WandGiven);
- else
- a_Player:SendMessage(g_Msgs.ErrNoSpaceForWand);
- end
- return true;
-end
-
-
-
-
-
-function HandleListAreas(a_Split, a_Player)
- -- Command syntax: ProtListAreas [x, z]
-
- local x, z;
- if (#a_Split == 1) then
- -- Get the last "wanded" coord
- local CmdState = GetCommandStateForPlayer(a_Player);
- if (CmdState == nil) then
- a_Player:SendMessage(g_Msgs.ErrCmdStateNilListAreas);
- return true;
- end
- x, z = CmdState:GetLastCoords();
- if ((x == nil) or (z == nil)) then
- a_Player:SendMessage(g_Msgs.ErrListNotWanded);
- return true;
- end
- elseif (#a_Split == 3) then
- -- Parse the coords from the command params
- x = tonumber(a_Split[2]);
- z = tonumber(a_Split[3]);
- if ((x == nil) or (z == nil)) then
- a_Player:SendMessage(g_Msgs.ErrParseCoordsListAreas);
- return true;
- end
- else
- -- Wrong number of params, report back to the user
- a_Player:SendMessage(g_Msgs.ErrSyntaxErrorListAreas);
- return true;
- end
-
- a_Player:SendMessage(string.format(g_Msgs.ListAreasHeader, x, z));
-
- -- List areas intersecting the coords
- local PlayerName = a_Player:GetName();
- local WorldName = a_Player:GetWorld():GetName();
- g_Storage:ForEachArea(x, z, WorldName,
- function(AreaID, MinX, MinZ, MaxX, MaxZ, CreatorName)
- local Coords = string.format("%s: {%d, %d} - {%d, %d} ", AreaID, MinX, MinZ, MaxX, MaxZ);
- local Allowance;
- if (g_Storage:IsAreaAllowed(AreaID, PlayerName, WorldName)) then
- Allowance = g_Msgs.AreaAllowed;
- else
- Allowance = g_Msgs.AreaNotAllowed;
- end
- a_Player:SendMessage(string.format(g_Msgs.ListAreasRow, Coords, Allowance, CreatorName));
- end
- );
-
- a_Player:SendMessage(g_Msgs.ListAreasFooter);
- return true;
-end
-
-
-
-
---- Lists all allowed users for a particular area
-function HandleListUsers(a_Split, a_Player)
- -- Command syntax: ProtListUsers AreaID
- if (#a_Split ~= 2) then
- a_Player:SendMessage(g_Msgs.ErrExpectedAreaID);
- end
-
- -- Get the general info about the area
- local AreaID = a_Split[2];
- local WorldName = a_Player:GetWorld():GetName();
- local MinX, MinZ, MaxX, MaxZ, CreatorName = g_Storage:GetArea(AreaID, WorldName);
- if (MinX == nil) then
- a_Player:SendMessage(string.format(g_Msgs.ErrNoSuchArea, AreaID));
- return true;
- end
-
- -- Send the header
- a_Player:SendMessage(string.format(g_Msgs.ListUsersHeader, AreaID, MinX, MinZ, MaxX, MaxZ, CreatorName));
-
- -- List and count the allowed users
- local NumUsers = 0;
- g_Storage:ForEachUserInArea(AreaID, WorldName,
- function(UserName)
- a_Player:SendMessage(string.format(g_Msgs.ListUsersRow, UserName));
- NumUsers = NumUsers + 1;
- end
- );
-
- -- Send the footer
- a_Player:SendMessage(string.format(g_Msgs.ListUsersFooter, AreaID, NumUsers));
-
- return true;
-end
-
-
-
-
-
-function HandleRemoveUser(a_Split, a_Player)
- -- Command syntax: ProtRemUser AreaID UserName
- if (#a_Split ~= 3) then
- a_Player:SendMessage(g_Msgs.ErrExpectedAreaIDUserName);
- return true;
- end
-
- -- Parse the AreaID
- local AreaID = tonumber(a_Split[2]);
- if (AreaID == nil) then
- a_Player:SendMessage(g_Msgs.ErrParseAreaID);
- return true;
- end
-
- -- Remove the user from the DB
- local UserName = a_Split[3];
- g_Storage:RemoveUser(AreaID, UserName, a_Player:GetWorld():GetName());
-
- -- Send confirmation
- a_Player:SendMessage(string.format(g_Msgs.RemovedUser, UserName, AreaID));
-
- -- Reload all currently logged in players
- ReloadAllPlayersInWorld(a_Player:GetWorld():GetName());
-
- return true;
-end
-
-
-
-
-
-function HandleRemoveUserAll(a_Split, a_Player)
- -- Command syntax: ProtRemUserAll UserName
- if (#a_Split ~= 2) then
- a_Player:SendMessage(g_Msgs.ErrExpectedUserName);
- return true;
- end
-
- -- Remove the user from the DB
- g_Storage:RemoveUserAll(a_Split[2], a_Player:GetWorld():GetName());
-
- -- Send confirmation
- a_Player:SendMessage(string.format(g_Msgs.RemovedUserAll, UserName));
-
- -- Reload all currently logged in players
- ReloadAllPlayersInWorld(a_Player:GetWorld():GetName());
-
- return true;
-end
-
-
-
-
-
+ +-- CommandHandlers.lua +-- Defines the individual command handlers + + + + + +function InitializeCommandHandlers() + local PlgMgr = cRoot:Get():GetPluginManager(); + for idx, Cmd in ipairs(CommandReg()) do + PlgMgr:BindCommand(Cmd[2], Cmd[3], Cmd[1], Cmd[4]); + end +end + + + + + +--- Handles the ProtAdd command +function HandleAddArea(a_Split, a_Player) + -- Command syntax: ProtAdd username1 [username2] [username3] ... + if (#a_Split < 2) then + a_Player:SendMessage(g_Msgs.ErrExpectedListOfUsernames); + return true; + end + + -- Get the cuboid that the player had selected + local CmdState = GetCommandStateForPlayer(a_Player); + if (CmdState == nil) then + a_Player:SendMessage(g_Msgs.ErrCmdStateNilAddArea); + return true; + end + local Cuboid = CmdState:GetCurrentCuboid(); + if (Cuboid == nil) then + a_Player:SendMessage(g_Msgs.ErrNoAreaWanded); + return true; + end + + -- Put all allowed players into a table: + AllowedNames = {}; + for i = 2, #a_Split do + table.insert(AllowedNames, a_Split[i]); + end + + -- Add the area to the storage + local AreaID = g_Storage:AddArea(Cuboid, a_Player:GetWorld():GetName(), a_Player:GetName(), AllowedNames); + a_Player:SendMessage(string.format(g_Msgs.AreaAdded, AreaID)); + + -- Reload all currently logged in players + ReloadAllPlayersInWorld(a_Player:GetWorld():GetName()); + + return true; +end + + + + + +function HandleAddAreaCoords(a_Split, a_Player) + -- Command syntax: ProtAddCoords x1 z1 x2 z2 username1 [username2] [username3] ... + if (#a_Split < 6) then + a_Player:SendMessage(g_Msgs.ErrExpectedCoordsUsernames); + return true; + end + + -- Convert the coords to a cCuboid + local x1, z1 = tonumber(a_Split[2]), tonumber(a_Split[3]); + local x2, z2 = tonumber(a_Split[4]), tonumber(a_Split[5]); + if ((x1 == nil) or (z1 == nil) or (x2 == nil) or (z2 == nil)) then + a_Player:SendMessage(g_Msgs.ErrParseCoords); + return true; + end + local Cuboid = cCuboid(x1, 0, z1, x2, 255, z1); + Cuboid:Sort(); + + -- Put all allowed players into a table: + AllowedNames = {}; + for i = 6, #a_Split do + table.insert(AllowedNames, a_Split[i]); + end + + -- Add the area to the storage + local AreaID = g_Storage:AddArea(Cuboid, a_Player:GetWorld():GetName(), a_Player:GetName(), AllowedNames); + a_Player:SendMessage(string.format(g_Msgs.AreaAdded, AreaID)); + + -- Reload all currently logged in players + ReloadAllPlayersInWorld(a_Player:GetWorld():GetName()); + + return true; +end + + + + + +function HandleAddAreaUser(a_Split, a_Player) + -- Command syntax: ProtAddUser AreaID username1 [username2] [username3] ... + if (#a_Split < 3) then + a_Player:SendMessage(g_Msgs.ErrExpectedAreaIDUsernames); + return true; + end + + -- Put all allowed players into a table: + AllowedNames = {}; + for i = 3, #a_Split do + table.insert(AllowedNames, a_Split[i]); + end + + -- Add the area to the storage + if (not(g_Storage:AddAreaUsers( + tonumber(a_Split[2]), a_Player:GetWorld():GetName(), a_Player:GetName(), AllowedNames)) + ) then + LOGWARNING("g_Storage:AddAreaUsers failed"); + a_Player:SendMessage(g_Msgs.ErrDBFailAddUsers); + return true; + end + if (#AllowedNames == 0) then + a_Player:SendMessage(g_Msgs.AllUsersAlreadyAllowed); + else + a_Player:SendMessage(string.format(g_Msgs.UsersAdded, table.concat(AllowedNames, ", "))); + end + + -- Reload all currently logged in players + ReloadAllPlayersInWorld(a_Player:GetWorld():GetName()); + + return true; +end + + + + + +function HandleDelArea(a_Split, a_Player) + -- Command syntax: ProtDelArea AreaID + if (#a_Split ~= 2) then + a_Player:SendMessage(g_Msgs.ErrExpectedAreaID); + return true; + end + + -- Parse the AreaID + local AreaID = tonumber(a_Split[2]); + if (AreaID == nil) then + a_Player:SendMessage(g_Msgs.ErrParseAreaID); + return true; + end + + -- Delete the area + g_Storage:DelArea(a_Player:GetWorld():GetName(), AreaID); + + a_Player:SendMessage(string.format(g_Msgs.AreaDeleted, AreaID)); + -- Reload all currently logged in players + ReloadAllPlayersInWorld(a_Player:GetWorld():GetName()); + + return true; +end + + + + + +function HandleGiveWand(a_Split, a_Player) + local NumGiven = a_Player:GetInventory():AddItem(cConfig:GetWandItem()); + if (NumGiven == 1) then + a_Player:SendMessage(g_Msgs.WandGiven); + else + a_Player:SendMessage(g_Msgs.ErrNoSpaceForWand); + end + return true; +end + + + + + +function HandleListAreas(a_Split, a_Player) + -- Command syntax: ProtListAreas [x, z] + + local x, z; + if (#a_Split == 1) then + -- Get the last "wanded" coord + local CmdState = GetCommandStateForPlayer(a_Player); + if (CmdState == nil) then + a_Player:SendMessage(g_Msgs.ErrCmdStateNilListAreas); + return true; + end + x, z = CmdState:GetLastCoords(); + if ((x == nil) or (z == nil)) then + a_Player:SendMessage(g_Msgs.ErrListNotWanded); + return true; + end + elseif (#a_Split == 3) then + -- Parse the coords from the command params + x = tonumber(a_Split[2]); + z = tonumber(a_Split[3]); + if ((x == nil) or (z == nil)) then + a_Player:SendMessage(g_Msgs.ErrParseCoordsListAreas); + return true; + end + else + -- Wrong number of params, report back to the user + a_Player:SendMessage(g_Msgs.ErrSyntaxErrorListAreas); + return true; + end + + a_Player:SendMessage(string.format(g_Msgs.ListAreasHeader, x, z)); + + -- List areas intersecting the coords + local PlayerName = a_Player:GetName(); + local WorldName = a_Player:GetWorld():GetName(); + g_Storage:ForEachArea(x, z, WorldName, + function(AreaID, MinX, MinZ, MaxX, MaxZ, CreatorName) + local Coords = string.format("%s: {%d, %d} - {%d, %d} ", AreaID, MinX, MinZ, MaxX, MaxZ); + local Allowance; + if (g_Storage:IsAreaAllowed(AreaID, PlayerName, WorldName)) then + Allowance = g_Msgs.AreaAllowed; + else + Allowance = g_Msgs.AreaNotAllowed; + end + a_Player:SendMessage(string.format(g_Msgs.ListAreasRow, Coords, Allowance, CreatorName)); + end + ); + + a_Player:SendMessage(g_Msgs.ListAreasFooter); + return true; +end + + + + +--- Lists all allowed users for a particular area +function HandleListUsers(a_Split, a_Player) + -- Command syntax: ProtListUsers AreaID + if (#a_Split ~= 2) then + a_Player:SendMessage(g_Msgs.ErrExpectedAreaID); + end + + -- Get the general info about the area + local AreaID = a_Split[2]; + local WorldName = a_Player:GetWorld():GetName(); + local MinX, MinZ, MaxX, MaxZ, CreatorName = g_Storage:GetArea(AreaID, WorldName); + if (MinX == nil) then + a_Player:SendMessage(string.format(g_Msgs.ErrNoSuchArea, AreaID)); + return true; + end + + -- Send the header + a_Player:SendMessage(string.format(g_Msgs.ListUsersHeader, AreaID, MinX, MinZ, MaxX, MaxZ, CreatorName)); + + -- List and count the allowed users + local NumUsers = 0; + g_Storage:ForEachUserInArea(AreaID, WorldName, + function(UserName) + a_Player:SendMessage(string.format(g_Msgs.ListUsersRow, UserName)); + NumUsers = NumUsers + 1; + end + ); + + -- Send the footer + a_Player:SendMessage(string.format(g_Msgs.ListUsersFooter, AreaID, NumUsers)); + + return true; +end + + + + + +function HandleRemoveUser(a_Split, a_Player) + -- Command syntax: ProtRemUser AreaID UserName + if (#a_Split ~= 3) then + a_Player:SendMessage(g_Msgs.ErrExpectedAreaIDUserName); + return true; + end + + -- Parse the AreaID + local AreaID = tonumber(a_Split[2]); + if (AreaID == nil) then + a_Player:SendMessage(g_Msgs.ErrParseAreaID); + return true; + end + + -- Remove the user from the DB + local UserName = a_Split[3]; + g_Storage:RemoveUser(AreaID, UserName, a_Player:GetWorld():GetName()); + + -- Send confirmation + a_Player:SendMessage(string.format(g_Msgs.RemovedUser, UserName, AreaID)); + + -- Reload all currently logged in players + ReloadAllPlayersInWorld(a_Player:GetWorld():GetName()); + + return true; +end + + + + + +function HandleRemoveUserAll(a_Split, a_Player) + -- Command syntax: ProtRemUserAll UserName + if (#a_Split ~= 2) then + a_Player:SendMessage(g_Msgs.ErrExpectedUserName); + return true; + end + + -- Remove the user from the DB + g_Storage:RemoveUserAll(a_Split[2], a_Player:GetWorld():GetName()); + + -- Send confirmation + a_Player:SendMessage(string.format(g_Msgs.RemovedUserAll, UserName)); + + -- Reload all currently logged in players + ReloadAllPlayersInWorld(a_Player:GetWorld():GetName()); + + return true; +end + + + + + diff --git a/MCServer/Plugins/ProtectionAreas/CommandState.lua b/MCServer/Plugins/ProtectionAreas/CommandState.lua index 2911688a8..f6d33d356 100644 --- a/MCServer/Plugins/ProtectionAreas/CommandState.lua +++ b/MCServer/Plugins/ProtectionAreas/CommandState.lua @@ -1,121 +1,121 @@ -
--- CommandState.lua
-
--- Implements the cCommandState class representing a command state for each VIP player
-
---[[
-The command state holds internal info, such as the coords they selected using the wand
-The command state needs to be held in a per-entity manner, so that we can support multiple logins
-from the same account (just for the fun of it)
-The OOP class implementation follows the PiL 16.1
-
-Also, a global table g_CommandStates is the map of PlayerEntityID -> cCommandState
---]]
-
-
-
-
-
-cCommandState = {
- -- Default coords
- m_Coords1 = {x = 0, z = 0}; -- lclk coords
- m_Coords2 = {x = 0, z = 0}; -- rclk coords
- m_LastCoords = 0; -- When Coords1 or Coords2 is set, this gets set to 1 or 2, signifying the last changed set of coords
- m_HasCoords1 = false; -- Set to true when m_Coords1 has been set by the user
- m_HasCoords2 = false; -- Set to true when m_Coords2 has been set by the user
-};
-
-g_CommandStates = {};
-
-
-
-
-
-function cCommandState:new(obj)
- obj = obj or {};
- setmetatable(obj, self);
- self.__index = self;
- return obj;
-end
-
-
-
-
-
---- Returns the current coord pair as a cCuboid object
-function cCommandState:GetCurrentCuboid()
- if (not(self.m_HasCoords1) or not(self.m_HasCoords2)) then
- -- Some of the coords haven't been set yet
- return nil;
- end
-
- local res = cCuboid(
- self.m_Coords1.x, 0, self.m_Coords1.z,
- self.m_Coords2.x, 255, self.m_Coords2.z
- );
- res:Sort();
- return res;
-end
-
-
-
-
-
---- Returns the x, z coords that were the set last,
--- That is, either m_Coords1 or m_Coords2, based on m_LastCoords member
--- Returns nothing if no coords were set yet
-function cCommandState:GetLastCoords()
- if (self.m_LastCoords == 0) then
- -- No coords have been set yet
- return;
- elseif (self.m_LastCoords == 1) then
- return self.m_Coords1.x, self.m_Coords1.z;
- elseif (self.m_LastCoords == 2) then
- return self.m_Coords2.x, self.m_Coords2.z;
- else
- LOGWARNING(PluginPrefix .. "cCommandState is in an unexpected state, m_LastCoords == " .. self.m_LastCoords);
- return;
- end
-end
-
-
-
-
-
---- Sets the first set of coords (upon rclk with a wand)
-function cCommandState:SetCoords1(a_BlockX, a_BlockZ)
- self.m_Coords1.x = a_BlockX;
- self.m_Coords1.z = a_BlockZ;
- self.m_LastCoords = 1;
- self.m_HasCoords1 = true;
-end
-
-
-
-
-
---- Sets the second set of coords (upon lclk with a wand)
-function cCommandState:SetCoords2(a_BlockX, a_BlockZ)
- self.m_Coords2.x = a_BlockX;
- self.m_Coords2.z = a_BlockZ;
- self.m_LastCoords = 2;
- self.m_HasCoords2 = true;
-end
-
-
-
-
-
---- Returns the cCommandState for the specified player; creates one if not existant
-function GetCommandStateForPlayer(a_Player)
- local res = g_CommandStates[a_Player:GetUniqueID()];
- if (res == nil) then
- res = cCommandState:new();
- g_CommandStates[a_Player:GetUniqueID()] = res;
- end
- return res;
-end;
-
-
-
-
+ +-- CommandState.lua + +-- Implements the cCommandState class representing a command state for each VIP player + +--[[ +The command state holds internal info, such as the coords they selected using the wand +The command state needs to be held in a per-entity manner, so that we can support multiple logins +from the same account (just for the fun of it) +The OOP class implementation follows the PiL 16.1 + +Also, a global table g_CommandStates is the map of PlayerEntityID -> cCommandState +--]] + + + + + +cCommandState = { + -- Default coords + m_Coords1 = {x = 0, z = 0}; -- lclk coords + m_Coords2 = {x = 0, z = 0}; -- rclk coords + m_LastCoords = 0; -- When Coords1 or Coords2 is set, this gets set to 1 or 2, signifying the last changed set of coords + m_HasCoords1 = false; -- Set to true when m_Coords1 has been set by the user + m_HasCoords2 = false; -- Set to true when m_Coords2 has been set by the user +}; + +g_CommandStates = {}; + + + + + +function cCommandState:new(obj) + obj = obj or {}; + setmetatable(obj, self); + self.__index = self; + return obj; +end + + + + + +--- Returns the current coord pair as a cCuboid object +function cCommandState:GetCurrentCuboid() + if (not(self.m_HasCoords1) or not(self.m_HasCoords2)) then + -- Some of the coords haven't been set yet + return nil; + end + + local res = cCuboid( + self.m_Coords1.x, 0, self.m_Coords1.z, + self.m_Coords2.x, 255, self.m_Coords2.z + ); + res:Sort(); + return res; +end + + + + + +--- Returns the x, z coords that were the set last, +-- That is, either m_Coords1 or m_Coords2, based on m_LastCoords member +-- Returns nothing if no coords were set yet +function cCommandState:GetLastCoords() + if (self.m_LastCoords == 0) then + -- No coords have been set yet + return; + elseif (self.m_LastCoords == 1) then + return self.m_Coords1.x, self.m_Coords1.z; + elseif (self.m_LastCoords == 2) then + return self.m_Coords2.x, self.m_Coords2.z; + else + LOGWARNING(PluginPrefix .. "cCommandState is in an unexpected state, m_LastCoords == " .. self.m_LastCoords); + return; + end +end + + + + + +--- Sets the first set of coords (upon rclk with a wand) +function cCommandState:SetCoords1(a_BlockX, a_BlockZ) + self.m_Coords1.x = a_BlockX; + self.m_Coords1.z = a_BlockZ; + self.m_LastCoords = 1; + self.m_HasCoords1 = true; +end + + + + + +--- Sets the second set of coords (upon lclk with a wand) +function cCommandState:SetCoords2(a_BlockX, a_BlockZ) + self.m_Coords2.x = a_BlockX; + self.m_Coords2.z = a_BlockZ; + self.m_LastCoords = 2; + self.m_HasCoords2 = true; +end + + + + + +--- Returns the cCommandState for the specified player; creates one if not existant +function GetCommandStateForPlayer(a_Player) + local res = g_CommandStates[a_Player:GetUniqueID()]; + if (res == nil) then + res = cCommandState:new(); + g_CommandStates[a_Player:GetUniqueID()] = res; + end + return res; +end; + + + + diff --git a/MCServer/Plugins/ProtectionAreas/Config.lua b/MCServer/Plugins/ProtectionAreas/Config.lua index b6fe34535..b40be0c75 100644 --- a/MCServer/Plugins/ProtectionAreas/Config.lua +++ b/MCServer/Plugins/ProtectionAreas/Config.lua @@ -1,55 +1,55 @@ -
--- Config.lua
-
--- Implements the cConfig class that holds the general plugin configuration
-
-
-
-
-
-cConfig = {
- m_Wand = cItem(E_ITEM_STICK, 1, 1); -- The item to be used as the selection wand
- m_AllowInteractNoArea = true; -- If there's no area, is a player allowed to build / dig?
-};
-
-
-
-
-
---- Initializes the cConfig object, loads the configuration from an INI file
-function InitializeConfig()
- local ini = cIniFile("ProtectionAreas.ini");
- if (not(ini:ReadFile())) then
- LOGINFO(PluginPrefix .. "Cannot read ProtectionAreas.ini, all plugin configuration is set to defaults");
- end
- local WandItem = cItem();
- if (
- StringToItem(ini:GetValueSet("ProtectionAreas", "WandItem", ItemToString(cConfig.m_Wand)), WandItem) and
- IsValidItem(WandItem.m_ItemType)
- ) then
- cConfig.m_Wand = WandItem;
- end
- cConfig.m_AllowInteractNoArea = ini:GetValueSetB("ProtectionAreas", "AllowInteractNoArea", cConfig.m_AllowInteractNoArea);
- ini:WriteFile();
-end
-
-
-
-
-
---- Returns true if a_Item is the wand tool item
-function cConfig:IsWand(a_Item)
- return (
- (a_Item.m_ItemType == self.m_Wand.m_ItemType) and
- (a_Item.m_ItemDamage == self.m_Wand.m_ItemDamage)
- );
-end
-
-
-
-
-
---- Returns the wand tool item as a cItem object
-function cConfig:GetWandItem()
- return self.m_Wand;
+ +-- Config.lua + +-- Implements the cConfig class that holds the general plugin configuration + + + + + +cConfig = { + m_Wand = cItem(E_ITEM_STICK, 1, 1); -- The item to be used as the selection wand + m_AllowInteractNoArea = true; -- If there's no area, is a player allowed to build / dig? +}; + + + + + +--- Initializes the cConfig object, loads the configuration from an INI file +function InitializeConfig() + local ini = cIniFile("ProtectionAreas.ini"); + if (not(ini:ReadFile())) then + LOGINFO(PluginPrefix .. "Cannot read ProtectionAreas.ini, all plugin configuration is set to defaults"); + end + local WandItem = cItem(); + if ( + StringToItem(ini:GetValueSet("ProtectionAreas", "WandItem", ItemToString(cConfig.m_Wand)), WandItem) and + IsValidItem(WandItem.m_ItemType) + ) then + cConfig.m_Wand = WandItem; + end + cConfig.m_AllowInteractNoArea = ini:GetValueSetB("ProtectionAreas", "AllowInteractNoArea", cConfig.m_AllowInteractNoArea); + ini:WriteFile(); +end + + + + + +--- Returns true if a_Item is the wand tool item +function cConfig:IsWand(a_Item) + return ( + (a_Item.m_ItemType == self.m_Wand.m_ItemType) and + (a_Item.m_ItemDamage == self.m_Wand.m_ItemDamage) + ); +end + + + + + +--- Returns the wand tool item as a cItem object +function cConfig:GetWandItem() + return self.m_Wand; end
\ No newline at end of file diff --git a/MCServer/Plugins/ProtectionAreas/CurrentLng.lua b/MCServer/Plugins/ProtectionAreas/CurrentLng.lua index b0ad3863c..37ff135c5 100644 --- a/MCServer/Plugins/ProtectionAreas/CurrentLng.lua +++ b/MCServer/Plugins/ProtectionAreas/CurrentLng.lua @@ -1,76 +1,76 @@ -
--- CurrentLng.lua
--- This file provides all the translatable strings
--- The expectation is that the translators will create copies of this file, translate the texts and then the users will overwrite this file with a specific language version
--- Note that the individual languages must not have ".lua" extension, otherwise MCServer will load them and the plugin won't work!
-
-
-
-
--- Individual commands, and their help strings. Don't touch the first symbol on each line!
--- This needs to be implemented as a function, because it references other functions which might not yet be loaded while Lua is processing the globals
-
-function CommandReg()
- return {
- -- Handler function | Command | Permission | Help text
- {HandleAddArea, "/ProtAdd", "Prot.Add", "<UserNames> - Adds a new protected area"},
- {HandleAddAreaCoords, "/ProtAddCoords", "Prot.Add", "<x1> <z1> <x2> <z2> <UserNames> - Adds a new protected area by coords"},
- {HandleAddAreaUser, "/ProtAddUser", "Prot.AddUser", "<AreaID> <UserNames> - Adds new users to an existing protected area"},
- {HandleDelArea, "/ProtDelID", "Prot.Del", "<AreaID> - Deletes a protected area by ID"},
- {HandleGiveWand, "/ProtWand", "Prot.Wand", " - Gives you the wand used for protection"},
- {HandleListAreas, "/ProtList", "Prot.List", "[<x> <z>] - Lists all areas for the marked block or given coords"},
- {HandleListUsers, "/ProtUsers", "Prot.List", "<AreaID> - Lists all allowed users for a given area ID"},
- {HandleRemoveUser, "/ProtRemUser", "Prot.RemUser", "<AreaID> <UserName> - Removes a user from the protected area"},
- {HandleRemoveUserAll, "/ProtRemUserAll", "Prot.RemUser", "<UserName> - Removes a user from all protected areas"},
- };
-end;
-
-
-
-
-
---- Messages sent to players
-g_Msgs =
-{
- AllUsersAlreadyAllowed = "All the specified users were already allowed.";
- AreaAdded = "Area added, ID %s";
- AreaAllowed = "Allowed";
- AreaDeleted = "Area ID %s deleted";
- AreaNotAllowed = "NOT allowed";
- Coords1Set = "Coords1 set as {%d, %d}";
- Coords2Set = "Coords2 set as {%d, %d}";
- ErrCmdStateNilAddArea = "Cannot add area, internal plugin error (CmdState == nil)";
- ErrCmdStateNilListAreas = "Cannot list areas, internal plugin error (CmdState == nil)";
- ErrDBFailAddUsers = "Cannot add users, DB failure";
- ErrExpectedAreaID = "Parameter mismatch. Expected <AreaID>.";
- ErrExpectedAreaIDUserName = "Parameter mismatch. Expected <AreaID> <UserName>.";
- ErrExpectedAreaIDUsernames = "Not enough parameters. Expected <AreaID> and a list of usernames.";
- ErrExpectedCoordsUsernames = "Not enough parameters. Expected <x1> <z1> <x2> <z2> coords and a list of usernames.";
- ErrExpectedListOfUsernames = "Not enough parameters. Expected a list of usernames.";
- ErrExpectedUserName = "Parameter mismatch. Expected <UserName>.";
- ErrListNotWanded = "Cannot list areas, no query point has been selected. Use a ProtWand lclk / rclk to select a point first";
- ErrNoAreaWanded = "Cannot add area, no area has been selected. Use a ProtWand lclk / rclk to select area first";
- ErrNoSpaceForWand = "Cannot give wand, no space in your inventory";
- ErrNoSuchArea = "No such area: %s";
- ErrParseAreaID = "Cannot parse <AreaID>.";
- ErrParseCoords = "Cannot parse coords.";
- ErrParseCoordsListAreas = "Cannot list areas, cannot parse coords in params";
- ErrSyntaxErrorListAreas = "Cannot list areas, syntax error. Expected either no params or <x> <z>.";
- ListAreasFooter = "Area list finished";
- ListAreasHeader = "Listing protection areas intersecting block column {%d, %d}:";
- ListAreasRow = " %s, %s, created by %s";
- ListUsersFooter = "End of area %s user list, total %d users";
- ListUsersHeader = "Area ID %s: {%d, %d} - {%d, %d}, created by %s; allowed users:";
- ListUsersRow = " %s";
- NotAllowedToBuild = "You are not allowed to build here!";
- NotAllowedToDig = "You are not allowed to dig here!";
- RemovedUser = "Removed %s from area %d";
- RemovedUserAll = "Removed %s from all areas";
- UsersAdded = "Users added: %s";
- WandGiven = "Wand given";
-} ;
-
-
-
-
-
+ +-- CurrentLng.lua +-- This file provides all the translatable strings +-- The expectation is that the translators will create copies of this file, translate the texts and then the users will overwrite this file with a specific language version +-- Note that the individual languages must not have ".lua" extension, otherwise MCServer will load them and the plugin won't work! + + + + +-- Individual commands, and their help strings. Don't touch the first symbol on each line! +-- This needs to be implemented as a function, because it references other functions which might not yet be loaded while Lua is processing the globals + +function CommandReg() + return { + -- Handler function | Command | Permission | Help text + {HandleAddArea, "/ProtAdd", "Prot.Add", "<UserNames> - Adds a new protected area"}, + {HandleAddAreaCoords, "/ProtAddCoords", "Prot.Add", "<x1> <z1> <x2> <z2> <UserNames> - Adds a new protected area by coords"}, + {HandleAddAreaUser, "/ProtAddUser", "Prot.AddUser", "<AreaID> <UserNames> - Adds new users to an existing protected area"}, + {HandleDelArea, "/ProtDelID", "Prot.Del", "<AreaID> - Deletes a protected area by ID"}, + {HandleGiveWand, "/ProtWand", "Prot.Wand", " - Gives you the wand used for protection"}, + {HandleListAreas, "/ProtList", "Prot.List", "[<x> <z>] - Lists all areas for the marked block or given coords"}, + {HandleListUsers, "/ProtUsers", "Prot.List", "<AreaID> - Lists all allowed users for a given area ID"}, + {HandleRemoveUser, "/ProtRemUser", "Prot.RemUser", "<AreaID> <UserName> - Removes a user from the protected area"}, + {HandleRemoveUserAll, "/ProtRemUserAll", "Prot.RemUser", "<UserName> - Removes a user from all protected areas"}, + }; +end; + + + + + +--- Messages sent to players +g_Msgs = +{ + AllUsersAlreadyAllowed = "All the specified users were already allowed."; + AreaAdded = "Area added, ID %s"; + AreaAllowed = "Allowed"; + AreaDeleted = "Area ID %s deleted"; + AreaNotAllowed = "NOT allowed"; + Coords1Set = "Coords1 set as {%d, %d}"; + Coords2Set = "Coords2 set as {%d, %d}"; + ErrCmdStateNilAddArea = "Cannot add area, internal plugin error (CmdState == nil)"; + ErrCmdStateNilListAreas = "Cannot list areas, internal plugin error (CmdState == nil)"; + ErrDBFailAddUsers = "Cannot add users, DB failure"; + ErrExpectedAreaID = "Parameter mismatch. Expected <AreaID>."; + ErrExpectedAreaIDUserName = "Parameter mismatch. Expected <AreaID> <UserName>."; + ErrExpectedAreaIDUsernames = "Not enough parameters. Expected <AreaID> and a list of usernames."; + ErrExpectedCoordsUsernames = "Not enough parameters. Expected <x1> <z1> <x2> <z2> coords and a list of usernames."; + ErrExpectedListOfUsernames = "Not enough parameters. Expected a list of usernames."; + ErrExpectedUserName = "Parameter mismatch. Expected <UserName>."; + ErrListNotWanded = "Cannot list areas, no query point has been selected. Use a ProtWand lclk / rclk to select a point first"; + ErrNoAreaWanded = "Cannot add area, no area has been selected. Use a ProtWand lclk / rclk to select area first"; + ErrNoSpaceForWand = "Cannot give wand, no space in your inventory"; + ErrNoSuchArea = "No such area: %s"; + ErrParseAreaID = "Cannot parse <AreaID>."; + ErrParseCoords = "Cannot parse coords."; + ErrParseCoordsListAreas = "Cannot list areas, cannot parse coords in params"; + ErrSyntaxErrorListAreas = "Cannot list areas, syntax error. Expected either no params or <x> <z>."; + ListAreasFooter = "Area list finished"; + ListAreasHeader = "Listing protection areas intersecting block column {%d, %d}:"; + ListAreasRow = " %s, %s, created by %s"; + ListUsersFooter = "End of area %s user list, total %d users"; + ListUsersHeader = "Area ID %s: {%d, %d} - {%d, %d}, created by %s; allowed users:"; + ListUsersRow = " %s"; + NotAllowedToBuild = "You are not allowed to build here!"; + NotAllowedToDig = "You are not allowed to dig here!"; + RemovedUser = "Removed %s from area %d"; + RemovedUserAll = "Removed %s from all areas"; + UsersAdded = "Users added: %s"; + WandGiven = "Wand given"; +} ; + + + + + diff --git a/MCServer/Plugins/ProtectionAreas/HookHandlers.lua b/MCServer/Plugins/ProtectionAreas/HookHandlers.lua index 18fd4fa03..ded64d298 100644 --- a/MCServer/Plugins/ProtectionAreas/HookHandlers.lua +++ b/MCServer/Plugins/ProtectionAreas/HookHandlers.lua @@ -1,139 +1,139 @@ -
--- HookHandlers.lua
--- Implements the handlers for individual hooks
-
-
-
-
-
---- Registers all the hooks that the plugin needs to know about
-function InitializeHooks(a_Plugin)
- local PlgMgr = cRoot:Get():GetPluginManager();
- PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_DISCONNECT);
- PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_PLAYER_LEFT_CLICK);
- PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_PLAYER_MOVING);
- PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_PLAYER_RIGHT_CLICK);
- PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_PLAYER_SPAWNED);
-end
-
-
-
-
-
---- Called by MCS when a player's connectino is lost - either they disconnected or timed out
-function OnDisconnect(a_Player, a_Reason)
- -- Remove the player's cProtectionArea object
- g_PlayerAreas[a_Player:GetUniqueID()] = nil;
-
- -- If the player is a VIP, they had a command state, remove that as well
- g_CommandStates[a_Player:GetUniqueID()] = nil;
-
- return false;
-end;
-
-
-
-
-
---- Called by MCS whenever a player enters a world (is spawned)
-function OnPlayerSpawned(a_Player)
- -- Create a new cPlayerAreas object for this player
- if (g_PlayerAreas[a_Player:GetUniqueID()] == nil) then
- LoadPlayerAreas(a_Player);
- end;
-
- return false;
-end
-
-
-
-
-
---- Called by MCS whenever a player is moving (at most once every tick)
-function OnPlayerMoving(a_Player)
- local PlayerID = a_Player:GetUniqueID();
-
- -- If for some reason we don't have a cPlayerAreas object for this player, load it up
- local PlayerAreas = g_PlayerAreas[PlayerID];
- if (PlayerAreas == nil) then
- LoadPlayerAreas(a_Player);
- return false;
- end;
-
- -- If the player is outside their areas' safe space, reload
- if (not(PlayerAreas:IsInSafe(a_Player:GetPosX(), a_Player:GetPosZ()))) then
- LoadPlayerAreas(a_Player);
- end
- return false;
-end
-
-
-
-
-
---- Called by MCS when a player left-clicks
-function OnPlayerLeftClick(a_Player, a_BlockX, a_BlockY, a_BlockZ, a_BlockFace, a_Status)
- -- If the player has lclked with the wand; regardless of their permissions, let's set the coords:
- if (cConfig:IsWand(a_Player:GetEquippedItem())) then
- -- BlockFace < 0 means "use item", for which the coords are not given by the client
- if (a_BlockFace < 0) then
- return true;
- end
-
- -- Convert the clicked coords into the block space
- a_BlockX, a_BlockY, a_BlockZ = AddFaceDirection(a_BlockX, a_BlockY, a_BlockZ, a_BlockFace);
-
- -- Set the coords in the CommandState
- GetCommandStateForPlayer(a_Player):SetCoords1(a_BlockX, a_BlockZ);
- a_Player:SendMessage(string.format(g_Msgs.Coords1Set, a_BlockX, a_BlockZ));
- return true;
- end;
-
- -- Check the player areas to see whether to disable this action
- local Areas = g_PlayerAreas[a_Player:GetUniqueID()];
- if not(Areas:CanInteractWithBlock(a_BlockX, a_BlockZ)) then
- a_Player:SendMessage(g_Msgs.NotAllowedToDig);
- return true;
- end
-
- -- Allow interaction
- return false;
-end
-
-
-
-
-
---- Called by MCS when a player right-clicks
-function OnPlayerRightClick(a_Player, a_BlockX, a_BlockY, a_BlockZ, a_BlockFace, a_CursorX, a_CursorY, a_CursorZ, a_Status)
-
- -- BlockFace < 0 means "use item", for which the coords are not given by the client
- if (a_BlockFace < 0) then
- return true;
- end
-
- -- Convert the clicked coords into the block space
- a_BlockX, a_BlockY, a_BlockZ = AddFaceDirection(a_BlockX, a_BlockY, a_BlockZ, a_BlockFace);
-
- -- If the player has rclked with the wand; regardless of their permissions, let's set the coords
- if (cConfig:IsWand(a_Player:GetEquippedItem())) then
- -- Set the coords in the CommandState
- GetCommandStateForPlayer(a_Player):SetCoords2(a_BlockX, a_BlockZ);
- a_Player:SendMessage(string.format(g_Msgs.Coords2Set, a_BlockX, a_BlockZ));
- return true;
- end;
-
- -- Check the player areas to see whether to disable this action
- local Areas = g_PlayerAreas[a_Player:GetUniqueID()];
- if not(Areas:CanInteractWithBlock(a_BlockX, a_BlockZ)) then
- a_Player:SendMessage(g_Msgs.NotAllowedToBuild);
- return true;
- end
-
- -- Allow interaction
- return false;
-end
-
-
-
-
+ +-- HookHandlers.lua +-- Implements the handlers for individual hooks + + + + + +--- Registers all the hooks that the plugin needs to know about +function InitializeHooks(a_Plugin) + local PlgMgr = cRoot:Get():GetPluginManager(); + PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_DISCONNECT); + PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_PLAYER_LEFT_CLICK); + PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_PLAYER_MOVING); + PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_PLAYER_RIGHT_CLICK); + PlgMgr:AddHook(a_Plugin, cPluginManager.HOOK_PLAYER_SPAWNED); +end + + + + + +--- Called by MCS when a player's connectino is lost - either they disconnected or timed out +function OnDisconnect(a_Player, a_Reason) + -- Remove the player's cProtectionArea object + g_PlayerAreas[a_Player:GetUniqueID()] = nil; + + -- If the player is a VIP, they had a command state, remove that as well + g_CommandStates[a_Player:GetUniqueID()] = nil; + + return false; +end; + + + + + +--- Called by MCS whenever a player enters a world (is spawned) +function OnPlayerSpawned(a_Player) + -- Create a new cPlayerAreas object for this player + if (g_PlayerAreas[a_Player:GetUniqueID()] == nil) then + LoadPlayerAreas(a_Player); + end; + + return false; +end + + + + + +--- Called by MCS whenever a player is moving (at most once every tick) +function OnPlayerMoving(a_Player) + local PlayerID = a_Player:GetUniqueID(); + + -- If for some reason we don't have a cPlayerAreas object for this player, load it up + local PlayerAreas = g_PlayerAreas[PlayerID]; + if (PlayerAreas == nil) then + LoadPlayerAreas(a_Player); + return false; + end; + + -- If the player is outside their areas' safe space, reload + if (not(PlayerAreas:IsInSafe(a_Player:GetPosX(), a_Player:GetPosZ()))) then + LoadPlayerAreas(a_Player); + end + return false; +end + + + + + +--- Called by MCS when a player left-clicks +function OnPlayerLeftClick(a_Player, a_BlockX, a_BlockY, a_BlockZ, a_BlockFace, a_Status) + -- If the player has lclked with the wand; regardless of their permissions, let's set the coords: + if (cConfig:IsWand(a_Player:GetEquippedItem())) then + -- BlockFace < 0 means "use item", for which the coords are not given by the client + if (a_BlockFace < 0) then + return true; + end + + -- Convert the clicked coords into the block space + a_BlockX, a_BlockY, a_BlockZ = AddFaceDirection(a_BlockX, a_BlockY, a_BlockZ, a_BlockFace); + + -- Set the coords in the CommandState + GetCommandStateForPlayer(a_Player):SetCoords1(a_BlockX, a_BlockZ); + a_Player:SendMessage(string.format(g_Msgs.Coords1Set, a_BlockX, a_BlockZ)); + return true; + end; + + -- Check the player areas to see whether to disable this action + local Areas = g_PlayerAreas[a_Player:GetUniqueID()]; + if not(Areas:CanInteractWithBlock(a_BlockX, a_BlockZ)) then + a_Player:SendMessage(g_Msgs.NotAllowedToDig); + return true; + end + + -- Allow interaction + return false; +end + + + + + +--- Called by MCS when a player right-clicks +function OnPlayerRightClick(a_Player, a_BlockX, a_BlockY, a_BlockZ, a_BlockFace, a_CursorX, a_CursorY, a_CursorZ, a_Status) + + -- BlockFace < 0 means "use item", for which the coords are not given by the client + if (a_BlockFace < 0) then + return true; + end + + -- Convert the clicked coords into the block space + a_BlockX, a_BlockY, a_BlockZ = AddFaceDirection(a_BlockX, a_BlockY, a_BlockZ, a_BlockFace); + + -- If the player has rclked with the wand; regardless of their permissions, let's set the coords + if (cConfig:IsWand(a_Player:GetEquippedItem())) then + -- Set the coords in the CommandState + GetCommandStateForPlayer(a_Player):SetCoords2(a_BlockX, a_BlockZ); + a_Player:SendMessage(string.format(g_Msgs.Coords2Set, a_BlockX, a_BlockZ)); + return true; + end; + + -- Check the player areas to see whether to disable this action + local Areas = g_PlayerAreas[a_Player:GetUniqueID()]; + if not(Areas:CanInteractWithBlock(a_BlockX, a_BlockZ)) then + a_Player:SendMessage(g_Msgs.NotAllowedToBuild); + return true; + end + + -- Allow interaction + return false; +end + + + + diff --git a/MCServer/Plugins/ProtectionAreas/LICENSE.txt b/MCServer/Plugins/ProtectionAreas/LICENSE.txt index c46949f66..86c9130cc 100644 --- a/MCServer/Plugins/ProtectionAreas/LICENSE.txt +++ b/MCServer/Plugins/ProtectionAreas/LICENSE.txt @@ -1,7 +1,7 @@ -
-ProtectionAreas license
-=======================
-
-The ProtectionAreas plugin is written by _Xoft(o) / Mattes and is hereby released as public domain.
-
-If you like it, I'd really appreciate a postcard, or something tiny typical from your country :) The current snailmail address is at my personal web, http://xoft.cz .
+ +ProtectionAreas license +======================= + +The ProtectionAreas plugin is written by _Xoft(o) / Mattes and is hereby released as public domain. + +If you like it, I'd really appreciate a postcard, or something tiny typical from your country :) The current snailmail address is at my personal web, http://xoft.cz . diff --git a/MCServer/Plugins/ProtectionAreas/PlayerAreas.lua b/MCServer/Plugins/ProtectionAreas/PlayerAreas.lua index 5627f4d5f..f6106ee77 100644 --- a/MCServer/Plugins/ProtectionAreas/PlayerAreas.lua +++ b/MCServer/Plugins/ProtectionAreas/PlayerAreas.lua @@ -1,109 +1,109 @@ -
--- PlayerAreas.lua
--- Implements the cPlayerAreas class representing the per-player area storage object
-
---[[
-Each player instance is expected to have a separate object of type cPlayerAreas.
-Each object has an array of {cuboid, IsAllowed} tables, one for each area that is "within reach"
-The code can then ask each object, whether the player can interact with a certain block or not.
-A player can interact with a block if either one of these is true:
-1, There are no areas covering the block
-2, There is at least one area covering the block with IsAllowed set to true
-The object also has a m_SafeCuboid object that specified the area within which the player may move
-without the PlayerAreas needing a re-query.
-
-Also, a global table g_PlayerAreas is the actual map of PlayerID -> cPlayerAreas
---]]
-
-
-
-
-cPlayerAreas = {};
-
-g_PlayerAreas = {};
-
-
-
-
-
-function cPlayerAreas:new(a_SafeMinX, a_SafeMinZ, a_SafeMaxX, a_SafeMaxZ)
- assert(a_SafeMinX);
- assert(a_SafeMinZ);
- assert(a_SafeMaxX);
- assert(a_SafeMaxZ);
-
- local obj = {};
- setmetatable(obj, self);
- self.__index = self;
- self.m_SafeCuboid = cCuboid(a_SafeMinX, 0, a_SafeMinZ, a_SafeMaxX, 255, a_SafeMaxZ);
- return obj;
-end
-
-
-
-
--- Adds a new cuboid to the area list, where the player is either allowed or not, depending on the IsAllowed param
-function cPlayerAreas:AddArea(a_Cuboid, a_IsAllowed)
- table.insert(self, {m_Cuboid = a_Cuboid, m_IsAllowed = a_IsAllowed});
-end
-
-
-
-
-
---- returns true if the player owning this object can interact with the specified block
-function cPlayerAreas:CanInteractWithBlock(a_BlockX, a_BlockZ)
- assert(self);
-
- -- iterate through all the stored areas:
- local IsInsideAnyArea = false;
- for idx, Area in ipairs(self) do
- if (Area.m_Cuboid:IsInside(a_BlockX, 1, a_BlockZ)) then -- We don't care about Y coords, so use a dummy value
- if (Area.m_IsAllowed) then
- return true;
- end
- -- The coords are inside a cuboid for which the player doesn't have access, take a note of it
- IsInsideAnyArea = true;
- end
- end
-
- if (IsInsideAnyArea) then
- -- The specified coords are inside at least one area, but none of them allow the player to interact
- return false;
- end
-
- -- The coords are not inside any area
- return cConfig.m_AllowInteractNoArea;
-end
-
-
-
-
-
---- Calls the specified callback for each area contained within
--- a_Callback has a signature: function(a_Cuboid, a_IsAllowed)
--- Returns true if all areas have been enumerated, false if the callback has aborted by returning true
-function cPlayerAreas:ForEachArea(a_Callback)
- assert(self);
-
- for idx, Area in ipairs(self) do
- if (a_Callback(Area.m_Cuboid, Area.m_IsAllowed)) then
- return false;
- end
- end
- return true;
-end
-
-
-
-
-
---- Returns true if the player is withing the safe cuboid (no need to re-query the areas)
-function cPlayerAreas:IsInSafe(a_BlockX, a_BlockZ)
- assert(self);
- return self.m_SafeCuboid:IsInside(a_BlockX, 0, a_BlockZ);
-end
-
-
-
-
+ +-- PlayerAreas.lua +-- Implements the cPlayerAreas class representing the per-player area storage object + +--[[ +Each player instance is expected to have a separate object of type cPlayerAreas. +Each object has an array of {cuboid, IsAllowed} tables, one for each area that is "within reach" +The code can then ask each object, whether the player can interact with a certain block or not. +A player can interact with a block if either one of these is true: +1, There are no areas covering the block +2, There is at least one area covering the block with IsAllowed set to true +The object also has a m_SafeCuboid object that specified the area within which the player may move +without the PlayerAreas needing a re-query. + +Also, a global table g_PlayerAreas is the actual map of PlayerID -> cPlayerAreas +--]] + + + + +cPlayerAreas = {}; + +g_PlayerAreas = {}; + + + + + +function cPlayerAreas:new(a_SafeMinX, a_SafeMinZ, a_SafeMaxX, a_SafeMaxZ) + assert(a_SafeMinX); + assert(a_SafeMinZ); + assert(a_SafeMaxX); + assert(a_SafeMaxZ); + + local obj = {}; + setmetatable(obj, self); + self.__index = self; + self.m_SafeCuboid = cCuboid(a_SafeMinX, 0, a_SafeMinZ, a_SafeMaxX, 255, a_SafeMaxZ); + return obj; +end + + + + +-- Adds a new cuboid to the area list, where the player is either allowed or not, depending on the IsAllowed param +function cPlayerAreas:AddArea(a_Cuboid, a_IsAllowed) + table.insert(self, {m_Cuboid = a_Cuboid, m_IsAllowed = a_IsAllowed}); +end + + + + + +--- returns true if the player owning this object can interact with the specified block +function cPlayerAreas:CanInteractWithBlock(a_BlockX, a_BlockZ) + assert(self); + + -- iterate through all the stored areas: + local IsInsideAnyArea = false; + for idx, Area in ipairs(self) do + if (Area.m_Cuboid:IsInside(a_BlockX, 1, a_BlockZ)) then -- We don't care about Y coords, so use a dummy value + if (Area.m_IsAllowed) then + return true; + end + -- The coords are inside a cuboid for which the player doesn't have access, take a note of it + IsInsideAnyArea = true; + end + end + + if (IsInsideAnyArea) then + -- The specified coords are inside at least one area, but none of them allow the player to interact + return false; + end + + -- The coords are not inside any area + return cConfig.m_AllowInteractNoArea; +end + + + + + +--- Calls the specified callback for each area contained within +-- a_Callback has a signature: function(a_Cuboid, a_IsAllowed) +-- Returns true if all areas have been enumerated, false if the callback has aborted by returning true +function cPlayerAreas:ForEachArea(a_Callback) + assert(self); + + for idx, Area in ipairs(self) do + if (a_Callback(Area.m_Cuboid, Area.m_IsAllowed)) then + return false; + end + end + return true; +end + + + + + +--- Returns true if the player is withing the safe cuboid (no need to re-query the areas) +function cPlayerAreas:IsInSafe(a_BlockX, a_BlockZ) + assert(self); + return self.m_SafeCuboid:IsInside(a_BlockX, 0, a_BlockZ); +end + + + + diff --git a/MCServer/Plugins/ProtectionAreas/ProtectionAreas.lua b/MCServer/Plugins/ProtectionAreas/ProtectionAreas.lua index 8c2db1387..cbe3fa94d 100644 --- a/MCServer/Plugins/ProtectionAreas/ProtectionAreas.lua +++ b/MCServer/Plugins/ProtectionAreas/ProtectionAreas.lua @@ -1,71 +1,71 @@ -
--- ProtectionAreas.lua
--- Defines the main plugin entrypoint, as well as some utility functions
-
-
-
-
-
---- Prefix for all messages logged to the server console
-PluginPrefix = "ProtectionAreas: ";
-
---- Bounds for the area loading. Areas less this far in any direction from the player will be loaded into cPlayerAreas
-g_AreaBounds = 48;
-
---- If a player moves this close to the PlayerAreas bounds, the PlayerAreas will be re-queried
-g_AreaSafeEdge = 12;
-
-
-
-
-
---- Called by MCS when the plugin loads
--- Returns true if initialization successful, false otherwise
-function Initialize(a_Plugin)
- a_Plugin:SetName("ProtectionAreas");
- a_Plugin:SetVersion(1);
-
- InitializeConfig();
- if (not(InitializeStorage())) then
- LOGWARNING(PluginPrefix .. "failed to initialize Storage, plugin is disabled");
- return false;
- end
- InitializeHooks(a_Plugin);
- InitializeCommandHandlers();
-
- -- We might be reloading, so there may be players already present in the server; reload all of them
- cRoot:Get():ForEachWorld(
- function(a_World)
- ReloadAllPlayersInWorld(a_World:GetName());
- end
- );
-
- return true;
-end
-
-
-
-
-
---- Loads a cPlayerAreas object from the DB for the player, and assigns it to the player map
-function LoadPlayerAreas(a_Player)
- local PlayerID = a_Player:GetUniqueID();
- local PlayerX = math.floor(a_Player:GetPosX());
- local PlayerZ = math.floor(a_Player:GetPosZ());
- local WorldName = a_Player:GetWorld():GetName();
- g_PlayerAreas[PlayerID] = g_Storage:LoadPlayerAreas(a_Player:GetName(), PlayerX, PlayerZ, WorldName);
-end
-
-
-
-
-
-function ReloadAllPlayersInWorld(a_WorldName)
- local World = cRoot:Get():GetWorld(a_WorldName);
- World:ForEachPlayer(LoadPlayerAreas);
-end
-
-
-
-
-
+ +-- ProtectionAreas.lua +-- Defines the main plugin entrypoint, as well as some utility functions + + + + + +--- Prefix for all messages logged to the server console +PluginPrefix = "ProtectionAreas: "; + +--- Bounds for the area loading. Areas less this far in any direction from the player will be loaded into cPlayerAreas +g_AreaBounds = 48; + +--- If a player moves this close to the PlayerAreas bounds, the PlayerAreas will be re-queried +g_AreaSafeEdge = 12; + + + + + +--- Called by MCS when the plugin loads +-- Returns true if initialization successful, false otherwise +function Initialize(a_Plugin) + a_Plugin:SetName("ProtectionAreas"); + a_Plugin:SetVersion(1); + + InitializeConfig(); + if (not(InitializeStorage())) then + LOGWARNING(PluginPrefix .. "failed to initialize Storage, plugin is disabled"); + return false; + end + InitializeHooks(a_Plugin); + InitializeCommandHandlers(); + + -- We might be reloading, so there may be players already present in the server; reload all of them + cRoot:Get():ForEachWorld( + function(a_World) + ReloadAllPlayersInWorld(a_World:GetName()); + end + ); + + return true; +end + + + + + +--- Loads a cPlayerAreas object from the DB for the player, and assigns it to the player map +function LoadPlayerAreas(a_Player) + local PlayerID = a_Player:GetUniqueID(); + local PlayerX = math.floor(a_Player:GetPosX()); + local PlayerZ = math.floor(a_Player:GetPosZ()); + local WorldName = a_Player:GetWorld():GetName(); + g_PlayerAreas[PlayerID] = g_Storage:LoadPlayerAreas(a_Player:GetName(), PlayerX, PlayerZ, WorldName); +end + + + + + +function ReloadAllPlayersInWorld(a_WorldName) + local World = cRoot:Get():GetWorld(a_WorldName); + World:ForEachPlayer(LoadPlayerAreas); +end + + + + + diff --git a/MCServer/Plugins/ProtectionAreas/Storage.lua b/MCServer/Plugins/ProtectionAreas/Storage.lua index 07825b172..a6cf564bf 100644 --- a/MCServer/Plugins/ProtectionAreas/Storage.lua +++ b/MCServer/Plugins/ProtectionAreas/Storage.lua @@ -1,518 +1,518 @@ -
--- Storage.lua
--- Implements the storage access object, shielding the rest of the code away from the DB
-
---[[
-The cStorage class is the interface to the underlying storage, the SQLite database.
-This class knows how to load player areas from the DB, how to add or remove areas in the DB
-and other such operations.
-
-Also, a g_Storage global variable is declared, it holds the single instance of the storage.
---]]
-
-
-
-
-
-cStorage = {};
-
-g_Storage = {};
-
-
-
-
-
---- Initializes the storage subsystem, creates the g_Storage object
--- Returns true if successful, false if not
-function InitializeStorage()
- g_Storage = cStorage:new();
- if (not(g_Storage:OpenDB())) then
- return false;
- end
-
- return true;
-end
-
-
-
-
-
-function cStorage:new(obj)
- obj = obj or {};
- setmetatable(obj, self);
- self.__index = self;
- return obj;
-end
-
-
-
-
---- Opens the DB and makes sure it has all the columns needed
--- Returns true if successful, false otherwise
-function cStorage:OpenDB()
- local ErrCode, ErrMsg;
- self.DB, ErrCode, ErrMsg = sqlite3.open("ProtectionAreas.sqlite");
- if (self.DB == nil) then
- LOGWARNING(PluginPrefix .. "Cannot open ProtectionAreas.sqlite, error " .. ErrCode .. " (" .. ErrMsg ..")");
- return false;
- end
-
- if (
- not(self:CreateTable("Areas", {"ID INTEGER PRIMARY KEY AUTOINCREMENT", "MinX", "MaxX", "MinZ", "MaxZ", "WorldName", "CreatorUserName"})) or
- not(self:CreateTable("AllowedUsers", {"AreaID", "UserName"}))
- ) then
- LOGWARNING(PluginPrefix .. "Cannot create DB tables!");
- return false;
- end
-
- return true;
-end
-
-
-
-
-
---- Executes the SQL command given, calling the a_Callback for each result
--- If the SQL command fails, prints it out on the server console and returns false
--- Returns true on success
-function cStorage:DBExec(a_SQL, a_Callback, a_CallbackParam)
- local ErrCode = self.DB:exec(a_SQL, a_Callback, a_CallbackParam);
- if (ErrCode ~= sqlite3.OK) then
- LOGWARNING(PluginPrefix .. "Error " .. ErrCode .. " (" .. self.DB:errmsg() ..
- ") while processing SQL command >>" .. a_SQL .. "<<"
- );
- return false;
- end
- return true;
-end
-
-
-
-
-
---- Creates the table of the specified name and columns[]
--- If the table exists, any columns missing are added; existing data is kept
-function cStorage:CreateTable(a_TableName, a_Columns)
- -- Try to create the table first
- local sql = "CREATE TABLE IF NOT EXISTS '" .. a_TableName .. "' (";
- sql = sql .. table.concat(a_Columns, ", ");
- sql = sql .. ")";
- if (not(self:DBExec(sql))) then
- LOGWARNING(PluginPrefix .. "Cannot create DB Table " .. a_TableName);
- return false;
- end
- -- SQLite doesn't inform us if it created the table or not, so we have to continue anyway
-
- -- Check each column whether it exists
- -- Remove all the existing columns from a_Columns:
- local RemoveExistingColumn = function(UserData, NumCols, Values, Names)
- -- Remove the received column from a_Columns. Search for column name in the Names[] / Values[] pairs
- for i = 1, NumCols do
- if (Names[i] == "name") then
- local ColumnName = Values[i]:lower();
- -- Search the a_Columns if they have that column:
- for j = 1, #a_Columns do
- -- Cut away all column specifiers (after the first space), if any:
- local SpaceIdx = string.find(a_Columns[j], " ");
- if (SpaceIdx ~= nil) then
- SpaceIdx = SpaceIdx - 1;
- end
- local ColumnTemplate = string.lower(string.sub(a_Columns[j], 1, SpaceIdx));
- -- If it is a match, remove from a_Columns:
- if (ColumnTemplate == ColumnName) then
- table.remove(a_Columns, j);
- break; -- for j
- end
- end -- for j - a_Columns[]
- end
- end -- for i - Names[] / Values[]
- return 0;
- end
- if (not(self:DBExec("PRAGMA table_info(" .. a_TableName .. ")", RemoveExistingColumn))) then
- LOGWARNING(PluginPrefix .. "Cannot query DB table structure");
- return false;
- end
-
- -- Create the missing columns
- -- a_Columns now contains only those columns that are missing in the DB
- if (#a_Columns > 0) then
- LOGINFO(PluginPrefix .. "Database table \"" .. a_TableName .. "\" is missing " .. #a_Columns .. " columns, fixing now.");
- for idx, ColumnName in ipairs(a_Columns) do
- if (not(self:DBExec("ALTER TABLE '" .. a_TableName .. "' ADD COLUMN " .. ColumnName))) then
- LOGWARNING(PluginPrefix .. "Cannot add DB table \"" .. a_TableName .. "\" column \"" .. ColumnName .. "\"");
- return false;
- end
- end
- LOGINFO(PluginPrefix .. "Database table \"" .. a_TableName .. "\" columns fixed.");
- end
-
- return true;
-end
-
-
-
-
-
---- Returns true if the specified area is allowed for the specified player
-function cStorage:IsAreaAllowed(a_AreaID, a_PlayerName, a_WorldName)
- assert(a_AreaID);
- assert(a_PlayerName);
- assert(a_WorldName);
- assert(self);
-
- local lcPlayerName = string.lower(a_PlayerName);
- local res = false;
- local sql = "SELECT COUNT(*) FROM AllowedUsers WHERE (AreaID = " .. a_AreaID ..
- ") AND (UserName ='" .. lcPlayerName .. "')";
- local function SetResTrue(UserData, NumValues, Values, Names)
- res = (tonumber(Values[1]) > 0);
- return 0;
- end
- if (not(self:DBExec(sql, SetResTrue))) then
- LOGWARNING("SQL error while determining area allowance");
- return false;
- end
- return res;
-end
-
-
-
-
-
---- Loads cPlayerAreas for the specified player from the DB. Returns a cPlayerAreas object
-function cStorage:LoadPlayerAreas(a_PlayerName, a_PlayerX, a_PlayerZ, a_WorldName)
- assert(a_PlayerName);
- assert(a_PlayerX);
- assert(a_PlayerZ);
- assert(a_WorldName);
- assert(self);
-
- -- Bounds for which the areas are loaded
- local BoundsMinX = a_PlayerX - g_AreaBounds;
- local BoundsMaxX = a_PlayerX + g_AreaBounds;
- local BoundsMinZ = a_PlayerZ - g_AreaBounds;
- local BoundsMaxZ = a_PlayerZ + g_AreaBounds;
-
- local res = cPlayerAreas:new(
- BoundsMinX + g_AreaSafeEdge, BoundsMinZ + g_AreaSafeEdge,
- BoundsMaxX - g_AreaSafeEdge, BoundsMaxZ - g_AreaSafeEdge
- );
-
- --[[
- LOG("Loading protection areas for player " .. a_PlayerName .. " centered around {" .. a_PlayerX .. ", " .. a_PlayerZ ..
- "}, bounds are {" .. BoundsMinX .. ", " .. BoundsMinZ .. "} - {" ..
- BoundsMaxX .. ", " .. BoundsMaxZ .. "}"
- );
- --]]
-
- -- Load the areas from the DB, based on the player's location
- local lcWorldName = string.lower(a_WorldName);
- local sql =
- "SELECT ID, MinX, MaxX, MinZ, MaxZ FROM Areas WHERE " ..
- "MinX < " .. BoundsMaxX .. " AND MaxX > " .. BoundsMinX .. " AND " ..
- "MinZ < " .. BoundsMaxZ .. " AND MaxZ > " .. BoundsMinZ .. " AND " ..
- "WorldName = '" .. lcWorldName .."'";
-
- local function AddAreas(UserData, NumValues, Values, Names)
- if ((NumValues < 5) or ((Values[1] and Values[2] and Values[3] and Values[4] and Values[5]) == nil)) then
- LOGWARNING("SQL query didn't return all data");
- return 0;
- end
- res:AddArea(cCuboid(Values[2], 0, Values[4], Values[3], 255, Values[5]), self:IsAreaAllowed(Values[1], a_PlayerName, a_WorldName));
- return 0;
- end
-
- if (not(self:DBExec(sql, AddAreas))) then
- LOGWARNING("SQL error while querying areas");
- return res;
- end
-
- return res;
-end
-
-
-
-
-
---- Adds a new area into the DB. a_AllowedNames is a table listing all the players that are allowed in the area
--- Returns the ID of the new area, or -1 on failure
-function cStorage:AddArea(a_Cuboid, a_WorldName, a_CreatorName, a_AllowedNames)
- assert(a_Cuboid);
- assert(a_WorldName);
- assert(a_CreatorName);
- assert(a_AllowedNames);
- assert(self);
-
- -- Store the area in the DB
- local ID = -1;
- local function RememberID(UserData, NumCols, Values, Names)
- for i = 1, NumCols do
- if (Names[i] == "ID") then
- ID = Values[i];
- end
- end
- return 0;
- end
- local lcWorldName = string.lower(a_WorldName);
- local lcCreatorName = string.lower(a_CreatorName);
- local sql =
- "INSERT INTO Areas (ID, MinX, MaxX, MinZ, MaxZ, WorldName, CreatorUserName) VALUES (NULL, " ..
- a_Cuboid.p1.x .. ", " .. a_Cuboid.p2.x .. ", " .. a_Cuboid.p1.z .. ", " .. a_Cuboid.p2.z ..
- ", '" .. lcWorldName .. "', '" .. lcCreatorName ..
- "'); SELECT last_insert_rowid() AS ID";
- if (not(self:DBExec(sql, RememberID))) then
- LOGWARNING(PluginPrefix .. "SQL Error while inserting new area");
- return -1;
- end
- if (ID == -1) then
- LOGWARNING(PluginPrefix .. "SQL Error while retrieving INSERTion ID");
- return -1;
- end
-
- -- Store each allowed player in the DB
- for idx, Name in ipairs(a_AllowedNames) do
- local lcName = string.lower(Name);
- local sql = "INSERT INTO AllowedUsers (AreaID, UserName) VALUES (" .. ID .. ", '" .. lcName .. "')";
- if (not(self:DBExec(sql))) then
- LOGWARNING(PluginPrefix .. "SQL Error while inserting new area's allowed player " .. Name);
- end
- end
- return ID;
-end
-
-
-
-
-
-function cStorage:DelArea(a_WorldName, a_AreaID)
- assert(a_WorldName);
- assert(a_AreaID);
- assert(self);
-
- -- Since all areas are stored in a single DB (for now), the worldname parameter isn't used at all
- -- Later if we change to a per-world DB, we'll need the world name
-
- -- Delete from both tables simultaneously
- local sql =
- "DELETE FROM Areas WHERE ID = " .. a_AreaID .. ";" ..
- "DELETE FROM AllowedUsers WHERE AreaID = " .. a_AreaID;
- if (not(self:DBExec(sql))) then
- LOGWARNING(PluginPrefix .. "SQL error while deleting area " .. a_AreaID .. " from world \"" .. a_WorldName .. "\"");
- return false;
- end
-
- return true;
-end
-
-
-
-
-
---- Removes the user from the specified area
-function cStorage:RemoveUser(a_AreaID, a_UserName, a_WorldName)
- assert(a_AreaID);
- assert(a_UserName);
- assert(a_WorldName);
- assert(self);
-
- -- WorldName is not used yet, because all the worlds share the same DB in this version
-
- local lcUserName = string.lower(a_UserName);
- local sql = "DELETE FROM AllowedUsers WHERE " ..
- "AreaID = " .. a_AreaID .. " AND UserName = '" .. lcUserName .. "'";
- if (not(self:DBExec(sql))) then
- LOGWARNING("SQL error while removing user " .. a_UserName .. " from area ID " .. a_AreaID);
- return false;
- end
- return true;
-end
-
-
-
-
-
---- Removes the user from all areas in the specified world
-function cStorage:RemoveUserAll(a_UserName, a_WorldName)
- assert(a_UserName);
- assert(a_WorldName);
- assert(self);
-
- local lcUserName = string.lower(a_UserName);
- local sql = "DELETE FROM AllowedUsers WHERE UserName = '" .. lcUserName .."'";
- if (not(self:DBExec(sql))) then
- LOGWARNING("SQL error while removing user " .. a_UserName .. " from all areas");
- return false;
- end
- return true;
-end
-
-
-
-
-
---- Calls the callback for each area intersecting the specified coords
--- Callback signature: function(ID, MinX, MinZ, MaxX, MaxZ, CreatorName)
-function cStorage:ForEachArea(a_BlockX, a_BlockZ, a_WorldName, a_Callback)
- assert(a_BlockX);
- assert(a_BlockZ);
- assert(a_WorldName);
- assert(a_Callback);
- assert(self);
-
- -- SQL callback that parses the values and calls our callback
- function CallCallback(UserData, NumValues, Values, Names)
- if (NumValues ~= 6) then
- -- Not enough values returned, skip this row
- return 0;
- end
- local ID = Values[1];
- local MinX = Values[2];
- local MinZ = Values[3];
- local MaxX = Values[4];
- local MaxZ = Values[5];
- local CreatorName = Values[6];
- a_Callback(ID, MinX, MinZ, MaxX, MaxZ, CreatorName);
- return 0;
- end
-
- local lcWorldName = string.lower(a_WorldName);
- local sql = "SELECT ID, MinX, MinZ, MaxX, MaxZ, CreatorUserName FROM Areas WHERE " ..
- "MinX <= " .. a_BlockX .. " AND MaxX >= " .. a_BlockX .. " AND " ..
- "MinZ <= " .. a_BlockZ .. " AND MaxZ >= " .. a_BlockZ .. " AND " ..
- "WorldName = '" .. lcWorldName .. "'";
- if (not(self:DBExec(sql, CallCallback))) then
- LOGWARNING("SQL Error while iterating through areas (cStorage:ForEachArea())");
- return false;
- end
- return true;
-end
-
-
-
-
-
---- Returns the info on the specified area
--- Returns MinX, MinZ, MaxX, MaxZ, CreatorName on success, or nothing on failure
-function cStorage:GetArea(a_AreaID, a_WorldName)
- assert(a_AreaID);
- assert(a_WorldName);
- assert(self);
-
- local MinX, MinZ, MaxX, MaxZ, CreatorName;
- local HasValues = false;
-
- -- SQL callback that parses the values and remembers them in variables
- function RememberValues(UserData, NumValues, Values, Names)
- if (NumValues ~= 5) then
- -- Not enough values returned, skip this row
- return 0;
- end
- MinX = Values[1];
- MinZ = Values[2];
- MaxX = Values[3];
- MaxZ = Values[4];
- CreatorName = Values[5];
- HasValues = true;
- return 0;
- end
-
- local lcWorldName = string.lower(a_WorldName);
- local sql = "SELECT MinX, MinZ, MaxX, MaxZ, CreatorUserName FROM Areas WHERE " ..
- "ID = " .. a_AreaID .. " AND WorldName = '" .. lcWorldName .. "'";
- if (not(self:DBExec(sql, RememberValues))) then
- LOGWARNING("SQL Error while getting area info (cStorage:ForEachArea())");
- return;
- end
-
- -- If no data has been retrieved, return nothing
- if (not(HasValues)) then
- return;
- end
-
- return MinX, MinZ, MaxX, MaxZ, CreatorName;
-end
-
-
-
-
-
---- Calls the callback for each allowed user for the specified area
--- Callback signature: function(UserName)
-function cStorage:ForEachUserInArea(a_AreaID, a_WorldName, a_Callback)
- assert(a_AreaID);
- assert(a_WorldName);
- assert(a_Callback);
- assert(self);
-
- -- Since in this version all the worlds share a single DB, the a_WorldName parameter is not actually used
- -- But this may change in the future, when we have a per-world DB
-
- local function CallCallback(UserData, NumValues, Values)
- if (NumValues ~= 1) then
- return 0;
- end
- a_Callback(Values[1]);
- return 0;
- end
- local sql = "SELECT UserName FROM AllowedUsers WHERE AreaID = " .. a_AreaID;
- if (not(self:DBExec(sql, CallCallback))) then
- LOGWARNING("SQL error while iterating area users for AreaID" .. a_AreaID);
- return false;
- end
- return true;
-end
-
-
-
-
-
---- Adds the specified usernames to the specified area, if not already present
--- a_Users is an array table of usernames to add
-function cStorage:AddAreaUsers(a_AreaID, a_WorldName, a_AddedBy, a_Users)
- assert(a_AreaID);
- assert(a_WorldName);
- assert(a_Users);
- assert(self);
-
- -- Convert all usernames to lowercase
- for idx, Name in ipairs(a_Users) do
- a_Users[idx] = string.lower(Name);
- end
-
- -- Remove from a_Users the usernames already present in the area
- local sql = "SELECT UserName FROM AllowedUsers WHERE AreaID = " .. a_AreaID;
- local function RemovePresent(UserData, NumValues, Values, Names)
- if (NumValues ~= 1) then
- -- Invalid response format
- return 0;
- end
- local DBName = Values[1];
- -- Remove the name from a_Users, if exists
- for idx, Name in ipairs(a_Users) do
- if (Name == DBName) then
- table.remove(a_Users, idx);
- return 0;
- end
- end
- return 0;
- end
- if (not(self:DBExec(sql, RemovePresent))) then
- LOGWARNING("SQL error while iterating through users");
- return false;
- end
-
- -- Add the users
- for idx, Name in ipairs(a_Users) do
- local sql = "INSERT INTO AllowedUsers (AreaID, UserName) VALUES (" .. a_AreaID .. ", '" .. Name .. "')";
- if (not(self:DBExec(sql))) then
- LOGWARNING("SQL error while adding user " .. Name .. " to area " .. a_AreaID);
- end
- end
-
- return true;
-end
-
-
-
-
-
+ +-- Storage.lua +-- Implements the storage access object, shielding the rest of the code away from the DB + +--[[ +The cStorage class is the interface to the underlying storage, the SQLite database. +This class knows how to load player areas from the DB, how to add or remove areas in the DB +and other such operations. + +Also, a g_Storage global variable is declared, it holds the single instance of the storage. +--]] + + + + + +cStorage = {}; + +g_Storage = {}; + + + + + +--- Initializes the storage subsystem, creates the g_Storage object +-- Returns true if successful, false if not +function InitializeStorage() + g_Storage = cStorage:new(); + if (not(g_Storage:OpenDB())) then + return false; + end + + return true; +end + + + + + +function cStorage:new(obj) + obj = obj or {}; + setmetatable(obj, self); + self.__index = self; + return obj; +end + + + + +--- Opens the DB and makes sure it has all the columns needed +-- Returns true if successful, false otherwise +function cStorage:OpenDB() + local ErrCode, ErrMsg; + self.DB, ErrCode, ErrMsg = sqlite3.open("ProtectionAreas.sqlite"); + if (self.DB == nil) then + LOGWARNING(PluginPrefix .. "Cannot open ProtectionAreas.sqlite, error " .. ErrCode .. " (" .. ErrMsg ..")"); + return false; + end + + if ( + not(self:CreateTable("Areas", {"ID INTEGER PRIMARY KEY AUTOINCREMENT", "MinX", "MaxX", "MinZ", "MaxZ", "WorldName", "CreatorUserName"})) or + not(self:CreateTable("AllowedUsers", {"AreaID", "UserName"})) + ) then + LOGWARNING(PluginPrefix .. "Cannot create DB tables!"); + return false; + end + + return true; +end + + + + + +--- Executes the SQL command given, calling the a_Callback for each result +-- If the SQL command fails, prints it out on the server console and returns false +-- Returns true on success +function cStorage:DBExec(a_SQL, a_Callback, a_CallbackParam) + local ErrCode = self.DB:exec(a_SQL, a_Callback, a_CallbackParam); + if (ErrCode ~= sqlite3.OK) then + LOGWARNING(PluginPrefix .. "Error " .. ErrCode .. " (" .. self.DB:errmsg() .. + ") while processing SQL command >>" .. a_SQL .. "<<" + ); + return false; + end + return true; +end + + + + + +--- Creates the table of the specified name and columns[] +-- If the table exists, any columns missing are added; existing data is kept +function cStorage:CreateTable(a_TableName, a_Columns) + -- Try to create the table first + local sql = "CREATE TABLE IF NOT EXISTS '" .. a_TableName .. "' ("; + sql = sql .. table.concat(a_Columns, ", "); + sql = sql .. ")"; + if (not(self:DBExec(sql))) then + LOGWARNING(PluginPrefix .. "Cannot create DB Table " .. a_TableName); + return false; + end + -- SQLite doesn't inform us if it created the table or not, so we have to continue anyway + + -- Check each column whether it exists + -- Remove all the existing columns from a_Columns: + local RemoveExistingColumn = function(UserData, NumCols, Values, Names) + -- Remove the received column from a_Columns. Search for column name in the Names[] / Values[] pairs + for i = 1, NumCols do + if (Names[i] == "name") then + local ColumnName = Values[i]:lower(); + -- Search the a_Columns if they have that column: + for j = 1, #a_Columns do + -- Cut away all column specifiers (after the first space), if any: + local SpaceIdx = string.find(a_Columns[j], " "); + if (SpaceIdx ~= nil) then + SpaceIdx = SpaceIdx - 1; + end + local ColumnTemplate = string.lower(string.sub(a_Columns[j], 1, SpaceIdx)); + -- If it is a match, remove from a_Columns: + if (ColumnTemplate == ColumnName) then + table.remove(a_Columns, j); + break; -- for j + end + end -- for j - a_Columns[] + end + end -- for i - Names[] / Values[] + return 0; + end + if (not(self:DBExec("PRAGMA table_info(" .. a_TableName .. ")", RemoveExistingColumn))) then + LOGWARNING(PluginPrefix .. "Cannot query DB table structure"); + return false; + end + + -- Create the missing columns + -- a_Columns now contains only those columns that are missing in the DB + if (#a_Columns > 0) then + LOGINFO(PluginPrefix .. "Database table \"" .. a_TableName .. "\" is missing " .. #a_Columns .. " columns, fixing now."); + for idx, ColumnName in ipairs(a_Columns) do + if (not(self:DBExec("ALTER TABLE '" .. a_TableName .. "' ADD COLUMN " .. ColumnName))) then + LOGWARNING(PluginPrefix .. "Cannot add DB table \"" .. a_TableName .. "\" column \"" .. ColumnName .. "\""); + return false; + end + end + LOGINFO(PluginPrefix .. "Database table \"" .. a_TableName .. "\" columns fixed."); + end + + return true; +end + + + + + +--- Returns true if the specified area is allowed for the specified player +function cStorage:IsAreaAllowed(a_AreaID, a_PlayerName, a_WorldName) + assert(a_AreaID); + assert(a_PlayerName); + assert(a_WorldName); + assert(self); + + local lcPlayerName = string.lower(a_PlayerName); + local res = false; + local sql = "SELECT COUNT(*) FROM AllowedUsers WHERE (AreaID = " .. a_AreaID .. + ") AND (UserName ='" .. lcPlayerName .. "')"; + local function SetResTrue(UserData, NumValues, Values, Names) + res = (tonumber(Values[1]) > 0); + return 0; + end + if (not(self:DBExec(sql, SetResTrue))) then + LOGWARNING("SQL error while determining area allowance"); + return false; + end + return res; +end + + + + + +--- Loads cPlayerAreas for the specified player from the DB. Returns a cPlayerAreas object +function cStorage:LoadPlayerAreas(a_PlayerName, a_PlayerX, a_PlayerZ, a_WorldName) + assert(a_PlayerName); + assert(a_PlayerX); + assert(a_PlayerZ); + assert(a_WorldName); + assert(self); + + -- Bounds for which the areas are loaded + local BoundsMinX = a_PlayerX - g_AreaBounds; + local BoundsMaxX = a_PlayerX + g_AreaBounds; + local BoundsMinZ = a_PlayerZ - g_AreaBounds; + local BoundsMaxZ = a_PlayerZ + g_AreaBounds; + + local res = cPlayerAreas:new( + BoundsMinX + g_AreaSafeEdge, BoundsMinZ + g_AreaSafeEdge, + BoundsMaxX - g_AreaSafeEdge, BoundsMaxZ - g_AreaSafeEdge + ); + + --[[ + LOG("Loading protection areas for player " .. a_PlayerName .. " centered around {" .. a_PlayerX .. ", " .. a_PlayerZ .. + "}, bounds are {" .. BoundsMinX .. ", " .. BoundsMinZ .. "} - {" .. + BoundsMaxX .. ", " .. BoundsMaxZ .. "}" + ); + --]] + + -- Load the areas from the DB, based on the player's location + local lcWorldName = string.lower(a_WorldName); + local sql = + "SELECT ID, MinX, MaxX, MinZ, MaxZ FROM Areas WHERE " .. + "MinX < " .. BoundsMaxX .. " AND MaxX > " .. BoundsMinX .. " AND " .. + "MinZ < " .. BoundsMaxZ .. " AND MaxZ > " .. BoundsMinZ .. " AND " .. + "WorldName = '" .. lcWorldName .."'"; + + local function AddAreas(UserData, NumValues, Values, Names) + if ((NumValues < 5) or ((Values[1] and Values[2] and Values[3] and Values[4] and Values[5]) == nil)) then + LOGWARNING("SQL query didn't return all data"); + return 0; + end + res:AddArea(cCuboid(Values[2], 0, Values[4], Values[3], 255, Values[5]), self:IsAreaAllowed(Values[1], a_PlayerName, a_WorldName)); + return 0; + end + + if (not(self:DBExec(sql, AddAreas))) then + LOGWARNING("SQL error while querying areas"); + return res; + end + + return res; +end + + + + + +--- Adds a new area into the DB. a_AllowedNames is a table listing all the players that are allowed in the area +-- Returns the ID of the new area, or -1 on failure +function cStorage:AddArea(a_Cuboid, a_WorldName, a_CreatorName, a_AllowedNames) + assert(a_Cuboid); + assert(a_WorldName); + assert(a_CreatorName); + assert(a_AllowedNames); + assert(self); + + -- Store the area in the DB + local ID = -1; + local function RememberID(UserData, NumCols, Values, Names) + for i = 1, NumCols do + if (Names[i] == "ID") then + ID = Values[i]; + end + end + return 0; + end + local lcWorldName = string.lower(a_WorldName); + local lcCreatorName = string.lower(a_CreatorName); + local sql = + "INSERT INTO Areas (ID, MinX, MaxX, MinZ, MaxZ, WorldName, CreatorUserName) VALUES (NULL, " .. + a_Cuboid.p1.x .. ", " .. a_Cuboid.p2.x .. ", " .. a_Cuboid.p1.z .. ", " .. a_Cuboid.p2.z .. + ", '" .. lcWorldName .. "', '" .. lcCreatorName .. + "'); SELECT last_insert_rowid() AS ID"; + if (not(self:DBExec(sql, RememberID))) then + LOGWARNING(PluginPrefix .. "SQL Error while inserting new area"); + return -1; + end + if (ID == -1) then + LOGWARNING(PluginPrefix .. "SQL Error while retrieving INSERTion ID"); + return -1; + end + + -- Store each allowed player in the DB + for idx, Name in ipairs(a_AllowedNames) do + local lcName = string.lower(Name); + local sql = "INSERT INTO AllowedUsers (AreaID, UserName) VALUES (" .. ID .. ", '" .. lcName .. "')"; + if (not(self:DBExec(sql))) then + LOGWARNING(PluginPrefix .. "SQL Error while inserting new area's allowed player " .. Name); + end + end + return ID; +end + + + + + +function cStorage:DelArea(a_WorldName, a_AreaID) + assert(a_WorldName); + assert(a_AreaID); + assert(self); + + -- Since all areas are stored in a single DB (for now), the worldname parameter isn't used at all + -- Later if we change to a per-world DB, we'll need the world name + + -- Delete from both tables simultaneously + local sql = + "DELETE FROM Areas WHERE ID = " .. a_AreaID .. ";" .. + "DELETE FROM AllowedUsers WHERE AreaID = " .. a_AreaID; + if (not(self:DBExec(sql))) then + LOGWARNING(PluginPrefix .. "SQL error while deleting area " .. a_AreaID .. " from world \"" .. a_WorldName .. "\""); + return false; + end + + return true; +end + + + + + +--- Removes the user from the specified area +function cStorage:RemoveUser(a_AreaID, a_UserName, a_WorldName) + assert(a_AreaID); + assert(a_UserName); + assert(a_WorldName); + assert(self); + + -- WorldName is not used yet, because all the worlds share the same DB in this version + + local lcUserName = string.lower(a_UserName); + local sql = "DELETE FROM AllowedUsers WHERE " .. + "AreaID = " .. a_AreaID .. " AND UserName = '" .. lcUserName .. "'"; + if (not(self:DBExec(sql))) then + LOGWARNING("SQL error while removing user " .. a_UserName .. " from area ID " .. a_AreaID); + return false; + end + return true; +end + + + + + +--- Removes the user from all areas in the specified world +function cStorage:RemoveUserAll(a_UserName, a_WorldName) + assert(a_UserName); + assert(a_WorldName); + assert(self); + + local lcUserName = string.lower(a_UserName); + local sql = "DELETE FROM AllowedUsers WHERE UserName = '" .. lcUserName .."'"; + if (not(self:DBExec(sql))) then + LOGWARNING("SQL error while removing user " .. a_UserName .. " from all areas"); + return false; + end + return true; +end + + + + + +--- Calls the callback for each area intersecting the specified coords +-- Callback signature: function(ID, MinX, MinZ, MaxX, MaxZ, CreatorName) +function cStorage:ForEachArea(a_BlockX, a_BlockZ, a_WorldName, a_Callback) + assert(a_BlockX); + assert(a_BlockZ); + assert(a_WorldName); + assert(a_Callback); + assert(self); + + -- SQL callback that parses the values and calls our callback + function CallCallback(UserData, NumValues, Values, Names) + if (NumValues ~= 6) then + -- Not enough values returned, skip this row + return 0; + end + local ID = Values[1]; + local MinX = Values[2]; + local MinZ = Values[3]; + local MaxX = Values[4]; + local MaxZ = Values[5]; + local CreatorName = Values[6]; + a_Callback(ID, MinX, MinZ, MaxX, MaxZ, CreatorName); + return 0; + end + + local lcWorldName = string.lower(a_WorldName); + local sql = "SELECT ID, MinX, MinZ, MaxX, MaxZ, CreatorUserName FROM Areas WHERE " .. + "MinX <= " .. a_BlockX .. " AND MaxX >= " .. a_BlockX .. " AND " .. + "MinZ <= " .. a_BlockZ .. " AND MaxZ >= " .. a_BlockZ .. " AND " .. + "WorldName = '" .. lcWorldName .. "'"; + if (not(self:DBExec(sql, CallCallback))) then + LOGWARNING("SQL Error while iterating through areas (cStorage:ForEachArea())"); + return false; + end + return true; +end + + + + + +--- Returns the info on the specified area +-- Returns MinX, MinZ, MaxX, MaxZ, CreatorName on success, or nothing on failure +function cStorage:GetArea(a_AreaID, a_WorldName) + assert(a_AreaID); + assert(a_WorldName); + assert(self); + + local MinX, MinZ, MaxX, MaxZ, CreatorName; + local HasValues = false; + + -- SQL callback that parses the values and remembers them in variables + function RememberValues(UserData, NumValues, Values, Names) + if (NumValues ~= 5) then + -- Not enough values returned, skip this row + return 0; + end + MinX = Values[1]; + MinZ = Values[2]; + MaxX = Values[3]; + MaxZ = Values[4]; + CreatorName = Values[5]; + HasValues = true; + return 0; + end + + local lcWorldName = string.lower(a_WorldName); + local sql = "SELECT MinX, MinZ, MaxX, MaxZ, CreatorUserName FROM Areas WHERE " .. + "ID = " .. a_AreaID .. " AND WorldName = '" .. lcWorldName .. "'"; + if (not(self:DBExec(sql, RememberValues))) then + LOGWARNING("SQL Error while getting area info (cStorage:ForEachArea())"); + return; + end + + -- If no data has been retrieved, return nothing + if (not(HasValues)) then + return; + end + + return MinX, MinZ, MaxX, MaxZ, CreatorName; +end + + + + + +--- Calls the callback for each allowed user for the specified area +-- Callback signature: function(UserName) +function cStorage:ForEachUserInArea(a_AreaID, a_WorldName, a_Callback) + assert(a_AreaID); + assert(a_WorldName); + assert(a_Callback); + assert(self); + + -- Since in this version all the worlds share a single DB, the a_WorldName parameter is not actually used + -- But this may change in the future, when we have a per-world DB + + local function CallCallback(UserData, NumValues, Values) + if (NumValues ~= 1) then + return 0; + end + a_Callback(Values[1]); + return 0; + end + local sql = "SELECT UserName FROM AllowedUsers WHERE AreaID = " .. a_AreaID; + if (not(self:DBExec(sql, CallCallback))) then + LOGWARNING("SQL error while iterating area users for AreaID" .. a_AreaID); + return false; + end + return true; +end + + + + + +--- Adds the specified usernames to the specified area, if not already present +-- a_Users is an array table of usernames to add +function cStorage:AddAreaUsers(a_AreaID, a_WorldName, a_AddedBy, a_Users) + assert(a_AreaID); + assert(a_WorldName); + assert(a_Users); + assert(self); + + -- Convert all usernames to lowercase + for idx, Name in ipairs(a_Users) do + a_Users[idx] = string.lower(Name); + end + + -- Remove from a_Users the usernames already present in the area + local sql = "SELECT UserName FROM AllowedUsers WHERE AreaID = " .. a_AreaID; + local function RemovePresent(UserData, NumValues, Values, Names) + if (NumValues ~= 1) then + -- Invalid response format + return 0; + end + local DBName = Values[1]; + -- Remove the name from a_Users, if exists + for idx, Name in ipairs(a_Users) do + if (Name == DBName) then + table.remove(a_Users, idx); + return 0; + end + end + return 0; + end + if (not(self:DBExec(sql, RemovePresent))) then + LOGWARNING("SQL error while iterating through users"); + return false; + end + + -- Add the users + for idx, Name in ipairs(a_Users) do + local sql = "INSERT INTO AllowedUsers (AreaID, UserName) VALUES (" .. a_AreaID .. ", '" .. Name .. "')"; + if (not(self:DBExec(sql))) then + LOGWARNING("SQL error while adding user " .. Name .. " to area " .. a_AreaID); + end + end + + return true; +end + + + + + diff --git a/MCServer/Plugins/SquirrelChatLog.nut b/MCServer/Plugins/SquirrelChatLog.nut index 4ef0fd595..d90cef126 100644 --- a/MCServer/Plugins/SquirrelChatLog.nut +++ b/MCServer/Plugins/SquirrelChatLog.nut @@ -1,13 +1,13 @@ -class SquirrelChatLog extends Plugin
-{
- function Initialize()
- {
- this.AddHook(Hook.Chat);
- return true;
- }
-
- function OnChat(Message, Player)
- {
- ::print(Player.GetName() + ": " + Message);
- }
-}
+class SquirrelChatLog extends Plugin +{ + function Initialize() + { + this.AddHook(Hook.Chat); + return true; + } + + function OnChat(Message, Player) + { + ::print(Player.GetName() + ": " + Message); + } +} diff --git a/MCServer/crafting.txt b/MCServer/crafting.txt index 9e044dbec..41672ddda 100644 --- a/MCServer/crafting.txt +++ b/MCServer/crafting.txt @@ -1,392 +1,392 @@ -
-# This file describes the crafting recipes that MCServer knows.
-# The syntax is as follows:
-# <Line> = <Recipe>#<Comment>
-# <Recipe> = <Result> = <Ingredient1> | <Ingredient2> | ... | <IngredientN>
-# <IngredientN> = <ItemID>, <X1> : <Y1>, <X2> : <Y2>, ..., <Xn> : <Yn>
-# <ItemID> = <ItemType> [^<DamageValue>]
-# <Xn>, <Yn> = "1" .. "3", or "*" for any value. "*:*" can be replaced by a single "*".
-# <Result> = <ItemType> [^<DamageValue>] [, <Count>]
-#
-# The Xn, Yn coordinates are a reference to the crafting grid:
-# 1:1 | 2:1 | 3:1
-# 1:2 | 2:2 | 3:2
-# 1:3 | 2:3 | 3:3
-#
-# <ItemType> can be either a number, or an item name (checked against items.ini)
-#
-# ^<DamageValue> is optional, if not present, any damage value is matched for ingredients and zero is produced for the result
-#
-# Ingredients with an asterisk for a coord will not match already matched crafting grid items. This enables simplifying some of the recipes,
-# e. g. hoe: "Iron, 2:1, *:1"
-# -- this means "one iron at 2:1, and another one at either 1:1 or 3:1"
-#
-# To require multiple items of the same type in a slot, specify the slot number several times:
-# "Iron, 1:1, 2:2, 2:2"
-# -- this means "take one iron from slot 1:1 and two irons from slot 2:2"
-# Note that asterisked items cannot require multiple items in a single slot.
-#
-# Note that due to technical problems, it is NOT advised to use asterisked ingredients in crossing directions, such as "*:1, "2:*".
-# The parser may be unable to match such a recipe to the crafting grid!
-#
-# Whitespace is optional. Use it reasonably. Please do NOT use Tabs in the middle of lines!
-
-
-
-
-
-#******************************************************#
-# Basic Crafts
-#
-
-# Need to list each of the four log types, otherwise all logs would get converted into apple planks (^0)
-ApplePlanks, 4 = AppleLog, *
-ConiferPlanks, 4 = ConiferLog, *
-BirchPlanks, 4 = BirchLog, *
-JunglePlanks, 4 = JungleLog, *
-Stick, 4 = Planks, 2:2, 2:3
-Torch, 4 = Stick, 1:2 | Coal, 1:1
-Workbench = Planks, 1:1, 1:2, 2:1, 2:2
-Chest = Planks, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3
-TrappedChest = TripWireHook, 1:1 | Chest, 2:1
-EnderChest = EyeOfEnder, 2:2 | Obsidian, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3
-Furnace = Cobblestone, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3
-
-
-
-
-
-#******************************************************#
-# Blocks
-#
-IronBlock = IronIngot, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-GoldBlock = GoldIngot, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-DiamondBlock = Diamond, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-LapisBlock = LapisLazuli, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-EmeraldBlock = Emerald, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-RedstoneBlock = RedstoneDust, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-QuartzBlock = NetherQuartz, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-NetherBrick = netherbrickitem, 1:1, 1:2, 2:1, 2:2
-Glowstone = GlowstoneDust, 1:1, 1:2, 2:1, 2:2
-Wool = String, 1:1, 1:2, 2:1, 2:2
-TNT = Gunpowder, 1:1, 3:1, 2:2, 1:3, 3:3 | Sand, 2:1, 1:2, 3:2, 2:3
-PillarQuartzBlock = QuartzSlab, 1:1, 1:2
-ChiseledQuartzBlock, 2 = QuartzBlock, 1:1, 1:2
-
-# Slabs:
-StoneSlab, 6 = Stone, 1:1, 2:1, 3:1
-SandstoneSlab, 6 = Sandstone, 1:1, 2:1, 3:1
-WoodSlab, 6 = Planks, 1:1, 2:1, 3:1
-CobblestoneSlab, 6 = Cobblestone, 1:1, 2:1, 3:1
-BrickSlab, 6 = BrickBlock, 1:1, 2:1, 3:1
-StonebrickSlab, 6 = StoneBrick, 1:1, 2:1, 3:1
-NetherbrickSlab, 6 = NetherBrick, 1:1, 2:1, 3:1
-Quartzslab, 6 = QuartzBlock, 1:1, 2:1, 3:1
-snow, 6 = SnowBlock, 1:1, 2:1, 3:1
-
-# Stairs:
-WoodStairs, 4 = Planks, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3
-WoodStairs, 4 = Planks, 3:1, 2:2, 3:2, 1:3, 2:3, 3:3
-cobblestoneStairs, 4 = Cobblestone, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3
-cobblestoneStairs, 4 = Cobblestone, 3:1, 2:2, 3:2, 1:3, 2:3, 3:3
-BrickStairs, 4 = BrickBlock, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3
-BrickStairs, 4 = BrickBlock, 3:1, 2:2, 3:2, 1:3, 2:3, 3:3
-SandstoneStairs, 4 = Sandstone, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3
-SandstoneStairs, 4 = Sandstone, 3:1, 2:2, 3:2, 1:3, 2:3, 3:3
-NetherBrickStairs, 4 = NetherBrick, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3
-quartzstairs, 4 = QuartzBlock, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3
-SnowBlock = SnowBall, 1:1, 1:2, 2:1, 2:2
-ClayBlock = Clay, 1:1, 1:2, 2:1, 2:2
-BrickBlock = Brick, 1:1, 1:2, 2:1, 2:2
-StoneBrick, 4 = Stone, 1:1, 1:2, 2:1, 2:2
-BookShelf = Planks, 1:1, 2:1, 3:1, 1:3, 2:3, 3:3 | Book, 1:2, 2:2, 3:2
-Sandstone, 4 = Sand, 1:1, 1:2, 2:1, 2:2
-SmoothSandstone, 4 = Sandstone, 1:1, 1:2, 2:1, 2:2
-OrnamentSandstone = SandstoneSlab, 1:1, 1:2
-JackOLantern = Pumpkin, 1:1 | Torch, 1:2
-
-
-
-
-
-#******************************************************#
-# Tools
-#
-
-# Axes:
-WoodenAxe = Stick, 2:2, 2:3 | Planks, 2:1, 1:1, 1:2
-WoodenAxe = Stick, 2:2, 2:3 | Planks, 2:1, 3:1, 3:2
-StoneAxe = Stick, 2:2, 2:3 | Cobblestone, 2:1, 1:1, 1:2
-StoneAxe = Stick, 2:2, 2:3 | Cobblestone, 2:1, 3:1, 3:2
-GoldenAxe = Stick, 2:2, 2:3 | GoldIngot, 2:1, 1:1, 1:2
-GoldenAxe = Stick, 2:2, 2:3 | GoldIngot, 2:1, 3:1, 3:2
-IronAxe = Stick, 2:2, 2:3 | IronIngot, 2:1, 1:1, 1:2
-IronAxe = Stick, 2:2, 2:3 | IronIngot, 2:1, 3:1, 3:2
-DiamondAxe = Stick, 2:2, 2:3 | Diamond, 2:1, 1:1, 1:2
-DiamondAxe = Stick, 2:2, 2:3 | Diamond, 2:1, 3:1, 3:2
-
-# Pickaxes:
-WoodenPickaxe = Stick, 2:2, 2:3 | Planks, 1:1, 2:1, 3:1
-StonePickaxe = Stick, 2:2, 2:3 | Cobblestone, 1:1, 2:1, 3:1
-GoldenPickaxe = Stick, 2:2, 2:3 | GoldIngot, 1:1, 2:1, 3:1
-IronPickaxe = Stick, 2:2, 2:3 | IronIngot, 1:1, 2:1, 3:1
-DiamondPickaxe = Stick, 2:2, 2:3 | Diamond, 1:1, 2:1, 3:1
-
-# Shovels:
-WoodenShovel = Stick, 2:2, 2:3 | Planks, 2:1
-StoneShovel = Stick, 2:2, 2:3 | Cobblestone, 2:1
-GoldenShovel = Stick, 2:2, 2:3 | GoldIngot, 2:1
-IronShovel = Stick, 2:2, 2:3 | IronIngot, 2:1
-DiamondShovel = Stick, 2:2, 2:3 | Diamond, 2:1
-
-# Hoes:
-WoodenHoe = Stick, 2:2, 2:3 | Planks, 2:1, *:1
-StoneHoe = Stick, 2:2, 2:3 | Cobblestone, 2:1, *:1
-GoldenHoe = Stick, 2:2, 2:3 | GoldIngot, 2:1, *:1
-IronHoe = Stick, 2:2, 2:3 | IronIngot, 2:1, *:1
-DiamondHoe = Stick, 2:2, 2:3 | Diamond, 2:1, *:1
-
-Lighter = IronIngot, 1:1 | Flint, 2:2
-Lighter = IronIngot, 2:1 | Flint, 1:2
-Bucket = IronIngot, 1:1, 2:2, 3:1
-Compass = IronIngot, 2:1, 1:2, 3:2, 2:3 | RedstoneDust, 2:2
-Map = Paper, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | Compass, 2:2
-Watch = GoldIngot, 2:1, 1:2, 3:2, 2:3 | RedstoneDust, 2:2
-FishingRod = Stick, 1:3, 2:2, 3:1 | String, 3:2, 3:3
-FishingRod = Stick, 3:3, 2:2, 1:1 | String, 1:2, 1:3
-Shears = IronIngot, 1:1, 2:2
-Shears = IronIngot, 2:1, 1:2
-FireCharge = BlazePowder, * | Coal, * | Gunpowder, *
-
-
-
-
-
-#******************************************************#
-# Weapons
-#
-WoodenSword = Stick, 2:3 | Planks, 2:1, 2:2
-StoneSword = Stick, 2:3 | Cobblestone, 2:1, 2:2
-GoldenSword = Stick, 2:3 | GoldIngot, 2:1, 2:2
-IronSword = Stick, 2:3 | IronIngot, 2:1, 2:2
-DiamondSword = Stick, 2:3 | Diamond, 2:1, 2:2
-Bow = Stick, 2:1, 1:2, 2:3 | String, 3:1, 3:2, 3:3
-Bow = Stick, 2:1, 3:2, 2:3 | String, 1:1, 1:2, 1:3
-Arrow, 4 = Flint, 1:1 | Stick, 1:2 | Feather, 1:3
-
-
-
-
-
-
-#******************************************************#
-# Armor
-#
-
-# Helmets:
-LeatherHelmet = Leather, 1:1, 2:1, 3:1, 1:2, 3:2
-ChainmailHelmet = Fire, 1:1, 2:1, 3:1, 1:2, 3:2
-GoldenHelmet = GoldIngot, 1:1, 2:1, 3:1, 1:2, 3:2
-IronHelmet = IronIngot, 1:1, 2:1, 3:1, 1:2, 3:2
-DiamondHelmet = Diamond, 1:1, 2:1, 3:1, 1:2, 3:2
-
-# Chestplates:
-LeatherChestplate = Leather, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3
-ChainmailChestplate = Fire, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3
-GoldenChestplate = GoldIngot, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3
-IronChestplate = IronIngot, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3
-DiamondChestplate = Diamond, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3
-
-# Leggins:
-LeatherPants = Leather, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3
-ChainmailPants = Fire, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3
-GoldenPants = GoldIngot, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3
-IronPants = IronIngot, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3
-DiamondPants = Diamond, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3
-
-# Boots:
-LeatherBoots = Leather, 1:1, 3:1, 1:2, 3:2
-ChainmailBoots = Fire, 1:1, 3:1, 1:2, 3:2
-GoldenBoots = GoldIngot, 1:1, 3:1, 1:2, 3:2
-IronBoots = IronIngot, 1:1, 3:1, 1:2, 3:2
-DiamondBoots = Diamond, 1:1, 3:1, 1:2, 3:2
-
-
-
-
-
-#******************************************************#
-# Transportation
-#
-CarrotOnAStick = FishingRod, 1:2 | Carrot, 2:3
-Minecart = IronIngot, 1:1, 3:1, 1:2, 2:2, 3:2
-PoweredMinecart = Minecart, * | Furnace, *
-StorageMinecart = Minecart, * | Chest, *
-TNTMinecart = Minecart, * | TNT, *
-hopperminecart = Minecart, * | Hopper, *
-Rails, 16 = IronIngot, 1:1, 3:1, 1:2, 3:2, 1:3, 3:3 | Stick, 2:2
-PoweredRail, 6 = GoldIngot, 1:1, 3:1, 1:2, 3:2, 1:3, 3:3 | Stick, 2:2 | RedstoneDust, 2:3
-DetectorRail, 6 = IronIngot, 1:1, 3:1, 1:2, 3:2, 1:3, 3:3 | StonePlate, 2:2 | RedstoneDust, 2:3
-Boat = Planks, 1:1, 3:1, 1:2, 2:2, 3:2
-ActivatorRail, 6 = IronIngot, 1:1, 1:2, 1:3, 3:1, 3:2, 3:3 | Stick, 2:1, 2:3 | RedstoneTorchon, 2:2
-
-
-
-
-#******************************************************#
-# Mechanisms
-#
-WoodenDoor = Planks, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3
-IronDoor = IronIngot, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3
-TrapDoor, 2 = Planks, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2
-WoodPlate = Planks, 1:1, 2:1
-StonePlate = Stone, 1:1, 2:1
-StoneButton = Stone, 1:1
-WoodenButton = Planks, 1:1
-RedstoneTorchOn = Stick, 1:2 | RedstoneDust, 1:1
-Lever = Cobblestone, 1:2 | Stick, 1:1
-NoteBlock = Planks, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | RedstoneDust, 2:2
-Jukebox = Planks, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | Diamond, 2:2
-Dispenser = Cobblestone, 1:1, 1:2, 1:3, 2:1, 3:1, 3:2, 3:3 | RedstoneDust, 2:3 | Bow, 2:2
-Dropper = Cobblestone, 1:1, 2:1, 3:1, 1:2, 1:3, 3:2, 3:3 | Hopper, 2:2 | RedstoneDust, 2:3
-Repeater = Stone, 1:2, 2:2, 3:2 | RedstoneTorchOn, 1:1, 3:1 | RedstoneDust, 2:1
-Comparator = RedstoneTorchOn, 2:1, 1:2, 3:2 | NetherQuartz, 2:2 | Stone, 1:3, 2:3, 3:3
-DaylightSensor = Glass, 1:1, 2:1, 3:1 | NetherQuartz, 1:2, 2:2, 3:2 | Woodslab, 1:3, 2:3, 3:3
-Hopper = Ironbars, 1:1, 3:1, 1:2, 3:2, 2:3 | Chest, 2:2
-Piston = Planks, 1:1, 2:1, 3:1 | RedstoneDust, 2:3 | Cobblestone, 1:2, 3:2, 1:3, 3:3 | IronIngot, 2:2
-StickyPiston = Piston, * | SlimeBall, *
-RedstoneLamp = RedstoneDust, 2:1, 1:2, 3:2, 2:3 | Glowstone, 2:2
-tripwirehook, 2 = planks, 2:3 | stick, 2:2 | ironbar, 2:1
-
-
-
-
-
-#******************************************************#
-# Food
-#
-Bowl, 4 = Planks, 1:1, 2:2, 3:1
-MushroomStew = Bowl, * | BrownMushroom, * | RedMushroom, *
-Bread = Wheat, 1:1, 2:1, 3:1
-Sugar = Sugarcane, *
-Cake = MilkBucket, 1:1, 2:1, 3:1 | Sugar, 1:2, 3:2 | Egg, 2:2 | Wheat, 1:3, 2:3, 3:3
-Cookie = Wheat, *, * | CocoaBeans, *
-GoldenApple = RedApple, 2:2 | GoldNugget, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3
-EnchantedGoldenApple = RedApple, 2:2 | GoldBlock, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3
-Melon = MelonSlice, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-MelonSeeds = MelonSlice, *
-PumpkinSeeds, 4 = Pumpkin, *
-PumpkinPie = Pumpkin, * | Sugar, * | egg, *
-
-
-
-
-
-#******************************************************#
-# Miscellaneous
-#
-
-# Minerals:
-IronIngot, 9 = IronBlock, *
-GoldIngot, 9 = GoldBlock, *
-Diamond, 9 = DiamondBlock, *
-LapisLazuli, 9 = LapisBlock, *
-Emerald, 9 = EmeraldBlock, *
-RedstoneDust, 9 = RedstoneBlock, *
-
-Painting = Stick, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | Wool, 2:2
-ItemFrame = Stick, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | Leather, 2:2
-Sign = Planks, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2 | Stick, 2:3
-Ladder, 3 = Stick, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 3:3
-GlassPane, 16 = Glass, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2
-IronBars, 16 = IronIngot, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2
-Paper, 3 = Sugarcane, 1:1, 2:1, 3:1
-Book = Paper, *, *, * | leather, *
-Bookandquill = Book, * | feather, * | inksac, *
-Fence, 2 = Stick, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2
-Cobblestonewall, 6 = cobblestone, 1:2, 1:3, 2:2, 2:3, 3:2, 3:3
-mossycobblestonewall, 6 = mossycobblestone, 1:2, 1:3, 2:2, 2:3, 3:2, 3:3
-NetherBrickFence, 6 = NetherBrick, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2
-FenceGate = Stick, 1:1, 1:2, 3:1, 3:2 | Planks, 2:1, 2:2
-Bed = Planks, 1:2, 2:2, 3:2 | Wool, 1:1, 2:1, 3:1
-GoldIngot = GoldNugget, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3
-EyeOfEnder = EnderPearl, * | BlazePowder, *
-Beacon = Glass, 1:1, 1:2, 2:1, 3:1, 3:2 | Obsidian, 1:3, 2:3, 3:3 | NetherStar, 2:2
-Anvil = IronBlock, 1:1, 2:1, 3:1 | IronIngot, 2:2, 1:3, 2:3, 3:3
-FlowerPot = Brick, 1:2, 2:3, 3:2
-
-
-
-
-
-#******************************************************#
-# Dyes
-#
-
-WhiteDye, 3 = Bone, *
-RedDye, 2 = Rose, *
-YellowDye, 2 = Flower, *
-
-# Color mixing, duals:
-OrangeDye, 2 = YellowDye, * | RedDye, *
-CyanDye, 2 = GreenDye, * | BlueDye, *
-PurpleDye, 2 = RedDye, * | BlueDye, *
-GrayDye, 2 = BlackDye, * | WhiteDye, *
-LtBlueDye, 2 = BlueDye, * | WhiteDye, *
-PinkDye, 2 = RedDye, * | WhiteDye, *
-LimeDye, 2 = GreenDye, * | WhiteDye, *
-MagentaDye, 2 = PurpleDye, * | PinkDye, *
-LtGrayDye, 2 = GrayDye, * | WhiteDye, *
-
-# triplets:
-LtGrayDye, 3 = BlackDye, * | WhiteDye, *, *
-MagentaDye, 3 = BlueDye, * | PinkDye, * | RedDye, *
-
-# quads:
-MagentaDye, 4 = BlueDye, * | WhiteDye, * | RedDye, *, *
-
-
-
-
-
-#******************************************************#
-# Colored wool:
-#
-WhiteWool = Wool, * | BoneMeal, *
-OrangeWool = Wool, * | OrangeDye, *
-MagentaWool = Wool, * | MagentaDye, *
-LightBlueWool = Wool, * | LightBlueDye, *
-YellowWool = Wool, * | YellowDye, *
-LimeWool = Wool, * | LimeDye, *
-PinkWool = Wool, * | PinkDye, *
-GrayWool = Wool, * | GrayDye, *
-LightGrayWool = Wool, * | LightGrayDye, *
-CyanWool = Wool, * | CyanDye, *
-VioletWool = Wool, * | VioletDye, *
-BlueWool = Wool, * | BlueDye, *
-BrownWool = Wool, * | BrownDye, *
-GreenWool = Wool, * | GreenDye, *
-RedWool = Wool, * | RedDye, *
-BlackWool = Wool, * | BlackDye, *
-
-
-
-
-
-#******************************************************#
-# Enchantment & Brewing
-#
-GlassBottle, 3 = Glass, 1:1, 2:2, 3:1
-Cauldron = IronIngot, 1:1, 3:1, 1:2, 3:2, 1:3, 2:3, 3:3
-BrewingStand = Cobblestone, 1:2, 2:2, 3:2 | BlazeRod, 2:1
-BlazePowder, 2 = BlazeRod, *
-MagmaCream = SlimeBall, * | BlazePowder, *
-FermentedSpiderEye = SpiderEye, * | Sugar, * | BrownMushroom, *
-GlisteringMelon = MelonSlice, * | GoldNugget, *
-GoldNugget, 9 = GoldIngot, *
-EnchantmentTable = Obsidian, 1:3, 2:3, 3:3, 2:2 | Diamond, 1:2, 3:2 | Book, 2:1
-
-
-
-
-
+ +# This file describes the crafting recipes that MCServer knows. +# The syntax is as follows: +# <Line> = <Recipe>#<Comment> +# <Recipe> = <Result> = <Ingredient1> | <Ingredient2> | ... | <IngredientN> +# <IngredientN> = <ItemID>, <X1> : <Y1>, <X2> : <Y2>, ..., <Xn> : <Yn> +# <ItemID> = <ItemType> [^<DamageValue>] +# <Xn>, <Yn> = "1" .. "3", or "*" for any value. "*:*" can be replaced by a single "*". +# <Result> = <ItemType> [^<DamageValue>] [, <Count>] +# +# The Xn, Yn coordinates are a reference to the crafting grid: +# 1:1 | 2:1 | 3:1 +# 1:2 | 2:2 | 3:2 +# 1:3 | 2:3 | 3:3 +# +# <ItemType> can be either a number, or an item name (checked against items.ini) +# +# ^<DamageValue> is optional, if not present, any damage value is matched for ingredients and zero is produced for the result +# +# Ingredients with an asterisk for a coord will not match already matched crafting grid items. This enables simplifying some of the recipes, +# e. g. hoe: "Iron, 2:1, *:1" +# -- this means "one iron at 2:1, and another one at either 1:1 or 3:1" +# +# To require multiple items of the same type in a slot, specify the slot number several times: +# "Iron, 1:1, 2:2, 2:2" +# -- this means "take one iron from slot 1:1 and two irons from slot 2:2" +# Note that asterisked items cannot require multiple items in a single slot. +# +# Note that due to technical problems, it is NOT advised to use asterisked ingredients in crossing directions, such as "*:1, "2:*". +# The parser may be unable to match such a recipe to the crafting grid! +# +# Whitespace is optional. Use it reasonably. Please do NOT use Tabs in the middle of lines! + + + + + +#******************************************************# +# Basic Crafts +# + +# Need to list each of the four log types, otherwise all logs would get converted into apple planks (^0) +ApplePlanks, 4 = AppleLog, * +ConiferPlanks, 4 = ConiferLog, * +BirchPlanks, 4 = BirchLog, * +JunglePlanks, 4 = JungleLog, * +Stick, 4 = Planks, 2:2, 2:3 +Torch, 4 = Stick, 1:2 | Coal, 1:1 +Workbench = Planks, 1:1, 1:2, 2:1, 2:2 +Chest = Planks, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 +TrappedChest = TripWireHook, 1:1 | Chest, 2:1 +EnderChest = EyeOfEnder, 2:2 | Obsidian, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 +Furnace = Cobblestone, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 + + + + + +#******************************************************# +# Blocks +# +IronBlock = IronIngot, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +GoldBlock = GoldIngot, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +DiamondBlock = Diamond, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +LapisBlock = LapisLazuli, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +EmeraldBlock = Emerald, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +RedstoneBlock = RedstoneDust, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +QuartzBlock = NetherQuartz, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +NetherBrick = netherbrickitem, 1:1, 1:2, 2:1, 2:2 +Glowstone = GlowstoneDust, 1:1, 1:2, 2:1, 2:2 +Wool = String, 1:1, 1:2, 2:1, 2:2 +TNT = Gunpowder, 1:1, 3:1, 2:2, 1:3, 3:3 | Sand, 2:1, 1:2, 3:2, 2:3 +PillarQuartzBlock = QuartzSlab, 1:1, 1:2 +ChiseledQuartzBlock, 2 = QuartzBlock, 1:1, 1:2 + +# Slabs: +StoneSlab, 6 = Stone, 1:1, 2:1, 3:1 +SandstoneSlab, 6 = Sandstone, 1:1, 2:1, 3:1 +WoodSlab, 6 = Planks, 1:1, 2:1, 3:1 +CobblestoneSlab, 6 = Cobblestone, 1:1, 2:1, 3:1 +BrickSlab, 6 = BrickBlock, 1:1, 2:1, 3:1 +StonebrickSlab, 6 = StoneBrick, 1:1, 2:1, 3:1 +NetherbrickSlab, 6 = NetherBrick, 1:1, 2:1, 3:1 +Quartzslab, 6 = QuartzBlock, 1:1, 2:1, 3:1 +snow, 6 = SnowBlock, 1:1, 2:1, 3:1 + +# Stairs: +WoodStairs, 4 = Planks, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3 +WoodStairs, 4 = Planks, 3:1, 2:2, 3:2, 1:3, 2:3, 3:3 +cobblestoneStairs, 4 = Cobblestone, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3 +cobblestoneStairs, 4 = Cobblestone, 3:1, 2:2, 3:2, 1:3, 2:3, 3:3 +BrickStairs, 4 = BrickBlock, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3 +BrickStairs, 4 = BrickBlock, 3:1, 2:2, 3:2, 1:3, 2:3, 3:3 +SandstoneStairs, 4 = Sandstone, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3 +SandstoneStairs, 4 = Sandstone, 3:1, 2:2, 3:2, 1:3, 2:3, 3:3 +NetherBrickStairs, 4 = NetherBrick, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3 +quartzstairs, 4 = QuartzBlock, 1:1, 1:2, 2:2, 1:3, 2:3, 3:3 +SnowBlock = SnowBall, 1:1, 1:2, 2:1, 2:2 +ClayBlock = Clay, 1:1, 1:2, 2:1, 2:2 +BrickBlock = Brick, 1:1, 1:2, 2:1, 2:2 +StoneBrick, 4 = Stone, 1:1, 1:2, 2:1, 2:2 +BookShelf = Planks, 1:1, 2:1, 3:1, 1:3, 2:3, 3:3 | Book, 1:2, 2:2, 3:2 +Sandstone, 4 = Sand, 1:1, 1:2, 2:1, 2:2 +SmoothSandstone, 4 = Sandstone, 1:1, 1:2, 2:1, 2:2 +OrnamentSandstone = SandstoneSlab, 1:1, 1:2 +JackOLantern = Pumpkin, 1:1 | Torch, 1:2 + + + + + +#******************************************************# +# Tools +# + +# Axes: +WoodenAxe = Stick, 2:2, 2:3 | Planks, 2:1, 1:1, 1:2 +WoodenAxe = Stick, 2:2, 2:3 | Planks, 2:1, 3:1, 3:2 +StoneAxe = Stick, 2:2, 2:3 | Cobblestone, 2:1, 1:1, 1:2 +StoneAxe = Stick, 2:2, 2:3 | Cobblestone, 2:1, 3:1, 3:2 +GoldenAxe = Stick, 2:2, 2:3 | GoldIngot, 2:1, 1:1, 1:2 +GoldenAxe = Stick, 2:2, 2:3 | GoldIngot, 2:1, 3:1, 3:2 +IronAxe = Stick, 2:2, 2:3 | IronIngot, 2:1, 1:1, 1:2 +IronAxe = Stick, 2:2, 2:3 | IronIngot, 2:1, 3:1, 3:2 +DiamondAxe = Stick, 2:2, 2:3 | Diamond, 2:1, 1:1, 1:2 +DiamondAxe = Stick, 2:2, 2:3 | Diamond, 2:1, 3:1, 3:2 + +# Pickaxes: +WoodenPickaxe = Stick, 2:2, 2:3 | Planks, 1:1, 2:1, 3:1 +StonePickaxe = Stick, 2:2, 2:3 | Cobblestone, 1:1, 2:1, 3:1 +GoldenPickaxe = Stick, 2:2, 2:3 | GoldIngot, 1:1, 2:1, 3:1 +IronPickaxe = Stick, 2:2, 2:3 | IronIngot, 1:1, 2:1, 3:1 +DiamondPickaxe = Stick, 2:2, 2:3 | Diamond, 1:1, 2:1, 3:1 + +# Shovels: +WoodenShovel = Stick, 2:2, 2:3 | Planks, 2:1 +StoneShovel = Stick, 2:2, 2:3 | Cobblestone, 2:1 +GoldenShovel = Stick, 2:2, 2:3 | GoldIngot, 2:1 +IronShovel = Stick, 2:2, 2:3 | IronIngot, 2:1 +DiamondShovel = Stick, 2:2, 2:3 | Diamond, 2:1 + +# Hoes: +WoodenHoe = Stick, 2:2, 2:3 | Planks, 2:1, *:1 +StoneHoe = Stick, 2:2, 2:3 | Cobblestone, 2:1, *:1 +GoldenHoe = Stick, 2:2, 2:3 | GoldIngot, 2:1, *:1 +IronHoe = Stick, 2:2, 2:3 | IronIngot, 2:1, *:1 +DiamondHoe = Stick, 2:2, 2:3 | Diamond, 2:1, *:1 + +Lighter = IronIngot, 1:1 | Flint, 2:2 +Lighter = IronIngot, 2:1 | Flint, 1:2 +Bucket = IronIngot, 1:1, 2:2, 3:1 +Compass = IronIngot, 2:1, 1:2, 3:2, 2:3 | RedstoneDust, 2:2 +Map = Paper, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | Compass, 2:2 +Watch = GoldIngot, 2:1, 1:2, 3:2, 2:3 | RedstoneDust, 2:2 +FishingRod = Stick, 1:3, 2:2, 3:1 | String, 3:2, 3:3 +FishingRod = Stick, 3:3, 2:2, 1:1 | String, 1:2, 1:3 +Shears = IronIngot, 1:1, 2:2 +Shears = IronIngot, 2:1, 1:2 +FireCharge = BlazePowder, * | Coal, * | Gunpowder, * + + + + + +#******************************************************# +# Weapons +# +WoodenSword = Stick, 2:3 | Planks, 2:1, 2:2 +StoneSword = Stick, 2:3 | Cobblestone, 2:1, 2:2 +GoldenSword = Stick, 2:3 | GoldIngot, 2:1, 2:2 +IronSword = Stick, 2:3 | IronIngot, 2:1, 2:2 +DiamondSword = Stick, 2:3 | Diamond, 2:1, 2:2 +Bow = Stick, 2:1, 1:2, 2:3 | String, 3:1, 3:2, 3:3 +Bow = Stick, 2:1, 3:2, 2:3 | String, 1:1, 1:2, 1:3 +Arrow, 4 = Flint, 1:1 | Stick, 1:2 | Feather, 1:3 + + + + + + +#******************************************************# +# Armor +# + +# Helmets: +LeatherHelmet = Leather, 1:1, 2:1, 3:1, 1:2, 3:2 +ChainmailHelmet = Fire, 1:1, 2:1, 3:1, 1:2, 3:2 +GoldenHelmet = GoldIngot, 1:1, 2:1, 3:1, 1:2, 3:2 +IronHelmet = IronIngot, 1:1, 2:1, 3:1, 1:2, 3:2 +DiamondHelmet = Diamond, 1:1, 2:1, 3:1, 1:2, 3:2 + +# Chestplates: +LeatherChestplate = Leather, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3 +ChainmailChestplate = Fire, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3 +GoldenChestplate = GoldIngot, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3 +IronChestplate = IronIngot, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3 +DiamondChestplate = Diamond, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 2:3, 3:3 + +# Leggins: +LeatherPants = Leather, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3 +ChainmailPants = Fire, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3 +GoldenPants = GoldIngot, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3 +IronPants = IronIngot, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3 +DiamondPants = Diamond, 1:1, 2:1, 3:1, 1:2, 3:2, 1:3, 3:3 + +# Boots: +LeatherBoots = Leather, 1:1, 3:1, 1:2, 3:2 +ChainmailBoots = Fire, 1:1, 3:1, 1:2, 3:2 +GoldenBoots = GoldIngot, 1:1, 3:1, 1:2, 3:2 +IronBoots = IronIngot, 1:1, 3:1, 1:2, 3:2 +DiamondBoots = Diamond, 1:1, 3:1, 1:2, 3:2 + + + + + +#******************************************************# +# Transportation +# +CarrotOnAStick = FishingRod, 1:2 | Carrot, 2:3 +Minecart = IronIngot, 1:1, 3:1, 1:2, 2:2, 3:2 +PoweredMinecart = Minecart, * | Furnace, * +StorageMinecart = Minecart, * | Chest, * +TNTMinecart = Minecart, * | TNT, * +hopperminecart = Minecart, * | Hopper, * +Rails, 16 = IronIngot, 1:1, 3:1, 1:2, 3:2, 1:3, 3:3 | Stick, 2:2 +PoweredRail, 6 = GoldIngot, 1:1, 3:1, 1:2, 3:2, 1:3, 3:3 | Stick, 2:2 | RedstoneDust, 2:3 +DetectorRail, 6 = IronIngot, 1:1, 3:1, 1:2, 3:2, 1:3, 3:3 | StonePlate, 2:2 | RedstoneDust, 2:3 +Boat = Planks, 1:1, 3:1, 1:2, 2:2, 3:2 +ActivatorRail, 6 = IronIngot, 1:1, 1:2, 1:3, 3:1, 3:2, 3:3 | Stick, 2:1, 2:3 | RedstoneTorchon, 2:2 + + + + +#******************************************************# +# Mechanisms +# +WoodenDoor = Planks, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3 +IronDoor = IronIngot, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3 +TrapDoor, 2 = Planks, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2 +WoodPlate = Planks, 1:1, 2:1 +StonePlate = Stone, 1:1, 2:1 +StoneButton = Stone, 1:1 +WoodenButton = Planks, 1:1 +RedstoneTorchOn = Stick, 1:2 | RedstoneDust, 1:1 +Lever = Cobblestone, 1:2 | Stick, 1:1 +NoteBlock = Planks, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | RedstoneDust, 2:2 +Jukebox = Planks, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | Diamond, 2:2 +Dispenser = Cobblestone, 1:1, 1:2, 1:3, 2:1, 3:1, 3:2, 3:3 | RedstoneDust, 2:3 | Bow, 2:2 +Dropper = Cobblestone, 1:1, 2:1, 3:1, 1:2, 1:3, 3:2, 3:3 | Hopper, 2:2 | RedstoneDust, 2:3 +Repeater = Stone, 1:2, 2:2, 3:2 | RedstoneTorchOn, 1:1, 3:1 | RedstoneDust, 2:1 +Comparator = RedstoneTorchOn, 2:1, 1:2, 3:2 | NetherQuartz, 2:2 | Stone, 1:3, 2:3, 3:3 +DaylightSensor = Glass, 1:1, 2:1, 3:1 | NetherQuartz, 1:2, 2:2, 3:2 | Woodslab, 1:3, 2:3, 3:3 +Hopper = Ironbars, 1:1, 3:1, 1:2, 3:2, 2:3 | Chest, 2:2 +Piston = Planks, 1:1, 2:1, 3:1 | RedstoneDust, 2:3 | Cobblestone, 1:2, 3:2, 1:3, 3:3 | IronIngot, 2:2 +StickyPiston = Piston, * | SlimeBall, * +RedstoneLamp = RedstoneDust, 2:1, 1:2, 3:2, 2:3 | Glowstone, 2:2 +tripwirehook, 2 = planks, 2:3 | stick, 2:2 | ironbar, 2:1 + + + + + +#******************************************************# +# Food +# +Bowl, 4 = Planks, 1:1, 2:2, 3:1 +MushroomStew = Bowl, * | BrownMushroom, * | RedMushroom, * +Bread = Wheat, 1:1, 2:1, 3:1 +Sugar = Sugarcane, * +Cake = MilkBucket, 1:1, 2:1, 3:1 | Sugar, 1:2, 3:2 | Egg, 2:2 | Wheat, 1:3, 2:3, 3:3 +Cookie = Wheat, *, * | CocoaBeans, * +GoldenApple = RedApple, 2:2 | GoldNugget, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 +EnchantedGoldenApple = RedApple, 2:2 | GoldBlock, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 +Melon = MelonSlice, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +MelonSeeds = MelonSlice, * +PumpkinSeeds, 4 = Pumpkin, * +PumpkinPie = Pumpkin, * | Sugar, * | egg, * + + + + + +#******************************************************# +# Miscellaneous +# + +# Minerals: +IronIngot, 9 = IronBlock, * +GoldIngot, 9 = GoldBlock, * +Diamond, 9 = DiamondBlock, * +LapisLazuli, 9 = LapisBlock, * +Emerald, 9 = EmeraldBlock, * +RedstoneDust, 9 = RedstoneBlock, * + +Painting = Stick, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | Wool, 2:2 +ItemFrame = Stick, 1:1, 1:2, 1:3, 2:1, 2:3, 3:1, 3:2, 3:3 | Leather, 2:2 +Sign = Planks, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2 | Stick, 2:3 +Ladder, 3 = Stick, 1:1, 3:1, 1:2, 2:2, 3:2, 1:3, 3:3 +GlassPane, 16 = Glass, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2 +IronBars, 16 = IronIngot, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2 +Paper, 3 = Sugarcane, 1:1, 2:1, 3:1 +Book = Paper, *, *, * | leather, * +Bookandquill = Book, * | feather, * | inksac, * +Fence, 2 = Stick, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2 +Cobblestonewall, 6 = cobblestone, 1:2, 1:3, 2:2, 2:3, 3:2, 3:3 +mossycobblestonewall, 6 = mossycobblestone, 1:2, 1:3, 2:2, 2:3, 3:2, 3:3 +NetherBrickFence, 6 = NetherBrick, 1:1, 2:1, 3:1, 1:2, 2:2, 3:2 +FenceGate = Stick, 1:1, 1:2, 3:1, 3:2 | Planks, 2:1, 2:2 +Bed = Planks, 1:2, 2:2, 3:2 | Wool, 1:1, 2:1, 3:1 +GoldIngot = GoldNugget, 1:1, 1:2, 1:3, 2:1, 2:2, 2:3, 3:1, 3:2, 3:3 +EyeOfEnder = EnderPearl, * | BlazePowder, * +Beacon = Glass, 1:1, 1:2, 2:1, 3:1, 3:2 | Obsidian, 1:3, 2:3, 3:3 | NetherStar, 2:2 +Anvil = IronBlock, 1:1, 2:1, 3:1 | IronIngot, 2:2, 1:3, 2:3, 3:3 +FlowerPot = Brick, 1:2, 2:3, 3:2 + + + + + +#******************************************************# +# Dyes +# + +WhiteDye, 3 = Bone, * +RedDye, 2 = Rose, * +YellowDye, 2 = Flower, * + +# Color mixing, duals: +OrangeDye, 2 = YellowDye, * | RedDye, * +CyanDye, 2 = GreenDye, * | BlueDye, * +PurpleDye, 2 = RedDye, * | BlueDye, * +GrayDye, 2 = BlackDye, * | WhiteDye, * +LtBlueDye, 2 = BlueDye, * | WhiteDye, * +PinkDye, 2 = RedDye, * | WhiteDye, * +LimeDye, 2 = GreenDye, * | WhiteDye, * +MagentaDye, 2 = PurpleDye, * | PinkDye, * +LtGrayDye, 2 = GrayDye, * | WhiteDye, * + +# triplets: +LtGrayDye, 3 = BlackDye, * | WhiteDye, *, * +MagentaDye, 3 = BlueDye, * | PinkDye, * | RedDye, * + +# quads: +MagentaDye, 4 = BlueDye, * | WhiteDye, * | RedDye, *, * + + + + + +#******************************************************# +# Colored wool: +# +WhiteWool = Wool, * | BoneMeal, * +OrangeWool = Wool, * | OrangeDye, * +MagentaWool = Wool, * | MagentaDye, * +LightBlueWool = Wool, * | LightBlueDye, * +YellowWool = Wool, * | YellowDye, * +LimeWool = Wool, * | LimeDye, * +PinkWool = Wool, * | PinkDye, * +GrayWool = Wool, * | GrayDye, * +LightGrayWool = Wool, * | LightGrayDye, * +CyanWool = Wool, * | CyanDye, * +VioletWool = Wool, * | VioletDye, * +BlueWool = Wool, * | BlueDye, * +BrownWool = Wool, * | BrownDye, * +GreenWool = Wool, * | GreenDye, * +RedWool = Wool, * | RedDye, * +BlackWool = Wool, * | BlackDye, * + + + + + +#******************************************************# +# Enchantment & Brewing +# +GlassBottle, 3 = Glass, 1:1, 2:2, 3:1 +Cauldron = IronIngot, 1:1, 3:1, 1:2, 3:2, 1:3, 2:3, 3:3 +BrewingStand = Cobblestone, 1:2, 2:2, 3:2 | BlazeRod, 2:1 +BlazePowder, 2 = BlazeRod, * +MagmaCream = SlimeBall, * | BlazePowder, * +FermentedSpiderEye = SpiderEye, * | Sugar, * | BrownMushroom, * +GlisteringMelon = MelonSlice, * | GoldNugget, * +GoldNugget, 9 = GoldIngot, * +EnchantmentTable = Obsidian, 1:3, 2:3, 3:3, 2:2 | Diamond, 1:2, 3:2 | Book, 2:1 + + + + + diff --git a/MCServer/furnace.txt b/MCServer/furnace.txt index b25c79ab7..e5d4ca70f 100644 --- a/MCServer/furnace.txt +++ b/MCServer/furnace.txt @@ -1,75 +1,75 @@ -#*****************#
-# Furnace Recipes #
-#*****************#
-#
-#
-#******************************************************#
-# Basic Notation Help
-#
-# **** Item Definition ****
-# An Item is defined by an Item Type, an amount (and damage)
-# The damage is optional, and if not specified it's assumed to be 0
-#
-# -Cactus Green:
-# 351 : 1 ( : 2 )
-# ItemType : Amount ( : Damage )
-#
-#
-# **** Recipe and result ****
-#
-# 4:1@200=1:1 -> Produces 1 smooth stone from 1 cobblestone in 200 ticks (10 seconds)
-#
-# 4 : 1 @ 200 = 1 : 1
-# ItemType : Amount @ ticks = ItemID : Amount
-#
-#
-# **** Fuel ****
-#
-# !17:1 = 300 -> 1 Wood burns for 300 ticks (15 s)
-#
-# ! 17 : 1 = 300
-# Fuel ItemType : Amount = ticks
-#
-#******************************************************#
-
-
-
-
-
-#--------------------------
-# Smelting recipes
-
-4:1 @ 200 = 1:1 # 1 Cobblestone -> 1 Rock
-15:1 @ 200 = 265:1 # 1 Iron Ore -> 1 Iron Ingot
-14:1 @ 200 = 266:1 # 1 Gold Ore -> 1 Gold Ingot
-153:1 @ 200 = 406:1 # 1 Quartz Ore -> 1 Quartz
-12:1 @ 200 = 20:1 # 1 Sand -> 1 Glass
-319:1 @ 200 = 320:1 # 1 Raw Pork -> 1 Cooked Pork
-363:1 @ 200 = 364:1 # 1 Raw Beef -> 1 Cooked Beef (steak)
-365:1 @ 200 = 366:1 # 1 Raw Chicken -> 1 Cooked Chicken
-337:1 @ 200 = 336:1 # 1 Clay -> 1 Clay Brick
-87:1 @ 200 = 405:1 # 1 NetherRack -> 1 NetherBrick
-349:1 @ 200 = 350:1 # 1 Raw Fish -> 1 Cooked Fish
-17:1 @ 200 = 263:1:1 # 1 Log -> 1 Charcoal
-81:1 @ 200 = 351:1:2 # 1 Cactus -> 1 Green Dye
-
-
-
-
-
-#--------------------------
-# Fuels
-
-! 263:1 = 1600 # 1 Charcoal -> 80 sec
-! 42:126:1 = 150 # 1 Halfslab -> 7.5 seconds
-! 5:1 = 300 # 1 Planks -> 15 sec
-! 280:1 = 100 # 1 Stick -> 5 sec
-! 85:1 = 300 # 1 Fence -> 15 sec
-! 53:1 = 300 # 1 Wooden Stairs -> 15 sec
-! 58:1 = 300 # 1 Crafting Table -> 15 sec
-! 47:1 = 300 # 1 Bookshelf -> 15 sec
-! 54:1 = 300 # 1 Chest -> 15 sec
-! 84:1 = 300 # 1 Jukebox -> 15 sec
-! 327:1 = 200000 # 1 Lava Bucket -> 1000 sec
-! 17:1 = 300 # 1 Wood -> 15 sec
-! 6:1 = 100 # 1 Sapling -> 5 sec
+#*****************# +# Furnace Recipes # +#*****************# +# +# +#******************************************************# +# Basic Notation Help +# +# **** Item Definition **** +# An Item is defined by an Item Type, an amount (and damage) +# The damage is optional, and if not specified it's assumed to be 0 +# +# -Cactus Green: +# 351 : 1 ( : 2 ) +# ItemType : Amount ( : Damage ) +# +# +# **** Recipe and result **** +# +# 4:1@200=1:1 -> Produces 1 smooth stone from 1 cobblestone in 200 ticks (10 seconds) +# +# 4 : 1 @ 200 = 1 : 1 +# ItemType : Amount @ ticks = ItemID : Amount +# +# +# **** Fuel **** +# +# !17:1 = 300 -> 1 Wood burns for 300 ticks (15 s) +# +# ! 17 : 1 = 300 +# Fuel ItemType : Amount = ticks +# +#******************************************************# + + + + + +#-------------------------- +# Smelting recipes + +4:1 @ 200 = 1:1 # 1 Cobblestone -> 1 Rock +15:1 @ 200 = 265:1 # 1 Iron Ore -> 1 Iron Ingot +14:1 @ 200 = 266:1 # 1 Gold Ore -> 1 Gold Ingot +153:1 @ 200 = 406:1 # 1 Quartz Ore -> 1 Quartz +12:1 @ 200 = 20:1 # 1 Sand -> 1 Glass +319:1 @ 200 = 320:1 # 1 Raw Pork -> 1 Cooked Pork +363:1 @ 200 = 364:1 # 1 Raw Beef -> 1 Cooked Beef (steak) +365:1 @ 200 = 366:1 # 1 Raw Chicken -> 1 Cooked Chicken +337:1 @ 200 = 336:1 # 1 Clay -> 1 Clay Brick +87:1 @ 200 = 405:1 # 1 NetherRack -> 1 NetherBrick +349:1 @ 200 = 350:1 # 1 Raw Fish -> 1 Cooked Fish +17:1 @ 200 = 263:1:1 # 1 Log -> 1 Charcoal +81:1 @ 200 = 351:1:2 # 1 Cactus -> 1 Green Dye + + + + + +#-------------------------- +# Fuels + +! 263:1 = 1600 # 1 Charcoal -> 80 sec +! 42:126:1 = 150 # 1 Halfslab -> 7.5 seconds +! 5:1 = 300 # 1 Planks -> 15 sec +! 280:1 = 100 # 1 Stick -> 5 sec +! 85:1 = 300 # 1 Fence -> 15 sec +! 53:1 = 300 # 1 Wooden Stairs -> 15 sec +! 58:1 = 300 # 1 Crafting Table -> 15 sec +! 47:1 = 300 # 1 Bookshelf -> 15 sec +! 54:1 = 300 # 1 Chest -> 15 sec +! 84:1 = 300 # 1 Jukebox -> 15 sec +! 327:1 = 200000 # 1 Lava Bucket -> 1000 sec +! 17:1 = 300 # 1 Wood -> 15 sec +! 6:1 = 100 # 1 Sapling -> 5 sec diff --git a/MCServer/groups.ini b/MCServer/groups.ini index 7f061204b..87b28b70d 100644 --- a/MCServer/groups.ini +++ b/MCServer/groups.ini @@ -1,17 +1,17 @@ -[Admins]
-Permissions=*
-Color=c
-
-[Mods]
-Color=5
-Inherits=Vips
-Permissions=core.time,core.item
-
-[Vips]
-Permissions=core.teleport
-Color=2
-Inherits=Default
-
-[Default]
-Permissions=core.build,core.help,core.playerlist,core.pluginlist,core.spawn
+[Admins] +Permissions=* +Color=c + +[Mods] +Color=5 +Inherits=Vips +Permissions=core.time,core.item + +[Vips] +Permissions=core.teleport +Color=2 +Inherits=Default + +[Default] +Permissions=core.build,core.help,core.playerlist,core.pluginlist,core.spawn Color=7
\ No newline at end of file diff --git a/MCServer/hg.supp b/MCServer/hg.supp index 048f1382f..27eb8c27a 100644 --- a/MCServer/hg.supp +++ b/MCServer/hg.supp @@ -1,22 +1,22 @@ -# This is a valgrind suppressions file for running helgrind on MCServer
-# Use by adding "--suppressions=hg.supp" to the helgrind commandline
-
-
-
-
-
-
-# This covers GCC bug 40518, http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40518
-# "Erasing an empty string causes a global value write / race condition warning in helgrind"
-# Original suppression authored by Jonathan Wakely: http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40518#c20
-# Modified by Mattes to match the mangled function name used on Ubuntu
-
-{
- libstdcxx_std_string_race_pr40518
- Helgrind:Race
- fun:_ZNSs9_M_mutateEjjj
-}
-
-
-
-
+# This is a valgrind suppressions file for running helgrind on MCServer +# Use by adding "--suppressions=hg.supp" to the helgrind commandline + + + + + + +# This covers GCC bug 40518, http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40518 +# "Erasing an empty string causes a global value write / race condition warning in helgrind" +# Original suppression authored by Jonathan Wakely: http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40518#c20 +# Modified by Mattes to match the mangled function name used on Ubuntu + +{ + libstdcxx_std_string_race_pr40518 + Helgrind:Race + fun:_ZNSs9_M_mutateEjjj +} + + + + diff --git a/MCServer/items.ini b/MCServer/items.ini index ec518cb0a..c9bd6df53 100644 --- a/MCServer/items.ini +++ b/MCServer/items.ini @@ -1,543 +1,543 @@ -[Items]
-rock=1
-stone=1
-grass=2
-dirt=3
-cobblestone=4
-cobble=4
-planks=5
-appleplanks=5:0
-oakplanks=5:0
-coniferplanks=5:1
-pineplanks=5:1
-spruceplanks=5:1
-darkplanks=5:1
-birchplanks=5:2
-lightplanks=5:2
-jungleplanks=5:3
-redplanks=5:3
-
-; Obsolete: do not use "wood", as its meaning is not clear - wiki uses log as wood, we use planks as wood.
-wood=5
-
-sapling=6
-applesapling=6:0
-oaksapling=6:0
-conifersapling=6:1
-pinesapling=6:1
-sprucesapling=6:1
-birchsapling=6:2
-junglesapling=6:3
-adminium=7
-bedrock=7
-water=8
-stillwater=9
-swater=9
-stationarywater=9
-lava=10
-stilllava=11
-slava=11
-stationarylava=11
-sand=12
-gravel=13
-goldore=14
-ironore=15
-coalore=16
-tree=17
-log=17
-applelog=17:0
-oaklog=17:0
-coniferlog=17:1
-pinelog=17:1
-sprucelog=17:1
-darklog=17:1
-birchlog=17:2
-whitelog=17:2
-junglelog=17:3
-leaves=18
-appleleaves=18:0
-oakleaves=18:0
-coniferleaves=18:1
-pineleaves=18:1
-spruceleaves=18:1
-birchleaves=18:2
-jungleleaves=18:3
-sponge=19
-glass=20
-lapisore=21
-lapisblock=22
-dispenser=23
-sandstone=24
-normalsandstone=24:0
-ornamentsandstone=24:1
-decorativesandstone=24:1
-smoothsandstone=24:2
-noteblock=25
-bedblock=26
-poweredrail=27
-detectorrail=28
-stickypiston=29
-cobweb=30
-tallgrass=31
-tallgrassone=31:1
-tallgrasstwo=31:2
-deadbush=32
-piston=33
-pistonextension=34
-pistonhead=34
-cloth=35
-wool=35
-whitewool=35:0
-orangewool=35:1
-magentawool=35:2
-lightbluewool=35:3
-yellowwool=35:4
-limewool=35:5
-lightgreenwool=35:5
-ltgreenwool=35:5
-pinkwool=35:6
-graywool=35:7
-greywool=35:7
-darkgraywool=35:7
-darkgreywool=35:7
-dkgraywool=35:7
-dkgreywool=35:7
-lightgraywool=35:8
-lightgreywool=35:8
-ltgraywool=35:8
-ltgreywool=35:8
-cyanwool=35:9
-purplewool=35:10
-violetwool=35:10
-bluewool=35:11
-darkbluewool=35:11
-brownwool=35:12
-greenwool=35:13
-darkgreenwool=35:13
-dkgreenwool=35:13
-redwool=35:14
-blackwool=35:15
-flower=37
-rose=38
-brownmushroom=39
-redmushroom=40
-gold=41
-goldblock=41
-iron=42
-ironblock=42
-doubleslab=43
-stonedoubleslab=43:0
-sandstonedoubleslab=43:1
-wooddoubleslab=43:2
-cobblestonedoubleslab=43:3
-brickdoubleslab=43:4
-stonebrickdoubleslab=43:5
-netherbrickdoubleslab=43:6
-quartzdoubleslab=43:7
-slab=44
-step=44
-stoneslab=44:0
-sandstoneslab=44:1
-woodslab=44:2
-cobblestoneslab=44:3
-brickslab=44:4
-stonebrickslab=44:5
-netherbrickslab=44:6
-quartzslab=44:7
-brickblock=45
-brickwall=45
-tnt=46
-bookshelf=47
-bookcase=47
-mossycobblestone=48
-mossy=48
-obsidian=49
-torch=50
-fire=51
-mobspawner=52
-woodstairs=53
-chest=54
-redstonedust=55
-redstonewire=55
-diamondore=56
-diamondblock=57
-workbench=58
-crop=59
-crops=59
-soil=60
-furnace=61
-litfurnace=62
-signblock=63
-wooddoorblock=64
-ladder=65
-rails=66
-rail=66
-track=66
-tracks=66
-cobblestonestairs=67
-stairs=67
-signblocktop=68
-wallsign=68
-lever=69
-rockplate=70
-stoneplate=70
-irondoorblock=71
-woodplate=72
-redstoneore=73
-redstoneorealt=74
-redstonetorchoff=75
-redstonetorchon=76
-stonebutton=77
-snow=78
-ice=79
-snowblock=80
-cactus=81
-clayblock=82
-reedblock=83
-jukebox=84
-fence=85
-pumpkin=86
-netherstone=87
-netherrack=87
-hellrock=87
-slowsand=88
-soulsand=88
-lightstone=89
-glowstone=89
-portal=90
-jackolantern=91
-jacko=91
-cakeblock=92
-lockedchest=95
-trapdoor=96
-silverfishblock=97
-stonebricks=98
-stonebrick=98
-mossystonebrick=98:1
-crackedstonebrick=98:2
-chiseledstonebrick=98:3
-hugebrownmushroom=99
-hugeredmushroom=100
-ironbars=101
-glasspane=102
-melon=103
-pumpkinstem=104
-melonstem=105
-vines=106
-fencegate=107
-brickstairs=108
-stonebrickstairs=109
-mycelium=110
-lilypad=111
-netherbrick=112
-netherbrickfence=113
-netherbrickstairs=114
-netherwartblock=115
-enchantmenttable=116
-brewingstandblock=117
-cauldronblock=118
-endportal=119
-endportalframe=120
-endstone=121
-dragonegg=122
-redstonelamp=123
-redstonelampoff=123
-redstonelampon=124
-woodendoubleslab=125
-woodenslab=126
-sandstonestairs=128
-emeraldore=129
-enderchest=130
-tripwirehook=131
-tripwire=132
-emeraldblock=133
-commandblock=137
-beacon=138
-cobblestonewall=139
-mossycobblestonewall=139:1
-flowerpotblock=140
-carrotcrop=141
-potatocrop=142
-woodenbutton=143
-skeletonhead=144
-witherhead=144:1
-zombiehead=144:2
-humanhead=144:3
-stevehead=144:3
-creeperhead=144:4
-anvil=145
-trappedchest=146
-lightweightedpressureplate=147
-heavyweightedpressureplate=148
-inactivecomparator=149
-activecomparator=150
-daylightsensor=151
-redstoneblock=152
-netherquartzore=153
-hopper=154
-quartzblock=155
-chiseledquartzblock=155:1
-pillarquartzblock=155:2
-quartzstairs=156
-activatorrail=157
-dropper=158
-
-ironshovel=256
-ironspade=256
-ironpickaxe=257
-ironpick=257
-ironaxe=258
-flintandsteel=259
-lighter=259
-apple=260
-redapple=260
-bow=261
-arrow=262
-coal=263
-charcoal=263:1
-diamond=264
-ironingot=265
-ironbar=265
-goldingot=266
-goldeningot=266
-goldbar=266
-goldenbar=266
-ironsword=267
-woodensword=268
-woodsword=268
-woodenshovel=269
-woodshovel=269
-woodenspade=269
-woodspade=269
-woodenpickaxe=270
-woodpickaxe=270
-woodenpick=270
-woodpick=270
-woodenaxe=271
-woodaxe=271
-stonesword=272
-stoneshovel=273
-stonespade=273
-stonepickaxe=274
-stonepick=274
-stoneaxe=275
-diamondsword=276
-diamondshovel=277
-diamondspade=277
-diamondpickaxe=278
-diamondpick=278
-diamondaxe=279
-stick=280
-bowl=281
-mushroomstew=282
-bowlwithsoup=282
-soupbowl=282
-soup=282
-goldensword=283
-goldsword=283
-goldenshovel=284
-goldshovel=284
-goldenspade=284
-goldspade=284
-goldenpickaxe=285
-goldpickaxe=285
-goldenpick=285
-goldpick=285
-goldenaxe=286
-goldaxe=286
-string=287
-feather=288
-gunpowder=289
-woodhoe=290
-woodenhoe=290
-stonehoe=291
-ironhoe=292
-diamondhoe=293
-goldhoe=294
-goldenhoe=294
-seeds=295
-wheat=296
-bread=297
-leatherhelmet=298
-leatherchestplate=299
-leatherpants=300
-leatherboots=301
-chainmailhelmet=302
-chainmailchestplate=303
-chainmailpants=304
-chainmailboots=305
-ironhelmet=306
-ironchestplate=307
-ironpants=308
-ironboots=309
-diamondhelmet=310
-diamondchestplate=311
-diamondpants=312
-diamondboots=313
-goldenhelmet=314
-goldhelmet=314
-goldenchestplate=315
-goldchestplate=315
-goldenpants=316
-goldpants=316
-goldenboots=317
-goldboots=317
-flint=318
-meat=319
-pork=319
-cookedmeat=320
-cookedpork=320
-painting=321
-paintings=321
-goldenapple=322
-goldapple=322
-enchantedgoldenapple=322:1
-enchantedgoldapple=322:1
-sign=323
-wooddoor=324
-woodendoor=324
-bucket=325
-waterbucket=326
-lavabucket=327
-minecart=328
-saddle=329
-irondoor=330
-redstonedust=331
-snowball=332
-boat=333
-leather=334
-milkbucket=335
-brick=336
-clay=337
-reed=338
-sugarcane=338
-paper=339
-book=340
-slimeorb=341
-slimeball=341
-storageminecart=342
-poweredminecart=343
-egg=344
-compass=345
-fishingrod=346
-watch=347
-lightstonedust=348
-lightdust=348
-glowstonedust=348
-glowdust=348
-rawfish=349
-fish=349
-cookedfish=350
-dye=351
-inksac=351:0
-blackdye=351:0
-reddye=351:1
-rosered=351:1
-greendye=351:2
-cactusgreen=351:2
-cocoabeans=351:3
-browndye=351:3
-lapislazuli=351:4
-bluedye=351:4
-darkbluedye=351:4
-dkbluedye=351:4
-purpledye=351:5
-violetdye=351:5
-cyandye=351:6
-lightgreydye=351:7
-lightgraydye=351:7
-ltgreydye=351:7
-ltgraydye=351:7
-greydye=351:8
-graydye=351:8
-darkgreydye=351:8
-darkgraydye=351:8
-dkgreydye=351:8
-dkgraydye=351:8
-pinkdye=351:9
-limedye=351:10
-lightgreendye=351:10
-ltgreendye=351:10
-dandellionyellow=351:11
-yellowdye=351:11
-lightbluedye=351:12
-ltbluedye=351:12
-magentadye=351:13
-orangedye=351:14
-bonemeal=351:15
-whitedye=351:15
-bone=352
-sugar=353
-cake=354
-bed=355
-repeater=356
-diode=356
-cookie=357
-map=358
-shears=359
-melonslice=360
-pumpkinseeds=361
-melonseeds=362
-rawbeef=363
-steak=364
-rawchicken=365
-cookedchicken=366
-rottenflesh=367
-enderpearl=368
-blazerod=369
-ghasttear=370
-goldnugget=371
-netherwart=372
-potion=373
-glassbottle=374
-spidereye=375
-fermentedspidereye=376
-blazepowder=377
-magmacream=378
-brewingstand=379
-cauldron=380
-eyeofender=381
-glisteringmelon=382
-spawnegg=383
-bottleoenchanting=384
-firecharge=385
-bookandquill=386
-writtenbook=387
-emerald=388
-itemframe=389
-flowerpot=390
-carrot=391
-potato=392
-bakedpotato=393
-poisonouspotato=394
-emptymap=395
-goldencarrot=396
-skeletonhead=397
-witherhead=397:1
-zombiehead=397:2
-stevehead=397:3
-creeperhead=397:4
-carrotonastick=398
-netherstar=399
-pumpkinpie=400
-fireworkrocket=401
-fireworkstar=402
-enchantedbook=403
-comparator=404
-netherbrickitem=405
-netherquartz=406
-tntminecart=407
-hopperminecart=408
-
-goldrecord=2256
-greenrecord=2257
-blocksrecord=2258
-chirprecord=2259
-farrecord=2260
-mallrecord=2261
-mellohirecord=2262
-stalrecord=2263
-stradrecord=2264
-wardrecord=2265
-11record=2266
-
+[Items] +rock=1 +stone=1 +grass=2 +dirt=3 +cobblestone=4 +cobble=4 +planks=5 +appleplanks=5:0 +oakplanks=5:0 +coniferplanks=5:1 +pineplanks=5:1 +spruceplanks=5:1 +darkplanks=5:1 +birchplanks=5:2 +lightplanks=5:2 +jungleplanks=5:3 +redplanks=5:3 + +; Obsolete: do not use "wood", as its meaning is not clear - wiki uses log as wood, we use planks as wood. +wood=5 + +sapling=6 +applesapling=6:0 +oaksapling=6:0 +conifersapling=6:1 +pinesapling=6:1 +sprucesapling=6:1 +birchsapling=6:2 +junglesapling=6:3 +adminium=7 +bedrock=7 +water=8 +stillwater=9 +swater=9 +stationarywater=9 +lava=10 +stilllava=11 +slava=11 +stationarylava=11 +sand=12 +gravel=13 +goldore=14 +ironore=15 +coalore=16 +tree=17 +log=17 +applelog=17:0 +oaklog=17:0 +coniferlog=17:1 +pinelog=17:1 +sprucelog=17:1 +darklog=17:1 +birchlog=17:2 +whitelog=17:2 +junglelog=17:3 +leaves=18 +appleleaves=18:0 +oakleaves=18:0 +coniferleaves=18:1 +pineleaves=18:1 +spruceleaves=18:1 +birchleaves=18:2 +jungleleaves=18:3 +sponge=19 +glass=20 +lapisore=21 +lapisblock=22 +dispenser=23 +sandstone=24 +normalsandstone=24:0 +ornamentsandstone=24:1 +decorativesandstone=24:1 +smoothsandstone=24:2 +noteblock=25 +bedblock=26 +poweredrail=27 +detectorrail=28 +stickypiston=29 +cobweb=30 +tallgrass=31 +tallgrassone=31:1 +tallgrasstwo=31:2 +deadbush=32 +piston=33 +pistonextension=34 +pistonhead=34 +cloth=35 +wool=35 +whitewool=35:0 +orangewool=35:1 +magentawool=35:2 +lightbluewool=35:3 +yellowwool=35:4 +limewool=35:5 +lightgreenwool=35:5 +ltgreenwool=35:5 +pinkwool=35:6 +graywool=35:7 +greywool=35:7 +darkgraywool=35:7 +darkgreywool=35:7 +dkgraywool=35:7 +dkgreywool=35:7 +lightgraywool=35:8 +lightgreywool=35:8 +ltgraywool=35:8 +ltgreywool=35:8 +cyanwool=35:9 +purplewool=35:10 +violetwool=35:10 +bluewool=35:11 +darkbluewool=35:11 +brownwool=35:12 +greenwool=35:13 +darkgreenwool=35:13 +dkgreenwool=35:13 +redwool=35:14 +blackwool=35:15 +flower=37 +rose=38 +brownmushroom=39 +redmushroom=40 +gold=41 +goldblock=41 +iron=42 +ironblock=42 +doubleslab=43 +stonedoubleslab=43:0 +sandstonedoubleslab=43:1 +wooddoubleslab=43:2 +cobblestonedoubleslab=43:3 +brickdoubleslab=43:4 +stonebrickdoubleslab=43:5 +netherbrickdoubleslab=43:6 +quartzdoubleslab=43:7 +slab=44 +step=44 +stoneslab=44:0 +sandstoneslab=44:1 +woodslab=44:2 +cobblestoneslab=44:3 +brickslab=44:4 +stonebrickslab=44:5 +netherbrickslab=44:6 +quartzslab=44:7 +brickblock=45 +brickwall=45 +tnt=46 +bookshelf=47 +bookcase=47 +mossycobblestone=48 +mossy=48 +obsidian=49 +torch=50 +fire=51 +mobspawner=52 +woodstairs=53 +chest=54 +redstonedust=55 +redstonewire=55 +diamondore=56 +diamondblock=57 +workbench=58 +crop=59 +crops=59 +soil=60 +furnace=61 +litfurnace=62 +signblock=63 +wooddoorblock=64 +ladder=65 +rails=66 +rail=66 +track=66 +tracks=66 +cobblestonestairs=67 +stairs=67 +signblocktop=68 +wallsign=68 +lever=69 +rockplate=70 +stoneplate=70 +irondoorblock=71 +woodplate=72 +redstoneore=73 +redstoneorealt=74 +redstonetorchoff=75 +redstonetorchon=76 +stonebutton=77 +snow=78 +ice=79 +snowblock=80 +cactus=81 +clayblock=82 +reedblock=83 +jukebox=84 +fence=85 +pumpkin=86 +netherstone=87 +netherrack=87 +hellrock=87 +slowsand=88 +soulsand=88 +lightstone=89 +glowstone=89 +portal=90 +jackolantern=91 +jacko=91 +cakeblock=92 +lockedchest=95 +trapdoor=96 +silverfishblock=97 +stonebricks=98 +stonebrick=98 +mossystonebrick=98:1 +crackedstonebrick=98:2 +chiseledstonebrick=98:3 +hugebrownmushroom=99 +hugeredmushroom=100 +ironbars=101 +glasspane=102 +melon=103 +pumpkinstem=104 +melonstem=105 +vines=106 +fencegate=107 +brickstairs=108 +stonebrickstairs=109 +mycelium=110 +lilypad=111 +netherbrick=112 +netherbrickfence=113 +netherbrickstairs=114 +netherwartblock=115 +enchantmenttable=116 +brewingstandblock=117 +cauldronblock=118 +endportal=119 +endportalframe=120 +endstone=121 +dragonegg=122 +redstonelamp=123 +redstonelampoff=123 +redstonelampon=124 +woodendoubleslab=125 +woodenslab=126 +sandstonestairs=128 +emeraldore=129 +enderchest=130 +tripwirehook=131 +tripwire=132 +emeraldblock=133 +commandblock=137 +beacon=138 +cobblestonewall=139 +mossycobblestonewall=139:1 +flowerpotblock=140 +carrotcrop=141 +potatocrop=142 +woodenbutton=143 +skeletonhead=144 +witherhead=144:1 +zombiehead=144:2 +humanhead=144:3 +stevehead=144:3 +creeperhead=144:4 +anvil=145 +trappedchest=146 +lightweightedpressureplate=147 +heavyweightedpressureplate=148 +inactivecomparator=149 +activecomparator=150 +daylightsensor=151 +redstoneblock=152 +netherquartzore=153 +hopper=154 +quartzblock=155 +chiseledquartzblock=155:1 +pillarquartzblock=155:2 +quartzstairs=156 +activatorrail=157 +dropper=158 + +ironshovel=256 +ironspade=256 +ironpickaxe=257 +ironpick=257 +ironaxe=258 +flintandsteel=259 +lighter=259 +apple=260 +redapple=260 +bow=261 +arrow=262 +coal=263 +charcoal=263:1 +diamond=264 +ironingot=265 +ironbar=265 +goldingot=266 +goldeningot=266 +goldbar=266 +goldenbar=266 +ironsword=267 +woodensword=268 +woodsword=268 +woodenshovel=269 +woodshovel=269 +woodenspade=269 +woodspade=269 +woodenpickaxe=270 +woodpickaxe=270 +woodenpick=270 +woodpick=270 +woodenaxe=271 +woodaxe=271 +stonesword=272 +stoneshovel=273 +stonespade=273 +stonepickaxe=274 +stonepick=274 +stoneaxe=275 +diamondsword=276 +diamondshovel=277 +diamondspade=277 +diamondpickaxe=278 +diamondpick=278 +diamondaxe=279 +stick=280 +bowl=281 +mushroomstew=282 +bowlwithsoup=282 +soupbowl=282 +soup=282 +goldensword=283 +goldsword=283 +goldenshovel=284 +goldshovel=284 +goldenspade=284 +goldspade=284 +goldenpickaxe=285 +goldpickaxe=285 +goldenpick=285 +goldpick=285 +goldenaxe=286 +goldaxe=286 +string=287 +feather=288 +gunpowder=289 +woodhoe=290 +woodenhoe=290 +stonehoe=291 +ironhoe=292 +diamondhoe=293 +goldhoe=294 +goldenhoe=294 +seeds=295 +wheat=296 +bread=297 +leatherhelmet=298 +leatherchestplate=299 +leatherpants=300 +leatherboots=301 +chainmailhelmet=302 +chainmailchestplate=303 +chainmailpants=304 +chainmailboots=305 +ironhelmet=306 +ironchestplate=307 +ironpants=308 +ironboots=309 +diamondhelmet=310 +diamondchestplate=311 +diamondpants=312 +diamondboots=313 +goldenhelmet=314 +goldhelmet=314 +goldenchestplate=315 +goldchestplate=315 +goldenpants=316 +goldpants=316 +goldenboots=317 +goldboots=317 +flint=318 +meat=319 +pork=319 +cookedmeat=320 +cookedpork=320 +painting=321 +paintings=321 +goldenapple=322 +goldapple=322 +enchantedgoldenapple=322:1 +enchantedgoldapple=322:1 +sign=323 +wooddoor=324 +woodendoor=324 +bucket=325 +waterbucket=326 +lavabucket=327 +minecart=328 +saddle=329 +irondoor=330 +redstonedust=331 +snowball=332 +boat=333 +leather=334 +milkbucket=335 +brick=336 +clay=337 +reed=338 +sugarcane=338 +paper=339 +book=340 +slimeorb=341 +slimeball=341 +storageminecart=342 +poweredminecart=343 +egg=344 +compass=345 +fishingrod=346 +watch=347 +lightstonedust=348 +lightdust=348 +glowstonedust=348 +glowdust=348 +rawfish=349 +fish=349 +cookedfish=350 +dye=351 +inksac=351:0 +blackdye=351:0 +reddye=351:1 +rosered=351:1 +greendye=351:2 +cactusgreen=351:2 +cocoabeans=351:3 +browndye=351:3 +lapislazuli=351:4 +bluedye=351:4 +darkbluedye=351:4 +dkbluedye=351:4 +purpledye=351:5 +violetdye=351:5 +cyandye=351:6 +lightgreydye=351:7 +lightgraydye=351:7 +ltgreydye=351:7 +ltgraydye=351:7 +greydye=351:8 +graydye=351:8 +darkgreydye=351:8 +darkgraydye=351:8 +dkgreydye=351:8 +dkgraydye=351:8 +pinkdye=351:9 +limedye=351:10 +lightgreendye=351:10 +ltgreendye=351:10 +dandellionyellow=351:11 +yellowdye=351:11 +lightbluedye=351:12 +ltbluedye=351:12 +magentadye=351:13 +orangedye=351:14 +bonemeal=351:15 +whitedye=351:15 +bone=352 +sugar=353 +cake=354 +bed=355 +repeater=356 +diode=356 +cookie=357 +map=358 +shears=359 +melonslice=360 +pumpkinseeds=361 +melonseeds=362 +rawbeef=363 +steak=364 +rawchicken=365 +cookedchicken=366 +rottenflesh=367 +enderpearl=368 +blazerod=369 +ghasttear=370 +goldnugget=371 +netherwart=372 +potion=373 +glassbottle=374 +spidereye=375 +fermentedspidereye=376 +blazepowder=377 +magmacream=378 +brewingstand=379 +cauldron=380 +eyeofender=381 +glisteringmelon=382 +spawnegg=383 +bottleoenchanting=384 +firecharge=385 +bookandquill=386 +writtenbook=387 +emerald=388 +itemframe=389 +flowerpot=390 +carrot=391 +potato=392 +bakedpotato=393 +poisonouspotato=394 +emptymap=395 +goldencarrot=396 +skeletonhead=397 +witherhead=397:1 +zombiehead=397:2 +stevehead=397:3 +creeperhead=397:4 +carrotonastick=398 +netherstar=399 +pumpkinpie=400 +fireworkrocket=401 +fireworkstar=402 +enchantedbook=403 +comparator=404 +netherbrickitem=405 +netherquartz=406 +tntminecart=407 +hopperminecart=408 + +goldrecord=2256 +greenrecord=2257 +blocksrecord=2258 +chirprecord=2259 +farrecord=2260 +mallrecord=2261 +mellohirecord=2262 +stalrecord=2263 +stradrecord=2264 +wardrecord=2265 +11record=2266 + diff --git a/MCServer/monsters.ini b/MCServer/monsters.ini index 6634c5bef..80a0c7dde 100644 --- a/MCServer/monsters.ini +++ b/MCServer/monsters.ini @@ -1,111 +1,111 @@ -[Spider]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=1.0
-SightDistance=25.0
-MaxHealth=10
-
-[Chicken]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=1.0
-SightDistance=25.0
-MaxHealth=4
-
-[Cow]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=1.0
-SightDistance=25.0
-MaxHealth=10
-
-[Pig]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=1.0
-SightDistance=25.0
-MaxHealth=10
-
-[Sheep]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=1.0
-SightDistance=25.0
-MaxHealth=8
-
-[Squid]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=1.0
-SightDistance=25.0
-MaxHealth=10
-
-[Enderman]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=4.0
-SightDistance=25.0
-MaxHealth=40
-
-[Zombiepigman]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=5.0
-SightDistance=25.0
-MaxHealth=20
-
-[Cavespider]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=2.0
-SightDistance=25.0
-MaxHealth=12
-
-[Creeper]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=0.0
-SightDistance=25.0
-MaxHealth=20
-
-[Ghast]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=0.0
-SightDistance=25.0
-MaxHealth=10
-
-[Silverfish]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=1.0
-SightDistance=25.0
-MaxHealth=8
-
-[Skeleton]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=4.0
-SightDistance=25.0
-MaxHealth=20
-
-[Slime]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=10.0
-SightDistance=25.0
-MaxHealth=32
-
-[Spider]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=2.0
-SightDistance=25.0
-MaxHealth=16
-
-[Zombie]
-AttackRange=5.0
-AttackRate=1
-AttackDamage=4.0
-SightDistance=25.0
+[Spider] +AttackRange=5.0 +AttackRate=1 +AttackDamage=1.0 +SightDistance=25.0 +MaxHealth=10 + +[Chicken] +AttackRange=5.0 +AttackRate=1 +AttackDamage=1.0 +SightDistance=25.0 +MaxHealth=4 + +[Cow] +AttackRange=5.0 +AttackRate=1 +AttackDamage=1.0 +SightDistance=25.0 +MaxHealth=10 + +[Pig] +AttackRange=5.0 +AttackRate=1 +AttackDamage=1.0 +SightDistance=25.0 +MaxHealth=10 + +[Sheep] +AttackRange=5.0 +AttackRate=1 +AttackDamage=1.0 +SightDistance=25.0 +MaxHealth=8 + +[Squid] +AttackRange=5.0 +AttackRate=1 +AttackDamage=1.0 +SightDistance=25.0 +MaxHealth=10 + +[Enderman] +AttackRange=5.0 +AttackRate=1 +AttackDamage=4.0 +SightDistance=25.0 +MaxHealth=40 + +[Zombiepigman] +AttackRange=5.0 +AttackRate=1 +AttackDamage=5.0 +SightDistance=25.0 +MaxHealth=20 + +[Cavespider] +AttackRange=5.0 +AttackRate=1 +AttackDamage=2.0 +SightDistance=25.0 +MaxHealth=12 + +[Creeper] +AttackRange=5.0 +AttackRate=1 +AttackDamage=0.0 +SightDistance=25.0 +MaxHealth=20 + +[Ghast] +AttackRange=5.0 +AttackRate=1 +AttackDamage=0.0 +SightDistance=25.0 +MaxHealth=10 + +[Silverfish] +AttackRange=5.0 +AttackRate=1 +AttackDamage=1.0 +SightDistance=25.0 +MaxHealth=8 + +[Skeleton] +AttackRange=5.0 +AttackRate=1 +AttackDamage=4.0 +SightDistance=25.0 +MaxHealth=20 + +[Slime] +AttackRange=5.0 +AttackRate=1 +AttackDamage=10.0 +SightDistance=25.0 +MaxHealth=32 + +[Spider] +AttackRange=5.0 +AttackRate=1 +AttackDamage=2.0 +SightDistance=25.0 +MaxHealth=16 + +[Zombie] +AttackRange=5.0 +AttackRate=1 +AttackDamage=4.0 +SightDistance=25.0 MaxHealth=20
\ No newline at end of file diff --git a/MCServer/settings.ini b/MCServer/settings.ini index 5e6ed4e2b..e2505368d 100644 --- a/MCServer/settings.ini +++ b/MCServer/settings.ini @@ -1,31 +1,31 @@ -; This is the main server configuration
-; For help, please visit the Wiki page: http://www.mc-server.org/wiki/doku.php?id=configure:settings.ini
-; Most of these settings can also be set using the webadmin interface, if it is enabled.
-
-[Server]
-Port=25565
-MaxPlayers=100
-Description=MCServer - in C++
-DefaultViewDistance=9
-
-[Worlds]
-DefaultWorld=world
-
-[Plugins]
-; Plugin=Debuggers
-; Plugin=DiamondMover
-; Plugin=HookNotify
-Plugin=Core
-Plugin=ChunkWorx
-Plugin=ChatLog
-
-[Monsters]
-AnimalsOn=0
-AnimalSpawnInterval=10
-Types=Spider,Chicken,Cow,Pig,Sheep,Squid,Enderman,Zombiepigman,Cavespider,Creeper,Ghast,Silverfish,Skeleton,Slime,Spider,Zombie
-
-[Authentication]
-Server=session.minecraft.net
-Address=/game/checkserver.jsp?user=%USERNAME%&serverId=%SERVERID%
-Authenticate=0
-
+; This is the main server configuration +; For help, please visit the Wiki page: http://www.mc-server.org/wiki/doku.php?id=configure:settings.ini +; Most of these settings can also be set using the webadmin interface, if it is enabled. + +[Server] +Port=25565 +MaxPlayers=100 +Description=MCServer - in C++ +DefaultViewDistance=9 + +[Worlds] +DefaultWorld=world + +[Plugins] +; Plugin=Debuggers +; Plugin=DiamondMover +; Plugin=HookNotify +Plugin=Core +Plugin=ChunkWorx +Plugin=ChatLog + +[Monsters] +AnimalsOn=0 +AnimalSpawnInterval=10 +Types=Spider,Chicken,Cow,Pig,Sheep,Squid,Enderman,Zombiepigman,Cavespider,Creeper,Ghast,Silverfish,Skeleton,Slime,Spider,Zombie + +[Authentication] +Server=session.minecraft.net +Address=/game/checkserver.jsp?user=%USERNAME%&serverId=%SERVERID% +Authenticate=0 + diff --git a/MCServer/terrain.ini b/MCServer/terrain.ini index a917223f9..0d86376c5 100644 --- a/MCServer/terrain.ini +++ b/MCServer/terrain.ini @@ -1,8 +1,8 @@ -[Terrain]
-HeightFreq1=0.100000
-HeightFreq2=1.000000
-HeightFreq3=2.000000
-HeightAmp1=1.000000
-HeightAmp2=0.500000
-HeightAmp3=0.500000
-
+[Terrain] +HeightFreq1=0.100000 +HeightFreq2=1.000000 +HeightFreq3=2.000000 +HeightAmp1=1.000000 +HeightAmp2=0.500000 +HeightAmp3=0.500000 + diff --git a/MCServer/users.ini b/MCServer/users.ini index 1015527cc..6726c0bf8 100644 --- a/MCServer/users.ini +++ b/MCServer/users.ini @@ -1,23 +1,23 @@ -[FakeTruth]
-Groups=Admins
-
-[Duralex]
-Groups=Admins
-
-[Luthrandel]
-Groups=Admins
-
-[cruisecho]
-Groups=Admins
-
-[Kwen]
-Groups=Admins
-
-[aloe_vera]
-Groups=Admins
-
-[xoft]
-Groups=Admins
-
-[Player]
+[FakeTruth] +Groups=Admins + +[Duralex] +Groups=Admins + +[Luthrandel] +Groups=Admins + +[cruisecho] +Groups=Admins + +[Kwen] +Groups=Admins + +[aloe_vera] +Groups=Admins + +[xoft] +Groups=Admins + +[Player] Groups=Admins
\ No newline at end of file diff --git a/MCServer/webadmin.ini b/MCServer/webadmin.ini index 7384f0bde..8597225bb 100644 --- a/MCServer/webadmin.ini +++ b/MCServer/webadmin.ini @@ -1,6 +1,6 @@ -[WebAdmin]
-Enabled=1
-Port=8081
-
-[User:admin]
+[WebAdmin] +Enabled=1 +Port=8081 + +[User:admin] Password=admin
\ No newline at end of file diff --git a/MCServer/webadmin/template.html b/MCServer/webadmin/template.html index 26337c364..03de23360 100644 --- a/MCServer/webadmin/template.html +++ b/MCServer/webadmin/template.html @@ -1,145 +1,145 @@ -<!DOCTYPE html>
-<html>
-<head>
- <title>{TITLE} | {PLUGIN_NAME}</title>
- <script type="text/javascript" src="http://code.jquery.com/jquery-2.0.3.min.js"></script>
- <style type="text/css">
- body {
- line-height: 1;
- background: #E0B686;
- }
-
- #maincontent {
- padding: 0px 25px 10px 25px;
- font-family: calibri, trebuchet ms;
- }
-
- #wrapper {
- min-width: 850px;
- width: 75%;
- margin: 10px auto;
- background-color: white;
- border: 4px #FF8C00 solid;
- border-radius: 20px;
- }
-
- header {
- text-align:center;
- padding: 10px; 0px;
- }
-
- h2 {
- border-bottom: 2px #000 dotted;
- padding-bottom: 10px;
- text-align: center;
- }
-
- footer {
- font-family: helvetica;
- font-size: 10px;
- text-align: center;
- border-top: 1px #000 dotted;
- padding: 1px 0px 1px 0px;
- }
-
- table {
- border-collapse: collapse;
- border-spacing: 10;
- }
-
- table {
- border-top: 1px solid #ddd;
- width: 700px;
- }
-
- table tr th {
- text-align: left;
- background: #f6f6f6;
- padding: 0px 20px;
- height: 25px;
- line-height: 25px;
- border: 1px solid #ddd;
- border-radius: 3px;
- }
-
- table tr td {
- background: #f6f6f6;
- padding: 0px 20px;
- height: 29px;
- line-height: 29px;
- border: 1px solid #ddd;
- border-radius: 3px;
- }
- #main table tr.odd td {
- background: #fbfbfb;
- }
-
- table tr:hover td { background: #fdfcf6; }
- table .action {
- text-align: right;
- padding: 0 20px 0 10px;
- }
-
- table tr .action a { color: #9b9b9b; }
-
- #cssmenu{ height:37px; display:table; padding:0; margin: 0 auto; border:1px #b05a0d solid; border-radius:5px; }
- #cssmenu > ul {list-style:inside none; padding:0; margin:0;}
- #cssmenu > ul > li {list-style:inside none; padding:0; margin:0; float:left; display:block; position:relative;}
- #cssmenu > ul > li > a{ outline:none; display:block; position:relative; padding:12px 20px; font:bold 13px/100% Arial, Helvetica, sans-serif; text-align:center; text-decoration:none; text-shadow:1px 1px 0 rgba(0,0,0, 0.4); }
- #cssmenu > ul > li:first-child > a{border-radius:5px 0 0 5px;}
- #cssmenu > ul > li > a:after{ content:''; position:absolute; border-right:1px solid; top:-1px; bottom:-1px; right:-2px; z-index:99; }
- #cssmenu ul li.has-sub:hover > a:after{top:0; bottom:0;}
- #cssmenu > ul > li.has-sub > a:before{ content:''; position:absolute; top:18px; right:6px; border:5px solid transparent; border-top:5px solid #fff; }
- #cssmenu > ul > li.has-sub:hover > a:before{top:19px;}
- #cssmenu ul li.has-sub:hover > a{ background:#3f3f3f; border-color:#3f3f3f; padding-bottom:13px; padding-top:13px; top:-1px; z-index:999; }
- #cssmenu ul li.has-sub:hover > ul, #cssmenu ul li.has-sub:hover > div{display:block;}
- #cssmenu ul li.has-sub > a:hover{background:#3f3f3f; border-color:#3f3f3f;}
- #cssmenu ul li > ul, #cssmenu ul li > div{ display:none; width:auto; position:absolute; top:38px; padding:10px 0; background:#3f3f3f; border-radius:0 0 5px 5px; z-index:999; }
- #cssmenu ul li > ul{width:200px;}
- #cssmenu ul li > ul li{display:block; list-style:inside none; padding:0; margin:0; position:relative;}
- #cssmenu ul li > ul li a{ outline:none; display:block; position:relative; margin:0; padding:8px 20px; font:10pt Arial, Helvetica, sans-serif; color:#fff; text-decoration:none; text-shadow:1px 1px 0 rgba(0,0,0, 0.5); }
- #cssmenu, #cssmenu > ul > li > ul > li a:hover{ background:#ff9812; background:-moz-linear-gradient(top, #ff9812 0%, #e17310 100%); background:-webkit-gradient(linear, left top, left bottom, color-stop(0%,#ff9812), color-stop(100%,#e17310)); background:-webkit-linear-gradient(top, #ff9812 0%,#e17310 100%); background:-o-linear-gradient(top, #ff9812 0%,#e17310 100%); background:-ms-linear-gradient(top, #ff9812 0%,#e17310 100%); background:linear-gradient(top, #ff9812 0%,#e17310 100%); filter:progid:DXImageTransform.Microsoft.gradient(startColorstr ='#ff9812', endColorstr='#e17310',GradientType=0); }
- #cssmenu > ul > li > a{border-right:1px solid #b05a0d; color:#fff;}
- #cssmenu > ul > li > a:after{border-color:#ffa32b;}
- #cssmenu > ul > li > a:hover{background:#e17310;}
- </style>
- <meta name="msapplication-tooltip" content="You source for anything and everything!"/>
- <meta name="msapplication-navbutton-color" content="#FF8C00" />
- <link rel="shortcut icon" href="http://mc-server.org/favicon.ico" />
-</head>
-
-<body>
- <script type="text/javascript">
- $(document).ready(function() {
- $("body,article").css("display", "none");
- $("body").fadeIn(700);
-
- $("a").click(function(event){
- event.preventDefault();
- linkLocation = this.href;
- $("body").fadeOut(700, redirectPage);
- });
-
- function redirectPage() {
- window.location = linkLocation;
- }
- });
- </script>
- <div id="wrapper">
- <header>
- <img alt="" src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAARYAAACBCAIAAACKOwJXAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAIWMSURBVHhe7b35s13XfeWXfyiVSnWlKlWpSqr7hySdTqrTQ9Kdtt3ttttu2ZbbtizZsiVLomRZkiVZAyVSHESKFEcQHEASJMABBAgQxEyMD3gThod5BjER7z1Qzvqs9d373HcFWEb7Nxu3vnVqn3328B3W+u59zrn3vf/mr+9+7n7ufv4On7sUuvu5+/k7fe6YQhePvXRX7srfSymI3+Hnb0uhscnuyl35eywF+r/d5xdTaGz0u3JX/oFIEeAXfX4BhcYGvSt35R+aFBNu//mbKDQ21l25K/8wpfhwm8+tKTQ2xJjMXz44f/XIjStz81cPq4Bcm1u4dgy5enz++vGF66cWrp2kTP1x1aswf+1o2ty4oi6H3J2+N64elsxfPap6VXL12lGJynS8fpIBr2bwoxpZNRp54foJCh+dWvzotI5pwAilUinm0eZoT3cPgj5S8sTCNUmdLmgozYUhKMlRjTVdJnV3ukgT1Vw/ufjR2cUb5xc/OrNoBTiVXD+zeOOcClKs1auBRI0lunSOo5oNl1xQpUZDWhvqPeyN8zfnLyILH0rS8ubCJddfSOXN+UtucNmiNlLstHTGmXFvORbfWn8ZcgqnOUbUyCHXuJpmxOKq+7qLjtWLlm6M8wmBfDh/zQEqN1LvqzTWIBqKka2Ggt6CkmFbAQ2rJiHzyAzooU4yrCB3RZjJcfajKwc/ujLj46ikZlbNaEkXYNCmFsw0PtAyfoyB6w7TjXNy5hjIx6SIcavPnVEodsrgQK2wJbVwOuFRfTstv1B2VHI1R6y6jEkjbcC6TxEol44aUBFSvAGlkHoGh14TRs+EP7J/4YZQ2zXRaPLXIdwnkR/tyswFnUKDq1ajoqi5DqGSJ0VJ4U/hb/wXi6KDfX1JSP148arE2L0wQBn4QiTp43pBv47S1mX1FeIvqMGiLYoJkPn6yTChc8ZEgmNuc4ZhBVbrhtWDZBC19FHeqCR1RB4u8ynYIeApEXQDQ8oG2nvERQ3shIrX4ATVOEZu32rMGVHoBCOkSwYsTs550kODJgTCUCavyRYL7ZnLWK+IUAmKaCbnj8RURw2o0WCUCBP+iFcRLEW64YwZKf0xNhSSPxFHViFzpG6cHcN8l+LGz31uQaGxnhE0xniZh5HlgiR+IAjy7G7lnpZXjEK7xjbIfUQucUpusH/LxbG82xynd1/UuucRCDOzJ1c54bUupKgaZzRykoFR5MJE0cpYPTPf4xsxTtLAVwWvOUUAuxhfQ5jLcfrIMUsB64BpdiWnLl+rclhEWaNpMfGC46NBY3SGsVl+FWB0MN/q2NZe0nMtd2lTCXuJP21vd0IqnS8coyPMWJmeiVDGkgFrzBAG8lDA4S1/W2cjMkIsQip3CeukDERKWE0DacI2BEw3AS00jmKkY68S8QmU1jhZVWzClUMizxKjKDCy15+c6mg/QDlmb8BDbFGIKoczF0nqI9kbK06O4T9SDFn6GafQWJ/IoKIcgQtyiiPKqiA45rXT5hcdywDXu6+zkU9bzWCwZ7HNEdvMOCOnbiMXkEssTJrwSBgtKaplLCufKbwi4TtCLggKwSR+8jfbLTZUKhRk2aWcNCU+9Mpz7eOb1wcmwJwsQZc/XrhSDUquVM3N6x8vqkvj0kLn1YeaOijBosoOZOWA1SiM9E2UygB0kUgL8Ql2GqhcLcsPiQuQSm5e4nNg2rBLL2PdheKwp2tsocz4qBStnMLlPVK4Glht99V2V1ehuuPuCDa3l0olrUxlFHNGxhVeKxhWCdrqZYrGSUTDEll1t1SIibtFxgIAysxik+1hAanlet8ddEtjozNFzX7t+BgLIsWTkc8SCo21jhT4MLVU0QSapgU+sY9HjG8HxmXA6kv0LcvdS8fYyeCUw5naTcmSGicMbLNw1WqoTJvCXChUzLGgcO2GXWkMeaLMXgmVvBsoZMtkUUG7LG+f2LZ5bWF5uWSGiBVwwwtI3Y24PmLawBwEqtDRa443aWpviuZ+hhsbUUj2YppX8hEbpTM1hLaOgqb4kzscORYrqmyLEhF1IRDN8DoWdpPUkoCdOyymMYPHfPukMZN6FVhz4ispkEuE6erRjICvdIPnezyvZrQhgsQ9canAcVoRxOqKCM28C/AeknnhYXSI1UiriSsccQ3F1mZO4xNi06nyhTFQc6lldhmyXRt49SX0Q6YwHpw+mAKixjpNNMaFSLGlfX4BhZpCLRjcwDS1Av3BHUUD6uMa6uWU1lj2tEFiW5Oh4zCsmo0OVWzMvkttaBbk6RSz6UKvdmc5ui1mcDQ05oKVWn988xBp+EYK+sPSlFt82owIOzGLbnVOVz4GZKRMh6Hls0QLHEBa1jcvcTgnlvaUWdIdTsHLabb71MiubP11KWZG3EWjVWNfoouver/Q3TvqVXyIDBExLrlK7AY1EBrYz0MD0IZjvWk3HBURx33oiFYqWP8+oMuM04BueqNMdGsc67MkcJXgxOdoiz44sI1p9STqyNVSD4bE/xRImsVJr5zEC9o7U7DOc8mNmXGMEZJiS/sMFBprJ6lQmdkOEvyxkQVoGe+ooKJNjSV2d5wVH9meOMjAwt2xLZWpJ0MkszJFpYG66u7JE4yg2TU4OrRZNF2CUQrYmwxOONGNvOKMbm0zHVnNp/adExL5L7u7s7gylc5hNQL7Om/z4IxpQ3cnyPID2lofrEhfm2lNdMke4JLa1POluie+jVQuCCVaue1RnXptb2QYcCxkzV29sQqqNB+AXa8PQ0Yo59MEmmO1p4tOMZ9Hr/aPy/Gz05ynyMjppSMF1zMsbrFvHQV8mHXPC4Wdj2+deiq1Vdq6SKQ0b1SynmCGDbDzFN1Ng5awJO7iWRIsRmZZI2RWoPFKOvi2kHWVJDvGC0lxxp9fQKGIrSWE5Yu6l5CnfERsT/YS9ia2Gf2y0OgxhlhDBkfjPqDcYd3SmNaKwnewLr+UtT5lxpGRNZeDDVhNLSA15DZpUuMzSPxoJ7YxiwCUfWlEH4+Z6A6TMktG9lVU8r2vou7Ae5whltXXDkmixRt0jJ4du7egU5VV38lTAsRVMC4N95aPbXUpqXpTiFNdbQyp9iOjVWVJnGZjE8EqUDkMjiGYhruAMjbK5IJEgaHNHh46Xi2txL01gv2v0ODGHOPJPH5kI5Dn+1r8/cxGG2k/nmVF4oFK7SFdYJ9sUcEd1fK6NqgOB5K4mC0RdHDcCdwxDWWuZi7d9F4a44WkOOPPbSnUPK5kH5clBvha3rSPuNWWNhjZjCnGk6ELqUBWzVKfBgGlWVRgvY6ntGWqMdM47ZmCLbid2zDqANBXHEuApWGoW+sYYE2cRhxEoYjkJYXRdIqeEIY25dYQDGo1xARnQCcCOHILTt9ObCngRJDpmLG04kjZ9uY0/vRDpKXkmWkCi0YWnxaRJZoQkejj8qiYAEhSGEIXodnbB3tJBfctFrGLpkYtGxvpSMHotwk6ZkybFibIsRWp+C3m01JjYm8lpiVihCDd5/1ho0Mv9HsjDQ3ysCcUak9lvIsOW7zBY/aMZqQ5vh6KFYn6gaJp6dA7RjYqa4MqzUYf2TSqMMaO4ow/RaGxFhJ86syBWwdXztl92lPFZQVxC5hb7M9YxXKpjtm+nYh50qkeHZoJOo7eibZ0UizCcjVzVAL9ftreC7nGXhB8HWNADCzQNmpLYetmf7nsAelCXK22BrF1BRpjotGA1VJDka0ZFm8YFggJ27N7R2GoUYbqAVbYVdFSubTKCsai4UUg/ByEm5zR9UcSRsElBcVtOEYNwmTdYgINPCxk87qUJxYoH20bh5M1OLXfkm5sOAxh5+wox8PWX1FYJHxkbtq4ma2moy01KhoMGlirewqoIf8DniIbbfKUPBiAKqR/ielRQ7m9tDVsSNy+NQJdrDymE2CLqJ4pjMM09iCOBUpSiCGNQsAmCBEyfYlCZIwdkhBHn1tTiPAUf3qoNHSmNyx8p6VpQH9tUvsTp0G8GrJz9aqam/I888nCErSFJDYDSiSXB6ZCBhEKXi0NxIkx8TaGonCwVYWesyMxxIkWEHtMVXLauvtqQwYT0QyUe1gaF4tAJG3MBLOFI9Saw/X1egHrCKSonthTCcJoU8ykiwdUdx1z2+O9aBMqw7QSswhtiYs1sTKMMKwPVs+bWzwJOJB6co1vKaAGAa0ywQ1nkqeAdceQJOlPBWd3o7PMIWoqAGWSoF8Ec8q6Yfh6TQguneANhhGEsJ4YQn7c3+HkwcFG83nsEtXzfjn8kVQW9uxiTnGMAvbGRiLi0yQ1FYiILS3zZVdI6NHI+4QvbPy5V64hjj63phDxSM4g8PaUdPKGkinjbhIJZdd40eztcbSXiNIMoEAS1PWXSmoLF+YMEDSgwxmDO+nT+IjkqofSyI6fmsGZUZBFwpyelc2TkKTAp3n7+J2oXFVNPC6FfSlTe4QMm+coxR/EYfC3KGQ48cvbWPJiBRjQOCpZh8tdDqGZpgZWFbZ7/1ZPaYs/cMYa2qjiABkEkqScAe3bwM6LDHAhQA5fdAsxbGCLGg1AtjO32gQ6IAksBp0FA5/SLE/GC7u5Y/FqwIP+K+GAPSAWJYGKM1Vo9Rk5NDATqsZe0nSVaFqWtOfLD84I4+bLWAFSYU2IfYz0cuJu9IbP0dy62RZXsjBYYtQtvgEU4uhzawoZnSE6gzpryt1j24Bo7/DEp05UmbK525GofADiLUJ/eC8bEk5dNdOKukkMTuF0lw52KPgwIKKMvKBeBbggux5qe8OTu3P2QrlkIoVausSxeFVR4R4Po8JtQwSQub6JiJS1S5X2RvCKtiDSUXHGbS9eVJaZcqBqxBYStkHM1VHwxc9iuJRBn3BmhDlNnI9Rw5xvyw6VPsUtdlF8iIZo5Yns+QTLVPfq4fwY0EQZF6i3kr5q/WVdi6A7MqwTmabI1yncxtall45eeWR1zesBc4vixlnQrHBaRm0w4CUCuzBTTogfOKpmMG1oHyJxSvoonxSXLLX4KLMYyZqdSBlghqh9YiVbQUiOWyjc4SqkFJL85Ag5bE174icN8B32d86EtVLIuYfvekUzKzG8dekFd0mes4qprPjJKTH+kD1if1lwhNxt6MgjIN58MHNmPvrQMtxFOJeLM8JiyDPChwxChJzGBrsquvVVNKz2MkUYAmtq6M6RLsGNNI85NoEYxOo4J++Uan/SPBAntGYfnc5EaFLLnekUYV6mBq/w3FOjtsFh3Fhz4oLmzuJoMnz7q6YjrxncpoTa+HYUt2M7wOKS4WhOOvqFxfISzvekOMrrm2FnPzC1wQOFqEzgrC0gbn1VE85gznCXWFmMoCQ6xQe2Bi5YKNDYlfFAOGwPxPDipHOxT20vnG+x8yw0UC87La4A0oFuLch23Z1TSL6WWlIxK2ZTN9pjj10pnHkOzQc9LnJKGSJVzNoaja/9vt8gg3iFqoVL7Y1+fXHT/mUfMsyVgFUkKpfg/esn7WVWhr7yeMHxosQg1rzlrVEoUHADhjXyDKDsrAwI5ESZT7O8hXA2keuDtmavzWffUlnNTl9ipq/GJz5FOCVUiEaTdZ7LnBHna7soV3u6mODVDwIkB1PfcGkoyBarFOo6BA0TIDsoMbV01ce+9TcTlJg0Jjf9HaASsTd3U447uIce5NCufz1msCcNU0TKNz7Ise4lJaO201Yi6/UBQxx6prBFRCoRpKXUGE0oxDGhzPgZJLN4Ioy1Q6yqZmTe8hXNrInEHIu7HDKiNrbVlJwZ40iIo8+tKaThjGCHU+qW3ngwNbqEwfK4dinxo0PSI9fe7qcm8MojSMesgOUabhtG7yOhEBOVFNyb2eDb3f2IIptMuylQC8Qdjwhew8WExy4mon1wjTxHMFigHA8/IVA9ff1WaqhPCGs1S1y9glklQ6cBiJiRAgmeJiX1VqjiLjco+o22bwQGXlYgOdLjZwqPoC6ONDwpPxBseWPghl3dYtF85bmY1CQpZMctFNiUFoLlAeytuMvwWgM5TXqqeouxQSGX2OjGafUMQ0Gp00QTt6cQH5KLY74NT6TwA73cYNAn44/cH2aQBA4rNAi2+DUJa6MZG9fhZO6UaAlXyQX2hsORq/a2Ku3MPArK3vsOKUQsyyOV3Qs62loUkUr1srnWQZH4HI/tb1731yuvenm5Vt8fq6+NiTb+jibfX1b9ki9uJva2WStGHITvysUJtncOOk1605E2ODdKshC1tah8Xdu5egNTezxdqkLr1QraB/KWxmXCHA4Ec6aomWPYyektVEDcTkC6Q2pRUtm539Hikuq7cEqMQypEZZIC4Ux0w5/SQVNrNOcg8yR0Qqpjhgoiyz+1etuBRo/DV/V0YWSwZek7SfsQcegp+Chvl8PxqlFRtMmlkCc1nsVjevvUkGMiASQ1A/EtcaTQVIXhbFZJ6CMD5pKGzYCldhKQDWQQ+MCR1EChXBozPQIYa6oO+Ikt0dP+iceOjnEkxNHnNquQMGrXWzzW4A7lDNtmsx0wG8/RCdJLkF9+FTH8FowXYRAJaoVU7auZEn9xk6izQ2Bl6AnJfjkZNRJXDKbQbU6knRdTboG0zrqU+nRJ4/RKZQo1DvmiYmxjMROesDcoYw1QAI0Eu9SIGMUHCfu3JP7aIw1bAl4fyzRFKAaGnByX4EaVlSY9OOMXzfCMKn0EBCgJJhiHmj5IC38qE6DClisjGKh6Na6IB5HluuaZ+JMyXgVexkMXolMM5Jhx8CFXrR6aAESfhgPNXtmS9E8b24ul5H68mgwFMKJnDeWy0ZhhqzDiDZ1mWJfLfDcGYIks7VkqiHshQQbazJxqw+XFU83GOBLi6HPbjRwzFXkaLzujWDTztb9ssgs0TopaRvhS888+XvjZxzc+vvmRxSvSyO9nWsEcazcJOEL2ECqipWUhDwbqUUGTWJtFw0ebXfbzdK6iztGrUMSn7UlDLUSWmkJXKbenEdSM/iiFQZpzXXbqIhg5FvI6RILOFjN3jIZNMYQIFTqBGuM7YElbHlOjFbKRoT1qVMd0SUvJ0nndnfvGgl2gT1jRFrhT33rplIk0mkOAMFdTHhh027N/Q09mMYI9LOjsU/tSHT2R3GJNBOggm0odVYZISTTz5E3yRRWy13V6taqDaSjckl108LARddQgmSUD5jTS4lLrj+Nii8rM5ljEHhvjSIijz20eJyx8aOrbwr6nSuLEC2jgiMovKic3F8tLtCExqWqj4n0/BeUYsktbVVuykVRUiJlEIDaFwPQAa4G+6l2W2eGDaxofTINWOSoZZ7ReNRBpdMyRqzVdnGuH4ko7FM/aFQU+Q9zoLEBTKHAk2LrajbKqUV6nxXDi54giHjPgqJzqqINgJ4IPlUqkGI6qvvXsgYgU8jJ74lKREm4qc6OVgUjZeGIWGhNfT1SBsARb2K4ucYI7MmabpZe9dLBgZmpfRcSB7G+zsPSVp4RTkFA/4y9sBC0s3YzjNnZ7scLAk8Ixqiq5dWHlz3vS7Ai8KbBu9dhNzWRIs7SxSEfCkXzhWCugOl6ZG+NIiKPPbe6FRF/UKv9iT89Y5gaIl/YyLHt3b04SlR4tCrKHS+FY0z5PfrikZu2d90enjMJQyNr3FSBWtfc8kYDbZYiRBjY+LVVT8EovMy3YHRukypY8E28LnTljQ+IEKawQSgiz4uFCQQc4EkVFt5WdaCjLLRWhzha0kvg0SG3SuSqwsiaoUHmdeBfr6q2r9WSE6pJ86fVKoi5oXoADXi1qDmjyl9EJLtMAAaYe0MvRgCH0YUDuS+0ED6jAxQ8MkodySAMGgWYWCpLmwDSDGIY7bZjafJOf6eUlqJDDIO4InNw9VPGkeUKDjUnHyc5Z0PpdYrZLOuUBTJ5aAeOsnCQ4ifwfCBVnbH5b5e70XigexGX2bIyxDWQCKm1VSBIPJhNoSl21DdipNsPjQt9Py0gb07ICjo6pZAXLCRnAsMJQe1Vqngjfs0B8WJdCgAZEccaZoyUPCvJLh5fd5Kt4zcig3s2W/iigd8nRTsDX3Rt2gkM+4hMjrLAO7nUVtEEqczXa1psrU8gEqBQYyeab7pm6qFgcOJa8MPStLq1l6Ulfz65eCYE87PuxekDa7tmcoVUO8losEIPVy6AdWFOAS/YUEjWO4UZF7hVBSAahUFe7u5JZWOvcxZxJbsJppXx6MUjQ4jYehPEZsGHMlzrrlqR7LkVyidlhtQlJwU44rylkoEmSx1EysxnbRKNpXky+fodP5EaQ1PYn/eEb4gK8slNq9ewLF5fkF03M41TTw+zXPU++Pc7fFeDWyMkAoZL7ouz6FFp2gMkQRpjBNyoDkYJOZ/Sy38Ayoww45/6UGcptxCWDTy1h3RiOw0YPRbNhkHJLwK1ydcdRbp9Z2ggeLS2tM7j3GtJM8Kna5FLUQ5idKYJgj29h3tFls7PR6mVe64NoEBRecoemgoeFby4zZm8wTFdTZ01zm7DRoS+4Q+wIj8IqpQJWw6MKybxOpmAGMVTEH+8zqwxsNKmHhQnRR8c2CMqne1bXpkONaaoknSGNgckIXuUqg0NLA8z37R/5V8NN1RpKheroZ0K1AEC5MY6EOPr8TauQXYzHNbSUtitBla9yiTK3BLBFTrSzyDfoYa4n23GstxPndWoi5VmC+dOJlHpsk5HnCXN+g8nKo/XHSxDIK+gYPZ0/Bh9y8MaFPUemNk7tW3tgz9pDBzZGVHNw/3sTu9bM7t9y4YLR1nmiJaiSeioZx4sGI/fxq03DZXNC/GCyhUUS4JstQR1L7bJl0H9UNEukNIkwbFdMc42SsHp5irRHB0IW3Ccxky8aIoP4Ik/UbpB1Yxd63OsqIM5iUiADsrR0/rY3/OVayGA0SwwGTgPQwrr5AGqdc7PpyiKQQMTYAKxqOrHRMOpRmUdqxv2AurzP8U2O+azTWs2CTxe89iate1kGb16RvMByT5EMrkrWZzdGz+vjPwIPcfS5NYV6eMANEarIDQHGPMShSobwUpuv0NbXfPwKiOfafeXJWyD+8ECpqP2AllcolxTSC9rOiULZ+o+yqO3lhtPI1Iend585sevUsR1nT+7W8cThbSeObNPx9PGdqlclV49ulxyd2ZTC8aMT18nfxp83jTIwtptCKWB7NMEVhWnVROQKgItU2aeM2dqkfd3LlcS3lnBALcM3j+k1pLqnpkQNGKf1krRYFKZZPVQgIoFdI4mJkWAZeTDKlwqRap8cb3SqL7jUWmGkhgmSyvcuM4UvgVcEpGZPCLJV74IfIXDHUuRJiHUE02qgSZ2PSNa2pVmEH+wQXEHmYkbE+mcQ09uTwpmM2RacgS1O4uxguerlpaVsPxz2ikQDteS2yqZhrF/UNkvHOBLi6PMLKOT4JWaJZcWM3JPElmDEm4TB3icqhzV31C1jRBgbqWZEtDzlAXGWTsk9lUE9QoGYnN1pM1rw8dKE6HHu1J6QRMfzpzlVOdLppILk5By8On5wqwqRY7Nal4LszNVpE9xjtSu5pNM0aDVpX6ywfxx1jHKZ8FMI7j3CaLMIs+RShkolYuK1xjqGWr07BXsSoNeWiTLhIGE7cxsKAnS7FPE9xoBm73zolZ8/hhXhQ4fmqBQiAWglcmf0Vg5k2f84h9bLjLwMHDm9whQ8pxEk5oo2skvMgTwYCx7q0QjbwqiEAl5eTCRRtJMk37b2MlKoQ7GmDzVuWZfYGWGCX213z5R4uviBLH/bX93dZiNn3IzESUeMCW1kbeUz+JowaA4pwTEulqkca02Ur2tNtLrc8i5J1XFZOc41SPY/BmsnTE4R1UyeP7FLHNA6Ixpot6ay1hYdD09unJ5Yp51bCtnRqTy7f8Pk3rUzE+t1nJt+Xx3Dq5Dt4sUavKPWyAb6BrevLtGBliO+ihjiZASXU8B1klQOzKz2qay+Kehot1CTQWrrRZbxRoswk7AgBrHIMygBpQiguFR0zBynMyRsabEQIr11Kfwxgnfa3l0Hf5Wtq5K71nynUaduEJ70u1xtNPIysIu/quLyz27mVWGdqoA+QEIM5zGSs6dtlK8qNTfaN7A1KeYUrswoCt0WK9Y0lLgew7FxpB7BYzgT5gwrQbZXoe6dUkjxkzH0d36ybf1eSOEMLNqteZb+4pI0yNpHQafq7kxDjXKGXJYVBliMSkADboCLa5L7A9OGYIHbNLtyfItub0QMsUIM0Z2PGCJWaIURnVTWbk1cUoNd29/YuXW1GoQ/4pU4k4Ur0lcnsej0qQPXvSYUmQv9LAVNAXgFyk0D1VfL4J6yBBfhLqyIrwoW9lihhPpqnFPl4BHapFfRxt1VdlBNmFoWigPQpgpeCgJuf3FO/g96ABkC+MYw5HqTR7TJaaX5gWz9xiDHuvX1Piqxjm7ezlm8AWE0i8uNlgzlcfKdca+Q5oloY5gtuXljp8dNVzaZvr+ysbZXs7D6lcIud8lENtYeKPFdRpbBmx9hi5/FxxYWAw0OpfMEz4swhTvcyMkY8pwM8ECyyhQinE2gEGLEV3RDJIiLO1zpFIIe8qzN5g7S6zXd4Ynx1xDDUDraZSZtE4YCZ6zs+2bee2Xjuy9tWPv8+nee37LxFZFk+6bXt72/Usf9u9/JwwOxSFLEOL5TjJKIXZLUhEUsREe365gVjLJYVMSIQCSvRSZP6nW0DDWDtFxg3DtflFG4ooCCuyQxTUe7FAq55UgOlj+XwMWw49hgivh3mkUqu9rNAg4Apxmd6YLvlsX9gNi4rxoKpkTKERKiG6RQ8W2BzjidAPmFCLQJ/aJwK1chi4Ala4JXIQhZJkOkKJaCfEJ9Kam58EkNVTznXWWNBkmcPhjfuyHmKgJbaoHV0RTCYyKJlDeRyjnMgpnoY0De4bcTrHr1Z9MM1g33wCXoJ+oV7DLVHKhekmJ2e8kVz/phfIDSQMMiY9hpip74w1LjyWkpg984v/PgrjUfbFktCXNEoR2bV0k2vweXVL9146uqV00WH23kxCiJliDRTBzj1uiwb43EGR9FIfEqy5FOjx2ftD5JENGzcyMr0uiiNHJvkyUUzpA1rXlIMudCfzHg5/WOEH4uRBrrpOF6zOXGciM/C7MzFVriTXYMoEnSSv/uwhSOmkdTGxKq86ii4O4qk/Izr1ESMhDiFDRpyNaXhdoNWudq6d2ER/adiSHIsHw9UmANfL3U5GrIX3w2XhGbk6GqhmcPsd3m8IAkk6KVvaFKzHS9jhjOowh0RsNojpLp6B+nBDytI13yhLmyyckKdMW3thstpol4dkmHxzgS4uhzOwpZleZ6m+S4alxQ0ke3DCgp1RPaodyWoCSM8lHRsmmpSsCa8QFQzO6uJLQXtm5b/cyLyx9a9crjb7329GsrHlNh/ZrnRRgtSm+ufEqVa1Y9/c7qZ95cv+VDby1+XrEb53ecMX/EGWhzdHsx6uh20WzPB29qv3d4cuclNm9SySOg8BLaxMsWKd+8QbOYBttbgCuneBDKNieZPu6FGMosYB3sjgCrPMbdI6ceB7CCifYX38tvdmDbe6sjSd3h82gZ0CwC+rWkBFKhXKnEpQCRBjVgk1jUyqjKFFbJBBglrUjuXmoTsrlLNG/SPROPBf1EzWLcO4E2l5a9TA3A+lP1mN9cYfxkigYnalJpk61GThk/6bvuGpYG15f85kYdxzgS4uhzu40cfg9NlR2tZZTgmCmNe0mBPvajupcmd3EbnkPE73CJ6DoT2DUeDQGvxDJ+sS90dHQZ1pd2T617QUvN++tXvKfChlc2rX957ZvL1r31XNafiV1rtm5cc/Ii88bvUbgmGgkMakvni3vPHNyq26eZifVamnLLJNE6tnnDmhPn8S+6BanmSRHGXz8d+OPgqZlmtMImqmpassSWFrxYBA0MaMOrsrjAZ8JkFzQ8h/W2TQQzqZKMIBteiveMhhgYSFGw32p2udS4wc+0N7xc70iVi+iYSw4B/ndB9cV8mjmUmd3z1tUiDKYpyl4DZVrRldB7tGqfwdtE1MQQGpRKVakyTjOfS7yFMyzhZOlM4wCy0MjgcngZbm8Mi9jogFqpaA+k1RG4Vqw1lDXxsmFEjXEkxNHnNhQCsrCokgrTWMXia4gbIjG3JsOkZD6IhEl2R8hjaytH5ssgNGu2+bexNox6wEQlzHHy5vTq9Ik9q7PUiDNaed59e7mWoJ/8+K8efejbWnYku+bUt+0T3LfGSVAZlj0PClhPY0Le33d8z9rdO94QIXUUl7QPXLNq5dELgVFHW2Isb9qtDpIVi4uMfrDebgO0R882nUq+eqzGmpf7FmpghS+1W1seAAx/cIKyrnoHzwJFebhRxiiNVukGx6JkQyT1A7YanWw7LWVFW3lU6FfDt4zpWOA9twzh/cCqTVoNshTUCIqsnAxasDoeSMFrqVqiEi51QtEpR3uyjmGO3et5rRWKMa9GDi0JsVc8BkxQ0jdOIJVkZNe0wUnQsjfOQX9aUh/gyS63Md5U9uB1SYXYPsaREEefW1MIywlwocG496xikQlTjhjRCWv5GXaCJ9V9tQfJMcvO0KeBeF6K+Y8zWss43XcFoRPQ1PHk9sfefv3plSt+suypHz368LdfeO6hN1Y++eMHvnn/9//igR9+7fFHXj5MnBy8EewyeN8LkbkdBiLtwYGIQ6LKk++JPyKPbpZUmNr3/tmLeB9DjE4X4ly7vh1HTAvzyRGpgbRIXZIfKiq2NO6yetK2Paoqaokt7c/e16Pk3AHXjbJHi3vt4cacrmqmi+etxuCHRl0c4qPTWfQHnTqFMIulmJwj5XPJgM4xlnYbqadNBscuRsizu5qU9oC4s7Qdk8gqvXpATVfaFgk5VUydUKKh2sT8FqMWFzAJtYTPKpQ37HYrZlu6pWiuArPk66ro6dfKYF5tImp2aowjIY4+t6ZQsp0jd4kEaWOY3o5DpJAMk1X1157qKYcbWAlZWD5yLgxu6Gv0sMTh5fgloKk3bn4g6wEZk+Pxl3/02d/96j1/dM8X/vCzn/nt3/7P//7XfvXf/L//+v/8xG/+8pe/+OnvPvHWeQOCRGWzu6cqAB1AyQW5SjNFIkSyttemj+18dcvGV/woYvNZ62wTlIpsbzSnzBG3euOq7jbN1jEmZcJjfFc4G+Uc7EQoMG3ZesjZknKpCZO1KA5JUPj2YOmTzUnL3N3hqKQG+BmtmA6VAhc8U3AJi3zjZH0cYuedONBSjrIfMprMV01rkBr2530Q6pstJoCflanSfZ1lPAWn0tAMzLA+glf6Ei/PMqRCeYlvu1FpYnTzGbb5ROZ0iyQo5u7ozHtLpsbhOFbubUsF0h/rW/NRCN3peyHHLM/O82U2fhhHRPtzFR1RCIM9MYj/ePGq/VK0xgwa4Hf7KPErewwazEhfi1lk0o5MPbPy8//8n/zj/+mf/m//+J//X//rv/6X/4fk//lX/0wU+nf/9v/W+nO6cIP7AvqEpGZ0XMGQ40qh6WNf+z1VDDEJz3/w+EP3f2P1rhnVCPEGIlFp+cwBTqiMBi+5zoVeln0pHEMZXxr44yNbYh9r5KhqfSJVSeSIbn3DHX/6hyGKQptOAzK4C8UcyuFPo4eGMi7BYnN7AN2SvWYJKFGjXIcOuNEeS+BG7EL5NMAhVjgFM9az43xPGhxn0o5UzQuOZZF0sxgYaFhPVnKaS6mkvhIKOaWiBgPxuVr27ki1rBcAHn8kkwbDEjlcVpjGEDIRd1h9TzVyU331Tp/IdT/GF/Gd85yd5VzV1MIXDvnNhUtcdUcpUT4dfKR6NTtrbvi7SSPf+Mhb7Z99PO8X2MPL7J+9+4V/9N//t//DP/rv/pf/+X/8V//in/76f/y3WoU+86lPfP5P/ssXPvetg+fYG9hOiwGaG0qkbtgsvZL7mTQu7/jUWM9PHvCXKw1Tj5l7StfUIN7TaljKuQH1vWJdVaHfmNYjUd9EkTUDd0LlaJVXJfYPTsu64TC3HFlrEUchIDsiOBMCc8/tkAUWcnWAa8T0XJbcTPiC+1YgRpqXMa2PfGJ9wJaPVhLDcbWmo0HZ0ldgtWQKRx9JoaX/0qTWk6gXhUtJiN3ZRUGXaCCHYFQbR5VYF0AGafjKLc2EYjuU8FWbSQbR1RhbNlablg7aCBUUZ8YCFW2cnsY4EuLoc7vHCfhFbvJ83mr7KD8ytyYTGRJUVhK2Yf6LCFccP1lILzWTPXiklppayljfOL2gvmov7eM4u8lY6Q69MbPhh7/7zW98/snH7pW8tuKx9WueX/vmstWvPvH6y4+tnZg2lPNUg4cc7aFkCv42Xavxm9COZp6xuByCpRzJqdJPDZvTkasjzYaCRIV6slI0G3lw59EgmFw6wmHHCQKA1HknGhAgp5FE668gtdVY3vOmeuQvVwFBfMWdhrqDtgClYlQgc8EY0qkXW58mQGnfeznco9zwyK1ZXU1awRZyAZcM3IqjOe91ICuPbbG0ZaG+pmAr2kJRJOnrsHWzQ3ohUzS+1WICwFSoBrQBUT41kzUUR1PRWQlbBi9ls2Cq6BRSuabliwqr3xeNcSTE0efWFLKbGKX4CisysYypxCDVIYOXFH8Lmz+NYDfxNAlFURH7m/aysBc0YBs8etPe78JMV/c9tnB07ab1L2/eUC9P8/40z7U3bNt6+cqREdr4dZi/MdAAHXxnoVCyyeLgo50STHcx9FuDVKqBqFUN0j5tPEWx0ZxxSo7OMQTvaZZ6E51B3NF7g4xJL4xlJaGvOsY5AKX/gZ5knEo6sCh3jGGXK/FqwO2JTODmW7PIkEIr1ehqPG+1eU7lZqRnR8pZvATA9ZwYypUkWyNgIyCGLYZ1408BfbFqsoqGSBGYI5rZ6lpXmzJojj66FGpBkrIFfXzXZAGZhjtWyzoKfU+Lpawz9onE/ne8WhDhhiR5tmPJovy75PuQYxwJcfS5zUbOm4HmDi81/sVsRXTIi+3r4v6z4vaFllrpl8UhEJTSzmpDonWmUQASWiikcsXYBheLzux9XvwRZ0QkrT/r33le5NHpB1tWHzrpDUxwbEcUrAuawbfLhmzg1URlFHO5H1k90r6OI818KrsSD1o6zIgD34AIvBRRiGHdksBM75CWSgKZMRktGjrSiEYDJUDH2/2RW8eWfRUOXE3CBk/AZbAu7xKgx8+fVjPAmnmLw8WHssWGYIXJ4xg5ZJU6C8Q98WVZa7mjutOecLugYQtObuzoI3U1U0ukjMuMrNPySZxZTw4KGGoGqCr6dmmlxRy76NR7eElsb5hc0tKbDnjCtsWblxQaeZwK75BCyRNOctk8sPLy/dyR/7bLbYzuWGrxIevII4Rq5EWvoSNd0dvxK2d1r9nvdlaTqpfXLmydeH/luree0/4tzMlLVe3iXl7z/gXSZOE14I5/OcZHdhl+76ywAsGNjkFYa1ZtokzrxYAeWcELhQqIaZlgV0cF27jpQvcKMxFyqJoTkjXIKaw5SfkDtpyDSbShEEtBK7cnaQ21QNNGNXo0i1q5CWokCtK29hdooukAOlEAlEA2UbCGpU+wThvTBjJ4anMpl9yRlu4iW9yAjio0wVKvPMoC7RlGhqKjB8Etnp1TRksIPDVH60YZM2VRZ8Kw9y5X+2rlr5FLco4ckriwwTZQWYhag4hHc2oOjNVmjCMhjj63ppDJk52DtxChDbsISe3cXFnPA7Q6EVd+/jm2GpagbpBKnAhk8ooD1rNguSwQvzy1ctmT92vx2bLxFTHnrdeefvmFR3RH9NTjP1g3Mb3oJd5gUq/CWYWQoCpaip83yrpKvR9n5S7W0WIuBz5YbyistI2LwxYqR5t59z/8AbdKnN0cm5CsGdI68yVyHA1Tb34sXmG8UYFIfhGhsuqDOcPOCqccS90G8mSJyCzmaoOOcRCshD9lDspHyYC7Tco4HjyCY62Y171IdmJ9Y8b2hLua1qZalnpFlaE+oqueKDkiTJCgJ+7yUllle775v9XrVG1szs/tuyR93ahCyJOjGUJy1ylopFCVdpe9lx1TvNfef1bg7vQ7cvGX+IPXKOTPXkOVYSMXUplmCYx0upVhXohwU1SpmxN7UH5kuU9ISEjGkN09s/fl77y4/KHXX35MooLI88wTPxSLnv7p0/vOKE6VpcJGcFah5Yd9jJbtuFJdvsPP9wa8ZfdGiLJ0Jn4OT8GuvJlwNlKpQZyb7VAtQbI3fd0Szmg0d+yi7h6c2Fs8ZtQOUs2QfBcGP4Q2xZPGrsrWqgzNOkCzr/Mfs2+zjKMtKycNnMtxlDzPRF5YNFTLRBmWeiO7CEayUHYz30LvenUDB6x8KZmrRUVMGFm+Rna8pUBLYVVppI65KwXiQsE4lpAI4JtkCcbYeo39nCzMGdBIcCu/hDYVax8tI2xpVyM01lBjHAlx9LndKtQWH+/iKtkQM+4CHV2SEDAlwCczq9nftpKY1GQkK6BTc4S8RmjlViPSjkukJXtnNvCWU/dC76x+RktQfxa3ccf2y+lSu7K6j8+yU2jwxp3oVpos2kgMR6d2Pza017qn4sTyfqka4ZKxWKHdf+TM5j2n9l6p6KaNw6yrGNitO7rw4c7NR1auOb7jkvM9TiMTZZ3Pa+v4s3KWj3675/1z439/mxEbQacaaLSiq3SLnrbCoGzLIMsODpEI4tIBP7BoB8edvc5KQnxQDkOQUAWJk9WxrYGuaaRKL9f4VOVsswnrCG0SpiQOj6x6x6IZYgrF7ZFYEXEgZGDjxi3ARuyGp0oWxSXOMT/jGU/k3MfUnhcF7EYaq2P8WSQc40iIo8+tKWQUys540EkrGwDVePdfE9dm5qjnC4VilYyZ9nE0MYyAssywDXiwiZ+k46OzH3ywZbVufrSL01EsWvXK42tWPf3u28s/mJ2BPGaOFDMxHNGkyRbXxM81yZRsjdi0OMcLkWiuieJZnGsClO9ChpwmEjQoROp4eUIUmjq77xrlrKtLxKYZu5rl8u69x99ed2zHeR7Z56lUSaUqOKOl0pvkolaevNVT7FZpOoVdDJUnWiynRMSBCAja1L7VxGp5I4tYxdFtao/kQm7tEJUzWirDARe6e2GXy6nxbjmz6IifCYGJh6uHXu5ogWkaWceEqYKeWOD5AFpqOK8BGOcmKdwCBKKSrEezdgfbKPaqGQjM0QTLOJGEeMlRPGx9i5xjHAlx9Lk1hTDP+w272/YYGW1iDECPMikpwUq3+ax0VEf75HWn9r4cS1eODqSHrbttgnr50Jpt768Ui/btfHvn1tVai3bv4JvU2zetO3beG3pixq2t+ZOkSMBcIMCgh5g5wWf/lr17E0doqZT77McWquQzY67lSG3GLu/cf3zdsXMT1xxs9QUEHcGqcbpJol28vPHx3fd+Yd/a08M333JLyV0l95P5HXWr4fbSf2R8RH6eQhIscs15QAxPnOMTuEKwt3y2187hdhF6NJ3t8KBztAajMJNxGI3sxoDdvW3hyrfLSyXpo0LcC+2ZFJ6ztWYcr0slDIIyLHqmEzNC5qXZWcoQCDDW7l44Fr5H9mkNe402dZ9TQQR4fqqWoRDsHQiZe5DCJ5JBDOCG4TGOhDj63JZCMqPxx5hgyu7r0gZ3u401Q7lugKVth0KYwR20bOJyjZxh4dL52Tc2v8dTBO3ctP5oFdr47kvazr30/OrTyZdZtQhqFpmGKgOrnfItvsAO/BVGlempcfwKHy31loEKZItopWfnlMBIvY7e+HDPxPF3tp7addnMCSaARf1gQQJda9LLa769+ctf2rfuXMNWmGOJSjDKTzvRrSrNGdODrTJkkF1sm+EGU5RpvGl1KulQjkNGH4Kn8qwM6QHVsRnLlg8r2i4A86kEzXVj1nfFg2912lISbu+ng8KomrWx+FC7dBwVZuI3R8FTQ6rOMVrCZzAmPSvtGkIUgMoIl5ZImGZ0gb0awb1cLgSOdBl4YtB62BE2RsY4EuLoc2sKMRMUwvKYWjm+Ur4X6yZOJ7ozqSzezAaOiRM1IBJcullskMTOXKVXC9vM3DYexG1Y+/yLyx967pkHlj/74Ksv/eTJx+59cPk750FDow0wEtRanq6/jFH/6isIMyj9TyX8J7jqq0Mfz2MImZuNTRnbjs6FJkYmEgol5996avKJ5dPPvjiz/I3DL689snL9kVVvH1mpwjuHV26c23TKtxlgTnLh3WVTTz879eSy6WdenH7upZnlOupU3V+efX7FzLsnBJ2CEY5VR6GqFk85GT8bZ3J7NxakUt/FlQ3fUKW39DYvHG48lH+MTu8s/MwTt1sw1glCMwbuTi7+X9Q9F8TD5dLsOfsKmUr8nxklmGDfOqzQ0i51+ovULL6/8uwqq03RzMCLMvQVWoyoDqeUqay066WGMiRRGyOtAOZjK4hIdKd9o002fm3rRM3fmUJoj4sxoFsed1O25VXfHCHvpw1LMxtuYbFlbpqV4xpSy0fUN9+5JiPv3PzED5/+6Q+efeKHr7z46LIn73/iJ9//8QPffOCHX7vvje0EtfDktJe/kkzmTlyNGEDj7EjWZDvuPH2mAu/GzJv854RnraSwlTRALdLHd8/cCXipifmXd2w4uGLlke0Xk028oeeY9mQZt3R+mf9w+5qZ5SuObLtIJYSR/o0nTkxmjvvmjsX1uffwaLTHEJlDRrBRTvz1sE4KZ5zsV/3NoFjacE8vnpvZw2yDi8Ass+V2CNzMjA6a13uzEkhi31a5TSF/ejlN2dPJ+XjV6C8KtRzqgrFhPKA8q41PDQkpGb6BPUagO5XVlwEbecyfvkPrCxSbnX7VleFP8c0t629NZ/tnwgwsMmc6oxqvxjgS4uhzGwo12KngVMT9orHSoiWnCxxkXDxOOI1sxz7rskLC6oRrOiwqNjVUxOhhruRRGp95d82yB7X+iDk/+O5XtPiIRQ/e9/Uvf/HT3397Bii4fceuPJuQgFeP1qezVg18jWMFKejnLUfRm5RZalc617F9j7uiqzE1qW5vtr6p5eWwWIHCbmzBBHNb4AaOUGjh8pa3pp994fAWNU4zTepC1PMSJ1aoi2esoQbRgN4gWax5fxQRK7LFSo2QXW8gWHjZHA5EKocXRjuOKzX0G5s2cg3ogobN49lQ6JxZCnOYq+7lQqSodxb0B/RLxHuzXvYCiNvJZY6CNEEZeA4JW2oTx8IrAuGUnaFYlDRUxvTi43pYWg0CDI9A95jPV8PG+JNy+NOOdVoyxpEQR59bUwhXKq4mT4kzn2ChcgFUwVal/eWWiX31MsQVG7COR0YwyggFLyMSATpGs7+pdfAV0UarEDu3+75+73e+/PCPviE6PfX4D97cPU0SJUUpD/Vs5G1h/X/ILAI9x1u8JwEQFeP2F6GMBokfNJMC0K0RfuTGJqnBtiCnFi5vWzX55HOHt3yI8kMzi0dursNLlzeLQi9pFaIm37PMdyvdMm3U3jQwXo1gMar/VapOj/EHdCkY2fa5J40hRMfduRR9AJBxiZ+zRJDgfWp4CcdF+5aMnDVwiG2vVc4qRX+HHpVE1KjaDGxgzURZH4zyhnhjvfQhcHBYkTJsjIpoJc5QHvIymhBl5z5Xum9Z0SiEGB5Ir0xZjbUc+Z4HqccSI0uQ9nitPvdanI5xJMTR53YUwhEOUoSA2XdxX48o37YG/fAnPg0E4Q8BwFoWLqKojoQWBsZNHDsuw8D8B8gjq7UEvfzCI7r/yatVbedeeI7XrHv5dfcJvFArtfnTV/DcL4pgGZOpeQ8DyMCQJPdODvaIwoU2n7pNrMsWxdI8UPWX3331wGPLDm+5YOjnUjnHlmYEn57RKvTOzPKXTaEwnJbMbkSiWOdtS0POVihv/xhb3kBSYzwZoCAMGwMsVTpzq9DWVTdLGqalMeQulft7Uh8RTZHRmIvBrZUfY2hMjtRIsVLbaLbVZo6zDwDwAkKkOo5rlTCIrUamM0ja1DqWhqrUOJ4U5vgqYreoDfZiXWcjoZeQT7nP8a0O0B92cWzwcrrkafXPiYjUuaT2liuHxjgS4uhz+1WIG1CnFiIq73RgBRmqMWh0tXYgXp3ChFExyMhM3tuoxm1AyWIVTCqwAus4Pbjy3beXi0WPPvztRx/6tgpvrnxq9atPLHvqR1sOnrQj7JEij8Ij5iwNTB3rN2rWuZHfu/bhFKMqgzp9xkxqwj3vWNQFCuVIXz+6VQOjByoSbyMMo2SpYSRbYpdPgV0sNVAMGroUPkwY8wSxIQaN3aKCG7sX0Kwn7IKOcGmw+s4bYtBM5tPd6PQ4GjB9M1rztqcO5XQVgEpDombNiQ6rjU4dptIcnaO8ZkQHNDlCZZJmWGSi9qtBedQrc7ziLTp3NMI0FIUntCnPuEEKtR9rTMvKE5ZCHt/k9NUjZKgtmfgQanmFsYwTqcjT6NefcSNjHAlx9Lk1hcBQg47RluybDQOLtUwNpBoKAy8hD/Cl7I5GZMYx7NIYsDoqDhJQ5mh26eqZTfdpCdLmTfzR5u2h+7/xyIPfWv7sg88+8cONs6ecyQgMXiOVJpzBGfGokDgeXRmtJL498B+nrR/58e0+P6lr+/iSXOLnT+5rdpkAijecNMKcCJICmvT1hNwsBQpMUgakoieBLwSAwlFiBHDconBaWdYJhXH8mIHpPLUZUrgEmqCqhq0kYvTTl1UiWhnc5oBGTqrKgGVRjpGRP3uQ0OjepnKBnWwNQbOPZYKtsAkKSjjZ7KWjNKGSMDGURwshsd1PNXRJpxrHakOYdCx/1oqkBjWpOxYYpEwtMl0MfT+p68xRjenRH0LwUCFXw5kmHkEDMmZa3uF35AygSMdZUGXw1YNjL0dmhRztFF637LTkS9xqTMr3EQbWDX39Z28/aK773dDMq8FHp89tvv8zn/rEX37tc1/8/B/81m/+yp/80e/82Z/+3hc+9/sqPLvrYkIVlBQySGz2dSTIRp8Ic5WYIZ6xlyGPWSQFoHeBJkgCdsp8DaBMRDp0faaj0OClMmmeeLuxwO0uXg0AH+IRfMqbgCAs6084UFgsCEqsALipdUOcpBegMYgLfNIKNaybMIfhRCe2oGRHJOV6Xq+CfQVJbDJW52hXpF5yrqwu1Pb7ChVko4a1ttYcPW1gplvURIZHgmVXWM9qb481Z8Y5ZYVqMB+2u94uwktq791sHJWJNG8WomzYgH4YFQJQaLsyeBVW1Cm3AOqrSm8Fa0+oypSxUX4e40iIo8+tKWTL5ceGQtwaUBpb3pu5ge9wCnOJBGKACqY8xikG5lfcH0v80+4iZ1ha8PU4yJn13/Hvun//wfu+ft/3v/rD733lgR9+TccfP/DN9VqFnHJslRciG2w726l2dIkiqFIwHJ7AOuyS/m0xkQRMzboyQTWEzY8u6Ej8CiXgpv/YgaTYr3KDK93qNPVNahyCHanKsAidpbwC327nclVGpSVIDXpq0gDIYOrDgkVYqjKoEpGMy+YBoGbsUpPglu2yumLdw5dlmXRZuYbsJqfRHrXRTTrbqPLMEp57ZAYcSUxhoyeqzb9xhQJRw5LooExvlpvksCjiGcsVteh5OSp6J0ZFpGIIODFPzB/eC1WzCEYlFsNLs1ZvGeNIiKPPbe6FcmPgNGx75NngG5DVKo+RcRAeDxmaXFMl7XkjTuTinRqtO46bDa8Gtd1K2junjdwPvvuVn/z4r35079e+8qVPf/Mbn//6V//k3u98WZu6DbMaxF7Dg97MmDwGjSYKgLhkMDmxGTEOrWsUEvMnkUYrQ836WGHHTN7M4HZ6UlqyVCNt/Fupy7sXEmF2/6oH/S6nPb8VTdlChjPz6VttqmVuuH1qNrrMghOjhg1VmZkyYCoDW9awQwB040xhkcC1e7kEESFAcktiyh2gyeMV23RqLQl9OccaNjG9vduMA2ucDLV4pVGozVLM0TGnTY1qo6PKxpsrbU6ykiyKyK4QyXsQfimc6PRVxYRxVvIpCtMlK3/16qnNS1l5NROBpbpq0o5xJMTR5zarEEM3v5BZPauA61kLwT0RUq/5WH8xTNZWWg3jJSygsrD60rHFXmIEp2PAffqdr/3mf/qlP/3jT4o5v/OJ/6D9m04/+Vu/+rnP/u6qA9zBey77EXcUtgQURw5YlMfLxZqonvh5rjCtBVt5zoEpi2jPaQUgMSCZsYfGFirNKFc6QgZ9gueAdW74FFZQDg8dyDQwMciguNeGlC1NdNoaw6Jqr0vRM55Ec0LAIBa6hLoarTeQFErkN5svKsZj9vmoW6gcgN42F1Taadd4Ijoyi1UqYfGnZfGHnXmI5BE8JqO1dFwyPJ4Jc4p71ZckS332C5WCwcwg6OxvfJfT5nC4XW0noJjd5QbyVaUANWshTkAdrxKC5ThWEO/0r5lW8lPPbEviJiLhYA+BnA9SO/gcs5oY0IxsPcskd4ffYoJJn6Wg9VXl4syLP330ew/d/42v/fln//yez2jx0Vr0e5/8NXHp1X0sg83RfIukhQTmpMC229KiotgDkeK/vW/EG+KRhm8rCVIHz5YVg4RL7alOHtpw62mg0z2FjMaA4UA7TY0paiJRqDSZS8iAUY9GTUZus/hVY7ZSPvVXQpP1RjiZceJbRcok6UuWU1jcztWW1HUasrm+TgkWqxlr4DX/wU0bWFoN3A5YvfsNZCWJb4bK+Bxbe9q4hkmdHA2MloutVQLHyC3z2lgdF4kmuwkUtv52CPv8KEZHpgh6y0U+UogVSyRBt88dl4QD3I5xJMTR57YUQlf+NnQA0akMhWxVCGC1bG2g6SAdR48oBLwahaqSPajDib8qyTnHNDKcX9z/zF985Y9FGN0RaS361O/9xve+fc93vvXF+7//Fyu2T0MVkplbalcZR5ON5G7QI4UzkY9DFtFV24JYtzy7hAY+8jSzlbukskt7XOOfGQ+PbsKiDn3PAowSP/uNcgKMVhVFN4YVjqv3fr7aqGJ0oqrj2qKLUf5doMfJLJqCMjU1OEc41lY2KumLbnXadciPCK1bTvvsIwW3cZcM6BlronYslSKxhZZ+lYdPTPiogSbANGWC5WHDbQFDCws3QopskqDEVBnABqUNJCoNRR+hHIOwEzM+4yKi4FhYH4BKJTh3Yyp1VfVc8j2tpAbEvXf4B4FlPPMxljLKEjcxHEY6nzFfNLASErvMIWfnI9g5ZzeQlYCPUrqMKUXtixMLZ9atfOQ7T/zk+4898p1HH/q2Cvm+3CMPfuvFbdN2YutSg/gL/IpEm7eQLczBH9UYKI1OruEhZtTLehJtw5MmnTa6evDGpb03znwwf2rH/PGNN46su3F47fzRDfPHtjhHBN+hltpny2cuXZ24MfPG/PRrC5Mr52feuDH7hk5vHFxz4+x00ltl9A7BJqD/2Or5qZULEy8tHHhFBQ1y49A7kvnDHwSL6RuIezpS5ljB9qZNO6ZXNegMqS7wE0BHuAorcK+blapeXhyyQQJWForKrSVGM5eSwhg/U6SgKVBJJsNJ+ooSFV8KlBNlOFNjCuLV0o8fgQ0TqZJ10l3cN2k9iAWo5hv6aMCo5JF96gHThQHBueo72O6QQnZlebnAMQgpsGExYncMnOlwzCstyazae7Q8bjK5ZYnCkEigKG8biJMGvLB97wb+CdeWja+8sfJJEenHD3zz8Ue+89wzD7y+fVexFF9gthmFnYQBNZpu0RPqZhlMQZeot0p5BxeeDFKEgYTp1Uy+sAvaiAz7wPTCxAqO+16aPzUD6IvDas/sBqUXorNrIcD0ahofeJVeEysgw+lpY1re88aDdQDQENRLWxb2Ll/Y+wLkEfHEIs2omj3PqYZTDXV4nwZHwqVQQtZdOXz5xNShGeTg1NT05AEd5w5OHp2b5adNDa/oJsEbpkp2oY54G80mlLQVNWK2SDJ74xL3yYVaHl6DP4MSjDpMIFinDDjQ1TNStp8DD8e3iXulxuTMUB3WBjrrVUdCW7KGZ2De0rOrz/7fmxee8tOMU9XXnp/uPG5JM9Vng5MZ7/QfRZY3cd8SV4KSbMlIUSqPJG+/623boaGZjoVmMxBn4b4gJhk3aMAv3hssXNu186WfrH71ibdf50+O/OTHf7Xsyfsf/tE3vv9X93z/qbfOZxFvzlLA5C9007DGkHWzej1I0Rzpmocbg9gQpNPA4qFUo3HObZmfWz9/9D2tJOKAWCFG3ZhdM394Z4MF31KX/jolugnzoWUL2x9f2PooBAgNtv5kYcsjC3OzzpfO34FXoHn8dZi278UQZmCRGCXZ/ez8zqcWdi+bn91DF/K6VI22h+bPz4gtxw9NHzqmdObA2YpTB2eOHpq9MgQxpOVSnIOUvQylq7ThaiobGFwY6GT+tPBxTI21sgdoY7g3LsHeIRaBVp+lQtZVqhFqcQMtHCPFJTgDUcPerCGCR7pAv9rbFy0ZxAPSOCplEfOyA5D8JoOrno4GYT5AHeNIiKPPbTZyGIYfbVXcGkc7WrCCrb/MLgrxRQnzpx8phDM0C74Zsx4ZjfhI2WVwfSqnZ999/PWXH3vwvq9/5Uuf/uxnfvsP/st/+vX/+G9/5Zf+1a/80r0T7Q1Se25zUZbj9wqzC33SxCmxJ0gmgyDi5wFtdQqL0r5UxczG7ag6f2bN/AdPwYfdywDx9icEaAF9/oOX5y+RfU3pM8RDsUzIr++d/+BJCLP10cWN9y2uv3dxww8WNz2wsO2x+aOzxkELmJExf/Dpxfd/RBeWnZdCJHGGGvFHlZo6VDw6gYZll2P04cyJg5OHZ6ZOnCsrsBo/K44Nmkjv4qQTY513YmYDtNs3uHuo4MH065O2xnFsL9AGtFCTMpgOnAAPsMlupWUuoYVyr9GxRQQrHAiPyWhoQkScf4McFzpjc7NUjiWCeavGYmK2tA1b0YMouJ4GDoq/G8EpI9jqO30iF72tq22wYP+IgzjNH9r6sFxQa1FzjfdCElxWHR0VunuQwTbobtVJIVh+eveyt157+r7vf1X8+fN7PvOje7/2p3/8yd/97f8oeXGv1+ImfvR5idiHk5jd3xfhax3Rtvk60sJvDCVUsF01cCYuc9QZjWCocO692sJN6v7kzflD3lCJS1oWjs+0gLUbyMylLlo3dmndeBbubXtsYftP6aKaI7O1lVcezXI0t4Kh9r40P7O67pq0yh3fjxW5NU+a17Bzr7KRM084OqNdOzN97tTUuTMz/KNYLFr6q8wqgM5mr45JHElzJlIGTHTwxhCynKaBAUANV+lLl1Fp/lc5V1tWGpu3SdQzeVByaZth/MwbV0SqBuFLenIjqxMMAUsmg1gh8Z7FL2rNLonTVjaKtFH4DB5OQ06iX1d16U7fC9lrUlqA6A8ZaxpUNy4p205sVjp3IF2Q5T7F7PIUo9ExXsD1qOjROMbC2o+Szs9uvPf3f/fX//Nv/NIv/7t/+S/++f/+z/7pPxF5PvOpT/zeJ3/t0Q3TbQnijUHeAHYvWPPycqKoUwxhJ233dQ/aNThLHVUjN6GJyoiDgeHNyyfnT709P70K/rAObFg4pFWirRXT2+z03M94nMD98EtixeLmhxa2vzg/+0pxSUSSHGcV0rAJ7eLFd1nW9r10Y/YtnhkcWTd/dCc+tBtlhYcdyanSCt/G28Du8tnpc6enL7X/+/9zkj8e0ARkOwo+Is6JLoNIz+sguuAGDlzjBu25xAh0bFdz2uMOAdSsEY9LVb9EomStPLaoutS8VsnpI+BWOadI0lyTRM0hw1d2Mn5WfRPFl3WmgkXSVHpNGRQ59CR0Bql6zXXHr1bzo2J/n8D3GxqCGu6xqp454uU4NBGV8So0P/bYdCdaVGO9ZXCxsb6+oPH9Mvvqx0ef/bz//ckv/X//Qvu3f//L//rXfvXffOr3fuOr9/zRlx54/dT8RX9PL6/PEavEuoyLPXvzuwtO5PGvBN/JNfYOCpRKUnsATQYRRPo48xd26M7nxsyboHzm3Rsn3+f0yFrdHfGM7hyDZKig8MaVCRaTg++wWO1Zp5sctmTiie6LtCKJQt5OECcRePJhbdW0/sAfHlpshiqal1wbBYyYwAgABYtSLzufmUunWYUunJ/R4i/CNET6jjTHsgieMBrmA7JMweAaedgsZdFLJVtZ11Qz62MKeVgPiPdErT4LEQ9XuwLUZPNskKSGERpyDJIaGTKnb6GIY2lu5SWQQQ7kGTQxNSUU34BBYlC1vygo8TfoDTM/YODOpyHBliJX83/iSLUeR+1VYJYxjoQ4+tyaQjWl30+T7xfytWu/RfbrYT/lOGeTJPEX1pZ3YrzdgevLKfZOyrovyr4rmEgyrkklKu9Y//C3lz31o5UrfsL/JH7n+Z1b+Ws+2/gTwauOnG8GB08txhXaok08bvVSaXGhV2p2PFgjtEv0tdoMaJAx4IVteTA9P7f+xkFxZidw1ymbrjXsuDypGldiO7OOJwcSrTnTexbmXlzY8mPfFN2/+M63bk4etEvPkTUuvrX4xlfnp1byvPvQOzy0OE9acQaVjSqwEkpUls6eqCyNt29cmbl8aurMiamzZ2caHFUfh1OIYoi7R0kZfuXI1Nb3D7y34YCOWywbth26VIk8mZicfWlyatXr+9a8r0tHJjfs37bpwI4tOk4dvXDs8sGp7Zv3b9o4fQZP8iCB8Us35MOjU0dmp+ZO9KeyuFo6Xzs9rTu3QzNTUxOTh6Z5eLhvcuZqGFucQc+rc9MTew7sn5y9cu3w4R2Te3ZO7twhPaeOn8+C450Cd0FOMY1Ccawfr7HVD3q9bem/vc1GRncBfAdCjRvl8nvQcjVxdK6RjHEkxNHndquQ9TMRw93oZ3KTOzMfcyRInT86wpYAGk8RYNqgjb3TXRywikgkD9cbxOl47ejZA/wpxo3vvpR/EfnmyqdUzp/12XOIPyWHPiMphNj45kd9c6SylTNyoaohiakxzWGIgVYmLnNs2piScxt5/ja92o/I1ixcnFnQ3mx6FY+5udffUFFkVWE7vnjgwcV3vwthNt63eOLM4u5vLr7x5zdf+ezNVV+6ueqemwcO9vjdnHtS9ewP2SJqZ7ihZh82FaRb7wVsaf6WoqMg/Wkj356ePrBvSjJ32j7M3i/hB2HpaMw5py5cOzxp5rw3obuI3IKeOL594sUXkW1H8mUowVEZ7dSlqck1a/a//vrE88/ve/zxyd1nBNCk9nOLZw+/sYz6TYeVVf13oaNPwn1x9tDE1IG9k3Nn2iIGdQ/Nbt6/c/vkhn1HrBKWntl3YOOG/e9v2D91gptPDZL6S7OTqt/03v7NG9VgavZ8mWCsp5lXcjxWcM2bd7Gl71Pyvc38vGDgTPkBPHO3gqOcpzQOK4RsyW0qeUT1YxwJcfS5DYUcMMxLADgamuZABdLphIzohB0+mE6dRWaF2xjH8SB96a6hHGn3DQPpSAZy+pk/sf7dt5evWfV0/iDj5g2v6FRHrUirX11zJvQwT1AvIsTYKTiiJQ9P2lKUmeN5a3cXl3G1kGrg4lCj1hj1UMcWzmzg/WZey+x+beHiqcXDzyy+/yNk4/0LWx5eOJ3Q5sXCDi0si6vugT/rVihsi3u+tfjON1Vz8/UvUj8lCuWJ4oWbO74IhXSblKfeh/ZGDSmvEACLWpn9uM/IVsEptm1RhKePTp3aO7Fj6wEtEbsPzflmL7txtWHLUKIyIDu69cUJUUJUGR1Ely7unXzuuYnnl88co29YdPrS/gMrVuxb+erEK68c2HO2DUUuV9+Tu1/e+/CP9z685rgq8VV5G+dfOTqpNWTP/oNXkrbIR4cPbtGqtX/6pKGFVJi0oGkZ3Ll99iyn2KhLlw9NvbF6/ysvT6x8bXL2PJgkOvaAxOWWYsA9L3/war5dXt8094+O/c8TnCm86TBca9cQbFTc++AkUAciW4A7fC9UK6ml0UM1wC6FmtV+GXAZSqDfQCF3Z5es01SaS7iMq+yGTZ6xV0zc/k6dnX7/0IGNs/s3HNz/3tS+tZN7185Nvy+h5vgMmliYIptDq21tM12pl4w4eoz+ip+19VcxfNOJ74JR8EcqIhsBlNM8Ttj1FA/NtDHb89r8pROLF9YsrP324rvfW1zzzcW3vra4awctBVDJ9ENac2DR+u8v7tzBFmLzp2+u+OObr36OJeilz3y8WxTK70E+/HjDb3z82K/Uw24/36t0A4XaXWJTpq1dXr68J3GZoVQ+v/PAk0/tW7Zs34oVkwfPFbwyguntwnWRbf9bb0y8sy+LDILhBaDjMxv2v/3mxOYpUIWLtBRoI7dqv4Z9ZK14ghpNRKSzi4dnn3hy348fmTkChbxFrOc6R05pe7bnwMwxxYhAqF6rzVtv7t86W0sNwIXtmkWWnphaOyHCbJqS7bBCil2cmFR7Efi1HcoLLAiAR6OVXY38+aMUlPl5UvgDkeJkuQgiXYAkBQkjoZYBY6YhkylIwU6voKJuFsY4EuLoc2sKBffG4rCSQA/v2cwTuFT7ooKvd43xiJ3lU0BApTNQVSLH6AVtvPdjB0hhlEWi1rVzu04f33l0ZtPhyY3i0vTEOhFJR8m+ne+dvmitLHFBfGG14XnYYjphCLNHAcgff9W+y6oCILnYQT1BGIzUoXDsOVix5i+1sCys/cniRSW82cWt32O3tulBcenm6mUtNx9c3CRSfX1x9ZdvvvqnN48Z8dv/DP68/Fnxh6M2cmRKBfjgzbc+dfOlT7Pl49mdnzQQRXsSQOTP5YCGEECV3iA4B3FXE7fDf4OJFeanT+x7+pl9L7x56CKLlbGeFVJy7vCrT+xbvnzmRC1x4ZW61whac7jz2XjoEqQis2Qj9+qrE5sPe+nLgOzwSTfz1+f2vLV/3VoWFoOyYebizOEJrUJTJy9Wzpq/dHB2z4EDe2cuNOwSJpAAhISBa6dnJiempmf5LgWZ98rc5WPcL2mDevhM4mv0B2B4ySlPIj1vnJU/ec7kn4Tmh2pFJLx30YGmu1cCsBFtGRN8BjwgvPZE3NirxupdvcMffpsb7bbBT2mWqG5ethWAGrdBpwq8a2hZ2zYzmx9FOeQ+ZXx5LROhdLjUxey6OHF6dsvxg1tFIS1EWnz2fPAmm7r3+CuNm3bsuOwYsIxEq6QW64lipW3nDCZQExo7xxuLI3gVwqCBACe0sTFoue3M4slXeDeqPRtfL3hu4ZLxeuIlrTNZPXjadtZzffgBmz0eeb8wv2uNQCb4zs88yYtRrWBbH+V4ZFbzsi25Pjt/4Om8pa03pyd1yX6T/tmX9wWk2QL4stQ7Rq5nH+IMqsanFuemX14xof3P6lX7twn3WmcCNdl7dFpkWLX+YBiC4T31xlGnp3XjseHdmTOOmiqvzE2vWzexbu2M9s/Wjbsd1Ms27Oqxs/u5rdq28+AVV8bV56cO7N55YC+7ONuixqdm9uya5NkA+kMhh75gAKLOzB6ZnZqamLngtCi5cmx6767JyYnZ8+Rog1AahqiVlG1+rK7wJevVKl3y0Vn6FmfKe4VAjj5tgiZgHnThE3tmjCMhjj633chFV/sLt6bQvZNKFcIuLkHxRN1JHatYBB0DeZwMhzAINltXs4UjOzetPDyH9b7Or64h1eVj74s/Io92cft3vyM5sIfCru1vSKaOTtciU1wqtlsTeGIN4VgVWhmJ2jTGQdXl/LYtrz391mtrT1PvBtKfwnF/O+FJeMJN/xsLl2zjtT0L+17kBmn3Mr5DoNsYDXJyTfgwv+tpahjk2PzsUzx12PsSI2x/PN9OMHVPLEw+xK2UeBWCTe92aje4a2EBH6Df2O1WaNjKpo5FJioBbSePb53Q6iHZOMmG0BTi2YDu2nU3ohsn3am/+QZ36roJeffdCe3fRLnXXtM9z74XX5yd842Tel06MClCquaYfz0aooaTqKeFbm5Gs6xeNTXN7jH390emNu7ftWPy0Gl8Gwhdmpla4/VKc+m49p39+3ZPaqenZjt3cBTB5g5OHjs0c0WwBtlHrpycDqnOawTN27IJk6aQXaj1oTKLJF+Hg0tkQITfhhJicIu7TKF+71346T50G8rOSrKIMI1xJMTR5zarkHA8jM58OgZqLuvmIXlLmc8ZsRAs+pq14E+kGvYJ2ao6owMFuTiDM0vbvPk9Ri1BWZRs1d6JVU+/t+6FHZtXZSO3c+vqbe+vFH9U89qKx7ZNTWN2W4s1bMjp8XsuMeCKEkEYBFCXOBSdrx+/tP+lTetf3vjuS1riZk9UF8x02BZOreILPuKGlpc9ry9cYueDf6eM+y2PQIDdaxeuzWhVgSc61a7slOx1KjnE14Lc10/edMMDJQjPwsFn+daCdnFbfkzHA1sctsKKnQYOzNjsXlgc4BjLiMyp5RRVITzNPAJfmry478Dzy/c9u2zygzO1+7p4YFI4fmvnEQbPA7Ssxp7RcBxuM8KTSxOTYtqaTYc+9OuHkJmje3neo0e2HxAtdx9qfj4xK36+t372JG2i87Erh1jf3p84HJ3ZObMsEKPaL7UbYwssEoV2fbB/18TslSFHODvbWJxgPzBaHGLUZQmy1G5ctiugRkgHiVmEpCzRFKACE4wQT5QF4L/ia6ZiBc9PKnkbTw4MQWKmCn9QGK/5EoiEP5Wi6KLTZAidDtbW7tP2yGtmVNyU0WSDzbi0/4WXX3gk/2JIEBeFxKXdO1iF8pjh8IlpMlblLa/LtTfQEZdFQ5sQPUOhNpHk+u7tzz/8wnMPLXvy/uXPPvj6y499cMSxSaiQkwun3uQbbtq2bXlkfvuK+Uvt6pl1wj3Q3/3s/AevzF/ak/WEJesD7eJIkDjhsMmT1UaFIzNBJ944sy4LlPd+y9Vg8WTbT3pPki1lXKehHAW4VAp4sbWBzgVty5pTrQZ7lfjXTewB3Bh++eCUUj77K3chxG0po30Y2MJK6K8e1Ubug22TH+zNliwOpL196x2d6HFses/Oyd37hXVGOz89qS47pg7XgDj/+OVDk++tP7B6w+G8evJEDdDs6JbcG6d8/cz01ISn1ozNRncMH4xMuwK3eM/MEsSOjj94NuLG+l/A2bcD5jJZaCxw1lbWqafSh8OHCXe6CiWFVzIIKPuxcF+3H158glQvWb7KqRM/5rkZmrkcs+N0R4guNZ0XDdMVN1Gfxe3KzLmZtTMT67WFE2F0FIW0lxOLUiMiHZ3ZdaVSV89hvBFnZE+h2aNSfBeV4vpjmx96cflDLz3/cP7+I0R66kdbDxugxEPeZBtwc+6Jmy/94c0Vf8xzgrceXrxIJento51anepJndi1/xUtPosb7lvc8MOFqV1JioThkN/5TKzIPRLPDOwEZ5k99dJ2xr+J4BcNG1EvPI/rtG6XN1j2nSaSsJ0vKmXgyfh/iMLVIyf2Tu7cPrn1QN4UHZs/Ma0t3N5dvt+wK4oMpk1mzKQODb20evCsHHrUVcSAVq8YsnDx4L5NB3Zunz5xUfUHD3+wf+v708cuJOFW3OdPz4q92zZpV6YRZB0vDJg3Wc/Pk3K0EM2Pzs6cODx13D/WqGbYlS2P4gtUTJ4sSvI2G7msP20BbxTK18fyTbl0YVWAe8S61ga8YWCINiF/aHaH74Wys0LynWt/7TpW6egyGLXBjWMVVFno5QWwahfkfImXrY0v2eZo3FBSicp+KVItLVyZOLR5lZagiDZa7769/J3Vz2zf9PoHW1aLTmKReHVges9VU7GhSvwJOIwntAI0xFK6XZ05umOFRhAV88+LNm/gKUV+p+T/KE6o0E2ulK/PrKnlZedT87te4V6oIH6c+xxdqqcFfB2BLZ9OTylO7fZvzj8x0vqTHywc9182ZmQPcmTFjdk32hfwllOY3ubBy3to3lJDohCElc9HUoYMxM+NHgtXjxzbObl98/51ew8HLgvnDm3lbmTy6AV4Us0UEZQxHyj7hpYFh+OVw5Pcruzj9U73ZxfmYsbDZ2Z4CzR9lGcAu3ce2HNASwdXYbInmr84O7Vzcs9O0SzQbFQsCnWLAjAK189MHT80feq4EFibLucF2FvOkarKdOFJfxHEI+z8AZxkOnHJj/X9PQFzJntRCTHS1cXiFVsDHQ3R+sMe5tKdUih/3LGIxH/ec9hsFbdJDhugbOsG5Vo9rBB7d+fvphnWojGqo1zARwjdvaUWD0WlRjMtjQlGnr+wfd/GV4V4ydaNr+pGaPN7rxye3Jg3Rcf84E5y6tgOyYnjE9dLT7Bl/fmCCYNfOXB8z9qJXWv2fPCmhhJzVBAPdX+Vf8cSCk2eCHlYi+Zx9PGFs+t5QiD0812EN7yRwxaOp9/imzubH+I167vfXVj3V9wF7VlnCGY5nbtxkh8X+ftyuRfyY7dsisgpe1h8/NWHhQOv8mOkmTcl86dm8appBnSA2vT8qS3zZw7ENMR2ORBDRCxOQFcPze05oD3VroPOpsjcsZ3ct7yzRzXeZsMW8ydxoSCVXGn1rhyZ0sK19YNDV33aW0I/ld2empMz7204sH3z5PQBHhLMHmOVaHyWsBE9uQ8+b9TtULzqeUv5rjl4CMYOXz01dWh6ap/Y6PTXMCaSt6UDfaKVDVENp1GvRvOAjfANaRGr1ytLjSWwjDJX7/BPMSbP5UvyLohIWnAUPxtW2YL1x/olx6CBPeWQ2/shQ9eJxl1794qdJJXyo8q2gTTDmBx1yZU3zu+c3vGGcP/++hUSESnMOXV0+8m5bSeObNMphcOI6nUqOTLFAz2tUeKbNn7hTFYeEUnC+vPeK1rcxBzdbmkvt+ypVcd8k02cCLyz0am3gH6eB2x7ceFikla+kbBzccO9C1t+vLjpQd4a8V24nywc2mOfxKK5G8f5/ijfpjv4jvZsfnINReMlwWj+/MYbs2+JPN7Oveof3r0EnfKT7yPr+Prc9Cp+bX58y/ypA/aSR/ZbjuA4zlTBwq+Arxyf3vr+gZWvzfTbeuy6cPC91/etWLHPb1e1z8yaUyG7Oje9c8fUnPZg4JLj5YM8xNuy89BlNVB3Bk8ulwmkcDmBVHL18KQf8UnWrZ05nbmsiUQjo+2Fg0cmD2ixOnAUtPgqd0QG65Frp6aPH5q5eMmodQ7VvdDcQT8HtyYMBWnDkyKz05xXTjPHNnrq+heakcqnDb3wM4Csq2FawTuUy7GevI9xJMTR5zaPE9pbTq88+Xat5xs4YEyz8nglxUEue8th2kAYJ8jao1ffkMH+SmXckb5tqNCpbreAl8nG1XObNq98UmuFKLT2zWXawuleSCQRcySijcqiDSw6Yi4d2Sb+iDmijagi1mm3pnVm1SuPP/PED59f9qAIo+PyZx9c9uT9ksce+c5D9z+667QfhdWCXshbOLVqcd13eZyw9tuLax5ZvEQbr7R+dbPzL/yNuPtg0YYfsFidwZACtEw7tJx7IR4bLBc35o/NhIEFI2BxbOHcRggjgnFHxO/DeVy+9wUel+tUN0vi0sE1YtGN4xNyYBxLurl6+NCOA7qb3zV70JCKzsf2v7nviSf3LavHcZK6N2BvM8tXCp5+Zt9jLx++WLfOJ+ePz6xbNyHK+Vs2zfNXj12anXz99YlX1x6+lO0QrItn6qERBYP7/BQr3t5dkzunFdnaMzcDwTSKnZzRmqZm+yZneI8E1o8tnJ49sI8vm/IKKHnTmTe3YVoAL5uHGgqvBg8uyw/Us90qZZAb/HeWogHfZ+97qAAyhU4PLwaGZVVytbVslWMcCXH0uR2FwtT0R2PI6mUhnuoswkHKQ9qJyo+kKDKTWYSKUctHU9zl+NTDesnCF8qXxZm+OsdTalb12nLYawvXp/e/8cCTj93700e/p0UjX5wTl0QViQp597pv59sS7dDEtzWr+KLqow9/WyR5c+VTIs9Tj/P3TJY99aMXnnvolRcffW0F/z9CdFr17vsf6hafBzL8TUY/dXRgVHPqNdaZDfctrv3W4juPLl6gjbfg7MIXjy3niwtvfe3m619YfOPP2cUNqdHk53GCdoAv8quhrY8uHPFDbWM9zWy4CrMLe3/KhnDDDxY3/JBnEp7UO8PnaoHa9+LC3D7g6KXA0JRn5o59wHuefKPssZ/uve/+vQ88uPeFHfnTvlBIhTzq9Slqz7yx99vf3fPKK/tWvb5PHd96c/+6ddP+d32Vzv3utb7r+d72Q1kKVEO48U81a4Geu3GaL1bv2z15+ExbYYJ4aVhAUkutmcfOTe7fumly03scJVveP7DpvelzRkUxjdmPawHU1KJQW4UyZtBIYxCiqQv3msiiNk797WZE60G/MSnx9r6vSD4G9uR62xLoth3dGEdCHH1us5HzihFdUbotiw3cVel6QGbe+wdzWtBDMM/aGYi4QEePEKfbZqcQocfjM2ACI1FNHGdvkq6oVPeTC0fefGf1M2+sfFJHkUQrjDZ44pJuada/87yoFdq8/frT4skDP/ya5KH7v3H/9//iW3/5Zyrc9/2v/uC7X/nRvV978L6v61SVf/m1z62b9qqiVI0IYdyDuuz8feJlvg4nWfedxTcfunnB32XkK1j+/s78Vr628+qf3nzp0x8/9esLk7taUnR2l/6HfB+15WG+xbPtsYW52TjNs4SNNSnPkVSYfXTx7W8srv4yx3e/mxeyPKjY/jZ5Sh5gcHf0PWfufduYXTJmE6cGz+hUnVMlC9wrh5uKBcEhBD1qEbOLuKsguzDNMQqs3Z1xDIPEt2oystoEXSaSlyBm8RRRQ8fSh0HSy6dqqXEMpJ7EjTEn6I4l6Id6QmCjhBnSycON8dLbk7RUM++VkusLwF6IeHt5p387ge11vnyJ3izH+BFrly7NMY+khSu9mGqysgojEatiU1nK8J0rPQi9nOmdj40AAqwgOcz5WnFtGzRLWiYL6tKF3U9rDVn96hNai0QYLSwSrTBaZ7RMSVR+9aWfiCpf/Pwf/M4n/sPv/+6v//k9n8lfeMwfqfMf7/7W+pPJ0x3HStj1l4pdn5yd+hDGXw/lK/T9+/Nuj/C9xsKWBNBgrBzYfIgbbemS0Tydhso47VuS/S/ow1UWkCZjiqHbiOQLSjjQD3ZVjuTJFVsGn5ZFYM4Z3WRAvUJ80xbP556wHl5Fzrijo2liCG0pYy/YMO4TaGINuGt8AKMBE3pLVlQF2tsNe8xfRwjHrEPNFWSDe/ANUeNYdWEExkFAP0tTW22y4Kh9W39MDC81NazXnHbqLZLUMFFZEsY4EuLoc2sKVeIEATZbqTTZiOewtlNHPyMyu7QohUVcKlf6JgfPRi0/vy+Jc3u0cj9qbiw6j+JEIDjQkgZsG04I4lHGibAlrfNbd7z1nLikOxktL6LHvd/58uOPfOf7f3WPmPOJ3/zlP/gv/+nLX/z0H/7+b6rwhc/9/j1f+EOdqtk3V241hoLOoHkJoM0oNSjU6phvMQ7gdqVRm5aMIIxKeekmDeMoK8ziGfA5QdS3uZr4y3jA3YtDLrVbFEux0d5roMSBuQry7JD8FsBIBcG9meNYIK4utWqhT2/Zthh0N/o1iLq4JcemWyz1aHnnIzgCviTKNhpWewTNW7Z7GdTNWJyMA+u1WyUFyK/Gdl2s09S8J3U9W8cQo7Eo3PDtej2D9SXUGF1tEJXdAC71rR01nZAlHjAM5JJOuasf40iIo89t7oXoTJzCQruAv5xPgnGOiY/qapxl6sunsMWuj09ZYRMVR9QJ46TDIEmCNG7KucaT47TErXXkv8PHp3hTBdaowoHLZ85tefB7375H8nuf/LXf+s1fEWf+5I9+50t/9imtPJ/8rV/97f/877/0wOtnjHuHcCTTF08sqadSKwBHhxCd3YCoB+5GhkNOfnEuNFxCoZKkIdkeGFnPprahWWmCowU3ahwGoYyYHsY0iR8naDQ3SJ424jlNjXir9mSZ0DhHU9e+Krr2RZ5m1qF5kqs6TUQAvQsWEF9LLmOGaQWGWpEc5TKcNhpcZTzQ/98E9iaOblBTm6t5e9O94U2+G2hYxjcHOIpIklEiDTQI9JFOJK9FvbGZA85Tw10THGu9GhU1Ttj1X0OhEIDskt1kP7XXJPYR73flKcwW2j6++VHh3unTkfNVwhZWBKaGZv2uMBsYoIkUsgNu49gN0j3ABYI6ZSvlf7LCl9vzf1aGr7i35YJXbD3klgye/5JUDWpLVpNCJ5lAsB1RwxFjbQXI6xgFHPDECyaJQwtvrQPUqGC4SwAKoxmjgyypMY7NyULt4LFgV8d4CfXUpr9oZ5ww00O5GV1qcQvhvYCYM66pNr1l5bK0r3yRcFjKjQpZHIWvMF+WsuFxwq69kIjEES7xK6ClVkcTyuGn541WlVycU6pX/o1N1lj/+xMjs8gz8KeVq0ZwtQJp6T2RGA7JO7BzVeWG86X1soUaiy/d8UaOx/zBjVeY7Ag9gcp2bs/ihh3+vfizj+f/+q9/9rOPF+r/cxVw+c0gGL15nX8x1MT/ba7jXlBuKK+IKrS9JpRjFns8wahlHQ0bXp3P8gWntElUOu6NNnoZ5RBgyH9d3Extsori4tH8Sir1hjapt47Jrx7fyCg4BgcGsbGCyC6ShcuqjwTHDcQZgVPIYGnPGKp+bJy4q/sNyunUUmVfgk6tsjPTNXZ7r2xlc4bTFkeOlIlXsoy9gXMa4EiytWlv66HcEobLhLIOi8yWmG8TTNooacPtwApQ/QmRWoVq9RjWmbbsNDoV9Ct8LY4mdtaAhMx3GUUtTKCZ00HFFNhjTv3ZiTGOhDj63JpCQp5xxv1ZcWnAqDF341xBnxR+lX+89fFC44b4c40VgMjFRxXgxCbeafUOpNwnb1YSinPl65GsKSdWWspVSy337Jh1qVwvqS61hrRTC236+EC8LKLNkpGxmnuPOHfYnMjFdiu3sBZdstMT6YGTbZY2O/X5f0odrCASaHoN9Jo5QNaV8eGw+PhSSaWwkV5pUGyhixrUperSLiUDOv11TaqlxRsEVXqh9r8qRB/HlJZppon4jWrcYs8Ul0B5PQmIK2w7hTwqyEpLvdeW7PS4RLBCGwqhVtluzc97itAjq0TWHJMn8xIINj7WShxmKDRJysu+yarqSGhGsWE9DXi2EtbTfTPItTv9sQPk8S9MrBATFF41op8u+LEm9Y0GDoakspRdn01Uw0o1aAEwbZxcQx7juLxmaSbhUE4Bpdt3n/bGLuN0tSEGjkr7d2C12/FQcivpgH2X2/itqLHOLPixDWJHR0whMmuvscwlgRE279/KBAZp/2UxRPo5ne0H5f6CtZ3W9rQlqsGTgTJtDGsw7f0n+QtAF9DL1enbnOzpkFYzQhLKOfUlNBk55Yi4u7TNVdVUQZV26cmeXygMGV3pnMrgFcDkHgzHDg7J4C6XT1zTG6QGGNgE1Fau9GgM61lqPfFOhIgLq+Q+GEsgTFGIVKGH8KUnawv0y97vYC1cXsGSBUzIcFVHWo5xJMTR5zYbOVvO9L71x3H8m6TsnYrKFmmcv+QdIxMGL/HZe7iLvVC/E/aaVje1LnsnpnHKtuwEZInRGbBiMCEBtQTGUO4LdFnbGjvBsGoPoVUZr0XhOo60D99KT68kCqFVGmljidW1tYsCKhdWYhTkabB2agflAL1O7UnIEBp4KzvSwD5MOSsMlwq4XQpqDXySuNriLD7sUYFjMgiielCY3KzTWg0UGoPPaVv1poeu9kSj0yRmnbpZ8lEPnwCtEBiRtR0qX+GZyoDSs5F5MFZl+6evkOGYtRpMqASnSR2+wM9LSlKbxArUPs0Rp2D0928kcNXbv0jfAbrgm6j2ppXjSNl23el//LYNMkZmRF0QE9xYm1CzytaMq5jU2htYgNVQM/QN3wY+Izu+5o+PjdQwTmCt9oqQB/SYLuM1tSnfFQlpg+/82rsnKg3OyMUlRnaKEg7agylWG4Di9sGQyscUNsoaVkIBBTSIrbAy0YepWw0je+votbRj3UAJ6IOhyjJp0MXokT70bVBLL4vxxyVWOcWF0Cx62dSMgHsJ1Fi9oUpHvH1il2KdLZW2cVGcKUfF+cEfqSEFrsZGOzluxxVu0B1i56smvUYhS427NLo6SaFV83knp5VvqSF7B5tjurY3RY5FHUsT9C8rDCGrLenkGVjUJDWlYRiC1GNx0yYd09gtxzgS4uhzu41cedYuC7aOM1YYqYmtU7xsxyHqAl6ZlRxgI+P3JRYyeEseSEdhGKjoqqZWZEKevq0lDexTq5Q1GsRU3mWEMK0SZwb0UWyxFG287HTMqYZLOiWj8zt79PG7vLIRuzBENb4aQrZ0rpBnKcianIWFJaWvKqPSiVQEM2eG08pf0S1rAlYYNExqu0Y4j1Avz+DwhjDa0MVxxP+GQuEGo2xdYw6VghFt0oxjtcwpTlAzYsGRFGOViK8hmIxeECTQVgNN3MbeaxuEulTpLHnB6w9pgltxXTWxw0nUiCbpizlgyaZVXlYD36YSoygvc+jbB6mhYIsKfRcXqlDvx99I3sDm3dFHH/JjhTGOhDj63IZCUcIuxvIozXxmEYVW9ipkv1T7dCkHWUag5pqk9hTsphiZiYa+AYTbuLGOYILRhK12hwOe8lSAiTQysOsSIiHmmyuJVpqRDp0CVahT85BdqLUNCBxIR4gsWDes6RJhEGviU/ZOZoX4EKpkqWll88erDekWzuQpefIxOsRk6GG7MrgTgWkTYxFaWvxnRKlpYELbIvxoIVjJKUbFoh4CW2pjK6CubAEt801LMgjwdbCUawJBi8cx2WivXhiF5oX1humRiRjEkU2C4BhbTOwGLY6eQlbAjczSBoROaWatQI5ruESlOjqPgN78iEY1wDhbNZOKclsnXM4LpcgYR0IcfW5NofaaidQyjLL053e5RMHLX7WXbcxtccBsdtxtr8ly17gsF9h+m5cguWV84Rjg3PCHxINfghuyl7cuihDZ2lwC93nzmMp+J0ZShzzsl0hyal9w95EFhNxftGRYHz1XmJmlzAUk3XP0QsFWhAZmRdvZu9wkRFIBCkF76Wnr7I2EudJHcbJ2Yoxs2oRRBhl9C8ro45ucKBCmGUMDxNXG6ExlXF0FsG4sRg10iBrd2IzgMa2JQ0C951Jo+EsYXf/MJf1RjynoW3f/AQDYdegLDEF8xBNhdfHcXQyVdmoBMD7NIEkfUskv9CnHGzaT0yjG35CSmYZoeGgMc7QmbTSGjZJII9gYR0IcfW5NoSWr2CD9f2z0H7EOYtpoYjRrCjklZL9nT+EXR87HZlsFDBCAm9rcGyWjj9HczMGr9G8wCWc0HqAcIW1DqqqvshDfdguq9L6LiQqmQDOnPrLBYEbpmVkqTUoBYtzGFPfgp0arFaZ2br5Lvr2IY4zgTGmHlH+MRaPK76zbjLYUNQLQGE5haMBQ2JsGsYJmPVnkcQ6G+JlqvBTUtvYZjQHj6oTAttMMIV7hHt37LC1AvpqAAlnXaHz+w7EtjbE2c1g9kig1uI/2amuZdS9ppY2sZgFDGqAqDsHMpEKOCS6VtcH28y20hYpzbYNnBUIqFgxRy9BFKhBJMZIxjoQ4+txmI8eIkbDCdPQK6Jq2iawpnRKyB7CnKLuAqfzsKVwKPrrL4jULoeIlt1NaoqKwOaK1Bwss5CmSX8eHEewvBEXasuCyV5L4lP9qnPa5tYgwRdCTLlxiOlpyCQTwrbwaMFsvY5HwUPZjgwXejP0iyZPoQZgF0NtLwKKlkpSrEAg6v0R55xQrjLF2TtlVutl822g6tYJzR6USH5u4gRxLG5boqk9jDx522SEuwKgEoiLiSrOOSqlkrRyv3FvynM1GQU63zGrgNYQCbLE3oqpEsxTZ4gpAZQiZP8Vk64D+1m009HZOiyzMiXP8Isvg7OtMexjWdm5Ge+6U1CZwhXIqjHEkxNHndhu5tqpATROG+VzwPjKEsQbMwTS1mCbqo5Y3/sQF5AwHw+6Yt0M52ukeITsxl2vAopmauU3wxF27xPcS8l1O2TvhL19qV4E+BWIZJkRAVeNGtY/Y4wZcf52fd4uRm9eXyGL/mkWX2/MnL3YWrthAoCAX2VF4Kc7EapwToNjkSg2xOtqCy6Z8TO7vpiPBIvWGuPDk0CDGvdgCYaxGZvQRNFOIbpXsHGIB2kp6p0RNuiCOkeJI0mxrWvYI4eRHp4i+RzOQBjE8GFaXZGB5m1dAGbO5AtjgCoOnuNEbd5FnWrz6YxsEj9ldxuEcUwPs3InAHG+j2lrEQznDvi8eFO70iVytMOzBwnu84xQiAV6OmTOQI42p5WvKCc+QkKqjRPV0x8X4mjDXgwFaqotqGpfUnhGqvXFQgZEHr/u/ttQ9er0cLGyVxJt5NMzXAoAa3GvZGp6oYH0wx6/zGccvdhav/exjf9MCCVU6Q0ZpM3ZpjDySEf506RTy5pBjXovFe4a7sZI7OhYTFEZzxNqKQiY5DulivGa58L2Zk1GEBkCw0pOzEoFTFIzUJqaKCdN2DT4OMAgTAn26JAtkKIBuc+q9vNOilVdNNTaIERJxPV4z8fwGnyh4o+uHNPRqAzp2QwZJcBMsk4f8OOoZpo7tjKNBEE+NOawHtUJkqTDgizb90UJWjpzeKYWSHuxBvOOEZE9Bkqx96GGHxst2q+bDI1mjUu9euL4GzG0r27x0jwddk1mKkInxEF2mUAOjwQ51KhqokiRUOyszITmpklOhkGxEGNLYYqe3QcD3zY9GvsjX+NOFN6HttSAE9uJm+o0yJzhop7eikPmD4TgKX3VXIIS//auCEpZHFaLnopNOG6R5qUDj5JVCFoHhrkkwMoWaD92rXE0oE3cvNQ6xjhXrFj4qc+wx1SAOZTqOmuMpJKTX0E8Uat1rkLbQsbBEYRVicnKc4oUf5A3Zzhoelw5f1OAFtK6qL0bhw6C0uTTcY4k+3Qyp/RQk0XHgjN+xgsCM09zrwhhHQhx9bk2hykw4F9dELQ8U5ebsCO6C0sCsiPvqGA3sMhzXrqaB+9ZDWB7mhDY0dvt+aSQATbo+AoEWqJaNQBt5GmfJZQaQtM0ySBpzdyPMbYhQ3lfqNqmQmhyfFYmUZlHZt6E1frbaS7Z/I91NUUuADidbmEsS+IUrTFTrKk7GxjzAqNEQD8LqCmfayLmEW+Qx+7Z5ptKKYaRy+1mBOJN0HnKqS/oWvGiMS0dx02JtJ+fbbnBSg+BYt+mRSuzcpQXRRkW3BJ3KYJqUoehXAgUnfuptkti0+hIDrrMr5FUcXq7I9qxvPUpUz5f9ZCxzmfNNzA1uPZjaQHVlVhj/GerawoHn3itCXw/IqRA7xpEQR59bU4jhKikqPI6HvIMrBehEonnZjsYRzTsVjOZlOnJp1JUyslHf5llRL6DWNY1Ns6S6mOeYhX64nsXdcfVusG/POBo6Djw1CkxwnwbeN7qmTimAyxYwNw7ffEmVffAuqa81wcfijAp9NIHAq5PI05ajIXH27Qd51z40QNGcZIwOxqvMtC3g3t7OJjkPo7tD8G1rjPMTMh2pIYIewffcplZIlRkxk2G91YnEzE5Ctn84JLmpaZLpiniGgS8pWK5pzHQhoQ/NrB6jmSRiTo4INdkvYH7zQ2tQTs5mO+Rp97rGSUvQ+CRrJnRKPfhhmQ32ClE+5T5npK8bZ7T0bVfHOBLi6HObVWggieOB2b4XiiPiBQem8Yo21gnKdvH0ZcmIWOl2qRqQCaDQyJ1cccxdGJnBAxTzCmWASAs5wHUmGySBcVm3EIZOhaRRxfFrHNOxXXKbYUtNjbpXdN3MY47Mgpg/mbEvROTORqGrqmScwI7Rwl4WPfvzVEBmaFZWkvm4yNEt52OyEWy3uL0pQVzoW4jv2sYQb+Fkjhq4vkhCAfNt+Ej7cCZtSlTpGg+CW1JTzbxSQd3wKgipFQYbyzlqSU2t3vZS/u2Putg64stGo4Lb5kp00p6hvNmzh3FyfNLhkWOcZiYU0gpOcWM8GSscEdXLpczOpE4WLJIkAikzxpEQR59bU0h2WuSaghoj2qoWmFyV47TWR+M5E+Bg3ikNjzhQGroXWwIFtbQxlFlSsxNtX3SwwXW1soscEbcmbGww3Kxt+YI/0ClN1CbNAvqusMOsq4UG2rheBjbcwBm8aecWbtI3uKmrNCinNx2yOMsVJH6aMYILDc06Wu25mI+NTklxYBIEIXSyIN5D7D0Fs3j2oA3QGHlc8nqLFQV3le0r6ksfKNGadebDHNUMy2m5onIEu9yIEVypwZfqNXR3mqZzAqoHgx6hnSYlecCMo7k4NbSYzg8/7MCykdOKkQ3ktMJq/U3FFlmZH5DYFcftupFlBKFG46vAFMSI+NK3vFSxRsCPSYWHlW4wRy3HOBLi6HNrCklkAxPEcjlu4UNceT2PHb2AlkMvuT56O/aCApIdZ/uOghdWYyI7PWXQNDNEjJIy1cnDfvSm0d4U7gOIhg8AnYw7mG2bk7FU4wYsm5mRQSpV89dUmMvQRytyXrjhaOXoqe3uqiEGCS0TWVLTODC0HNaEIpUVs6qeUQZasNduoXtsb10yLBp6NBtViHHgO3pifsG3EIkEuOoVxcKiuAV9WvcaJx0BOhHPz6XKjR5BKsUiG1gC2wfbyQ7NNAfaYOCYfQT2llH0yooKlBVcR0Rt+qajpCLVbq1rXukG3IV7s9QbBAPM/gyQKl/P1bzof4KWbq+OSRnOILWUQUtInpxintdftafLGDskIY4+RSF9xlpUyBMbBqpEZTrlZWI9nopzpaWVLkyU9rYkEJFQCUrs/QF5ST92EAG2szRm69XbuC9+V42Hzfh2sX1UQ3lfJ7eaeBoK7hkKDOsaz8Xa6MTvlSGaM6xnIcaVydoigJJRIHpqLgsoTxJVmWNMy8jRttiuwDtHVoA9u4YKrHuwBQXqsbr46dP4xFPIFqfMhn5yWSGAYLX9JJeIYEhoDzgNKTfVyEFzN5NsEp2lrbXC8xVZq+eW5XkdS3I73q86CTZRzdAlp/ZbIl7iwZeMOVKOQ9wL2+MuG9JWJMHSp76hsLY1iFWKFZjcVgWIJPFXE6kpNjJOXGeoX2IRVorx49wxdhRn/LkthUJEIoFwIxFcSjyBn8fzJOQiyhltsTy+qAJlAFE+yhIkU8Exec5h9r0soQ1bkERClsvsRqcl3qklLptA/lqQepVbA2gcnQytS3Y6Q7G1DTqJh8oRaqJS2cLsxhPxSyRoZgpxyfbGtEJY454ThE1IZeksJQ2akLNPqhrN651Dq4luvoSept8SJcu04o9XG2dW70na6sTpADgPVayIi5q3pV6hjehE4VzSjIlayqZWjFKgwTdX44GWg8oVjn6FiTZVdgMFTqfZsaeBb4C1+HgnX681+dZlevVx6FWNGcrhSCaFXVE4OuT7ZWnm5Qvb5TEnERV4iBJQ6RI+Ub29l4dMSUNsuBwvo+LqbW+E9LkthSSMYjTbQU4nrQBWuIpOtgrzcBa+OOQ3vhE/G1BlBO8sdUpuCUY85cD4ViEhobLBNJfqxslinyZI5daOVKCA/TVCZdxyfQpMYWR08VW5NasWCdt3VkYhTq+R7YSQnF7oZlENwwpYTGp691fd1rZjruaNtppXM3pki/oihkIcjgmEPFDInU+yKQV/fQltY0JZ1NVLQjFu1D10yqnKuovIdAFo/FkRb2pIpIOdrBr7zSoVHygkuBmBygS02Z5KCc06NiSwJd8PsIxesmQWT2Gt7POAAfXkagNm0NZK4rEoQF+V4wQQS6oiiTimOIdL8hirTXZxYpG9Kjrlax8f/U27OH0GCukz1k7iyDkSdV+BJZ6YeMBd7ZdK14DbHincNEe05+txAZbbBY4HC7Qh1eCIswQCKoHXqKk9DJXDRoaCP0CnlHQlp6PdWxJKs/S15kEqvdKyjeApopgLmZEGhhQNIExNh+TRQqnhoNonHCvSTupg14qhHkQVB6R/DVJDuX2jnKMgb4g8WmdCHhbwljLHYGFuFO6FoWYLVpSXPB331jRDVVraGzbHIYivHAXHCMhaMYvbty5IRihLqcf2PE9q7VNTPukgKf8gQ4ZlwDi5O2RgSKuUITG5GsRXGBg9cxzGaSZonKKlu9CLSxnQ+cU5VP4c/5MJkmJL+/wCCkmySailrQVJc1BQDe9Gmdg2lLOsrvUrmFotPxKgY8+7JAbQQzpE40rzjOw2SQYNZLw4q5GNXU+KXzIFXmg1OKKAUi52xh3EDsoXPQtYKbglmb56BXaRNpotFabtBzqGNn1w5/iyot8ienykkQEPeCKc01YJ6eP2mF86qKX8g7ZxFz5h49439Do957mYMcqopQ20CbnkV9ioEcU0rPWPNE3s/FFx3zLQujVw9ygboyqARU+diFPGG245hMMtE6+iX8DdpsiM9oM54OlMMOdNn3YWBQxY1MWnrUuR0xzmtDpq5CiZ7iaYumAmquqSjymMcSFSbGmfJRTSZ6x1xPbXfhFfA/radquQ2y9So3eTqpnnvi3fkvbimJ06IAAxjvrosyAVnFBZQHP35Y51f8zz04yTeNjjwYERg99DxVrNaEPLFp4ExqhNXN1YAHVNkGT0pDsDpkFvA76NSJpVjFt9a1ll22gKVTwMsoq6weRZAnRIYvVKN6cVRmiStYUNczmh+cS3o3klgsjh5AhbalU1so/01Tga2YYzCw0yuLc0zGjlzTrfJlHgEve9LttjAVlQaxMoxFc6ptB6JcQOKPoziO+igU3ciCZWj15WXkcjodrX11ayLnn/7z2/AyphabV7CXS1gSf+wmhtgiJe9HLVqBiIVFJs0SXXyxYH4tr4P1eNFE9GPuMU0mesT6Rw73gU9MUcvzT0l8H4M3G8dG9BHQhQmdJdxBDzMCrag5S5euM84UyuxctGgxODxB4X2uIF+VGV5ZEE1TUldrHEjqOQY3ynLmqjciMMs5hjcKnjzCQJu4ixsV6pfel9yJALkl8iUEjje/AKEsfGnBEzDW7N5Vk8hY7Gt+ZqA9rb5BdSlR1bl4JLHulikdSOYxv9MoIxOmzYmibNQNUYOnUpSFJjjyaUWz321b5amTt+zlDFHyvf7IpipmhTAzIXx1TT/lpLXBc4gRZTCGdGGSKb+I7GuteYVBYvNW3ZcSHvJ9tv3mYsdRqa5e3l0h8lcG+WQcbwHymGLP38bSkUIXhCT7wDvHANZABGQMr2ywuEENcU1OqRES2NIUcFpDrYleS4lFWFTG9ABNwRRcgrTEW6+TRtHGx/D1eVkAeCFX/kHecwKFT1sEtlj9wgghqJrlGIqiGPLeUVW0IeM2tZwDqZhnV1yWUtyF6LSmxgBFV1GqhZ4gqumooeDQ83qKWMgbTvKVzH0IwjfsAt0LUhzK5IAV/Jb/ZGuQXXleAW83xEwgprW4qZS5Xami1Nf9XLzIIBXsKBZXvxJ/VOBCO+cnv1qvaDz/lvKy1SRC3Sla9L4D7oX8IZc2PkFb/Z0n4tmkrau5cLjTapH8N8l6LHz31uQSF9xjqPCWbLF0ob+Y6mwQSe4kGzRYJH7EG7prASAHFqF6syGdEedGocQNbBFzZ6R6epC9MWdyRIzmrN7xJvtclMjTy+RCSMrUJJ16fF2Ob0MGOFEYAhnMbqypcQidlRw0NB5igceAXoKqt7AdEme2nK5sFwx/B01zjNAzZ/GMoJvvTUUZdKN8Dnd02mSsznFGP9dAQPo17Z7oWoTV0toV+4IWluL9Mae81PmDZiWjdWzbC0MiY+7H5Tg6QnlA9CovbiUGYutbGBlUyXEKZIMiICPbgH8TqOMmREBjqNLj6NMEW8wMNQuS15IsWNn/vcmkL5jA1xV+7KP0wpPtzm8zdRSJ+xse7KXfmHJsWE239+AYX0GRvxrtyVfyBSBPhFn19MoXzGRr8rd+XvtxTu/xafvy2F+mdsprtyV/7eSEH8Dj93TKG7n7ufu5/Rz10K3f3c/fydPncpdPdz9/N3+Pz1X///KGK5YaHfMeIAAAAASUVORK5CYII=" />
- <p class="center"> MCServer, the Minecraft Server coded in C++!</p>
- </header>
- <nav id="cssmenu">
- <ul>
- {MENU}
- </ul>
- </nav>
- <div id="maincontent">
- <h2>Welcome {USERNAME}, to the Control Panel! :D</h2>
- {CONTENT}
- </div>
- <footer><p>MCServer is using {MEM}MB of memory, with {NUMCHUNKS} chunks loaded.</p><p>Web Design by Tiger</p></footer>
- </div>
-</head>
-</html>
+<!DOCTYPE html> +<html> +<head> + <title>{TITLE} | {PLUGIN_NAME}</title> + <script type="text/javascript" src="http://code.jquery.com/jquery-2.0.3.min.js"></script> + <style type="text/css"> + body { + line-height: 1; + background: #E0B686; + } + + #maincontent { + padding: 0px 25px 10px 25px; + font-family: calibri, trebuchet ms; + } + + #wrapper { + min-width: 850px; + width: 75%; + margin: 10px auto; + background-color: white; + border: 4px #FF8C00 solid; + border-radius: 20px; + } + + header { + text-align:center; + padding: 10px; 0px; + } + + h2 { + border-bottom: 2px #000 dotted; + padding-bottom: 10px; + text-align: center; + } + + footer { + font-family: helvetica; + font-size: 10px; + text-align: center; + border-top: 1px #000 dotted; + padding: 1px 0px 1px 0px; + } + + table { + border-collapse: collapse; + border-spacing: 10; + } + + table { + border-top: 1px solid #ddd; + width: 700px; + } + + table tr th { + text-align: left; + background: #f6f6f6; + padding: 0px 20px; + height: 25px; + line-height: 25px; + border: 1px solid #ddd; + border-radius: 3px; + } + + table tr td { + background: #f6f6f6; + padding: 0px 20px; + height: 29px; + line-height: 29px; + border: 1px solid #ddd; + border-radius: 3px; + } + #main table tr.odd td { + background: #fbfbfb; + } + + table tr:hover td { background: #fdfcf6; } + table .action { + text-align: right; + padding: 0 20px 0 10px; + } + + table tr .action a { color: #9b9b9b; } + + #cssmenu{ height:37px; display:table; padding:0; margin: 0 auto; border:1px #b05a0d solid; border-radius:5px; } + #cssmenu > ul {list-style:inside none; padding:0; margin:0;} + #cssmenu > ul > li {list-style:inside none; padding:0; margin:0; float:left; display:block; position:relative;} + #cssmenu > ul > li > a{ outline:none; display:block; position:relative; padding:12px 20px; font:bold 13px/100% Arial, Helvetica, sans-serif; text-align:center; text-decoration:none; text-shadow:1px 1px 0 rgba(0,0,0, 0.4); } + #cssmenu > ul > li:first-child > a{border-radius:5px 0 0 5px;} + #cssmenu > ul > li > a:after{ content:''; position:absolute; border-right:1px solid; top:-1px; bottom:-1px; right:-2px; z-index:99; } + #cssmenu ul li.has-sub:hover > a:after{top:0; bottom:0;} + #cssmenu > ul > li.has-sub > a:before{ content:''; position:absolute; top:18px; right:6px; border:5px solid transparent; border-top:5px solid #fff; } + #cssmenu > ul > li.has-sub:hover > a:before{top:19px;} + #cssmenu ul li.has-sub:hover > a{ background:#3f3f3f; border-color:#3f3f3f; padding-bottom:13px; padding-top:13px; top:-1px; z-index:999; } + #cssmenu ul li.has-sub:hover > ul, #cssmenu ul li.has-sub:hover > div{display:block;} + #cssmenu ul li.has-sub > a:hover{background:#3f3f3f; border-color:#3f3f3f;} + #cssmenu ul li > ul, #cssmenu ul li > div{ display:none; width:auto; position:absolute; top:38px; padding:10px 0; background:#3f3f3f; border-radius:0 0 5px 5px; z-index:999; } + #cssmenu ul li > ul{width:200px;} + #cssmenu ul li > ul li{display:block; list-style:inside none; padding:0; margin:0; position:relative;} + #cssmenu ul li > ul li a{ outline:none; display:block; position:relative; margin:0; padding:8px 20px; font:10pt Arial, Helvetica, sans-serif; color:#fff; text-decoration:none; text-shadow:1px 1px 0 rgba(0,0,0, 0.5); } + #cssmenu, #cssmenu > ul > li > ul > li a:hover{ background:#ff9812; background:-moz-linear-gradient(top, #ff9812 0%, #e17310 100%); background:-webkit-gradient(linear, left top, left bottom, color-stop(0%,#ff9812), color-stop(100%,#e17310)); background:-webkit-linear-gradient(top, #ff9812 0%,#e17310 100%); background:-o-linear-gradient(top, #ff9812 0%,#e17310 100%); background:-ms-linear-gradient(top, #ff9812 0%,#e17310 100%); background:linear-gradient(top, #ff9812 0%,#e17310 100%); filter:progid:DXImageTransform.Microsoft.gradient(startColorstr ='#ff9812', endColorstr='#e17310',GradientType=0); } + #cssmenu > ul > li > a{border-right:1px solid #b05a0d; color:#fff;} + #cssmenu > ul > li > a:after{border-color:#ffa32b;} + #cssmenu > ul > li > a:hover{background:#e17310;} + </style> + <meta name="msapplication-tooltip" content="You source for anything and everything!"/> + <meta name="msapplication-navbutton-color" content="#FF8C00" /> + <link rel="shortcut icon" href="http://mc-server.org/favicon.ico" /> +</head> + +<body> + <script type="text/javascript"> + $(document).ready(function() { + $("body,article").css("display", "none"); + $("body").fadeIn(700); + + $("a").click(function(event){ + event.preventDefault(); + linkLocation = this.href; + $("body").fadeOut(700, redirectPage); + }); + + function redirectPage() { + window.location = linkLocation; + } + }); + </script> + <div id="wrapper"> + <header> + <img alt="" src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAARYAAACBCAIAAACKOwJXAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAIWMSURBVHhe7b35s13XfeWXfyiVSnWlKlWpSqr7hySdTqrTQ9Kdtt3ttttu2ZbbtizZsiVLomRZkiVZAyVSHESKFEcQHEASJMABBAgQxEyMD3gThod5BjER7z1Qzvqs9d373HcFWEb7Nxu3vnVqn3328B3W+u59zrn3vf/mr+9+7n7ufv4On7sUuvu5+/k7fe6YQhePvXRX7srfSymI3+Hnb0uhscnuyl35eywF+r/d5xdTaGz0u3JX/oFIEeAXfX4BhcYGvSt35R+aFBNu//mbKDQ21l25K/8wpfhwm8+tKTQ2xJjMXz44f/XIjStz81cPq4Bcm1u4dgy5enz++vGF66cWrp2kTP1x1aswf+1o2ty4oi6H3J2+N64elsxfPap6VXL12lGJynS8fpIBr2bwoxpZNRp54foJCh+dWvzotI5pwAilUinm0eZoT3cPgj5S8sTCNUmdLmgozYUhKMlRjTVdJnV3ukgT1Vw/ufjR2cUb5xc/OrNoBTiVXD+zeOOcClKs1auBRI0lunSOo5oNl1xQpUZDWhvqPeyN8zfnLyILH0rS8ubCJddfSOXN+UtucNmiNlLstHTGmXFvORbfWn8ZcgqnOUbUyCHXuJpmxOKq+7qLjtWLlm6M8wmBfDh/zQEqN1LvqzTWIBqKka2Ggt6CkmFbAQ2rJiHzyAzooU4yrCB3RZjJcfajKwc/ujLj46ikZlbNaEkXYNCmFsw0PtAyfoyB6w7TjXNy5hjIx6SIcavPnVEodsrgQK2wJbVwOuFRfTstv1B2VHI1R6y6jEkjbcC6TxEol44aUBFSvAGlkHoGh14TRs+EP7J/4YZQ2zXRaPLXIdwnkR/tyswFnUKDq1ajoqi5DqGSJ0VJ4U/hb/wXi6KDfX1JSP148arE2L0wQBn4QiTp43pBv47S1mX1FeIvqMGiLYoJkPn6yTChc8ZEgmNuc4ZhBVbrhtWDZBC19FHeqCR1RB4u8ynYIeApEXQDQ8oG2nvERQ3shIrX4ATVOEZu32rMGVHoBCOkSwYsTs550kODJgTCUCavyRYL7ZnLWK+IUAmKaCbnj8RURw2o0WCUCBP+iFcRLEW64YwZKf0xNhSSPxFHViFzpG6cHcN8l+LGz31uQaGxnhE0xniZh5HlgiR+IAjy7G7lnpZXjEK7xjbIfUQucUpusH/LxbG82xynd1/UuucRCDOzJ1c54bUupKgaZzRykoFR5MJE0cpYPTPf4xsxTtLAVwWvOUUAuxhfQ5jLcfrIMUsB64BpdiWnLl+rclhEWaNpMfGC46NBY3SGsVl+FWB0MN/q2NZe0nMtd2lTCXuJP21vd0IqnS8coyPMWJmeiVDGkgFrzBAG8lDA4S1/W2cjMkIsQip3CeukDERKWE0DacI2BEw3AS00jmKkY68S8QmU1jhZVWzClUMizxKjKDCy15+c6mg/QDlmb8BDbFGIKoczF0nqI9kbK06O4T9SDFn6GafQWJ/IoKIcgQtyiiPKqiA45rXT5hcdywDXu6+zkU9bzWCwZ7HNEdvMOCOnbiMXkEssTJrwSBgtKaplLCufKbwi4TtCLggKwSR+8jfbLTZUKhRk2aWcNCU+9Mpz7eOb1wcmwJwsQZc/XrhSDUquVM3N6x8vqkvj0kLn1YeaOijBosoOZOWA1SiM9E2UygB0kUgL8Ql2GqhcLcsPiQuQSm5e4nNg2rBLL2PdheKwp2tsocz4qBStnMLlPVK4Glht99V2V1ehuuPuCDa3l0olrUxlFHNGxhVeKxhWCdrqZYrGSUTDEll1t1SIibtFxgIAysxik+1hAanlet8ddEtjozNFzX7t+BgLIsWTkc8SCo21jhT4MLVU0QSapgU+sY9HjG8HxmXA6kv0LcvdS8fYyeCUw5naTcmSGicMbLNw1WqoTJvCXChUzLGgcO2GXWkMeaLMXgmVvBsoZMtkUUG7LG+f2LZ5bWF5uWSGiBVwwwtI3Y24PmLawBwEqtDRa443aWpviuZ+hhsbUUj2YppX8hEbpTM1hLaOgqb4kzscORYrqmyLEhF1IRDN8DoWdpPUkoCdOyymMYPHfPukMZN6FVhz4ispkEuE6erRjICvdIPnezyvZrQhgsQ9canAcVoRxOqKCM28C/AeknnhYXSI1UiriSsccQ3F1mZO4xNi06nyhTFQc6lldhmyXRt49SX0Q6YwHpw+mAKixjpNNMaFSLGlfX4BhZpCLRjcwDS1Av3BHUUD6uMa6uWU1lj2tEFiW5Oh4zCsmo0OVWzMvkttaBbk6RSz6UKvdmc5ui1mcDQ05oKVWn988xBp+EYK+sPSlFt82owIOzGLbnVOVz4GZKRMh6Hls0QLHEBa1jcvcTgnlvaUWdIdTsHLabb71MiubP11KWZG3EWjVWNfoouver/Q3TvqVXyIDBExLrlK7AY1EBrYz0MD0IZjvWk3HBURx33oiFYqWP8+oMuM04BueqNMdGsc67MkcJXgxOdoiz44sI1p9STqyNVSD4bE/xRImsVJr5zEC9o7U7DOc8mNmXGMEZJiS/sMFBprJ6lQmdkOEvyxkQVoGe+ooKJNjSV2d5wVH9meOMjAwt2xLZWpJ0MkszJFpYG66u7JE4yg2TU4OrRZNF2CUQrYmwxOONGNvOKMbm0zHVnNp/adExL5L7u7s7gylc5hNQL7Om/z4IxpQ3cnyPID2lofrEhfm2lNdMke4JLa1POluie+jVQuCCVaue1RnXptb2QYcCxkzV29sQqqNB+AXa8PQ0Yo59MEmmO1p4tOMZ9Hr/aPy/Gz05ynyMjppSMF1zMsbrFvHQV8mHXPC4Wdj2+deiq1Vdq6SKQ0b1SynmCGDbDzFN1Ng5awJO7iWRIsRmZZI2RWoPFKOvi2kHWVJDvGC0lxxp9fQKGIrSWE5Yu6l5CnfERsT/YS9ia2Gf2y0OgxhlhDBkfjPqDcYd3SmNaKwnewLr+UtT5lxpGRNZeDDVhNLSA15DZpUuMzSPxoJ7YxiwCUfWlEH4+Z6A6TMktG9lVU8r2vou7Ae5whltXXDkmixRt0jJ4du7egU5VV38lTAsRVMC4N95aPbXUpqXpTiFNdbQyp9iOjVWVJnGZjE8EqUDkMjiGYhruAMjbK5IJEgaHNHh46Xi2txL01gv2v0ODGHOPJPH5kI5Dn+1r8/cxGG2k/nmVF4oFK7SFdYJ9sUcEd1fK6NqgOB5K4mC0RdHDcCdwxDWWuZi7d9F4a44WkOOPPbSnUPK5kH5clBvha3rSPuNWWNhjZjCnGk6ELqUBWzVKfBgGlWVRgvY6ntGWqMdM47ZmCLbid2zDqANBXHEuApWGoW+sYYE2cRhxEoYjkJYXRdIqeEIY25dYQDGo1xARnQCcCOHILTt9ObCngRJDpmLG04kjZ9uY0/vRDpKXkmWkCi0YWnxaRJZoQkejj8qiYAEhSGEIXodnbB3tJBfctFrGLpkYtGxvpSMHotwk6ZkybFibIsRWp+C3m01JjYm8lpiVihCDd5/1ho0Mv9HsjDQ3ysCcUak9lvIsOW7zBY/aMZqQ5vh6KFYn6gaJp6dA7RjYqa4MqzUYf2TSqMMaO4ow/RaGxFhJ86syBWwdXztl92lPFZQVxC5hb7M9YxXKpjtm+nYh50qkeHZoJOo7eibZ0UizCcjVzVAL9ftreC7nGXhB8HWNADCzQNmpLYetmf7nsAelCXK22BrF1BRpjotGA1VJDka0ZFm8YFggJ27N7R2GoUYbqAVbYVdFSubTKCsai4UUg/ByEm5zR9UcSRsElBcVtOEYNwmTdYgINPCxk87qUJxYoH20bh5M1OLXfkm5sOAxh5+wox8PWX1FYJHxkbtq4ma2moy01KhoMGlirewqoIf8DniIbbfKUPBiAKqR/ielRQ7m9tDVsSNy+NQJdrDymE2CLqJ4pjMM09iCOBUpSiCGNQsAmCBEyfYlCZIwdkhBHn1tTiPAUf3qoNHSmNyx8p6VpQH9tUvsTp0G8GrJz9aqam/I888nCErSFJDYDSiSXB6ZCBhEKXi0NxIkx8TaGonCwVYWesyMxxIkWEHtMVXLauvtqQwYT0QyUe1gaF4tAJG3MBLOFI9Saw/X1egHrCKSonthTCcJoU8ykiwdUdx1z2+O9aBMqw7QSswhtiYs1sTKMMKwPVs+bWzwJOJB6co1vKaAGAa0ywQ1nkqeAdceQJOlPBWd3o7PMIWoqAGWSoF8Ec8q6Yfh6TQguneANhhGEsJ4YQn7c3+HkwcFG83nsEtXzfjn8kVQW9uxiTnGMAvbGRiLi0yQ1FYiILS3zZVdI6NHI+4QvbPy5V64hjj63phDxSM4g8PaUdPKGkinjbhIJZdd40eztcbSXiNIMoEAS1PWXSmoLF+YMEDSgwxmDO+nT+IjkqofSyI6fmsGZUZBFwpyelc2TkKTAp3n7+J2oXFVNPC6FfSlTe4QMm+coxR/EYfC3KGQ48cvbWPJiBRjQOCpZh8tdDqGZpgZWFbZ7/1ZPaYs/cMYa2qjiABkEkqScAe3bwM6LDHAhQA5fdAsxbGCLGg1AtjO32gQ6IAksBp0FA5/SLE/GC7u5Y/FqwIP+K+GAPSAWJYGKM1Vo9Rk5NDATqsZe0nSVaFqWtOfLD84I4+bLWAFSYU2IfYz0cuJu9IbP0dy62RZXsjBYYtQtvgEU4uhzawoZnSE6gzpryt1j24Bo7/DEp05UmbK525GofADiLUJ/eC8bEk5dNdOKukkMTuF0lw52KPgwIKKMvKBeBbggux5qe8OTu3P2QrlkIoVausSxeFVR4R4Po8JtQwSQub6JiJS1S5X2RvCKtiDSUXHGbS9eVJaZcqBqxBYStkHM1VHwxc9iuJRBn3BmhDlNnI9Rw5xvyw6VPsUtdlF8iIZo5Yns+QTLVPfq4fwY0EQZF6i3kr5q/WVdi6A7MqwTmabI1yncxtall45eeWR1zesBc4vixlnQrHBaRm0w4CUCuzBTTogfOKpmMG1oHyJxSvoonxSXLLX4KLMYyZqdSBlghqh9YiVbQUiOWyjc4SqkFJL85Ag5bE174icN8B32d86EtVLIuYfvekUzKzG8dekFd0mes4qprPjJKTH+kD1if1lwhNxt6MgjIN58MHNmPvrQMtxFOJeLM8JiyDPChwxChJzGBrsquvVVNKz2MkUYAmtq6M6RLsGNNI85NoEYxOo4J++Uan/SPBAntGYfnc5EaFLLnekUYV6mBq/w3FOjtsFh3Fhz4oLmzuJoMnz7q6YjrxncpoTa+HYUt2M7wOKS4WhOOvqFxfISzvekOMrrm2FnPzC1wQOFqEzgrC0gbn1VE85gznCXWFmMoCQ6xQe2Bi5YKNDYlfFAOGwPxPDipHOxT20vnG+x8yw0UC87La4A0oFuLch23Z1TSL6WWlIxK2ZTN9pjj10pnHkOzQc9LnJKGSJVzNoaja/9vt8gg3iFqoVL7Y1+fXHT/mUfMsyVgFUkKpfg/esn7WVWhr7yeMHxosQg1rzlrVEoUHADhjXyDKDsrAwI5ESZT7O8hXA2keuDtmavzWffUlnNTl9ipq/GJz5FOCVUiEaTdZ7LnBHna7soV3u6mODVDwIkB1PfcGkoyBarFOo6BA0TIDsoMbV01ce+9TcTlJg0Jjf9HaASsTd3U447uIce5NCufz1msCcNU0TKNz7Ise4lJaO201Yi6/UBQxx6prBFRCoRpKXUGE0oxDGhzPgZJLN4Ioy1Q6yqZmTe8hXNrInEHIu7HDKiNrbVlJwZ40iIo8+tKaThjGCHU+qW3ngwNbqEwfK4dinxo0PSI9fe7qcm8MojSMesgOUabhtG7yOhEBOVFNyb2eDb3f2IIptMuylQC8Qdjwhew8WExy4mon1wjTxHMFigHA8/IVA9ff1WaqhPCGs1S1y9glklQ6cBiJiRAgmeJiX1VqjiLjco+o22bwQGXlYgOdLjZwqPoC6ONDwpPxBseWPghl3dYtF85bmY1CQpZMctFNiUFoLlAeytuMvwWgM5TXqqeouxQSGX2OjGafUMQ0Gp00QTt6cQH5KLY74NT6TwA73cYNAn44/cH2aQBA4rNAi2+DUJa6MZG9fhZO6UaAlXyQX2hsORq/a2Ku3MPArK3vsOKUQsyyOV3Qs62loUkUr1srnWQZH4HI/tb1731yuvenm5Vt8fq6+NiTb+jibfX1b9ki9uJva2WStGHITvysUJtncOOk1605E2ODdKshC1tah8Xdu5egNTezxdqkLr1QraB/KWxmXCHA4Ec6aomWPYyektVEDcTkC6Q2pRUtm539Hikuq7cEqMQypEZZIC4Ux0w5/SQVNrNOcg8yR0Qqpjhgoiyz+1etuBRo/DV/V0YWSwZek7SfsQcegp+Chvl8PxqlFRtMmlkCc1nsVjevvUkGMiASQ1A/EtcaTQVIXhbFZJ6CMD5pKGzYCldhKQDWQQ+MCR1EChXBozPQIYa6oO+Ikt0dP+iceOjnEkxNHnNquQMGrXWzzW4A7lDNtmsx0wG8/RCdJLkF9+FTH8FowXYRAJaoVU7auZEn9xk6izQ2Bl6AnJfjkZNRJXDKbQbU6knRdTboG0zrqU+nRJ4/RKZQo1DvmiYmxjMROesDcoYw1QAI0Eu9SIGMUHCfu3JP7aIw1bAl4fyzRFKAaGnByX4EaVlSY9OOMXzfCMKn0EBCgJJhiHmj5IC38qE6DClisjGKh6Na6IB5HluuaZ+JMyXgVexkMXolMM5Jhx8CFXrR6aAESfhgPNXtmS9E8b24ul5H68mgwFMKJnDeWy0ZhhqzDiDZ1mWJfLfDcGYIks7VkqiHshQQbazJxqw+XFU83GOBLi6HPbjRwzFXkaLzujWDTztb9ssgs0TopaRvhS888+XvjZxzc+vvmRxSvSyO9nWsEcazcJOEL2ECqipWUhDwbqUUGTWJtFw0ebXfbzdK6iztGrUMSn7UlDLUSWmkJXKbenEdSM/iiFQZpzXXbqIhg5FvI6RILOFjN3jIZNMYQIFTqBGuM7YElbHlOjFbKRoT1qVMd0SUvJ0nndnfvGgl2gT1jRFrhT33rplIk0mkOAMFdTHhh027N/Q09mMYI9LOjsU/tSHT2R3GJNBOggm0odVYZISTTz5E3yRRWy13V6taqDaSjckl108LARddQgmSUD5jTS4lLrj+Nii8rM5ljEHhvjSIijz20eJyx8aOrbwr6nSuLEC2jgiMovKic3F8tLtCExqWqj4n0/BeUYsktbVVuykVRUiJlEIDaFwPQAa4G+6l2W2eGDaxofTINWOSoZZ7ReNRBpdMyRqzVdnGuH4ko7FM/aFQU+Q9zoLEBTKHAk2LrajbKqUV6nxXDi54giHjPgqJzqqINgJ4IPlUqkGI6qvvXsgYgU8jJ74lKREm4qc6OVgUjZeGIWGhNfT1SBsARb2K4ucYI7MmabpZe9dLBgZmpfRcSB7G+zsPSVp4RTkFA/4y9sBC0s3YzjNnZ7scLAk8Ixqiq5dWHlz3vS7Ai8KbBu9dhNzWRIs7SxSEfCkXzhWCugOl6ZG+NIiKPPbe6FRF/UKv9iT89Y5gaIl/YyLHt3b04SlR4tCrKHS+FY0z5PfrikZu2d90enjMJQyNr3FSBWtfc8kYDbZYiRBjY+LVVT8EovMy3YHRukypY8E28LnTljQ+IEKawQSgiz4uFCQQc4EkVFt5WdaCjLLRWhzha0kvg0SG3SuSqwsiaoUHmdeBfr6q2r9WSE6pJ86fVKoi5oXoADXi1qDmjyl9EJLtMAAaYe0MvRgCH0YUDuS+0ED6jAxQ8MkodySAMGgWYWCpLmwDSDGIY7bZjafJOf6eUlqJDDIO4InNw9VPGkeUKDjUnHyc5Z0PpdYrZLOuUBTJ5aAeOsnCQ4ifwfCBVnbH5b5e70XigexGX2bIyxDWQCKm1VSBIPJhNoSl21DdipNsPjQt9Py0gb07ICjo6pZAXLCRnAsMJQe1Vqngjfs0B8WJdCgAZEccaZoyUPCvJLh5fd5Kt4zcig3s2W/iigd8nRTsDX3Rt2gkM+4hMjrLAO7nUVtEEqczXa1psrU8gEqBQYyeab7pm6qFgcOJa8MPStLq1l6Ulfz65eCYE87PuxekDa7tmcoVUO8losEIPVy6AdWFOAS/YUEjWO4UZF7hVBSAahUFe7u5JZWOvcxZxJbsJppXx6MUjQ4jYehPEZsGHMlzrrlqR7LkVyidlhtQlJwU44rylkoEmSx1EysxnbRKNpXky+fodP5EaQ1PYn/eEb4gK8slNq9ewLF5fkF03M41TTw+zXPU++Pc7fFeDWyMkAoZL7ouz6FFp2gMkQRpjBNyoDkYJOZ/Sy38Ayoww45/6UGcptxCWDTy1h3RiOw0YPRbNhkHJLwK1ydcdRbp9Z2ggeLS2tM7j3GtJM8Kna5FLUQ5idKYJgj29h3tFls7PR6mVe64NoEBRecoemgoeFby4zZm8wTFdTZ01zm7DRoS+4Q+wIj8IqpQJWw6MKybxOpmAGMVTEH+8zqwxsNKmHhQnRR8c2CMqne1bXpkONaaoknSGNgckIXuUqg0NLA8z37R/5V8NN1RpKheroZ0K1AEC5MY6EOPr8TauQXYzHNbSUtitBla9yiTK3BLBFTrSzyDfoYa4n23GstxPndWoi5VmC+dOJlHpsk5HnCXN+g8nKo/XHSxDIK+gYPZ0/Bh9y8MaFPUemNk7tW3tgz9pDBzZGVHNw/3sTu9bM7t9y4YLR1nmiJaiSeioZx4sGI/fxq03DZXNC/GCyhUUS4JstQR1L7bJl0H9UNEukNIkwbFdMc42SsHp5irRHB0IW3Ccxky8aIoP4Ik/UbpB1Yxd63OsqIM5iUiADsrR0/rY3/OVayGA0SwwGTgPQwrr5AGqdc7PpyiKQQMTYAKxqOrHRMOpRmUdqxv2AurzP8U2O+azTWs2CTxe89iate1kGb16RvMByT5EMrkrWZzdGz+vjPwIPcfS5NYV6eMANEarIDQHGPMShSobwUpuv0NbXfPwKiOfafeXJWyD+8ECpqP2AllcolxTSC9rOiULZ+o+yqO3lhtPI1Iend585sevUsR1nT+7W8cThbSeObNPx9PGdqlclV49ulxyd2ZTC8aMT18nfxp83jTIwtptCKWB7NMEVhWnVROQKgItU2aeM2dqkfd3LlcS3lnBALcM3j+k1pLqnpkQNGKf1krRYFKZZPVQgIoFdI4mJkWAZeTDKlwqRap8cb3SqL7jUWmGkhgmSyvcuM4UvgVcEpGZPCLJV74IfIXDHUuRJiHUE02qgSZ2PSNa2pVmEH+wQXEHmYkbE+mcQ09uTwpmM2RacgS1O4uxguerlpaVsPxz2ikQDteS2yqZhrF/UNkvHOBLi6PMLKOT4JWaJZcWM3JPElmDEm4TB3icqhzV31C1jRBgbqWZEtDzlAXGWTsk9lUE9QoGYnN1pM1rw8dKE6HHu1J6QRMfzpzlVOdLppILk5By8On5wqwqRY7Nal4LszNVpE9xjtSu5pNM0aDVpX6ywfxx1jHKZ8FMI7j3CaLMIs+RShkolYuK1xjqGWr07BXsSoNeWiTLhIGE7cxsKAnS7FPE9xoBm73zolZ8/hhXhQ4fmqBQiAWglcmf0Vg5k2f84h9bLjLwMHDm9whQ8pxEk5oo2skvMgTwYCx7q0QjbwqiEAl5eTCRRtJMk37b2MlKoQ7GmDzVuWZfYGWGCX213z5R4uviBLH/bX93dZiNn3IzESUeMCW1kbeUz+JowaA4pwTEulqkca02Ur2tNtLrc8i5J1XFZOc41SPY/BmsnTE4R1UyeP7FLHNA6Ixpot6ay1hYdD09unJ5Yp51bCtnRqTy7f8Pk3rUzE+t1nJt+Xx3Dq5Dt4sUavKPWyAb6BrevLtGBliO+ihjiZASXU8B1klQOzKz2qay+Kehot1CTQWrrRZbxRoswk7AgBrHIMygBpQiguFR0zBynMyRsabEQIr11Kfwxgnfa3l0Hf5Wtq5K71nynUaduEJ70u1xtNPIysIu/quLyz27mVWGdqoA+QEIM5zGSs6dtlK8qNTfaN7A1KeYUrswoCt0WK9Y0lLgew7FxpB7BYzgT5gwrQbZXoe6dUkjxkzH0d36ybf1eSOEMLNqteZb+4pI0yNpHQafq7kxDjXKGXJYVBliMSkADboCLa5L7A9OGYIHbNLtyfItub0QMsUIM0Z2PGCJWaIURnVTWbk1cUoNd29/YuXW1GoQ/4pU4k4Ur0lcnsej0qQPXvSYUmQv9LAVNAXgFyk0D1VfL4J6yBBfhLqyIrwoW9lihhPpqnFPl4BHapFfRxt1VdlBNmFoWigPQpgpeCgJuf3FO/g96ABkC+MYw5HqTR7TJaaX5gWz9xiDHuvX1Piqxjm7ezlm8AWE0i8uNlgzlcfKdca+Q5oloY5gtuXljp8dNVzaZvr+ysbZXs7D6lcIud8lENtYeKPFdRpbBmx9hi5/FxxYWAw0OpfMEz4swhTvcyMkY8pwM8ECyyhQinE2gEGLEV3RDJIiLO1zpFIIe8qzN5g7S6zXd4Ynx1xDDUDraZSZtE4YCZ6zs+2bee2Xjuy9tWPv8+nee37LxFZFk+6bXt72/Usf9u9/JwwOxSFLEOL5TjJKIXZLUhEUsREe365gVjLJYVMSIQCSvRSZP6nW0DDWDtFxg3DtflFG4ooCCuyQxTUe7FAq55UgOlj+XwMWw49hgivh3mkUqu9rNAg4Apxmd6YLvlsX9gNi4rxoKpkTKERKiG6RQ8W2BzjidAPmFCLQJ/aJwK1chi4Ala4JXIQhZJkOkKJaCfEJ9Kam58EkNVTznXWWNBkmcPhjfuyHmKgJbaoHV0RTCYyKJlDeRyjnMgpnoY0De4bcTrHr1Z9MM1g33wCXoJ+oV7DLVHKhekmJ2e8kVz/phfIDSQMMiY9hpip74w1LjyWkpg984v/PgrjUfbFktCXNEoR2bV0k2vweXVL9146uqV00WH23kxCiJliDRTBzj1uiwb43EGR9FIfEqy5FOjx2ftD5JENGzcyMr0uiiNHJvkyUUzpA1rXlIMudCfzHg5/WOEH4uRBrrpOF6zOXGciM/C7MzFVriTXYMoEnSSv/uwhSOmkdTGxKq86ii4O4qk/Izr1ESMhDiFDRpyNaXhdoNWudq6d2ER/adiSHIsHw9UmANfL3U5GrIX3w2XhGbk6GqhmcPsd3m8IAkk6KVvaFKzHS9jhjOowh0RsNojpLp6B+nBDytI13yhLmyyckKdMW3thstpol4dkmHxzgS4uhzOwpZleZ6m+S4alxQ0ke3DCgp1RPaodyWoCSM8lHRsmmpSsCa8QFQzO6uJLQXtm5b/cyLyx9a9crjb7329GsrHlNh/ZrnRRgtSm+ufEqVa1Y9/c7qZ95cv+VDby1+XrEb53ecMX/EGWhzdHsx6uh20WzPB29qv3d4cuclNm9SySOg8BLaxMsWKd+8QbOYBttbgCuneBDKNieZPu6FGMosYB3sjgCrPMbdI6ceB7CCifYX38tvdmDbe6sjSd3h82gZ0CwC+rWkBFKhXKnEpQCRBjVgk1jUyqjKFFbJBBglrUjuXmoTsrlLNG/SPROPBf1EzWLcO4E2l5a9TA3A+lP1mN9cYfxkigYnalJpk61GThk/6bvuGpYG15f85kYdxzgS4uhzu40cfg9NlR2tZZTgmCmNe0mBPvajupcmd3EbnkPE73CJ6DoT2DUeDQGvxDJ+sS90dHQZ1pd2T617QUvN++tXvKfChlc2rX957ZvL1r31XNafiV1rtm5cc/Ii88bvUbgmGgkMakvni3vPHNyq26eZifVamnLLJNE6tnnDmhPn8S+6BanmSRHGXz8d+OPgqZlmtMImqmpassSWFrxYBA0MaMOrsrjAZ8JkFzQ8h/W2TQQzqZKMIBteiveMhhgYSFGw32p2udS4wc+0N7xc70iVi+iYSw4B/ndB9cV8mjmUmd3z1tUiDKYpyl4DZVrRldB7tGqfwdtE1MQQGpRKVakyTjOfS7yFMyzhZOlM4wCy0MjgcngZbm8Mi9jogFqpaA+k1RG4Vqw1lDXxsmFEjXEkxNHnNhQCsrCokgrTWMXia4gbIjG3JsOkZD6IhEl2R8hjaytH5ssgNGu2+bexNox6wEQlzHHy5vTq9Ik9q7PUiDNaed59e7mWoJ/8+K8efejbWnYku+bUt+0T3LfGSVAZlj0PClhPY0Le33d8z9rdO94QIXUUl7QPXLNq5dELgVFHW2Isb9qtDpIVi4uMfrDebgO0R882nUq+eqzGmpf7FmpghS+1W1seAAx/cIKyrnoHzwJFebhRxiiNVukGx6JkQyT1A7YanWw7LWVFW3lU6FfDt4zpWOA9twzh/cCqTVoNshTUCIqsnAxasDoeSMFrqVqiEi51QtEpR3uyjmGO3et5rRWKMa9GDi0JsVc8BkxQ0jdOIJVkZNe0wUnQsjfOQX9aUh/gyS63Md5U9uB1SYXYPsaREEefW1MIywlwocG496xikQlTjhjRCWv5GXaCJ9V9tQfJMcvO0KeBeF6K+Y8zWss43XcFoRPQ1PHk9sfefv3plSt+suypHz368LdfeO6hN1Y++eMHvnn/9//igR9+7fFHXj5MnBy8EewyeN8LkbkdBiLtwYGIQ6LKk++JPyKPbpZUmNr3/tmLeB9DjE4X4ly7vh1HTAvzyRGpgbRIXZIfKiq2NO6yetK2Paoqaokt7c/e16Pk3AHXjbJHi3vt4cacrmqmi+etxuCHRl0c4qPTWfQHnTqFMIulmJwj5XPJgM4xlnYbqadNBscuRsizu5qU9oC4s7Qdk8gqvXpATVfaFgk5VUydUKKh2sT8FqMWFzAJtYTPKpQ37HYrZlu6pWiuArPk66ro6dfKYF5tImp2aowjIY4+t6ZQsp0jd4kEaWOY3o5DpJAMk1X1157qKYcbWAlZWD5yLgxu6Gv0sMTh5fgloKk3bn4g6wEZk+Pxl3/02d/96j1/dM8X/vCzn/nt3/7P//7XfvXf/L//+v/8xG/+8pe/+OnvPvHWeQOCRGWzu6cqAB1AyQW5SjNFIkSyttemj+18dcvGV/woYvNZ62wTlIpsbzSnzBG3euOq7jbN1jEmZcJjfFc4G+Uc7EQoMG3ZesjZknKpCZO1KA5JUPj2YOmTzUnL3N3hqKQG+BmtmA6VAhc8U3AJi3zjZH0cYuedONBSjrIfMprMV01rkBr2530Q6pstJoCflanSfZ1lPAWn0tAMzLA+glf6Ei/PMqRCeYlvu1FpYnTzGbb5ROZ0iyQo5u7ozHtLpsbhOFbubUsF0h/rW/NRCN3peyHHLM/O82U2fhhHRPtzFR1RCIM9MYj/ePGq/VK0xgwa4Hf7KPErewwazEhfi1lk0o5MPbPy8//8n/zj/+mf/m//+J//X//rv/6X/4fk//lX/0wU+nf/9v/W+nO6cIP7AvqEpGZ0XMGQ40qh6WNf+z1VDDEJz3/w+EP3f2P1rhnVCPEGIlFp+cwBTqiMBi+5zoVeln0pHEMZXxr44yNbYh9r5KhqfSJVSeSIbn3DHX/6hyGKQptOAzK4C8UcyuFPo4eGMi7BYnN7AN2SvWYJKFGjXIcOuNEeS+BG7EL5NMAhVjgFM9az43xPGhxn0o5UzQuOZZF0sxgYaFhPVnKaS6mkvhIKOaWiBgPxuVr27ki1rBcAHn8kkwbDEjlcVpjGEDIRd1h9TzVyU331Tp/IdT/GF/Gd85yd5VzV1MIXDvnNhUtcdUcpUT4dfKR6NTtrbvi7SSPf+Mhb7Z99PO8X2MPL7J+9+4V/9N//t//DP/rv/pf/+X/8V//in/76f/y3WoU+86lPfP5P/ssXPvetg+fYG9hOiwGaG0qkbtgsvZL7mTQu7/jUWM9PHvCXKw1Tj5l7StfUIN7TaljKuQH1vWJdVaHfmNYjUd9EkTUDd0LlaJVXJfYPTsu64TC3HFlrEUchIDsiOBMCc8/tkAUWcnWAa8T0XJbcTPiC+1YgRpqXMa2PfGJ9wJaPVhLDcbWmo0HZ0ldgtWQKRx9JoaX/0qTWk6gXhUtJiN3ZRUGXaCCHYFQbR5VYF0AGafjKLc2EYjuU8FWbSQbR1RhbNlablg7aCBUUZ8YCFW2cnsY4EuLoc7vHCfhFbvJ83mr7KD8ytyYTGRJUVhK2Yf6LCFccP1lILzWTPXiklppayljfOL2gvmov7eM4u8lY6Q69MbPhh7/7zW98/snH7pW8tuKx9WueX/vmstWvPvH6y4+tnZg2lPNUg4cc7aFkCv42Xavxm9COZp6xuByCpRzJqdJPDZvTkasjzYaCRIV6slI0G3lw59EgmFw6wmHHCQKA1HknGhAgp5FE668gtdVY3vOmeuQvVwFBfMWdhrqDtgClYlQgc8EY0qkXW58mQGnfeznco9zwyK1ZXU1awRZyAZcM3IqjOe91ICuPbbG0ZaG+pmAr2kJRJOnrsHWzQ3ohUzS+1WICwFSoBrQBUT41kzUUR1PRWQlbBi9ls2Cq6BRSuabliwqr3xeNcSTE0efWFLKbGKX4CisysYypxCDVIYOXFH8Lmz+NYDfxNAlFURH7m/aysBc0YBs8etPe78JMV/c9tnB07ab1L2/eUC9P8/40z7U3bNt6+cqREdr4dZi/MdAAHXxnoVCyyeLgo50STHcx9FuDVKqBqFUN0j5tPEWx0ZxxSo7OMQTvaZZ6E51B3NF7g4xJL4xlJaGvOsY5AKX/gZ5knEo6sCh3jGGXK/FqwO2JTODmW7PIkEIr1ehqPG+1eU7lZqRnR8pZvATA9ZwYypUkWyNgIyCGLYZ1408BfbFqsoqGSBGYI5rZ6lpXmzJojj66FGpBkrIFfXzXZAGZhjtWyzoKfU+Lpawz9onE/ne8WhDhhiR5tmPJovy75PuQYxwJcfS5zUbOm4HmDi81/sVsRXTIi+3r4v6z4vaFllrpl8UhEJTSzmpDonWmUQASWiikcsXYBheLzux9XvwRZ0QkrT/r33le5NHpB1tWHzrpDUxwbEcUrAuawbfLhmzg1URlFHO5H1k90r6OI818KrsSD1o6zIgD34AIvBRRiGHdksBM75CWSgKZMRktGjrSiEYDJUDH2/2RW8eWfRUOXE3CBk/AZbAu7xKgx8+fVjPAmnmLw8WHssWGYIXJ4xg5ZJU6C8Q98WVZa7mjutOecLugYQtObuzoI3U1U0ukjMuMrNPySZxZTw4KGGoGqCr6dmmlxRy76NR7eElsb5hc0tKbDnjCtsWblxQaeZwK75BCyRNOctk8sPLy/dyR/7bLbYzuWGrxIevII4Rq5EWvoSNd0dvxK2d1r9nvdlaTqpfXLmydeH/luree0/4tzMlLVe3iXl7z/gXSZOE14I5/OcZHdhl+76ywAsGNjkFYa1ZtokzrxYAeWcELhQqIaZlgV0cF27jpQvcKMxFyqJoTkjXIKaw5SfkDtpyDSbShEEtBK7cnaQ21QNNGNXo0i1q5CWokCtK29hdooukAOlEAlEA2UbCGpU+wThvTBjJ4anMpl9yRlu4iW9yAjio0wVKvPMoC7RlGhqKjB8Etnp1TRksIPDVH60YZM2VRZ8Kw9y5X+2rlr5FLco4ckriwwTZQWYhag4hHc2oOjNVmjCMhjj63ppDJk52DtxChDbsISe3cXFnPA7Q6EVd+/jm2GpagbpBKnAhk8ooD1rNguSwQvzy1ctmT92vx2bLxFTHnrdeefvmFR3RH9NTjP1g3Mb3oJd5gUq/CWYWQoCpaip83yrpKvR9n5S7W0WIuBz5YbyistI2LwxYqR5t59z/8AbdKnN0cm5CsGdI68yVyHA1Tb34sXmG8UYFIfhGhsuqDOcPOCqccS90G8mSJyCzmaoOOcRCshD9lDspHyYC7Tco4HjyCY62Y171IdmJ9Y8b2hLua1qZalnpFlaE+oqueKDkiTJCgJ+7yUllle775v9XrVG1szs/tuyR93ahCyJOjGUJy1ylopFCVdpe9lx1TvNfef1bg7vQ7cvGX+IPXKOTPXkOVYSMXUplmCYx0upVhXohwU1SpmxN7UH5kuU9ISEjGkN09s/fl77y4/KHXX35MooLI88wTPxSLnv7p0/vOKE6VpcJGcFah5Yd9jJbtuFJdvsPP9wa8ZfdGiLJ0Jn4OT8GuvJlwNlKpQZyb7VAtQbI3fd0Szmg0d+yi7h6c2Fs8ZtQOUs2QfBcGP4Q2xZPGrsrWqgzNOkCzr/Mfs2+zjKMtKycNnMtxlDzPRF5YNFTLRBmWeiO7CEayUHYz30LvenUDB6x8KZmrRUVMGFm+Rna8pUBLYVVppI65KwXiQsE4lpAI4JtkCcbYeo39nCzMGdBIcCu/hDYVax8tI2xpVyM01lBjHAlx9LndKtQWH+/iKtkQM+4CHV2SEDAlwCczq9nftpKY1GQkK6BTc4S8RmjlViPSjkukJXtnNvCWU/dC76x+RktQfxa3ccf2y+lSu7K6j8+yU2jwxp3oVpos2kgMR6d2Pza017qn4sTyfqka4ZKxWKHdf+TM5j2n9l6p6KaNw6yrGNitO7rw4c7NR1auOb7jkvM9TiMTZZ3Pa+v4s3KWj3675/1z439/mxEbQacaaLSiq3SLnrbCoGzLIMsODpEI4tIBP7BoB8edvc5KQnxQDkOQUAWJk9WxrYGuaaRKL9f4VOVsswnrCG0SpiQOj6x6x6IZYgrF7ZFYEXEgZGDjxi3ARuyGp0oWxSXOMT/jGU/k3MfUnhcF7EYaq2P8WSQc40iIo8+tKWQUys540EkrGwDVePdfE9dm5qjnC4VilYyZ9nE0MYyAssywDXiwiZ+k46OzH3ywZbVufrSL01EsWvXK42tWPf3u28s/mJ2BPGaOFDMxHNGkyRbXxM81yZRsjdi0OMcLkWiuieJZnGsClO9ChpwmEjQoROp4eUIUmjq77xrlrKtLxKYZu5rl8u69x99ed2zHeR7Z56lUSaUqOKOl0pvkolaevNVT7FZpOoVdDJUnWiynRMSBCAja1L7VxGp5I4tYxdFtao/kQm7tEJUzWirDARe6e2GXy6nxbjmz6IifCYGJh6uHXu5ogWkaWceEqYKeWOD5AFpqOK8BGOcmKdwCBKKSrEezdgfbKPaqGQjM0QTLOJGEeMlRPGx9i5xjHAlx9Lk1hTDP+w272/YYGW1iDECPMikpwUq3+ax0VEf75HWn9r4cS1eODqSHrbttgnr50Jpt768Ui/btfHvn1tVai3bv4JvU2zetO3beG3pixq2t+ZOkSMBcIMCgh5g5wWf/lr17E0doqZT77McWquQzY67lSG3GLu/cf3zdsXMT1xxs9QUEHcGqcbpJol28vPHx3fd+Yd/a08M333JLyV0l95P5HXWr4fbSf2R8RH6eQhIscs15QAxPnOMTuEKwt3y2187hdhF6NJ3t8KBztAajMJNxGI3sxoDdvW3hyrfLSyXpo0LcC+2ZFJ6ztWYcr0slDIIyLHqmEzNC5qXZWcoQCDDW7l44Fr5H9mkNe402dZ9TQQR4fqqWoRDsHQiZe5DCJ5JBDOCG4TGOhDj63JZCMqPxx5hgyu7r0gZ3u401Q7lugKVth0KYwR20bOJyjZxh4dL52Tc2v8dTBO3ctP5oFdr47kvazr30/OrTyZdZtQhqFpmGKgOrnfItvsAO/BVGlempcfwKHy31loEKZItopWfnlMBIvY7e+HDPxPF3tp7addnMCSaARf1gQQJda9LLa769+ctf2rfuXMNWmGOJSjDKTzvRrSrNGdODrTJkkF1sm+EGU5RpvGl1KulQjkNGH4Kn8qwM6QHVsRnLlg8r2i4A86kEzXVj1nfFg2912lISbu+ng8KomrWx+FC7dBwVZuI3R8FTQ6rOMVrCZzAmPSvtGkIUgMoIl5ZImGZ0gb0awb1cLgSOdBl4YtB62BE2RsY4EuLoc2sKMRMUwvKYWjm+Ur4X6yZOJ7ozqSzezAaOiRM1IBJcullskMTOXKVXC9vM3DYexG1Y+/yLyx967pkHlj/74Ksv/eTJx+59cPk750FDow0wEtRanq6/jFH/6isIMyj9TyX8J7jqq0Mfz2MImZuNTRnbjs6FJkYmEgol5996avKJ5dPPvjiz/I3DL689snL9kVVvH1mpwjuHV26c23TKtxlgTnLh3WVTTz879eSy6WdenH7upZnlOupU3V+efX7FzLsnBJ2CEY5VR6GqFk85GT8bZ3J7NxakUt/FlQ3fUKW39DYvHG48lH+MTu8s/MwTt1sw1glCMwbuTi7+X9Q9F8TD5dLsOfsKmUr8nxklmGDfOqzQ0i51+ovULL6/8uwqq03RzMCLMvQVWoyoDqeUqay066WGMiRRGyOtAOZjK4hIdKd9o002fm3rRM3fmUJoj4sxoFsed1O25VXfHCHvpw1LMxtuYbFlbpqV4xpSy0fUN9+5JiPv3PzED5/+6Q+efeKHr7z46LIn73/iJ9//8QPffOCHX7vvje0EtfDktJe/kkzmTlyNGEDj7EjWZDvuPH2mAu/GzJv854RnraSwlTRALdLHd8/cCXipifmXd2w4uGLlke0Xk028oeeY9mQZt3R+mf9w+5qZ5SuObLtIJYSR/o0nTkxmjvvmjsX1uffwaLTHEJlDRrBRTvz1sE4KZ5zsV/3NoFjacE8vnpvZw2yDi8Ass+V2CNzMjA6a13uzEkhi31a5TSF/ejlN2dPJ+XjV6C8KtRzqgrFhPKA8q41PDQkpGb6BPUagO5XVlwEbecyfvkPrCxSbnX7VleFP8c0t629NZ/tnwgwsMmc6oxqvxjgS4uhzGwo12KngVMT9orHSoiWnCxxkXDxOOI1sxz7rskLC6oRrOiwqNjVUxOhhruRRGp95d82yB7X+iDk/+O5XtPiIRQ/e9/Uvf/HT3397Bii4fceuPJuQgFeP1qezVg18jWMFKejnLUfRm5RZalc617F9j7uiqzE1qW5vtr6p5eWwWIHCbmzBBHNb4AaOUGjh8pa3pp994fAWNU4zTepC1PMSJ1aoi2esoQbRgN4gWax5fxQRK7LFSo2QXW8gWHjZHA5EKocXRjuOKzX0G5s2cg3ogobN49lQ6JxZCnOYq+7lQqSodxb0B/RLxHuzXvYCiNvJZY6CNEEZeA4JW2oTx8IrAuGUnaFYlDRUxvTi43pYWg0CDI9A95jPV8PG+JNy+NOOdVoyxpEQR59bUwhXKq4mT4kzn2ChcgFUwVal/eWWiX31MsQVG7COR0YwyggFLyMSATpGs7+pdfAV0UarEDu3+75+73e+/PCPviE6PfX4D97cPU0SJUUpD/Vs5G1h/X/ILAI9x1u8JwEQFeP2F6GMBokfNJMC0K0RfuTGJqnBtiCnFi5vWzX55HOHt3yI8kMzi0dursNLlzeLQi9pFaIm37PMdyvdMm3U3jQwXo1gMar/VapOj/EHdCkY2fa5J40hRMfduRR9AJBxiZ+zRJDgfWp4CcdF+5aMnDVwiG2vVc4qRX+HHpVE1KjaDGxgzURZH4zyhnhjvfQhcHBYkTJsjIpoJc5QHvIymhBl5z5Xum9Z0SiEGB5Ir0xZjbUc+Z4HqccSI0uQ9nitPvdanI5xJMTR53YUwhEOUoSA2XdxX48o37YG/fAnPg0E4Q8BwFoWLqKojoQWBsZNHDsuw8D8B8gjq7UEvfzCI7r/yatVbedeeI7XrHv5dfcJvFArtfnTV/DcL4pgGZOpeQ8DyMCQJPdODvaIwoU2n7pNrMsWxdI8UPWX3331wGPLDm+5YOjnUjnHlmYEn57RKvTOzPKXTaEwnJbMbkSiWOdtS0POVihv/xhb3kBSYzwZoCAMGwMsVTpzq9DWVTdLGqalMeQulft7Uh8RTZHRmIvBrZUfY2hMjtRIsVLbaLbVZo6zDwDwAkKkOo5rlTCIrUamM0ja1DqWhqrUOJ4U5vgqYreoDfZiXWcjoZeQT7nP8a0O0B92cWzwcrrkafXPiYjUuaT2liuHxjgS4uhz+1WIG1CnFiIq73RgBRmqMWh0tXYgXp3ChFExyMhM3tuoxm1AyWIVTCqwAus4Pbjy3beXi0WPPvztRx/6tgpvrnxq9atPLHvqR1sOnrQj7JEij8Ij5iwNTB3rN2rWuZHfu/bhFKMqgzp9xkxqwj3vWNQFCuVIXz+6VQOjByoSbyMMo2SpYSRbYpdPgV0sNVAMGroUPkwY8wSxIQaN3aKCG7sX0Kwn7IKOcGmw+s4bYtBM5tPd6PQ4GjB9M1rztqcO5XQVgEpDombNiQ6rjU4dptIcnaO8ZkQHNDlCZZJmWGSi9qtBedQrc7ziLTp3NMI0FIUntCnPuEEKtR9rTMvKE5ZCHt/k9NUjZKgtmfgQanmFsYwTqcjT6NefcSNjHAlx9Lk1hcBQg47RluybDQOLtUwNpBoKAy8hD/Cl7I5GZMYx7NIYsDoqDhJQ5mh26eqZTfdpCdLmTfzR5u2h+7/xyIPfWv7sg88+8cONs6ecyQgMXiOVJpzBGfGokDgeXRmtJL498B+nrR/58e0+P6lr+/iSXOLnT+5rdpkAijecNMKcCJICmvT1hNwsBQpMUgakoieBLwSAwlFiBHDconBaWdYJhXH8mIHpPLUZUrgEmqCqhq0kYvTTl1UiWhnc5oBGTqrKgGVRjpGRP3uQ0OjepnKBnWwNQbOPZYKtsAkKSjjZ7KWjNKGSMDGURwshsd1PNXRJpxrHakOYdCx/1oqkBjWpOxYYpEwtMl0MfT+p68xRjenRH0LwUCFXw5kmHkEDMmZa3uF35AygSMdZUGXw1YNjL0dmhRztFF637LTkS9xqTMr3EQbWDX39Z28/aK773dDMq8FHp89tvv8zn/rEX37tc1/8/B/81m/+yp/80e/82Z/+3hc+9/sqPLvrYkIVlBQySGz2dSTIRp8Ic5WYIZ6xlyGPWSQFoHeBJkgCdsp8DaBMRDp0faaj0OClMmmeeLuxwO0uXg0AH+IRfMqbgCAs6084UFgsCEqsALipdUOcpBegMYgLfNIKNaybMIfhRCe2oGRHJOV6Xq+CfQVJbDJW52hXpF5yrqwu1Pb7ChVko4a1ttYcPW1gplvURIZHgmVXWM9qb481Z8Y5ZYVqMB+2u94uwktq791sHJWJNG8WomzYgH4YFQJQaLsyeBVW1Cm3AOqrSm8Fa0+oypSxUX4e40iIo8+tKWTL5ceGQtwaUBpb3pu5ge9wCnOJBGKACqY8xikG5lfcH0v80+4iZ1ha8PU4yJn13/Hvun//wfu+ft/3v/rD733lgR9+TccfP/DN9VqFnHJslRciG2w726l2dIkiqFIwHJ7AOuyS/m0xkQRMzboyQTWEzY8u6Ej8CiXgpv/YgaTYr3KDK93qNPVNahyCHanKsAidpbwC327nclVGpSVIDXpq0gDIYOrDgkVYqjKoEpGMy+YBoGbsUpPglu2yumLdw5dlmXRZuYbsJqfRHrXRTTrbqPLMEp57ZAYcSUxhoyeqzb9xhQJRw5LooExvlpvksCjiGcsVteh5OSp6J0ZFpGIIODFPzB/eC1WzCEYlFsNLs1ZvGeNIiKPPbe6FcmPgNGx75NngG5DVKo+RcRAeDxmaXFMl7XkjTuTinRqtO46bDa8Gtd1K2junjdwPvvuVn/z4r35079e+8qVPf/Mbn//6V//k3u98WZu6DbMaxF7Dg97MmDwGjSYKgLhkMDmxGTEOrWsUEvMnkUYrQ836WGHHTN7M4HZ6UlqyVCNt/Fupy7sXEmF2/6oH/S6nPb8VTdlChjPz6VttqmVuuH1qNrrMghOjhg1VmZkyYCoDW9awQwB040xhkcC1e7kEESFAcktiyh2gyeMV23RqLQl9OccaNjG9vduMA2ucDLV4pVGozVLM0TGnTY1qo6PKxpsrbU6ykiyKyK4QyXsQfimc6PRVxYRxVvIpCtMlK3/16qnNS1l5NROBpbpq0o5xJMTR5zarEEM3v5BZPauA61kLwT0RUq/5WH8xTNZWWg3jJSygsrD60rHFXmIEp2PAffqdr/3mf/qlP/3jT4o5v/OJ/6D9m04/+Vu/+rnP/u6qA9zBey77EXcUtgQURw5YlMfLxZqonvh5rjCtBVt5zoEpi2jPaQUgMSCZsYfGFirNKFc6QgZ9gueAdW74FFZQDg8dyDQwMciguNeGlC1NdNoaw6Jqr0vRM55Ec0LAIBa6hLoarTeQFErkN5svKsZj9vmoW6gcgN42F1Taadd4Ijoyi1UqYfGnZfGHnXmI5BE8JqO1dFwyPJ4Jc4p71ZckS332C5WCwcwg6OxvfJfT5nC4XW0noJjd5QbyVaUANWshTkAdrxKC5ThWEO/0r5lW8lPPbEviJiLhYA+BnA9SO/gcs5oY0IxsPcskd4ffYoJJn6Wg9VXl4syLP330ew/d/42v/fln//yez2jx0Vr0e5/8NXHp1X0sg83RfIukhQTmpMC229KiotgDkeK/vW/EG+KRhm8rCVIHz5YVg4RL7alOHtpw62mg0z2FjMaA4UA7TY0paiJRqDSZS8iAUY9GTUZus/hVY7ZSPvVXQpP1RjiZceJbRcok6UuWU1jcztWW1HUasrm+TgkWqxlr4DX/wU0bWFoN3A5YvfsNZCWJb4bK+Bxbe9q4hkmdHA2MloutVQLHyC3z2lgdF4kmuwkUtv52CPv8KEZHpgh6y0U+UogVSyRBt88dl4QD3I5xJMTR57YUQlf+NnQA0akMhWxVCGC1bG2g6SAdR48oBLwahaqSPajDib8qyTnHNDKcX9z/zF985Y9FGN0RaS361O/9xve+fc93vvXF+7//Fyu2T0MVkplbalcZR5ON5G7QI4UzkY9DFtFV24JYtzy7hAY+8jSzlbukskt7XOOfGQ+PbsKiDn3PAowSP/uNcgKMVhVFN4YVjqv3fr7aqGJ0oqrj2qKLUf5doMfJLJqCMjU1OEc41lY2KumLbnXadciPCK1bTvvsIwW3cZcM6BlronYslSKxhZZ+lYdPTPiogSbANGWC5WHDbQFDCws3QopskqDEVBnABqUNJCoNRR+hHIOwEzM+4yKi4FhYH4BKJTh3Yyp1VfVc8j2tpAbEvXf4B4FlPPMxljLKEjcxHEY6nzFfNLASErvMIWfnI9g5ZzeQlYCPUrqMKUXtixMLZ9atfOQ7T/zk+4898p1HH/q2Cvm+3CMPfuvFbdN2YutSg/gL/IpEm7eQLczBH9UYKI1OruEhZtTLehJtw5MmnTa6evDGpb03znwwf2rH/PGNN46su3F47fzRDfPHtjhHBN+hltpny2cuXZ24MfPG/PRrC5Mr52feuDH7hk5vHFxz4+x00ltl9A7BJqD/2Or5qZULEy8tHHhFBQ1y49A7kvnDHwSL6RuIezpS5ljB9qZNO6ZXNegMqS7wE0BHuAorcK+blapeXhyyQQJWForKrSVGM5eSwhg/U6SgKVBJJsNJ+ooSFV8KlBNlOFNjCuLV0o8fgQ0TqZJ10l3cN2k9iAWo5hv6aMCo5JF96gHThQHBueo72O6QQnZlebnAMQgpsGExYncMnOlwzCstyazae7Q8bjK5ZYnCkEigKG8biJMGvLB97wb+CdeWja+8sfJJEenHD3zz8Ue+89wzD7y+fVexFF9gthmFnYQBNZpu0RPqZhlMQZeot0p5BxeeDFKEgYTp1Uy+sAvaiAz7wPTCxAqO+16aPzUD6IvDas/sBqUXorNrIcD0ahofeJVeEysgw+lpY1re88aDdQDQENRLWxb2Ll/Y+wLkEfHEIs2omj3PqYZTDXV4nwZHwqVQQtZdOXz5xNShGeTg1NT05AEd5w5OHp2b5adNDa/oJsEbpkp2oY54G80mlLQVNWK2SDJ74xL3yYVaHl6DP4MSjDpMIFinDDjQ1TNStp8DD8e3iXulxuTMUB3WBjrrVUdCW7KGZ2De0rOrz/7fmxee8tOMU9XXnp/uPG5JM9Vng5MZ7/QfRZY3cd8SV4KSbMlIUSqPJG+/623boaGZjoVmMxBn4b4gJhk3aMAv3hssXNu186WfrH71ibdf50+O/OTHf7Xsyfsf/tE3vv9X93z/qbfOZxFvzlLA5C9007DGkHWzej1I0Rzpmocbg9gQpNPA4qFUo3HObZmfWz9/9D2tJOKAWCFG3ZhdM394Z4MF31KX/jolugnzoWUL2x9f2PooBAgNtv5kYcsjC3OzzpfO34FXoHn8dZi278UQZmCRGCXZ/ez8zqcWdi+bn91DF/K6VI22h+bPz4gtxw9NHzqmdObA2YpTB2eOHpq9MgQxpOVSnIOUvQylq7ThaiobGFwY6GT+tPBxTI21sgdoY7g3LsHeIRaBVp+lQtZVqhFqcQMtHCPFJTgDUcPerCGCR7pAv9rbFy0ZxAPSOCplEfOyA5D8JoOrno4GYT5AHeNIiKPPbTZyGIYfbVXcGkc7WrCCrb/MLgrxRQnzpx8phDM0C74Zsx4ZjfhI2WVwfSqnZ999/PWXH3vwvq9/5Uuf/uxnfvsP/st/+vX/+G9/5Zf+1a/80r0T7Q1Se25zUZbj9wqzC33SxCmxJ0gmgyDi5wFtdQqL0r5UxczG7ag6f2bN/AdPwYfdywDx9icEaAF9/oOX5y+RfU3pM8RDsUzIr++d/+BJCLP10cWN9y2uv3dxww8WNz2wsO2x+aOzxkELmJExf/Dpxfd/RBeWnZdCJHGGGvFHlZo6VDw6gYZll2P04cyJg5OHZ6ZOnCsrsBo/K44Nmkjv4qQTY513YmYDtNs3uHuo4MH065O2xnFsL9AGtFCTMpgOnAAPsMlupWUuoYVyr9GxRQQrHAiPyWhoQkScf4McFzpjc7NUjiWCeavGYmK2tA1b0YMouJ4GDoq/G8EpI9jqO30iF72tq22wYP+IgzjNH9r6sFxQa1FzjfdCElxWHR0VunuQwTbobtVJIVh+eveyt157+r7vf1X8+fN7PvOje7/2p3/8yd/97f8oeXGv1+ImfvR5idiHk5jd3xfhax3Rtvk60sJvDCVUsF01cCYuc9QZjWCocO692sJN6v7kzflD3lCJS1oWjs+0gLUbyMylLlo3dmndeBbubXtsYftP6aKaI7O1lVcezXI0t4Kh9r40P7O67pq0yh3fjxW5NU+a17Bzr7KRM084OqNdOzN97tTUuTMz/KNYLFr6q8wqgM5mr45JHElzJlIGTHTwxhCynKaBAUANV+lLl1Fp/lc5V1tWGpu3SdQzeVByaZth/MwbV0SqBuFLenIjqxMMAUsmg1gh8Z7FL2rNLonTVjaKtFH4DB5OQ06iX1d16U7fC9lrUlqA6A8ZaxpUNy4p205sVjp3IF2Q5T7F7PIUo9ExXsD1qOjROMbC2o+Szs9uvPf3f/fX//Nv/NIv/7t/+S/++f/+z/7pPxF5PvOpT/zeJ3/t0Q3TbQnijUHeAHYvWPPycqKoUwxhJ233dQ/aNThLHVUjN6GJyoiDgeHNyyfnT709P70K/rAObFg4pFWirRXT2+z03M94nMD98EtixeLmhxa2vzg/+0pxSUSSHGcV0rAJ7eLFd1nW9r10Y/YtnhkcWTd/dCc+tBtlhYcdyanSCt/G28Du8tnpc6enL7X/+/9zkj8e0ARkOwo+Is6JLoNIz+sguuAGDlzjBu25xAh0bFdz2uMOAdSsEY9LVb9EomStPLaoutS8VsnpI+BWOadI0lyTRM0hw1d2Mn5WfRPFl3WmgkXSVHpNGRQ59CR0Bql6zXXHr1bzo2J/n8D3GxqCGu6xqp454uU4NBGV8So0P/bYdCdaVGO9ZXCxsb6+oPH9Mvvqx0ef/bz//ckv/X//Qvu3f//L//rXfvXffOr3fuOr9/zRlx54/dT8RX9PL6/PEavEuoyLPXvzuwtO5PGvBN/JNfYOCpRKUnsATQYRRPo48xd26M7nxsyboHzm3Rsn3+f0yFrdHfGM7hyDZKig8MaVCRaTg++wWO1Zp5sctmTiie6LtCKJQt5OECcRePJhbdW0/sAfHlpshiqal1wbBYyYwAgABYtSLzufmUunWYUunJ/R4i/CNET6jjTHsgieMBrmA7JMweAaedgsZdFLJVtZ11Qz62MKeVgPiPdErT4LEQ9XuwLUZPNskKSGERpyDJIaGTKnb6GIY2lu5SWQQQ7kGTQxNSUU34BBYlC1vygo8TfoDTM/YODOpyHBliJX83/iSLUeR+1VYJYxjoQ4+tyaQjWl30+T7xfytWu/RfbrYT/lOGeTJPEX1pZ3YrzdgevLKfZOyrovyr4rmEgyrkklKu9Y//C3lz31o5UrfsL/JH7n+Z1b+Ws+2/gTwauOnG8GB08txhXaok08bvVSaXGhV2p2PFgjtEv0tdoMaJAx4IVteTA9P7f+xkFxZidw1ymbrjXsuDypGldiO7OOJwcSrTnTexbmXlzY8mPfFN2/+M63bk4etEvPkTUuvrX4xlfnp1byvPvQOzy0OE9acQaVjSqwEkpUls6eqCyNt29cmbl8aurMiamzZ2caHFUfh1OIYoi7R0kZfuXI1Nb3D7y34YCOWywbth26VIk8mZicfWlyatXr+9a8r0tHJjfs37bpwI4tOk4dvXDs8sGp7Zv3b9o4fQZP8iCB8Us35MOjU0dmp+ZO9KeyuFo6Xzs9rTu3QzNTUxOTh6Z5eLhvcuZqGFucQc+rc9MTew7sn5y9cu3w4R2Te3ZO7twhPaeOn8+C450Cd0FOMY1Ccawfr7HVD3q9bem/vc1GRncBfAdCjRvl8nvQcjVxdK6RjHEkxNHndquQ9TMRw93oZ3KTOzMfcyRInT86wpYAGk8RYNqgjb3TXRywikgkD9cbxOl47ejZA/wpxo3vvpR/EfnmyqdUzp/12XOIPyWHPiMphNj45kd9c6SylTNyoaohiakxzWGIgVYmLnNs2piScxt5/ja92o/I1ixcnFnQ3mx6FY+5udffUFFkVWE7vnjgwcV3vwthNt63eOLM4u5vLr7x5zdf+ezNVV+6ueqemwcO9vjdnHtS9ewP2SJqZ7ihZh82FaRb7wVsaf6WoqMg/Wkj356ePrBvSjJ32j7M3i/hB2HpaMw5py5cOzxp5rw3obuI3IKeOL594sUXkW1H8mUowVEZ7dSlqck1a/a//vrE88/ve/zxyd1nBNCk9nOLZw+/sYz6TYeVVf13oaNPwn1x9tDE1IG9k3Nn2iIGdQ/Nbt6/c/vkhn1HrBKWntl3YOOG/e9v2D91gptPDZL6S7OTqt/03v7NG9VgavZ8mWCsp5lXcjxWcM2bd7Gl71Pyvc38vGDgTPkBPHO3gqOcpzQOK4RsyW0qeUT1YxwJcfS5DYUcMMxLADgamuZABdLphIzohB0+mE6dRWaF2xjH8SB96a6hHGn3DQPpSAZy+pk/sf7dt5evWfV0/iDj5g2v6FRHrUirX11zJvQwT1AvIsTYKTiiJQ9P2lKUmeN5a3cXl3G1kGrg4lCj1hj1UMcWzmzg/WZey+x+beHiqcXDzyy+/yNk4/0LWx5eOJ3Q5sXCDi0si6vugT/rVihsi3u+tfjON1Vz8/UvUj8lCuWJ4oWbO74IhXSblKfeh/ZGDSmvEACLWpn9uM/IVsEptm1RhKePTp3aO7Fj6wEtEbsPzflmL7txtWHLUKIyIDu69cUJUUJUGR1Ely7unXzuuYnnl88co29YdPrS/gMrVuxb+erEK68c2HO2DUUuV9+Tu1/e+/CP9z685rgq8VV5G+dfOTqpNWTP/oNXkrbIR4cPbtGqtX/6pKGFVJi0oGkZ3Ll99iyn2KhLlw9NvbF6/ysvT6x8bXL2PJgkOvaAxOWWYsA9L3/war5dXt8094+O/c8TnCm86TBca9cQbFTc++AkUAciW4A7fC9UK6ml0UM1wC6FmtV+GXAZSqDfQCF3Z5es01SaS7iMq+yGTZ6xV0zc/k6dnX7/0IGNs/s3HNz/3tS+tZN7185Nvy+h5vgMmliYIptDq21tM12pl4w4eoz+ip+19VcxfNOJ74JR8EcqIhsBlNM8Ttj1FA/NtDHb89r8pROLF9YsrP324rvfW1zzzcW3vra4awctBVDJ9ENac2DR+u8v7tzBFmLzp2+u+OObr36OJeilz3y8WxTK70E+/HjDb3z82K/Uw24/36t0A4XaXWJTpq1dXr68J3GZoVQ+v/PAk0/tW7Zs34oVkwfPFbwyguntwnWRbf9bb0y8sy+LDILhBaDjMxv2v/3mxOYpUIWLtBRoI7dqv4Z9ZK14ghpNRKSzi4dnn3hy348fmTkChbxFrOc6R05pe7bnwMwxxYhAqF6rzVtv7t86W0sNwIXtmkWWnphaOyHCbJqS7bBCil2cmFR7Efi1HcoLLAiAR6OVXY38+aMUlPl5UvgDkeJkuQgiXYAkBQkjoZYBY6YhkylIwU6voKJuFsY4EuLoc2sKBffG4rCSQA/v2cwTuFT7ooKvd43xiJ3lU0BApTNQVSLH6AVtvPdjB0hhlEWi1rVzu04f33l0ZtPhyY3i0vTEOhFJR8m+ne+dvmitLHFBfGG14XnYYjphCLNHAcgff9W+y6oCILnYQT1BGIzUoXDsOVix5i+1sCys/cniRSW82cWt32O3tulBcenm6mUtNx9c3CRSfX1x9ZdvvvqnN48Z8dv/DP68/Fnxh6M2cmRKBfjgzbc+dfOlT7Pl49mdnzQQRXsSQOTP5YCGEECV3iA4B3FXE7fDf4OJFeanT+x7+pl9L7x56CKLlbGeFVJy7vCrT+xbvnzmRC1x4ZW61whac7jz2XjoEqQis2Qj9+qrE5sPe+nLgOzwSTfz1+f2vLV/3VoWFoOyYebizOEJrUJTJy9Wzpq/dHB2z4EDe2cuNOwSJpAAhISBa6dnJiempmf5LgWZ98rc5WPcL2mDevhM4mv0B2B4ySlPIj1vnJU/ec7kn4Tmh2pFJLx30YGmu1cCsBFtGRN8BjwgvPZE3NirxupdvcMffpsb7bbBT2mWqG5ethWAGrdBpwq8a2hZ2zYzmx9FOeQ+ZXx5LROhdLjUxey6OHF6dsvxg1tFIS1EWnz2fPAmm7r3+CuNm3bsuOwYsIxEq6QW64lipW3nDCZQExo7xxuLI3gVwqCBACe0sTFoue3M4slXeDeqPRtfL3hu4ZLxeuIlrTNZPXjadtZzffgBmz0eeb8wv2uNQCb4zs88yYtRrWBbH+V4ZFbzsi25Pjt/4Om8pa03pyd1yX6T/tmX9wWk2QL4stQ7Rq5nH+IMqsanFuemX14xof3P6lX7twn3WmcCNdl7dFpkWLX+YBiC4T31xlGnp3XjseHdmTOOmiqvzE2vWzexbu2M9s/Wjbsd1Ms27Oqxs/u5rdq28+AVV8bV56cO7N55YC+7ONuixqdm9uya5NkA+kMhh75gAKLOzB6ZnZqamLngtCi5cmx6767JyYnZ8+Rog1AahqiVlG1+rK7wJevVKl3y0Vn6FmfKe4VAjj5tgiZgHnThE3tmjCMhjj633chFV/sLt6bQvZNKFcIuLkHxRN1JHatYBB0DeZwMhzAINltXs4UjOzetPDyH9b7Or64h1eVj74s/Io92cft3vyM5sIfCru1vSKaOTtciU1wqtlsTeGIN4VgVWhmJ2jTGQdXl/LYtrz391mtrT1PvBtKfwnF/O+FJeMJN/xsLl2zjtT0L+17kBmn3Mr5DoNsYDXJyTfgwv+tpahjk2PzsUzx12PsSI2x/PN9OMHVPLEw+xK2UeBWCTe92aje4a2EBH6Df2O1WaNjKpo5FJioBbSePb53Q6iHZOMmG0BTi2YDu2nU3ohsn3am/+QZ36roJeffdCe3fRLnXXtM9z74XX5yd842Tel06MClCquaYfz0aooaTqKeFbm5Gs6xeNTXN7jH390emNu7ftWPy0Gl8Gwhdmpla4/VKc+m49p39+3ZPaqenZjt3cBTB5g5OHjs0c0WwBtlHrpycDqnOawTN27IJk6aQXaj1oTKLJF+Hg0tkQITfhhJicIu7TKF+71346T50G8rOSrKIMI1xJMTR5zarkHA8jM58OgZqLuvmIXlLmc8ZsRAs+pq14E+kGvYJ2ao6owMFuTiDM0vbvPk9Ri1BWZRs1d6JVU+/t+6FHZtXZSO3c+vqbe+vFH9U89qKx7ZNTWN2W4s1bMjp8XsuMeCKEkEYBFCXOBSdrx+/tP+lTetf3vjuS1riZk9UF8x02BZOreILPuKGlpc9ry9cYueDf6eM+y2PQIDdaxeuzWhVgSc61a7slOx1KjnE14Lc10/edMMDJQjPwsFn+daCdnFbfkzHA1sctsKKnQYOzNjsXlgc4BjLiMyp5RRVITzNPAJfmry478Dzy/c9u2zygzO1+7p4YFI4fmvnEQbPA7Ssxp7RcBxuM8KTSxOTYtqaTYc+9OuHkJmje3neo0e2HxAtdx9qfj4xK36+t372JG2i87Erh1jf3p84HJ3ZObMsEKPaL7UbYwssEoV2fbB/18TslSFHODvbWJxgPzBaHGLUZQmy1G5ctiugRkgHiVmEpCzRFKACE4wQT5QF4L/ia6ZiBc9PKnkbTw4MQWKmCn9QGK/5EoiEP5Wi6KLTZAidDtbW7tP2yGtmVNyU0WSDzbi0/4WXX3gk/2JIEBeFxKXdO1iF8pjh8IlpMlblLa/LtTfQEZdFQ5sQPUOhNpHk+u7tzz/8wnMPLXvy/uXPPvj6y499cMSxSaiQkwun3uQbbtq2bXlkfvuK+Uvt6pl1wj3Q3/3s/AevzF/ak/WEJesD7eJIkDjhsMmT1UaFIzNBJ944sy4LlPd+y9Vg8WTbT3pPki1lXKehHAW4VAp4sbWBzgVty5pTrQZ7lfjXTewB3Bh++eCUUj77K3chxG0po30Y2MJK6K8e1Ubug22TH+zNliwOpL196x2d6HFses/Oyd37hXVGOz89qS47pg7XgDj/+OVDk++tP7B6w+G8evJEDdDs6JbcG6d8/cz01ISn1ozNRncMH4xMuwK3eM/MEsSOjj94NuLG+l/A2bcD5jJZaCxw1lbWqafSh8OHCXe6CiWFVzIIKPuxcF+3H158glQvWb7KqRM/5rkZmrkcs+N0R4guNZ0XDdMVN1Gfxe3KzLmZtTMT67WFE2F0FIW0lxOLUiMiHZ3ZdaVSV89hvBFnZE+h2aNSfBeV4vpjmx96cflDLz3/cP7+I0R66kdbDxugxEPeZBtwc+6Jmy/94c0Vf8xzgrceXrxIJento51anepJndi1/xUtPosb7lvc8MOFqV1JioThkN/5TKzIPRLPDOwEZ5k99dJ2xr+J4BcNG1EvPI/rtG6XN1j2nSaSsJ0vKmXgyfh/iMLVIyf2Tu7cPrn1QN4UHZs/Ma0t3N5dvt+wK4oMpk1mzKQODb20evCsHHrUVcSAVq8YsnDx4L5NB3Zunz5xUfUHD3+wf+v708cuJOFW3OdPz4q92zZpV6YRZB0vDJg3Wc/Pk3K0EM2Pzs6cODx13D/WqGbYlS2P4gtUTJ4sSvI2G7msP20BbxTK18fyTbl0YVWAe8S61ga8YWCINiF/aHaH74Wys0LynWt/7TpW6egyGLXBjWMVVFno5QWwahfkfImXrY0v2eZo3FBSicp+KVItLVyZOLR5lZagiDZa7769/J3Vz2zf9PoHW1aLTmKReHVges9VU7GhSvwJOIwntAI0xFK6XZ05umOFRhAV88+LNm/gKUV+p+T/KE6o0E2ulK/PrKnlZedT87te4V6oIH6c+xxdqqcFfB2BLZ9OTylO7fZvzj8x0vqTHywc9182ZmQPcmTFjdk32hfwllOY3ubBy3to3lJDohCElc9HUoYMxM+NHgtXjxzbObl98/51ew8HLgvnDm3lbmTy6AV4Us0UEZQxHyj7hpYFh+OVw5Pcruzj9U73ZxfmYsbDZ2Z4CzR9lGcAu3ce2HNASwdXYbInmr84O7Vzcs9O0SzQbFQsCnWLAjAK189MHT80feq4EFibLucF2FvOkarKdOFJfxHEI+z8AZxkOnHJj/X9PQFzJntRCTHS1cXiFVsDHQ3R+sMe5tKdUih/3LGIxH/ec9hsFbdJDhugbOsG5Vo9rBB7d+fvphnWojGqo1zARwjdvaUWD0WlRjMtjQlGnr+wfd/GV4V4ydaNr+pGaPN7rxye3Jg3Rcf84E5y6tgOyYnjE9dLT7Bl/fmCCYNfOXB8z9qJXWv2fPCmhhJzVBAPdX+Vf8cSCk2eCHlYi+Zx9PGFs+t5QiD0812EN7yRwxaOp9/imzubH+I167vfXVj3V9wF7VlnCGY5nbtxkh8X+ftyuRfyY7dsisgpe1h8/NWHhQOv8mOkmTcl86dm8appBnSA2vT8qS3zZw7ENMR2ORBDRCxOQFcPze05oD3VroPOpsjcsZ3ct7yzRzXeZsMW8ydxoSCVXGn1rhyZ0sK19YNDV33aW0I/ld2empMz7204sH3z5PQBHhLMHmOVaHyWsBE9uQ8+b9TtULzqeUv5rjl4CMYOXz01dWh6ap/Y6PTXMCaSt6UDfaKVDVENp1GvRvOAjfANaRGr1ytLjSWwjDJX7/BPMSbP5UvyLohIWnAUPxtW2YL1x/olx6CBPeWQ2/shQ9eJxl1794qdJJXyo8q2gTTDmBx1yZU3zu+c3vGGcP/++hUSESnMOXV0+8m5bSeObNMphcOI6nUqOTLFAz2tUeKbNn7hTFYeEUnC+vPeK1rcxBzdbmkvt+ypVcd8k02cCLyz0am3gH6eB2x7ceFikla+kbBzccO9C1t+vLjpQd4a8V24nywc2mOfxKK5G8f5/ijfpjv4jvZsfnINReMlwWj+/MYbs2+JPN7Oveof3r0EnfKT7yPr+Prc9Cp+bX58y/ypA/aSR/ZbjuA4zlTBwq+Arxyf3vr+gZWvzfTbeuy6cPC91/etWLHPb1e1z8yaUyG7Oje9c8fUnPZg4JLj5YM8xNuy89BlNVB3Bk8ulwmkcDmBVHL18KQf8UnWrZ05nbmsiUQjo+2Fg0cmD2ixOnAUtPgqd0QG65Frp6aPH5q5eMmodQ7VvdDcQT8HtyYMBWnDkyKz05xXTjPHNnrq+heakcqnDb3wM4Csq2FawTuUy7GevI9xJMTR5zaPE9pbTq88+Xat5xs4YEyz8nglxUEue8th2kAYJ8jao1ffkMH+SmXckb5tqNCpbreAl8nG1XObNq98UmuFKLT2zWXawuleSCQRcySijcqiDSw6Yi4d2Sb+iDmijagi1mm3pnVm1SuPP/PED59f9qAIo+PyZx9c9uT9ksce+c5D9z+667QfhdWCXshbOLVqcd13eZyw9tuLax5ZvEQbr7R+dbPzL/yNuPtg0YYfsFidwZACtEw7tJx7IR4bLBc35o/NhIEFI2BxbOHcRggjgnFHxO/DeVy+9wUel+tUN0vi0sE1YtGN4xNyYBxLurl6+NCOA7qb3zV70JCKzsf2v7nviSf3LavHcZK6N2BvM8tXCp5+Zt9jLx++WLfOJ+ePz6xbNyHK+Vs2zfNXj12anXz99YlX1x6+lO0QrItn6qERBYP7/BQr3t5dkzunFdnaMzcDwTSKnZzRmqZm+yZneI8E1o8tnJ49sI8vm/IKKHnTmTe3YVoAL5uHGgqvBg8uyw/Us90qZZAb/HeWogHfZ+97qAAyhU4PLwaGZVVytbVslWMcCXH0uR2FwtT0R2PI6mUhnuoswkHKQ9qJyo+kKDKTWYSKUctHU9zl+NTDesnCF8qXxZm+OsdTalb12nLYawvXp/e/8cCTj93700e/p0UjX5wTl0QViQp597pv59sS7dDEtzWr+KLqow9/WyR5c+VTIs9Tj/P3TJY99aMXnnvolRcffW0F/z9CdFr17vsf6hafBzL8TUY/dXRgVHPqNdaZDfctrv3W4juPLl6gjbfg7MIXjy3niwtvfe3m619YfOPP2cUNqdHk53GCdoAv8quhrY8uHPFDbWM9zWy4CrMLe3/KhnDDDxY3/JBnEp7UO8PnaoHa9+LC3D7g6KXA0JRn5o59wHuefKPssZ/uve/+vQ88uPeFHfnTvlBIhTzq9Slqz7yx99vf3fPKK/tWvb5PHd96c/+6ddP+d32Vzv3utb7r+d72Q1kKVEO48U81a4Geu3GaL1bv2z15+ExbYYJ4aVhAUkutmcfOTe7fumly03scJVveP7DpvelzRkUxjdmPawHU1KJQW4UyZtBIYxCiqQv3msiiNk797WZE60G/MSnx9r6vSD4G9uR62xLoth3dGEdCHH1us5HzihFdUbotiw3cVel6QGbe+wdzWtBDMM/aGYi4QEePEKfbZqcQocfjM2ACI1FNHGdvkq6oVPeTC0fefGf1M2+sfFJHkUQrjDZ44pJuada/87yoFdq8/frT4skDP/ya5KH7v3H/9//iW3/5Zyrc9/2v/uC7X/nRvV978L6v61SVf/m1z62b9qqiVI0IYdyDuuz8feJlvg4nWfedxTcfunnB32XkK1j+/s78Vr628+qf3nzp0x8/9esLk7taUnR2l/6HfB+15WG+xbPtsYW52TjNs4SNNSnPkVSYfXTx7W8srv4yx3e/mxeyPKjY/jZ5Sh5gcHf0PWfufduYXTJmE6cGz+hUnVMlC9wrh5uKBcEhBD1qEbOLuKsguzDNMQqs3Z1xDIPEt2oystoEXSaSlyBm8RRRQ8fSh0HSy6dqqXEMpJ7EjTEn6I4l6Id6QmCjhBnSycON8dLbk7RUM++VkusLwF6IeHt5p387ge11vnyJ3izH+BFrly7NMY+khSu9mGqysgojEatiU1nK8J0rPQi9nOmdj40AAqwgOcz5WnFtGzRLWiYL6tKF3U9rDVn96hNai0QYLSwSrTBaZ7RMSVR+9aWfiCpf/Pwf/M4n/sPv/+6v//k9n8lfeMwfqfMf7/7W+pPJ0x3HStj1l4pdn5yd+hDGXw/lK/T9+/Nuj/C9xsKWBNBgrBzYfIgbbemS0Tydhso47VuS/S/ow1UWkCZjiqHbiOQLSjjQD3ZVjuTJFVsGn5ZFYM4Z3WRAvUJ80xbP556wHl5Fzrijo2liCG0pYy/YMO4TaGINuGt8AKMBE3pLVlQF2tsNe8xfRwjHrEPNFWSDe/ANUeNYdWEExkFAP0tTW22y4Kh9W39MDC81NazXnHbqLZLUMFFZEsY4EuLoc2sKVeIEATZbqTTZiOewtlNHPyMyu7QohUVcKlf6JgfPRi0/vy+Jc3u0cj9qbiw6j+JEIDjQkgZsG04I4lHGibAlrfNbd7z1nLikOxktL6LHvd/58uOPfOf7f3WPmPOJ3/zlP/gv/+nLX/z0H/7+b6rwhc/9/j1f+EOdqtk3V241hoLOoHkJoM0oNSjU6phvMQ7gdqVRm5aMIIxKeekmDeMoK8ziGfA5QdS3uZr4y3jA3YtDLrVbFEux0d5roMSBuQry7JD8FsBIBcG9meNYIK4utWqhT2/Zthh0N/o1iLq4JcemWyz1aHnnIzgCviTKNhpWewTNW7Z7GdTNWJyMA+u1WyUFyK/Gdl2s09S8J3U9W8cQo7Eo3PDtej2D9SXUGF1tEJXdAC71rR01nZAlHjAM5JJOuasf40iIo89t7oXoTJzCQruAv5xPgnGOiY/qapxl6sunsMWuj09ZYRMVR9QJ46TDIEmCNG7KucaT47TErXXkv8PHp3hTBdaowoHLZ85tefB7375H8nuf/LXf+s1fEWf+5I9+50t/9imtPJ/8rV/97f/877/0wOtnjHuHcCTTF08sqadSKwBHhxCd3YCoB+5GhkNOfnEuNFxCoZKkIdkeGFnPprahWWmCowU3ahwGoYyYHsY0iR8naDQ3SJ424jlNjXir9mSZ0DhHU9e+Krr2RZ5m1qF5kqs6TUQAvQsWEF9LLmOGaQWGWpEc5TKcNhpcZTzQ/98E9iaOblBTm6t5e9O94U2+G2hYxjcHOIpIklEiDTQI9JFOJK9FvbGZA85Tw10THGu9GhU1Ttj1X0OhEIDskt1kP7XXJPYR73flKcwW2j6++VHh3unTkfNVwhZWBKaGZv2uMBsYoIkUsgNu49gN0j3ABYI6ZSvlf7LCl9vzf1aGr7i35YJXbD3klgye/5JUDWpLVpNCJ5lAsB1RwxFjbQXI6xgFHPDECyaJQwtvrQPUqGC4SwAKoxmjgyypMY7NyULt4LFgV8d4CfXUpr9oZ5ww00O5GV1qcQvhvYCYM66pNr1l5bK0r3yRcFjKjQpZHIWvMF+WsuFxwq69kIjEES7xK6ClVkcTyuGn541WlVycU6pX/o1N1lj/+xMjs8gz8KeVq0ZwtQJp6T2RGA7JO7BzVeWG86X1soUaiy/d8UaOx/zBjVeY7Ag9gcp2bs/ihh3+vfizj+f/+q9/9rOPF+r/cxVw+c0gGL15nX8x1MT/ba7jXlBuKK+IKrS9JpRjFns8wahlHQ0bXp3P8gWntElUOu6NNnoZ5RBgyH9d3Extsori4tH8Sir1hjapt47Jrx7fyCg4BgcGsbGCyC6ShcuqjwTHDcQZgVPIYGnPGKp+bJy4q/sNyunUUmVfgk6tsjPTNXZ7r2xlc4bTFkeOlIlXsoy9gXMa4EiytWlv66HcEobLhLIOi8yWmG8TTNooacPtwApQ/QmRWoVq9RjWmbbsNDoV9Ct8LY4mdtaAhMx3GUUtTKCZ00HFFNhjTv3ZiTGOhDj63JpCQp5xxv1ZcWnAqDF341xBnxR+lX+89fFC44b4c40VgMjFRxXgxCbeafUOpNwnb1YSinPl65GsKSdWWspVSy337Jh1qVwvqS61hrRTC236+EC8LKLNkpGxmnuPOHfYnMjFdiu3sBZdstMT6YGTbZY2O/X5f0odrCASaHoN9Jo5QNaV8eGw+PhSSaWwkV5pUGyhixrUperSLiUDOv11TaqlxRsEVXqh9r8qRB/HlJZppon4jWrcYs8Ul0B5PQmIK2w7hTwqyEpLvdeW7PS4RLBCGwqhVtluzc97itAjq0TWHJMn8xIINj7WShxmKDRJysu+yarqSGhGsWE9DXi2EtbTfTPItTv9sQPk8S9MrBATFF41op8u+LEm9Y0GDoakspRdn01Uw0o1aAEwbZxcQx7juLxmaSbhUE4Bpdt3n/bGLuN0tSEGjkr7d2C12/FQcivpgH2X2/itqLHOLPixDWJHR0whMmuvscwlgRE279/KBAZp/2UxRPo5ne0H5f6CtZ3W9rQlqsGTgTJtDGsw7f0n+QtAF9DL1enbnOzpkFYzQhLKOfUlNBk55Yi4u7TNVdVUQZV26cmeXygMGV3pnMrgFcDkHgzHDg7J4C6XT1zTG6QGGNgE1Fau9GgM61lqPfFOhIgLq+Q+GEsgTFGIVKGH8KUnawv0y97vYC1cXsGSBUzIcFVHWo5xJMTR5zYbOVvO9L71x3H8m6TsnYrKFmmcv+QdIxMGL/HZe7iLvVC/E/aaVje1LnsnpnHKtuwEZInRGbBiMCEBtQTGUO4LdFnbGjvBsGoPoVUZr0XhOo60D99KT68kCqFVGmljidW1tYsCKhdWYhTkabB2agflAL1O7UnIEBp4KzvSwD5MOSsMlwq4XQpqDXySuNriLD7sUYFjMgiielCY3KzTWg0UGoPPaVv1poeu9kSj0yRmnbpZ8lEPnwCtEBiRtR0qX+GZyoDSs5F5MFZl+6evkOGYtRpMqASnSR2+wM9LSlKbxArUPs0Rp2D0928kcNXbv0jfAbrgm6j2ppXjSNl23el//LYNMkZmRF0QE9xYm1CzytaMq5jU2htYgNVQM/QN3wY+Izu+5o+PjdQwTmCt9oqQB/SYLuM1tSnfFQlpg+/82rsnKg3OyMUlRnaKEg7agylWG4Di9sGQyscUNsoaVkIBBTSIrbAy0YepWw0je+votbRj3UAJ6IOhyjJp0MXokT70bVBLL4vxxyVWOcWF0Cx62dSMgHsJ1Fi9oUpHvH1il2KdLZW2cVGcKUfF+cEfqSEFrsZGOzluxxVu0B1i56smvUYhS427NLo6SaFV83knp5VvqSF7B5tjurY3RY5FHUsT9C8rDCGrLenkGVjUJDWlYRiC1GNx0yYd09gtxzgS4uhzu41cedYuC7aOM1YYqYmtU7xsxyHqAl6ZlRxgI+P3JRYyeEseSEdhGKjoqqZWZEKevq0lDexTq5Q1GsRU3mWEMK0SZwb0UWyxFG287HTMqYZLOiWj8zt79PG7vLIRuzBENb4aQrZ0rpBnKcianIWFJaWvKqPSiVQEM2eG08pf0S1rAlYYNExqu0Y4j1Avz+DwhjDa0MVxxP+GQuEGo2xdYw6VghFt0oxjtcwpTlAzYsGRFGOViK8hmIxeECTQVgNN3MbeaxuEulTpLHnB6w9pgltxXTWxw0nUiCbpizlgyaZVXlYD36YSoygvc+jbB6mhYIsKfRcXqlDvx99I3sDm3dFHH/JjhTGOhDj63IZCUcIuxvIozXxmEYVW9ipkv1T7dCkHWUag5pqk9hTsphiZiYa+AYTbuLGOYILRhK12hwOe8lSAiTQysOsSIiHmmyuJVpqRDp0CVahT85BdqLUNCBxIR4gsWDes6RJhEGviU/ZOZoX4EKpkqWll88erDekWzuQpefIxOsRk6GG7MrgTgWkTYxFaWvxnRKlpYELbIvxoIVjJKUbFoh4CW2pjK6CubAEt801LMgjwdbCUawJBi8cx2WivXhiF5oX1humRiRjEkU2C4BhbTOwGLY6eQlbAjczSBoROaWatQI5ruESlOjqPgN78iEY1wDhbNZOKclsnXM4LpcgYR0IcfW5NofaaidQyjLL053e5RMHLX7WXbcxtccBsdtxtr8ly17gsF9h+m5cguWV84Rjg3PCHxINfghuyl7cuihDZ2lwC93nzmMp+J0ZShzzsl0hyal9w95EFhNxftGRYHz1XmJmlzAUk3XP0QsFWhAZmRdvZu9wkRFIBCkF76Wnr7I2EudJHcbJ2Yoxs2oRRBhl9C8ro45ucKBCmGUMDxNXG6ExlXF0FsG4sRg10iBrd2IzgMa2JQ0C951Jo+EsYXf/MJf1RjynoW3f/AQDYdegLDEF8xBNhdfHcXQyVdmoBMD7NIEkfUskv9CnHGzaT0yjG35CSmYZoeGgMc7QmbTSGjZJII9gYR0IcfW5NoSWr2CD9f2z0H7EOYtpoYjRrCjklZL9nT+EXR87HZlsFDBCAm9rcGyWjj9HczMGr9G8wCWc0HqAcIW1DqqqvshDfdguq9L6LiQqmQDOnPrLBYEbpmVkqTUoBYtzGFPfgp0arFaZ2br5Lvr2IY4zgTGmHlH+MRaPK76zbjLYUNQLQGE5haMBQ2JsGsYJmPVnkcQ6G+JlqvBTUtvYZjQHj6oTAttMMIV7hHt37LC1AvpqAAlnXaHz+w7EtjbE2c1g9kig1uI/2amuZdS9ppY2sZgFDGqAqDsHMpEKOCS6VtcH28y20hYpzbYNnBUIqFgxRy9BFKhBJMZIxjoQ4+txmI8eIkbDCdPQK6Jq2iawpnRKyB7CnKLuAqfzsKVwKPrrL4jULoeIlt1NaoqKwOaK1Bwss5CmSX8eHEewvBEXasuCyV5L4lP9qnPa5tYgwRdCTLlxiOlpyCQTwrbwaMFsvY5HwUPZjgwXejP0iyZPoQZgF0NtLwKKlkpSrEAg6v0R55xQrjLF2TtlVutl822g6tYJzR6USH5u4gRxLG5boqk9jDx522SEuwKgEoiLiSrOOSqlkrRyv3FvynM1GQU63zGrgNYQCbLE3oqpEsxTZ4gpAZQiZP8Vk64D+1m009HZOiyzMiXP8Isvg7OtMexjWdm5Ge+6U1CZwhXIqjHEkxNHndhu5tqpATROG+VzwPjKEsQbMwTS1mCbqo5Y3/sQF5AwHw+6Yt0M52ukeITsxl2vAopmauU3wxF27xPcS8l1O2TvhL19qV4E+BWIZJkRAVeNGtY/Y4wZcf52fd4uRm9eXyGL/mkWX2/MnL3YWrthAoCAX2VF4Kc7EapwToNjkSg2xOtqCy6Z8TO7vpiPBIvWGuPDk0CDGvdgCYaxGZvQRNFOIbpXsHGIB2kp6p0RNuiCOkeJI0mxrWvYI4eRHp4i+RzOQBjE8GFaXZGB5m1dAGbO5AtjgCoOnuNEbd5FnWrz6YxsEj9ldxuEcUwPs3InAHG+j2lrEQznDvi8eFO70iVytMOzBwnu84xQiAV6OmTOQI42p5WvKCc+QkKqjRPV0x8X4mjDXgwFaqotqGpfUnhGqvXFQgZEHr/u/ttQ9er0cLGyVxJt5NMzXAoAa3GvZGp6oYH0wx6/zGccvdhav/exjf9MCCVU6Q0ZpM3ZpjDySEf506RTy5pBjXovFe4a7sZI7OhYTFEZzxNqKQiY5DulivGa58L2Zk1GEBkCw0pOzEoFTFIzUJqaKCdN2DT4OMAgTAn26JAtkKIBuc+q9vNOilVdNNTaIERJxPV4z8fwGnyh4o+uHNPRqAzp2QwZJcBMsk4f8OOoZpo7tjKNBEE+NOawHtUJkqTDgizb90UJWjpzeKYWSHuxBvOOEZE9Bkqx96GGHxst2q+bDI1mjUu9euL4GzG0r27x0jwddk1mKkInxEF2mUAOjwQ51KhqokiRUOyszITmpklOhkGxEGNLYYqe3QcD3zY9GvsjX+NOFN6HttSAE9uJm+o0yJzhop7eikPmD4TgKX3VXIIS//auCEpZHFaLnopNOG6R5qUDj5JVCFoHhrkkwMoWaD92rXE0oE3cvNQ6xjhXrFj4qc+wx1SAOZTqOmuMpJKTX0E8Uat1rkLbQsbBEYRVicnKc4oUf5A3Zzhoelw5f1OAFtK6qL0bhw6C0uTTcY4k+3Qyp/RQk0XHgjN+xgsCM09zrwhhHQhx9bk2hykw4F9dELQ8U5ebsCO6C0sCsiPvqGA3sMhzXrqaB+9ZDWB7mhDY0dvt+aSQATbo+AoEWqJaNQBt5GmfJZQaQtM0ySBpzdyPMbYhQ3lfqNqmQmhyfFYmUZlHZt6E1frbaS7Z/I91NUUuADidbmEsS+IUrTFTrKk7GxjzAqNEQD8LqCmfayLmEW+Qx+7Z5ptKKYaRy+1mBOJN0HnKqS/oWvGiMS0dx02JtJ+fbbnBSg+BYt+mRSuzcpQXRRkW3BJ3KYJqUoehXAgUnfuptkti0+hIDrrMr5FUcXq7I9qxvPUpUz5f9ZCxzmfNNzA1uPZjaQHVlVhj/GerawoHn3itCXw/IqRA7xpEQR59bU4jhKikqPI6HvIMrBehEonnZjsYRzTsVjOZlOnJp1JUyslHf5llRL6DWNY1Ns6S6mOeYhX64nsXdcfVusG/POBo6Djw1CkxwnwbeN7qmTimAyxYwNw7ffEmVffAuqa81wcfijAp9NIHAq5PI05ajIXH27Qd51z40QNGcZIwOxqvMtC3g3t7OJjkPo7tD8G1rjPMTMh2pIYIewffcplZIlRkxk2G91YnEzE5Ctn84JLmpaZLpiniGgS8pWK5pzHQhoQ/NrB6jmSRiTo4INdkvYH7zQ2tQTs5mO+Rp97rGSUvQ+CRrJnRKPfhhmQ32ClE+5T5npK8bZ7T0bVfHOBLi6HObVWggieOB2b4XiiPiBQem8Yo21gnKdvH0ZcmIWOl2qRqQCaDQyJ1cccxdGJnBAxTzCmWASAs5wHUmGySBcVm3EIZOhaRRxfFrHNOxXXKbYUtNjbpXdN3MY47Mgpg/mbEvROTORqGrqmScwI7Rwl4WPfvzVEBmaFZWkvm4yNEt52OyEWy3uL0pQVzoW4jv2sYQb+Fkjhq4vkhCAfNt+Ej7cCZtSlTpGg+CW1JTzbxSQd3wKgipFQYbyzlqSU2t3vZS/u2Putg64stGo4Lb5kp00p6hvNmzh3FyfNLhkWOcZiYU0gpOcWM8GSscEdXLpczOpE4WLJIkAikzxpEQR59bU0h2WuSaghoj2qoWmFyV47TWR+M5E+Bg3ikNjzhQGroXWwIFtbQxlFlSsxNtX3SwwXW1soscEbcmbGww3Kxt+YI/0ClN1CbNAvqusMOsq4UG2rheBjbcwBm8aecWbtI3uKmrNCinNx2yOMsVJH6aMYILDc06Wu25mI+NTklxYBIEIXSyIN5D7D0Fs3j2oA3QGHlc8nqLFQV3le0r6ksfKNGadebDHNUMy2m5onIEu9yIEVypwZfqNXR3mqZzAqoHgx6hnSYlecCMo7k4NbSYzg8/7MCykdOKkQ3ktMJq/U3FFlmZH5DYFcftupFlBKFG46vAFMSI+NK3vFSxRsCPSYWHlW4wRy3HOBLi6HNrCklkAxPEcjlu4UNceT2PHb2AlkMvuT56O/aCApIdZ/uOghdWYyI7PWXQNDNEjJIy1cnDfvSm0d4U7gOIhg8AnYw7mG2bk7FU4wYsm5mRQSpV89dUmMvQRytyXrjhaOXoqe3uqiEGCS0TWVLTODC0HNaEIpUVs6qeUQZasNduoXtsb10yLBp6NBtViHHgO3pifsG3EIkEuOoVxcKiuAV9WvcaJx0BOhHPz6XKjR5BKsUiG1gC2wfbyQ7NNAfaYOCYfQT2llH0yooKlBVcR0Rt+qajpCLVbq1rXukG3IV7s9QbBAPM/gyQKl/P1bzof4KWbq+OSRnOILWUQUtInpxintdftafLGDskIY4+RSF9xlpUyBMbBqpEZTrlZWI9nopzpaWVLkyU9rYkEJFQCUrs/QF5ST92EAG2szRm69XbuC9+V42Hzfh2sX1UQ3lfJ7eaeBoK7hkKDOsaz8Xa6MTvlSGaM6xnIcaVydoigJJRIHpqLgsoTxJVmWNMy8jRttiuwDtHVoA9u4YKrHuwBQXqsbr46dP4xFPIFqfMhn5yWSGAYLX9JJeIYEhoDzgNKTfVyEFzN5NsEp2lrbXC8xVZq+eW5XkdS3I73q86CTZRzdAlp/ZbIl7iwZeMOVKOQ9wL2+MuG9JWJMHSp76hsLY1iFWKFZjcVgWIJPFXE6kpNjJOXGeoX2IRVorx49wxdhRn/LkthUJEIoFwIxFcSjyBn8fzJOQiyhltsTy+qAJlAFE+yhIkU8Exec5h9r0soQ1bkERClsvsRqcl3qklLptA/lqQepVbA2gcnQytS3Y6Q7G1DTqJh8oRaqJS2cLsxhPxSyRoZgpxyfbGtEJY454ThE1IZeksJQ2akLNPqhrN651Dq4luvoSept8SJcu04o9XG2dW70na6sTpADgPVayIi5q3pV6hjehE4VzSjIlayqZWjFKgwTdX44GWg8oVjn6FiTZVdgMFTqfZsaeBb4C1+HgnX681+dZlevVx6FWNGcrhSCaFXVE4OuT7ZWnm5Qvb5TEnERV4iBJQ6RI+Ub29l4dMSUNsuBwvo+LqbW+E9LkthSSMYjTbQU4nrQBWuIpOtgrzcBa+OOQ3vhE/G1BlBO8sdUpuCUY85cD4ViEhobLBNJfqxslinyZI5daOVKCA/TVCZdxyfQpMYWR08VW5NasWCdt3VkYhTq+R7YSQnF7oZlENwwpYTGp691fd1rZjruaNtppXM3pki/oihkIcjgmEPFDInU+yKQV/fQltY0JZ1NVLQjFu1D10yqnKuovIdAFo/FkRb2pIpIOdrBr7zSoVHygkuBmBygS02Z5KCc06NiSwJd8PsIxesmQWT2Gt7POAAfXkagNm0NZK4rEoQF+V4wQQS6oiiTimOIdL8hirTXZxYpG9Kjrlax8f/U27OH0GCukz1k7iyDkSdV+BJZ6YeMBd7ZdK14DbHincNEe05+txAZbbBY4HC7Qh1eCIswQCKoHXqKk9DJXDRoaCP0CnlHQlp6PdWxJKs/S15kEqvdKyjeApopgLmZEGhhQNIExNh+TRQqnhoNonHCvSTupg14qhHkQVB6R/DVJDuX2jnKMgb4g8WmdCHhbwljLHYGFuFO6FoWYLVpSXPB331jRDVVraGzbHIYivHAXHCMhaMYvbty5IRihLqcf2PE9q7VNTPukgKf8gQ4ZlwDi5O2RgSKuUITG5GsRXGBg9cxzGaSZonKKlu9CLSxnQ+cU5VP4c/5MJkmJL+/wCCkmySailrQVJc1BQDe9Gmdg2lLOsrvUrmFotPxKgY8+7JAbQQzpE40rzjOw2SQYNZLw4q5GNXU+KXzIFXmg1OKKAUi52xh3EDsoXPQtYKbglmb56BXaRNpotFabtBzqGNn1w5/iyot8ienykkQEPeCKc01YJ6eP2mF86qKX8g7ZxFz5h49439Do957mYMcqopQ20CbnkV9ioEcU0rPWPNE3s/FFx3zLQujVw9ygboyqARU+diFPGG245hMMtE6+iX8DdpsiM9oM54OlMMOdNn3YWBQxY1MWnrUuR0xzmtDpq5CiZ7iaYumAmquqSjymMcSFSbGmfJRTSZ6x1xPbXfhFfA/radquQ2y9So3eTqpnnvi3fkvbimJ06IAAxjvrosyAVnFBZQHP35Y51f8zz04yTeNjjwYERg99DxVrNaEPLFp4ExqhNXN1YAHVNkGT0pDsDpkFvA76NSJpVjFt9a1ll22gKVTwMsoq6weRZAnRIYvVKN6cVRmiStYUNczmh+cS3o3klgsjh5AhbalU1so/01Tga2YYzCw0yuLc0zGjlzTrfJlHgEve9LttjAVlQaxMoxFc6ptB6JcQOKPoziO+igU3ciCZWj15WXkcjodrX11ayLnn/7z2/AyphabV7CXS1gSf+wmhtgiJe9HLVqBiIVFJs0SXXyxYH4tr4P1eNFE9GPuMU0mesT6Rw73gU9MUcvzT0l8H4M3G8dG9BHQhQmdJdxBDzMCrag5S5euM84UyuxctGgxODxB4X2uIF+VGV5ZEE1TUldrHEjqOQY3ynLmqjciMMs5hjcKnjzCQJu4ixsV6pfel9yJALkl8iUEjje/AKEsfGnBEzDW7N5Vk8hY7Gt+ZqA9rb5BdSlR1bl4JLHulikdSOYxv9MoIxOmzYmibNQNUYOnUpSFJjjyaUWz321b5amTt+zlDFHyvf7IpipmhTAzIXx1TT/lpLXBc4gRZTCGdGGSKb+I7GuteYVBYvNW3ZcSHvJ9tv3mYsdRqa5e3l0h8lcG+WQcbwHymGLP38bSkUIXhCT7wDvHANZABGQMr2ywuEENcU1OqRES2NIUcFpDrYleS4lFWFTG9ABNwRRcgrTEW6+TRtHGx/D1eVkAeCFX/kHecwKFT1sEtlj9wgghqJrlGIqiGPLeUVW0IeM2tZwDqZhnV1yWUtyF6LSmxgBFV1GqhZ4gqumooeDQ83qKWMgbTvKVzH0IwjfsAt0LUhzK5IAV/Jb/ZGuQXXleAW83xEwgprW4qZS5Xami1Nf9XLzIIBXsKBZXvxJ/VOBCO+cnv1qvaDz/lvKy1SRC3Sla9L4D7oX8IZc2PkFb/Z0n4tmkrau5cLjTapH8N8l6LHz31uQSF9xjqPCWbLF0ob+Y6mwQSe4kGzRYJH7EG7prASAHFqF6syGdEedGocQNbBFzZ6R6epC9MWdyRIzmrN7xJvtclMjTy+RCSMrUJJ16fF2Ob0MGOFEYAhnMbqypcQidlRw0NB5igceAXoKqt7AdEme2nK5sFwx/B01zjNAzZ/GMoJvvTUUZdKN8Dnd02mSsznFGP9dAQPo17Z7oWoTV0toV+4IWluL9Mae81PmDZiWjdWzbC0MiY+7H5Tg6QnlA9CovbiUGYutbGBlUyXEKZIMiICPbgH8TqOMmREBjqNLj6NMEW8wMNQuS15IsWNn/vcmkL5jA1xV+7KP0wpPtzm8zdRSJ+xse7KXfmHJsWE239+AYX0GRvxrtyVfyBSBPhFn19MoXzGRr8rd+XvtxTu/xafvy2F+mdsprtyV/7eSEH8Dj93TKG7n7ufu5/Rz10K3f3c/fydPncpdPdz9/N3+Pz1X///KGK5YaHfMeIAAAAASUVORK5CYII=" /> + <p class="center"> MCServer, the Minecraft Server coded in C++!</p> + </header> + <nav id="cssmenu"> + <ul> + {MENU} + </ul> + </nav> + <div id="maincontent"> + <h2>Welcome {USERNAME}, to the Control Panel! :D</h2> + {CONTENT} + </div> + <footer><p>MCServer is using {MEM}MB of memory, with {NUMCHUNKS} chunks loaded.</p><p>Web Design by Tiger</p></footer> + </div> +</head> +</html> |