summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAlexander Harkness <bearbin@gmail.com>2013-07-27 17:16:04 +0200
committerAlexander Harkness <bearbin@gmail.com>2013-07-27 17:16:04 +0200
commit0623a4f9be1c21651ea212f7b4d86136a67ddffe (patch)
tree5a96f13f72fa394bf74d10839a76ec7a1eac9275
parentRemoved all the pre-exising core files. (diff)
downloadcuberite-0623a4f9be1c21651ea212f7b4d86136a67ddffe.tar
cuberite-0623a4f9be1c21651ea212f7b4d86136a67ddffe.tar.gz
cuberite-0623a4f9be1c21651ea212f7b4d86136a67ddffe.tar.bz2
cuberite-0623a4f9be1c21651ea212f7b4d86136a67ddffe.tar.lz
cuberite-0623a4f9be1c21651ea212f7b4d86136a67ddffe.tar.xz
cuberite-0623a4f9be1c21651ea212f7b4d86136a67ddffe.tar.zst
cuberite-0623a4f9be1c21651ea212f7b4d86136a67ddffe.zip
-rw-r--r--Core/README.md23
-rw-r--r--Core/back.lua9
-rw-r--r--Core/ban-unban.lua60
-rw-r--r--Core/console.lua288
-rw-r--r--Core/functions.lua3
-rw-r--r--Core/give.lua39
-rw-r--r--Core/gm.lua8
-rw-r--r--Core/help.lua41
-rw-r--r--Core/itemrepair.lua202
-rw-r--r--Core/kick.lua42
-rw-r--r--Core/locate.lua4
-rw-r--r--Core/main.lua173
-rw-r--r--Core/motd.lua97
-rw-r--r--Core/onbreakplaceblock.lua115
-rw-r--r--Core/onchunkgenerating.lua16
-rw-r--r--Core/ondeath.lua65
-rw-r--r--Core/onlogin.lua19
-rw-r--r--Core/playerjoin.lua5
-rw-r--r--Core/playerlist.lua14
-rw-r--r--Core/plugins.lua15
-rw-r--r--Core/portal-worlds.lua36
-rw-r--r--Core/rank-groups.lua48
-rw-r--r--Core/regen.lua18
-rw-r--r--Core/save-reload-stop.lua19
-rw-r--r--Core/spawn.lua7
-rw-r--r--Core/teleport.lua38
-rw-r--r--Core/time.lua23
-rw-r--r--Core/top.lua11
-rw-r--r--Core/viewdistance.lua10
-rw-r--r--Core/weather.lua10
-rw-r--r--Core/web_chat.lua157
-rw-r--r--Core/web_manageplugins.lua157
-rw-r--r--Core/web_manageserver.lua35
-rw-r--r--Core/web_permissions.lua134
-rw-r--r--Core/web_playerlist.lua38
-rw-r--r--Core/web_serversettings.lua924
-rw-r--r--Core/web_whitelist.lua79
-rw-r--r--Core/webadmin/backup.html375
-rw-r--r--Core/webadmin/template.html152
-rw-r--r--Core/worldlimiter.lua21
40 files changed, 3530 insertions, 0 deletions
diff --git a/Core/README.md b/Core/README.md
new file mode 100644
index 000000000..d840459a0
--- /dev/null
+++ b/Core/README.md
@@ -0,0 +1,23 @@
+Core Plugin (Forked)
+===========
+
+A fork of MCServer's Core plugin.
+
+**New Features:**
+* Simplified commands, such as 'gotoworld' -> 'portal'
+* Simplified and combined LUA files, such as 'listworlds.lua & gotoworld.lua' -> 'worlds-portal.lua'
+* Fixed 'tp' command not working due to typography errors
+* Fixed 'arithmetic on nil value' on startup due to inactivation of world limiter
+* Massive overhaul / redesign of webadmin GUI interface.
+ * Added jQuery transition effect
+ * Completely redesigned CSS
+ * Added new logo
+ * Made HTML5 compliant
+* Beautified 'help' menu
+* Rewrite of death messages - fixed strange grammar and edited to more faithfully reflect Vanilla
+* Added 'unban' console command
+
+**How to Use**
+
+Simply copy all LUA files into Plugins/Core (delete existing files first, except banned.ini and whitelist.ini!)
+Then, copy webadmin to MCServer root directory (delete existing directory first!)
diff --git a/Core/back.lua b/Core/back.lua
new file mode 100644
index 000000000..cc215ba11
--- /dev/null
+++ b/Core/back.lua
@@ -0,0 +1,9 @@
+function HandleBackCommand( Split, Player )
+ if BackCoords[Player:GetName()] == nil then
+ Player:SendMessage(cChatColor.Green .. "There is no last position known")
+ else
+ Player:TeleportToCoords(BackCoords[Player:GetName()].x, BackCoords[Player:GetName()].y, BackCoords[Player:GetName()].z)
+ Player:SendMessage(cChatColor.Green .. "You teleported back to your last known position")
+ end
+ return true
+end \ No newline at end of file
diff --git a/Core/ban-unban.lua b/Core/ban-unban.lua
new file mode 100644
index 000000000..cee511e37
--- /dev/null
+++ b/Core/ban-unban.lua
@@ -0,0 +1,60 @@
+function HandleBanCommand( Split, Player )
+ if( #Split < 2 ) then
+ Player:SendMessage( cChatColor.Green .. "Usage: /ban [Player] <Reason>" )
+ return true
+ end
+
+ local Reason = "You have been banned"
+ if( #Split > 2 ) then
+ Reason = table.concat(Split, " ", 3)
+ end
+
+ if( BanPlayer(Split[2], Reason) == false ) then
+ Player:SendMessage( cChatColor.Green .. "Could not find player " .. Split[2] )
+ return true
+ end
+
+ return true
+end
+
+function BanPlayer(PlayerName, Reason)
+ -- Ban the player in the banned.ini:
+ BannedPlayersIni:SetValueB("Banned", PlayerName, true)
+ BannedPlayersIni:WriteFile()
+
+ -- Kick the player:
+ if (Reason == nil) then
+ Reason = "You have been banned"
+ end
+ local Success = KickPlayer(PlayerName, Reason)
+ if (not(Success)) then
+ return false;
+ end
+
+ LOGINFO("'" .. PlayerName .. "' has been banned (\"" .. Reason .. "\") ");
+ local Server = cRoot:Get():GetServer();
+ Server:SendMessage("Banned " .. PlayerName);
+
+ return true
+end
+
+function HandleUnbanCommand( Split, Player )
+ if( #Split < 2 ) then
+ Player:SendMessage( cChatColor.Green .. "Usage: /unban [Player]" )
+ return true
+ end
+
+ if( BannedPlayersIni:GetValueB("Banned", Split[2], false) == false ) then
+ Player:SendMessage( cChatColor.Green .. Split[2] .. " is not banned!" )
+ return true
+ end
+
+ BannedPlayersIni:SetValueB("Banned", Split[2], false, false)
+ BannedPlayersIni:WriteFile()
+
+ local Server = cRoot:Get():GetServer()
+ LOGINFO( Player:GetName() .. " is unbanning " .. Split[2] )
+ Server:SendMessage( "Unbanning " .. Split[2] )
+
+ return true
+end \ No newline at end of file
diff --git a/Core/console.lua b/Core/console.lua
new file mode 100644
index 000000000..b1c454d59
--- /dev/null
+++ b/Core/console.lua
@@ -0,0 +1,288 @@
+-- Implements things related to console commands
+
+function InitConsoleCommands()
+ local PluginMgr = cPluginManager:Get();
+
+ -- Please keep the list alpha-sorted
+ PluginMgr:BindConsoleCommand("ban", HandleConsoleBan, "Bans a player by name");
+ PluginMgr:BindConsoleCommand("unban", HandleConsoleUnban, "Unbans a player by name");
+ PluginMgr:BindConsoleCommand("banlist", HandleConsoleBanList, "Lists all players banned by name");
+ PluginMgr:BindConsoleCommand("banlist ips", HandleConsoleBanList, "Lists all players banned by IP");
+ PluginMgr:BindConsoleCommand("help", HandleConsoleHelp, "Lists all commands");
+ PluginMgr:BindConsoleCommand("list", HandleConsoleList, "Lists all players in a machine-readable format");
+ PluginMgr:BindConsoleCommand("listgroups", HandleConsoleListGroups, "Shows a list of all the groups");
+ PluginMgr:BindConsoleCommand("numchunks", HandleConsoleNumChunks, "Shows number of chunks currently loaded");
+ PluginMgr:BindConsoleCommand("players", HandleConsolePlayers, "Lists all connected players");
+ PluginMgr:BindConsoleCommand("primaryserverversion", HandleConsolePrimaryServerVersion, "Gets or sets server version reported to 1.4+ clients");
+ PluginMgr:BindConsoleCommand("rank", HandleConsoleRank, " [Player] [Group] - add a player to a group");
+ PluginMgr:BindConsoleCommand("reload", HandleConsoleReload, "Reloads all plugins");
+ PluginMgr:BindConsoleCommand("save-all", HandleConsoleSaveAll, "Saves all chunks");
+ PluginMgr:BindConsoleCommand("say", HandleConsoleSay, "Sends a chat message to all players");
+ PluginMgr:BindConsoleCommand("unload", HandleConsoleUnload, "Unloads all unused chunks");
+end
+
+function HandleConsoleBan(Split)
+ if (#Split < 2) then
+ return true, "Usage: ban [Player] <Reason>";
+ end
+
+ local Reason = "You have been banned"
+ if (#Split > 2) then
+ Reason = table.concat(Split, " ", 3);
+ end
+
+
+ if (not(BanPlayer(Split[2], Reason))) then
+ return true, "Could not find player " .. Split[2];
+ end
+
+ return true, "Player " .. Split[2] .. " has been banned.";
+end
+
+function HandleConsoleUnban(Split)
+ if( #Split < 2 ) then
+ return true, "Usage: /unban [Player]"
+ end
+
+ if( BannedPlayersIni:GetValueB("Banned", Split[2], false) == false ) then
+ return true, Split[2] .. " is not banned!"
+ end
+
+ BannedPlayersIni:SetValueB("Banned", Split[2], false, false)
+ BannedPlayersIni:WriteFile()
+
+ local Server = cRoot:Get():GetServer()
+ return true, "Unbanned " .. Split[2]
+end
+
+function HandleConsoleBanList(Split)
+ if (#Split == 1) then
+ return true, BanListByName();
+ end
+
+ if (string.lower(Split[2]) == "ips") then
+ return true, BanListByIPs();
+ end
+
+ return true, "Unknown banlist subcommand";
+end
+
+function HandleConsoleHelp(Split)
+ local Commands = {}; -- {index => {"Command", "HelpString"} }
+ local MaxLength = 0;
+ local AddToTable = function(Command, HelpString)
+ table.insert(Commands, { Command, HelpString });
+ local CmdLen = Command:len();
+ if (CmdLen > MaxLength) then
+ MaxLength = CmdLen;
+ end
+ end
+
+ cPluginManager:Get():ForEachConsoleCommand(AddToTable);
+
+ -- Sort the table:
+ local CompareCommands = function(a, b)
+ return a[1] < b[1]; -- compare command strings
+ end
+ table.sort(Commands, CompareCommands);
+
+ local Out = "";
+ for i, Command in ipairs(Commands) do
+ Out = Out .. Command[1] .. string.rep(" ", MaxLength - Command[1]:len()); -- Align to a table
+ Out = Out .. " - " .. Command[2] .. "\n";
+ end
+ return true, Out;
+end
+
+function HandleConsoleList(Split)
+ -- Get a list of all players, one playername per line
+ local Out = "";
+ cRoot:Get():ForEachWorld(
+ function (a_World)
+ a_World:ForEachPlayer(
+ function (a_Player)
+ Out = Out .. a_Player:GetName() .. "\n";
+ end
+ );
+ end
+ );
+ return true, Out;
+end
+
+function HandleConsoleListGroups(Split)
+ -- Read the groups.ini file:
+ local GroupsIni = cIniFile("groups.ini");
+ if (not(GroupsIni:ReadFile())) then
+ return true, "No groups found";
+ end
+
+ -- Read the groups:
+ Number = GroupsIni:NumKeys();
+ Groups = {};
+ for i = 0, Number do
+ table.insert(Groups, GroupsIni:KeyName(i))
+ end
+
+ -- Output the groups, concatenated to a string:
+ local Out = "Groups:\n"
+ Out = Out .. table.concat(Groups, ", ");
+ return true, Out;
+end
+
+function HandleConsoleNumChunks(Split)
+ local Output = {};
+ local AddNumChunks = function(World)
+ Output[World:GetName()] = World:GetNumChunks();
+ end;
+
+ cRoot:Get():ForEachWorld(AddNumChunks);
+
+ local Total = 0;
+ local Out = "";
+ for name, num in pairs(Output) do
+ Out = Out .. " " .. name .. ": " .. num .. " chunks\n";
+ Total = Total + num;
+ end
+ Out = Out .. "Total: " .. Total .. " chunks\n";
+
+ return true, Out;
+end
+
+function HandleConsolePlayers(Split)
+ local PlayersInWorlds = {}; -- "WorldName" => [players array]
+ local AddToTable = function(Player)
+ local WorldName = Player:GetWorld():GetName();
+ if (PlayersInWorlds[WorldName] == nil) then
+ PlayersInWorlds[WorldName] = {};
+ end
+ table.insert(PlayersInWorlds[WorldName], Player:GetName() .. " @ " .. Player:GetIP());
+ end
+
+ cRoot:Get():ForEachPlayer(AddToTable);
+
+ local Out = "";
+ for WorldName, Players in pairs(PlayersInWorlds) do
+ Out = Out .. "World " .. WorldName .. ":\n";
+ for i, PlayerName in ipairs(Players) do
+ Out = Out .. " " .. PlayerName .. "\n";
+ end
+ end
+
+ return true, Out;
+end
+
+function HandleConsolePrimaryServerVersion(Split)
+ if (#Split == 1) then
+ -- Display current version:
+ local Version = cRoot:Get():GetPrimaryServerVersion();
+ return true, "Primary server version: #" .. Version .. ", " .. cRoot:GetProtocolVersionTextFromInt(Version);
+ end
+
+ -- Set new value as the version:
+ cRoot:Get():SetPrimaryServerVersion(tonumber(Split[2]));
+ local Version = cRoot:Get():GetPrimaryServerVersion();
+ return true, "Primary server version is now #" .. Version .. ", " .. cRoot:GetProtocolVersionTextFromInt(Version);
+end
+
+function HandleConsoleRank(Split)
+ if (Split[2] == nil) or (Split[3] == nil) then
+ return true, "Usage: /rank [Player] [Group]";
+ end
+ local Out = "";
+
+ -- Read the groups.ini file:
+ local GroupsIni = cIniFile("groups.ini")
+ if (not(GroupsIni:ReadFile())) then
+ Out = "Could not read groups.ini, creating anew!\n"
+ end
+
+ -- Find the group:
+ if (GroupsIni:FindKey(Split[3]) == -1) then
+ return true, Out .. "Group does not exist";
+ end
+
+ -- Read the users.ini file:
+ local UsersIni = cIniFile("users.ini");
+ if (not(UsersIni:ReadFile())) then
+ Out = Out .. "Could not read users.ini, creating anew!\n";
+ end
+
+ -- Write the new group value to users.ini:
+ UsersIni:DeleteKey(Split[2]);
+ UsersIni:GetValueSet(Split[2], "Groups", Split[3]);
+ UsersIni:WriteFile();
+
+ -- Reload the player's permissions:
+ cRoot:Get():ForEachWorld(
+ function (World)
+ World:ForEachPlayer(
+ function (Player)
+ if (Player:GetName() == Split[2]) then
+ Player:SendMessage(cChatColor.Green .. "You were moved to group " .. Split[3]);
+ Player:LoadPermissionsFromDisk();
+ end
+ end
+ );
+ end
+ )
+
+ return true, Out .. "Player " .. Split[2] .. " was moved to " .. Split[3];
+end
+
+function HandleConsoleReload(Split)
+ Server = cRoot:Get():GetServer();
+ Server:SendMessage(cChatColor.Green .. "Reloading all plugins.");
+ cPluginManager:Get():ReloadPlugins();
+ return true;
+end
+
+function HandleConsoleSaveAll(Split)
+ cRoot:Get():SaveAllChunks();
+ return true;
+end
+
+function HandleConsoleSay(Split)
+ table.remove(Split, 1);
+ local Message = "";
+ for i, Text in ipairs(Split) do
+ Message = Message .. " " .. Text;
+ end
+ Message = Message:sub(2); -- Cut off the first space
+ cRoot:Get():GetServer():BroadcastChat(cChatColor.Purple .. "[SERVER] " .. Message);
+ return true;
+end
+
+function HandleConsoleUnload(Split)
+ local UnloadChunks = function(World)
+ World:UnloadUnusedChunks();
+ end
+
+ local Out = "Num loaded chunks before: " .. cRoot:Get():GetTotalChunkCount() .. "\n";
+ cRoot:Get():ForEachWorld(UnloadChunks);
+ Out = Out .. "Num loaded chunks after: " .. cRoot:Get():GetTotalChunkCount();
+ return true, Out;
+end
+
+
+-- Helper functions:
+
+--- Returns the list of players banned by name, separated by ", "
+function BanListByName()
+ local NumValues = BannedPlayersIni:NumValues("Banned");
+ local Banned = {};
+ local KeyID = BannedPlayersIni:FindKey("Banned");
+ for i = 1, NumValues do
+ local PlayerName = BannedPlayersIni:ValueName(KeyID, i - 1);
+ if (BannedPlayersIni:GetValueB("Banned", PlayerName)) then
+ -- Player listed AND banned
+ table.insert(Banned, PlayerName);
+ end
+ end
+ return table.concat(Banned, ", ");
+end
+
+--- Returns the list of players banned by IP, separated by ", "
+function BanListByIPs()
+ -- TODO: No IP ban implemented yet
+ return "";
+end \ No newline at end of file
diff --git a/Core/functions.lua b/Core/functions.lua
new file mode 100644
index 000000000..5fc0173b9
--- /dev/null
+++ b/Core/functions.lua
@@ -0,0 +1,3 @@
+function SetBackCoordinates( Player )
+ BackCoords[Player:GetName()] = Vector3i( Player:GetPosX(), Player:GetPosY(), Player:GetPosZ() )
+end \ No newline at end of file
diff --git a/Core/give.lua b/Core/give.lua
new file mode 100644
index 000000000..baabdf557
--- /dev/null
+++ b/Core/give.lua
@@ -0,0 +1,39 @@
+function HandleGiveCommand(Split, Player)
+ if ((#Split ~= 2) and (#Split ~=3)) then
+ Player:SendMessage(cChatColor.Green .. "Usage: /item [ItemType/Name:Dmg] <Amount>");
+ return true;
+ end
+
+ local Item = cItem();
+ local FoundItem = StringToItem(Split[2], Item);
+
+ if not(IsValidItem(Item.m_ItemType)) then -- StringToItem does not check if item is valid
+ FoundItem = false
+ end
+
+ if not(FoundItem) then
+ Player:SendMessage( cChatColor.Green .. "Invalid item id or name!" )
+ return true
+ end
+
+ local ItemAmount = 1;
+ if (#Split == 3) then
+ ItemAmount = tonumber(Split[3]);
+ if ((ItemAmount == nil) or (ItemAmount < 1) or (ItemAmount > 512)) then
+ Player:SendMessage(cChatColor.Green .. "Invalid amount!");
+ return true;
+ end
+ end
+
+ Item.m_ItemCount = ItemAmount;
+
+ local ItemsGiven = Player:GetInventory():AddItem(Item);
+ if (ItemsGiven == ItemAmount) then
+ Player:SendMessage( cChatColor.Green .. "There you go!");
+ LOG("Gave " .. Player:GetName() .. " " .. Item.m_ItemCount .. " times " .. Item.m_ItemType .. ":" .. Item.m_ItemDamage);
+ else
+ Player:SendMessage(cChatColor.Green .. "Not enough space in inventory, only gave " .. ItemsGiven);
+ LOG("Player " .. Player:GetName() .. " asked for " .. Item.m_ItemCount .. " times " .. Item.m_ItemType .. ":" .. Item.m_ItemDamage ..", but only could fit " .. ItemsGiven);
+ end
+ return true;
+end \ No newline at end of file
diff --git a/Core/gm.lua b/Core/gm.lua
new file mode 100644
index 000000000..85bcf984b
--- /dev/null
+++ b/Core/gm.lua
@@ -0,0 +1,8 @@
+function HandleChangeGMCommand( Split, Player )
+ if( #Split ~= 2 ) then
+ Player:SendMessage( cChatColor.Green .. "Usage: /gm [GameMode (0|1)]" )
+ return true
+ end
+ Player:SetGameMode(Split[2])
+ return true
+end \ No newline at end of file
diff --git a/Core/help.lua b/Core/help.lua
new file mode 100644
index 000000000..339fc054b
--- /dev/null
+++ b/Core/help.lua
@@ -0,0 +1,41 @@
+function HandleHelpCommand(Split, Player)
+ local PluginManager = cRoot:Get():GetPluginManager()
+
+ local LinesPerPage = 8;
+ local CurrentPage = 1;
+ local CurrentLine = 0;
+ local PageRequested = 1;
+ local Output = {};
+
+ if (#Split == 2) then
+ PageRequested = tonumber(Split[2]);
+ end
+
+ local Process = function(Command, Permission, HelpString)
+ if not(Player:HasPermission(Permission)) then
+ return false;
+ end;
+ if (HelpString == "") then
+ return false;
+ end;
+
+ CurrentLine = CurrentLine + 1;
+ CurrentPage = math.floor(CurrentLine / LinesPerPage) + 1;
+ if (CurrentPage ~= PageRequested) then
+ return false;
+ end;
+ table.insert(Output, cChatColor.Blue .. Command .. HelpString);
+ end
+
+ PluginManager:ForEachCommand(Process);
+
+ -- CurrentPage now contains the total number of pages, and Output has the individual help lines to be sent
+
+ Player:SendMessage(cChatColor.Purple .. "---------- [COMMANDS HELP " .. cChatColor.Gold .. "(Page " .. PageRequested .. " / " .. CurrentPage .. ")" .. cChatColor.Purple .. "] -----------");
+ Player:SendMessage(cChatColor.Purple .. "'-' means no prefix, '~' means a value is required.");
+ for idx, msg in ipairs(Output) do
+ Player:SendMessage(msg);
+ end;
+
+ return true
+end \ No newline at end of file
diff --git a/Core/itemrepair.lua b/Core/itemrepair.lua
new file mode 100644
index 000000000..ee411dcc2
--- /dev/null
+++ b/Core/itemrepair.lua
@@ -0,0 +1,202 @@
+-- Based on Fixies plugin v2 by Taugeshtu
+-- how much "extra" points are healed per a repair operation (fraction of full health)
+BONUS = 0.1
+
+function OnCraftingNoRecipe(Player, Grid, Recipe)
+ local _do_fix = false
+ local Items = {}
+ for x = 0, Grid:GetWidth() - 1 do
+ for y = 0, Grid:GetHeight() - 1 do
+ local Item = Grid:GetItem(x, y)
+ if (Item.m_ItemType ~= E_ITEM_EMPTY) then
+ table.insert(Items, Item)
+ end
+ end
+ end
+
+ if (#Items ~= 2) then
+ -- Only two items together can be fixed
+ return false
+ end
+
+ if (Items[1].m_ItemType ~= Items[2].m_ItemType) then
+ -- Only items of the same type may be fixed
+ return false
+ end
+
+ if (
+ (Items[1].m_ItemDamage == 0) or
+ (Items[2].m_ItemDamage == 0)
+ )
+ then
+ -- Only damaged items may be fixed
+ return false
+ end
+
+ local _ID = Items[1].m_ItemType
+ local _least_hp = math.max(Items[1].m_ItemDamage, Items[2].m_ItemDamage)
+ local _most_hp = math.min(Items[1].m_ItemDamage, Items[2].m_ItemDamage)
+ local _item_hp = 0
+
+ -- TODO: This could be refactored into better code, using an _ID-indexed table for _item_hp
+
+ if (
+ (_ID == E_ITEM_WOODEN_SHOVEL) or
+ (_ID == E_ITEM_WOODEN_AXE) or
+ (_ID == E_ITEM_WOODEN_PICKAXE) or
+ (_ID == E_ITEM_WOODEN_SWORD) or
+ (_ID == E_ITEM_WOODEN_HOE)
+ )
+ then
+ _item_hp = 60
+ _do_fix = true
+ end
+
+ if (
+ (_ID == E_ITEM_STONE_SHOVEL) or
+ (_ID == E_ITEM_STONE_AXE) or
+ (_ID == E_ITEM_STONE_PICKAXE) or
+ (_ID == E_ITEM_STONE_SWORD) or
+ (_ID == E_ITEM_STONE_HOE)
+ )
+ then
+ _item_hp = 132
+ _do_fix = true
+ end
+
+ if (
+ (_ID == E_ITEM_IRON_SHOVEL) or
+ (_ID == E_ITEM_IRON_AXE) or
+ (_ID == E_ITEM_IRON_PICKAXE) or
+ (_ID == E_ITEM_IRON_SWORD) or
+ (_ID == E_ITEM_IRON_HOE)
+ )
+ then
+ _item_hp = 251
+ _do_fix = true
+ end
+
+ if (
+ (_ID == E_ITEM_GOLD_SHOVEL) or
+ (_ID == E_ITEM_GOLD_AXE) or
+ (_ID == E_ITEM_GOLD_PICKAXE) or
+ (_ID == E_ITEM_GOLD_SWORD) or
+ (_ID == E_ITEM_GOLD_HOE)
+ )
+ then
+ _item_hp = 33
+ _do_fix = true
+ end
+
+ if (
+ (_ID == E_ITEM_DIAMOND_SHOVEL) or
+ (_ID == E_ITEM_DIAMOND_AXE) or
+ (_ID == E_ITEM_DIAMOND_PICKAXE) or
+ (_ID == E_ITEM_DIAMOND_SWORD) or
+ (_ID == E_ITEM_DIAMOND_HOE)
+ )
+ then
+ _item_hp = 1562
+ _do_fix = true
+ end
+
+ if (_ID == E_ITEM_LEATHER_CAP) then
+ _item_hp = 56
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_LEATHER_TUNIC) then
+ _item_hp = 82
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_LEATHER_PANTS) then
+ _item_hp = 76
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_LEATHER_BOOTS) then
+ _item_hp = 66
+ _do_fix = true
+ end
+
+
+ if (_ID == E_ITEM_CHAIN_HELMET) then
+ _item_hp = 78
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_CHAIN_CHESTPLATE) then
+ _item_hp = 114
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_CHAIN_LEGGINGS) then
+ _item_hp = 106
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_CHAIN_BOOTS) then
+ _item_hp = 92
+ _do_fix = true
+ end
+
+
+ if (_ID == E_ITEM_IRON_HELMET) then
+ _item_hp = 166
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_IRON_CHESTPLATE) then
+ _item_hp = 242
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_IRON_LEGGINGS) then
+ _item_hp = 226
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_IRON_BOOTS) then
+ _item_hp = 196
+ _do_fix = true
+ end
+
+
+ if (_ID == E_ITEM_GOLD_HELMET) then
+ _item_hp = 78
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_GOLD_CHESTPLATE) then
+ _item_hp = 114
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_GOLD_LEGGINGS) then
+ _item_hp = 106
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_GOLD_BOOTS) then
+ _item_hp = 92
+ _do_fix = true
+ end
+
+
+ if (_ID == E_ITEM_DIAMOND_HELMET) then
+ _item_hp = 364
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_DIAMOND_CHESTPLATE)then
+ _item_hp = 529
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_DIAMOND_LEGGINGS) then
+ _item_hp = 496
+ _do_fix = true
+ end
+ if (_ID == E_ITEM_DIAMOND_BOOTS) then
+ _item_hp = 430
+ _do_fix = true
+ end
+ -- /////////////////////////////////////////////////////
+
+ if (_do_fix == true) then
+ local _hp = _most_hp - (_item_hp - _least_hp) - _item_hp * BONUS
+ _hp = math.max(_hp, 0)
+ Recipe:SetResult(_ID, 1, _hp)
+ Recipe:SetIngredient(Items[1].x, Items[1].y, Items[1]);
+ Recipe:SetIngredient(Items[2].x, Items[2].y, Items[2]);
+ return true
+ end
+ return false
+end \ No newline at end of file
diff --git a/Core/kick.lua b/Core/kick.lua
new file mode 100644
index 000000000..be6215df4
--- /dev/null
+++ b/Core/kick.lua
@@ -0,0 +1,42 @@
+function HandleKickCommand( Split, Player )
+ if( #Split < 2 ) then
+ Player:SendMessage( cChatColor.Green .. "Usage: /kick [Player] <Reason>" )
+ return true
+ end
+
+ local Reason = "You have been kicked"
+ if( #Split > 2 ) then
+ Reason = table.concat(Split, " ", 3)
+ end
+
+ if( KickPlayer( Split[2], Reason ) == false ) then
+ Player:SendMessage( cChatColor.Green .. "Could not find player " .. Split[2] )
+ end
+
+ return true
+end
+
+--- Kicks a player by name, with the specified reason; returns bool whether found and player's real name
+function KickPlayer(PlayerName, Reason)
+ local RealName = "";
+ if (Reason == nil) then
+ Reason = "You have been kicked";
+ end
+
+ local FoundPlayerCallback = function(a_Player)
+ RealName = a_Player:GetName()
+
+ local Server = cRoot:Get():GetServer()
+ LOGINFO( "'" .. RealName .. "' is being kicked for ( "..Reason..") " )
+ Server:SendMessage("Kicking " .. RealName)
+
+ a_Player:GetClientHandle():Kick(Reason);
+ end
+
+ if (not(cRoot:Get():FindAndDoWithPlayer( PlayerName, FoundPlayerCallback))) then
+ -- Could not find player
+ return false;
+ end
+
+ return true, RealName; -- Player has been kicked
+end \ No newline at end of file
diff --git a/Core/locate.lua b/Core/locate.lua
new file mode 100644
index 000000000..27fcad229
--- /dev/null
+++ b/Core/locate.lua
@@ -0,0 +1,4 @@
+function HandleLocateCommand( Split, Player )
+ Player:SendMessage(cChatColor.Green .. string.format("[X:%0.2f] [Y:%0.2f] [Z:%0.2f]", Player:GetPosX(), Player:GetPosY(), Player:GetPosZ() ) )
+ return true
+end \ No newline at end of file
diff --git a/Core/main.lua b/Core/main.lua
new file mode 100644
index 000000000..b4d03ce9d
--- /dev/null
+++ b/Core/main.lua
@@ -0,0 +1,173 @@
+-- Global variables
+PLUGIN = {} -- Reference to own plugin object
+BannedPlayersIni = {}
+WhiteListIni = {}
+BackCoords = {}
+Messages = {}
+LimitWorldsCuboid = {}
+SPAWNPROTECT = true
+PROTECTRADIUS = 20
+LOGTOFILE = false
+
+function Initialize(Plugin)
+ PLUGIN = Plugin
+
+ Plugin:SetName("Core")
+ Plugin:SetVersion(13)
+
+ PluginManager = cRoot:Get():GetPluginManager()
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_JOINED)
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_BREAKING_BLOCK)
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_PLACING_BLOCK)
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_LOGIN)
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_KILLING)
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_CRAFTING_NO_RECIPE)
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHAT) -- used in web_chat.lua
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_CHUNK_GENERATING)
+ PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_MOVING)
+
+ PluginManager:BindCommand("/worlds", "core.worlds", HandleWorldsCommand, " - Shows a list of all the worlds");
+ PluginManager:BindCommand("/listgroups", "core.listgroups", HandleListGroupsCommand, " - Shows a list of all the groups");
+ PluginManager:BindCommand("/toggledownfall", "core.toggledownfall", HandleToggleDownfallCommand, " - Toggles the weather");
+ PluginManager:BindCommand("/back", "core.back", HandleBackCommand, " - Return to your last position");
+ PluginManager:BindCommand("/save-all", "core.save-all", HandleSaveAllCommand, " - Saves all your worlds");
+ PluginManager:BindCommand("/help", "core.help", HandleHelpCommand, " ~ Show available commands");
+ PluginManager:BindCommand("/rank", "core.rank", HandleRankCommand, " ~ Add someone to a group");
+ PluginManager:BindCommand("/plugins", "core.plugins", HandlePluginsCommand, " - Show list of plugins");
+ PluginManager:BindCommand("/tp", "core.teleport", HandleTPCommand, " ~ Teleport yourself to a player");
+ PluginManager:BindCommand("/give", "core.give", HandleGiveCommand, " ~ Give yourself an item");
+ PluginManager:BindCommand("/list", "core.playerlist", HandlePlayerListCommand, " - Shows list of connected players");
+ PluginManager:BindCommand("/who", "core.playerlist", HandlePlayerListCommand, " - Shows list of connected players");
+ PluginManager:BindCommand("/playerlist", "core.playerlist", HandlePlayerListCommand, " - Shows list of connected players");
+ PluginManager:BindCommand("/motd", "core.motd", HandleMOTDCommand, " - Show message of the day");
+ PluginManager:BindCommand("/reload", "core.reload", HandleReloadCommand, " - Reload all plugins");
+ PluginManager:BindCommand("/stop", "core.stop", HandleStopCommand, " - Stops the server");
+ PluginManager:BindCommand("/time", "core.time", HandleTimeCommand, " ~ Sets the time of day");
+ PluginManager:BindCommand("/spawn", "core.spawn", HandleSpawnCommand, " - Return to the spawn");
+ PluginManager:BindCommand("/kick", "core.kick", HandleKickCommand, " ~ Kick a player");
+ PluginManager:BindCommand("/ban", "core.ban", HandleBanCommand, " ~ Ban a player");
+ PluginManager:BindCommand("/unban", "core.unban", HandleUnbanCommand, " ~ Unban a player");
+ PluginManager:BindCommand("/top", "core.top", HandleTopCommand, " - Teleport yourself to the top most block");
+ PluginManager:BindCommand("/gm", "core.changegm", HandleChangeGMCommand, " ~ Change your gamemode");
+ PluginManager:BindCommand("/portal", "core.portal", HandlePortalCommand, " ~ Move to a different world");
+ PluginManager:BindCommand("/locate", "core.locate", HandleLocateCommand, " - Show your current server coordinates");
+ PluginManager:BindCommand("/regen", "core.regen", HandleRegenCommand, " ~ Regenerates a chunk, current or specified");
+ PluginManager:BindCommand("/viewdistance", "core.viewdistance", HandleViewDistanceCommand, " [".. cClientHandle.MIN_VIEW_DISTANCE .."-".. cClientHandle.MAX_VIEW_DISTANCE .."] - Change your view distance")
+
+ InitConsoleCommands();
+
+ -- Load the settings
+ IniFile = cIniFile("settings.ini")
+ if ( IniFile:ReadFile() == true ) then
+ HardCore = IniFile:GetValueSet("GameMode", "Hardcore", "false")
+ LimitWorld = IniFile:GetValueSetB("Worlds", "LimitWorld", true)
+ LimitWorldWidth = IniFile:GetValueSetI("Worlds", "LimitWorldWidth", 10)
+ SPAWNPROTECT = IniFile:GetValueSetB("SpawnProtect", "Enable", true)
+ PROTECTRADIUS = IniFile:GetValueSetI("SpawnProtect", "ProtectRadius", 20)
+ LOGTOFILE = IniFile:GetValueSetB("SpawnProtect", "LogToFile", false)
+ IniFile:WriteFile()
+ end
+
+ if LimitWorldWidth ~= nil then
+ cRoot:Get():ForEachWorld(
+ function( World )
+ LimitWorldsCuboid[World:GetName()] = cCuboid()
+ LimitWorldsCuboid[World:GetName()].p1 = Vector3i( math.floor(World:GetSpawnX() / 16) + LimitWorldWidth, 0, math.floor(World:GetSpawnZ() / 16) + LimitWorldWidth)
+ LimitWorldsCuboid[World:GetName()].p2 = Vector3i( math.floor(World:GetSpawnX() / 16) - LimitWorldWidth, 256, math.floor(World:GetSpawnZ() / 16) - LimitWorldWidth)
+ LimitWorldsCuboid[World:GetName()]:Sort()
+ end
+ )
+ end
+ -- Load whitelist, and add default values and stuff
+ WhiteListIni = cIniFile( Plugin:GetLocalDirectory() .. "/whitelist.ini" )
+ if ( WhiteListIni:ReadFile() == true ) then
+ if( WhiteListIni:GetValueB("WhiteListSettings", "WhiteListOn", false) == true ) then
+ if( WhiteListIni:GetNumValues("WhiteList") > 0 ) then
+ LOGINFO("Core: loaded " .. WhiteListIni:GetNumValues('WhiteList') .. " whitelisted players.")
+ else
+ LOGWARN("WARNING: WhiteList is on, but there are no people in the whitelist!")
+ end
+ end
+ else
+ WhiteListIni:SetValueB("WhiteListSettings", "WhiteListOn", false )
+ WhiteListIni:SetValue("WhiteList", "", "") -- So it adds an empty header
+ WhiteListIni:DeleteValue("WhiteList", "") -- And remove the value
+ WhiteListIni:KeyComment("WhiteList", "PlayerName=1")
+ if( WhiteListIni:WriteFile() == false ) then
+ LOGWARN("WARNING: Could not write to whitelist.ini")
+ end
+ end
+
+ -- Load banned players, and add default values and stuff
+ BannedPlayersIni = cIniFile( Plugin:GetLocalDirectory() .. "/banned.ini" )
+ if ( BannedPlayersIni:ReadFile() == true ) then
+ if( BannedPlayersIni:GetNumValues("Banned") > 0 ) then
+ LOGINFO("Core: loaded " .. BannedPlayersIni:GetNumValues("Banned") .. " banned players.")
+ end
+ else
+ BannedPlayersIni:SetValue("Banned", "", "") -- So it adds an empty header
+ BannedPlayersIni:DeleteValue("Banned", "") -- And remove the value
+ BannedPlayersIni:KeyComment("Banned", "PlayerName=1")
+ if( BannedPlayersIni:WriteFile() == false ) then
+ LOGWARN("WARNING: Could not write to banned.ini")
+ end
+ end
+
+ Plugin:AddWebTab("Manage Server", HandleRequest_ManageServer);
+ Plugin:AddWebTab("Server Settings", HandleRequest_ServerSettings);
+ Plugin:AddWebTab("Chat", HandleRequest_Chat);
+ Plugin:AddWebTab("Playerlist", HandleRequest_PlayerList);
+ Plugin:AddWebTab("Whitelist", HandleRequest_WhiteList);
+ Plugin:AddWebTab("Permissions", HandleRequest_Permissions);
+ Plugin:AddWebTab("Manage Plugins", HandleRequest_ManagePlugins);
+
+ LoadMotd()
+ LOG( "Initialized " .. Plugin:GetName() .. " v." .. Plugin:GetVersion() )
+
+ return true
+end
+
+function WriteLog(breakPlace, X, Y, Z, player, id, meta)
+ PLUGIN = Plugin
+
+ local logText = {}
+
+ table.insert(logText, player)
+ table.insert(logText, " tried to ")
+
+ if breakPlace == 0 then
+ table.insert(logText, "break ")
+ else
+ table.insert(logText, "place ")
+ end
+
+
+ table.insert(logText, ItemToString(cItem(id, 1, meta)))
+
+ table.insert(logText, " at ")
+ table.insert(logText, tostring(X))
+ table.insert(logText, ", ")
+ table.insert(logText, tostring(Y))
+ table.insert(logText, ", ")
+ table.insert(logText, tostring(Z))
+ table.insert(logText, ".")
+
+ LOGINFO(table.concat(logText,''))
+
+ if LOGTOFILE then
+ local logFile = io.open( Plugin:GetLocalDirectory() .. '/blocks.log', 'a')
+ logFile:write(table.concat(logText,'').."\n")
+ logFile:close()
+ end
+
+ return
+end
+
+function WarnPlayer(Player)
+ Player:SendMessage("Go further from spawn to build")
+ return
+end
+
+function OnDisable()
+ LOG( "Disabled " .. Plugin:GetName() .. " v." .. Plugin:GetVersion() )
+end \ No newline at end of file
diff --git a/Core/motd.lua b/Core/motd.lua
new file mode 100644
index 000000000..2a42c80af
--- /dev/null
+++ b/Core/motd.lua
@@ -0,0 +1,97 @@
+function HandleMOTDCommand( Split, Player )
+ ShowMOTDTo( Player )
+ return true
+end
+
+
+
+
+function LoadMotd()
+ local File = io.open("motd.txt", "r")
+ -- Check if the file 'motd.txt' exists, else create it.
+ if not File then
+ CreateFile = io.open("motd.txt", "w")
+ CreateFile:write("@6Welcome to the MCServer test server!\n@6http://www.mc-server.org/\n@6Type /help for all commands")
+ CreateFile:close()
+ else
+ File:close()
+ end
+ for line in io.lines("motd.txt") do
+ local TempMessage = line
+ -- Do a for loop that goes to each char in the line.
+ for I=1, string.len(TempMessage) do
+ -- If the char is a '@' then check if the next char represents a color.
+ if string.sub(TempMessage, I, I) == "@" then
+ local Char = string.sub(TempMessage, I + 1, I + 1)
+ local Color = ReturnColorFromChar(TempMessage, Char)
+ -- If the next char represented a color then put the color in the string.
+ if (Color ~= nil) then
+ TempMessage = string.gsub(TempMessage, "@" .. Char, Color)
+ end
+ end
+ end
+ -- Add the message to the list of messages.
+ Messages[#Messages + 1] = TempMessage
+ end
+end
+
+
+
+
+function ShowMOTDTo( Player )
+ for I=1, #Messages do
+ Player:SendMessage(Messages[I])
+ end
+end
+
+
+
+
+function ReturnColorFromChar( Split, char )
+ -- Check if the char represents a color. Else return nil.
+ if char == "0" then
+ return cChatColor.Black
+ elseif char == "1" then
+ return cChatColor.Navy
+ elseif char == "2" then
+ return cChatColor.Green
+ elseif char == "3" then
+ return cChatColor.Blue
+ elseif char == "4" then
+ return cChatColor.Red
+ elseif char == "5" then
+ return cChatColor.Purple
+ elseif char == "6" then
+ return cChatColor.Gold
+ elseif char == "7" then
+ return cChatColor.LightGray
+ elseif char == "8" then
+ return cChatColor.Gray
+ elseif char == "9" then
+ return cChatColor.DarkPurple
+ elseif char == "a" then
+ return cChatColor.LightGreen
+ elseif char == "b" then
+ return cChatColor.LightBlue
+ elseif char == "c" then
+ return cChatColor.Rose
+ elseif char == "d" then
+ return cChatColor.LightPurple
+ elseif char == "e" then
+ return cChatColor.Yellow
+ elseif char == "f" then
+ return cChatColor.White
+ elseif char == "k" then
+ return cChatColor.Random
+ elseif char == "l" then
+ return cChatColor.Bold
+ elseif char == "m" then
+ return cChatColor.Strikethrough
+ elseif char == "n" then
+ return cChatColor.Underlined
+ elseif char == "o" then
+ return cChatColor.Italic
+ elseif char == "r" then
+ return cChatColor.Plain
+ end
+end \ No newline at end of file
diff --git a/Core/onbreakplaceblock.lua b/Core/onbreakplaceblock.lua
new file mode 100644
index 000000000..89ccd3919
--- /dev/null
+++ b/Core/onbreakplaceblock.lua
@@ -0,0 +1,115 @@
+function OnPlayerPlacingBlock(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ, BlockType)
+ -- Direction is air check
+ if (BlockFace == -1) then
+ return false
+ end
+
+ if( Player:HasPermission("core.build") == false ) then
+ return true
+ else
+ if Player:HasPermission("core.spawnprotect.bypass") == false and SPAWNPROTECT == true then
+ local World = Player:GetWorld()
+ local xcoord = World:GetSpawnX()
+ local ycoord = World:GetSpawnY()
+ local zcoord = World:GetSpawnZ()
+
+ if not ((BlockX <= (xcoord + PROTECTRADIUS)) and (BlockX >= (xcoord - PROTECTRADIUS))) then
+ return false -- Not in spawn area.
+ end
+ if not ((BlockY <= (ycoord + PROTECTRADIUS)) and (BlockY >= (ycoord - PROTECTRADIUS))) then
+ return false -- Not in spawn area.
+ end
+ if not ((BlockZ <= (zcoord + PROTECTRADIUS)) and (BlockZ >= (zcoord - PROTECTRADIUS))) then
+ return false -- Not in spawn area.
+ end
+
+ --WriteLog(1, BlockX, BlockY, BlockZ, Player:GetName(), id, meta)
+
+ WarnPlayer(Player)
+
+ return true
+ else
+ if BlockType == "50" or BlockType == "76" then
+ local X = BlockX
+ local Y = BlockY
+ local Z = BlockZ
+ X, Y, Z = AddFaceDirection(X, Y, Z, BlockFace)
+ if (Y >= 256 or Y < 0) then
+ return true
+ end
+
+ local CheckCollision = function(Player)
+ -- drop the decimals, we only care about the full block X,Y,Z
+ local PlayerX = math.floor(Player:GetPosX(), 0)
+ local PlayerY = math.floor(Player:GetPosY(), 0)
+ local PlayerZ = math.floor(Player:GetPosZ(), 0)
+
+ local collision = false
+ if ((BlockFace == BLOCK_FACE_TOP) and (PlayerY == BlockY - 2) and (PlayerX == BlockX) and (PlayerZ == BlockZ)) then
+ collision = true
+ end
+
+ if ((BlockFace == BLOCK_FACE_BOTTOM) and (PlayerY == BlockY + 1) and (PlayerX == BlockX) and (PlayerZ == BlockZ)) then
+ collision = true
+ end
+
+ if ((BlockFace == BLOCK_FACE_NORTH) and (PlayerX == BlockX) and (PlayerZ == BlockZ - 1)) then
+ if ((PlayerY == BlockY) or (PlayerY + 1 == BlockY)) then collision = true end
+ end
+
+ if ((BlockFace == BLOCK_FACE_SOUTH) and (PlayerX == BlockX) and (PlayerZ == BlockZ + 1)) then
+ if ((PlayerY == BlockY) or (PlayerY + 1 == BlockY)) then collision = true end
+ end
+
+ if ((BlockFace == BLOCK_FACE_WEST) and (PlayerX == BlockX - 1) and (PlayerZ == BlockZ)) then
+ if ((PlayerY == BlockY) or (PlayerY + 1 == BlockY)) then collision = true end
+ end
+
+ if ((BlockFace == BLOCK_FACE_EAST) and (PlayerX == BlockX + 1) and (PlayerZ == BlockZ)) then
+ if ((PlayerY == BlockY) or (PlayerY + 1 == BlockY)) then collision = true end
+ end
+ return collision
+ end
+ if (Player:GetWorld():ForEachPlayer(CheckCollision) == false) then
+ return true
+ end
+ end
+ end
+ end
+ return false
+end
+
+function OnPlayerBreakingBlock(Player, BlockX, BlockY, BlockZ, BlockFace, Status, OldBlockType, OldBlockMeta)
+ -- dont check if the direction is in the air
+ if (BlockFace ~= -1) then
+
+ if (Player:HasPermission("core.build") == false) then
+ return true
+ else
+ if Player:HasPermission("core.spawnprotect.bypass") == false and SPAWNPROTECT == true then
+ local World = Player:GetWorld()
+ local xcoord = World:GetSpawnX()
+ local ycoord = World:GetSpawnY()
+ local zcoord = World:GetSpawnZ()
+
+ if not ((BlockX <= (xcoord + PROTECTRADIUS)) and (BlockX >= (xcoord - PROTECTRADIUS))) then
+ return false -- Not in spawn area.
+ end
+ if not ((BlockY <= (ycoord + PROTECTRADIUS)) and (BlockY >= (ycoord - PROTECTRADIUS))) then
+ return false -- Not in spawn area.
+ end
+ if not ((BlockZ <= (zcoord + PROTECTRADIUS)) and (BlockZ >= (zcoord - PROTECTRADIUS))) then
+ return false -- Not in spawn area.
+ end
+
+ --WriteLog(0, BlockX, BlockY, BlockZ, Player:GetName(), id, meta)
+
+ WarnPlayer(Player)
+
+ return true
+ end
+ end
+ end
+
+ return false
+end \ No newline at end of file
diff --git a/Core/onchunkgenerating.lua b/Core/onchunkgenerating.lua
new file mode 100644
index 000000000..44a6cf298
--- /dev/null
+++ b/Core/onchunkgenerating.lua
@@ -0,0 +1,16 @@
+function OnChunkGenerating(World, ChunkX, ChunkZ, ChunkDesc)
+ if (LimitWorld == true) then
+ if not LimitWorldsCuboid[World:GetName()]:IsInside( Vector3i(ChunkX, 128, ChunkZ) ) then
+ FillBlocks(ChunkDesc)
+ end
+ end
+end
+
+function FillBlocks(ChunkDesc)
+ ChunkDesc:FillBlocks(0,0)
+ ChunkDesc:SetUseDefaultBiomes(false)
+ ChunkDesc:SetUseDefaultHeight(false)
+ ChunkDesc:SetUseDefaultComposition(false)
+ ChunkDesc:SetUseDefaultStructures(false)
+ ChunkDesc:SetUseDefaultFinish(false)
+end \ No newline at end of file
diff --git a/Core/ondeath.lua b/Core/ondeath.lua
new file mode 100644
index 000000000..47a7532a6
--- /dev/null
+++ b/Core/ondeath.lua
@@ -0,0 +1,65 @@
+function OnKilling(Victim, Killer)
+ if Victim:IsPlayer() then
+ SetBackCoordinates( Victim )
+ Server = cRoot:Get():GetServer()
+ if Killer == nil then
+ if Victim:IsOnFire() then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was burnt to a cinder" )
+ CheckHardcore(Victim)
+ return false
+ end
+ if Victim:GetWorld():GetBlock(Victim:GetPosX(), Victim:GetPosY(), Victim:GetPosZ()) == 10 or Victim:GetWorld():GetBlock(Victim:GetPosX(), Victim:GetPosY(), Victim:GetPosZ()) == 11 then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " tried to swim in lava (and failed)" )
+ CheckHardcore(Victim)
+ return false
+ end
+ else
+ if Killer:IsPlayer() then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was terminated by " .. Killer:GetName() )
+ CheckHardcore(Victim)
+ return false
+ elseif Killer:IsMob() then
+ if Killer:IsA("cZombie") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was eaten by a Zombie")
+ elseif Killer:IsA("cSkeleton") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was shot by a Skeleton" )
+ elseif Killer:IsA("cCreeper") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was blown up by a Creeper")
+ elseif Killer:IsA("cSpider") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was ripped apart by a giant Spider")
+ elseif Killer:IsA("cCaveSpider") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was poisoned by a giant Cave Spider")
+ elseif Killer:IsA("cBlaze") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was flamed by a Blaze")
+ elseif Killer:IsA("cEnderman") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was " .. cChatColor.Random .. " by an Enderman")
+ elseif Killer:IsA("cSilverfish") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was... DERPED by a Silverfish!")
+ elseif Killer:IsA("cSlime") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was stuck fast and killed by a Slime")
+ elseif Killer:IsA("cWitch") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was enchanted (to death) by a Witch")
+ elseif Killer:IsA("cZombiepigman") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was slain by a Zombie Pigman")
+ elseif Killer:IsA("cMagmacube") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was incinerated by a Magmacube")
+ elseif Killer:IsA("cWolf") then
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " was savaged by a Wolf")
+ end
+ CheckHardcore(Victim)
+ return false
+ end
+ end
+ Server:SendMessage( cChatColor.Red .. Victim:GetName() .. " died of mysterious circumstances")
+ CheckHardcore(Victim)
+ end
+end
+
+function CheckHardcore(Victim)
+ if HardCore == "true" then
+ if Victim:IsPlayer() == true then
+ local KilledPlayer = tolua.cast(Victim, "cPlayer")
+ BanPlayer(KilledPlayer:GetName(), "You died, haha. Good game, bro.")
+ end
+ end
+end \ No newline at end of file
diff --git a/Core/onlogin.lua b/Core/onlogin.lua
new file mode 100644
index 000000000..4b2f24f17
--- /dev/null
+++ b/Core/onlogin.lua
@@ -0,0 +1,19 @@
+function OnLogin(Client, ProtocolVersion, Username)
+ if( Username ~= "" ) then
+ if( BannedPlayersIni:GetValueB("Banned", Username, false) == true ) then
+ local Server = cRoot:Get():GetServer()
+ Server:SendMessage( Username .. " tried to join, but is banned!" )
+ LOGINFO( Username .. " tried to join, but is banned!")
+ return true -- Player is banned, return true to deny access
+ end
+ if( WhiteListIni:GetValueB("WhiteListSettings", "WhiteListOn", false ) == true ) then
+ if( WhiteListIni:GetValueB("WhiteList", Username, false ) == false ) then -- not on whitelist
+ local Server = cRoot:Get():GetServer()
+ Server:SendMessage( Username .. " tried to join, but is not on the whitelist." )
+ LOGINFO( Username .. " tried to join, but is not on the whitelist." )
+ return true -- Deny access to the server
+ end
+ end
+ end
+ return false
+end \ No newline at end of file
diff --git a/Core/playerjoin.lua b/Core/playerjoin.lua
new file mode 100644
index 000000000..884acb66a
--- /dev/null
+++ b/Core/playerjoin.lua
@@ -0,0 +1,5 @@
+function OnPlayerJoined(Player)
+ ShowMOTDTo( Player )
+ AddMessage( Player:GetName() .. " has joined the game", " " )
+ return false
+end \ No newline at end of file
diff --git a/Core/playerlist.lua b/Core/playerlist.lua
new file mode 100644
index 000000000..73d9e5b24
--- /dev/null
+++ b/Core/playerlist.lua
@@ -0,0 +1,14 @@
+function HandlePlayerListCommand( Split, Player )
+
+ local PlayerTable = {}
+ local AppendToTable = function( Player )
+ table.insert(PlayerTable, Player:GetName() )
+ end
+ Player:GetWorld():ForEachPlayer( AppendToTable )
+
+ local Message = cChatColor.Green .. "Connected players: (".. cChatColor.White.. #PlayerTable .. cChatColor.Green .. ")"
+ Player:SendMessage( Message )
+
+ Player:SendMessage( table.concat(PlayerTable, " ") )
+ return true
+end \ No newline at end of file
diff --git a/Core/plugins.lua b/Core/plugins.lua
new file mode 100644
index 000000000..6d74cf29e
--- /dev/null
+++ b/Core/plugins.lua
@@ -0,0 +1,15 @@
+function HandlePluginsCommand( Split, Player )
+ local PluginManager = cRoot:Get():GetPluginManager()
+ local PluginList = PluginManager:GetAllPlugins()
+
+ local PluginTable = {}
+ for k, Plugin in pairs( PluginList ) do
+ if ( Plugin ) then
+ table.insert(PluginTable, Plugin:GetName() )
+ end
+ end
+
+ Player:SendMessage( cChatColor.Green .. "Loaded plugins: (" .. #PluginTable .. ")" )
+ Player:SendMessage( cChatColor.Gold .. table.concat(PluginTable, cChatColor.Gold.." ") )
+ return true
+end \ No newline at end of file
diff --git a/Core/portal-worlds.lua b/Core/portal-worlds.lua
new file mode 100644
index 000000000..136edb82e
--- /dev/null
+++ b/Core/portal-worlds.lua
@@ -0,0 +1,36 @@
+function HandlePortalCommand( Split, Player )
+ if( #Split ~= 2 ) then
+ Player:SendMessage( cChatColor.Green .. "Usage: /gotoworld [WorldName]" )
+ return true
+ end
+
+ if( Player:MoveToWorld(Split[2]) == false ) then
+ Player:SendMessage( cChatColor.Green .. "Could not move to world '" .. Split[2] .. "'!" )
+ return true
+ end
+
+
+ Player:SendMessage( cChatColor.Green .. "Moved successfully to '" .. Split[2] .. "'! :D" )
+ return true
+end
+
+function HandleWorldsCommand( Split, Player )
+ local SettingsIni = cIniFile("settings.ini")
+ if SettingsIni:ReadFile() == false then
+ Player:SendMessage( cChatColor.Green .. "No worlds found" )
+ end
+ Number = SettingsIni:NumValues("Worlds") - 1
+ Worlds = {}
+ for i=0, SettingsIni:GetNumKeys() - 1 do
+ if SettingsIni:GetKeyName(i) == "Worlds" then
+ Key = i
+ break
+ end
+ end
+ for i=0, Number do
+ table.insert( Worlds, SettingsIni:GetValue( Key, i) )
+ end
+ Player:SendMessage( cChatColor.Green .. "Worlds:" )
+ Player:SendMessage( cChatColor.Green .. table.concat( Worlds, ", " ) )
+ return true
+end \ No newline at end of file
diff --git a/Core/rank-groups.lua b/Core/rank-groups.lua
new file mode 100644
index 000000000..157d91744
--- /dev/null
+++ b/Core/rank-groups.lua
@@ -0,0 +1,48 @@
+function HandleRankCommand( Split, Player )
+ if Split[2] == nil or Split[3] == nil then
+ Player:SendMessage(cChatColor.Rose .. "Usage: /rank [Player] [Group]")
+ return true
+ end
+ local GroupsIni = cIniFile("groups.ini")
+ if( GroupsIni:ReadFile() == false ) then
+ LOG("Could not read groups.ini!")
+ end
+ if GroupsIni:FindKey(Split[3]) == -1 then
+ Player:SendMessage(cChatColor.Rose .. "Group does not exist")
+ return true
+ end
+ local UsersIni = cIniFile("users.ini")
+ if( UsersIni:ReadFile() == false ) then
+ LOG("Could not read users.ini!")
+ end
+ UsersIni:DeleteKey(Split[2])
+ UsersIni:GetValueSet(Split[2], "Groups", Split[3])
+ UsersIni:WriteFile()
+ local loopPlayers = function( Player )
+ if Player:GetName() == Split[2] then
+ Player:SendMessage( cChatColor.Green .. "You were moved to group " .. Split[3] )
+ Player:LoadPermissionsFromDisk()
+ end
+ end
+ local loopWorlds = function ( World )
+ World:ForEachPlayer( loopPlayers )
+ end
+ cRoot:Get():ForEachWorld( loopWorlds )
+ Player:SendMessage(cChatColor.Green .. "Player " .. Split[2] .. " Was moved to " .. Split[3])
+ return true
+end
+
+function HandleListGroupsCommand( Split, Player )
+ local GroupsIni = cIniFile("groups.ini")
+ if GroupsIni:ReadFile() == false then
+ Player:SendMessage( cChatColor.Green .. "No groups found" )
+ end
+ Number = GroupsIni:NumKeys() - 1
+ Groups = {}
+ for i=0, Number do
+ table.insert( Groups, GroupsIni:KeyName(i) )
+ end
+ Player:SendMessage( cChatColor.Green .. "Groups:" )
+ Player:SendMessage( cChatColor.Green .. table.concat( Groups, ", " ) )
+ return true
+end \ No newline at end of file
diff --git a/Core/regen.lua b/Core/regen.lua
new file mode 100644
index 000000000..f1dd4e118
--- /dev/null
+++ b/Core/regen.lua
@@ -0,0 +1,18 @@
+function HandleRegenCommand(Split, Player)
+ if ((#Split == 2) or (#Split > 3)) then
+ Player:SendMessage( cChatColor.Green .. "Usage: '/regeneratechunk' or '/regeneratechunk [X] [Z]'");
+ return true;
+ end
+
+ local X = Player:GetChunkX();
+ local Z = Player:GetChunkZ();
+
+ if (#Split == 3) then
+ X = Split[2];
+ Z = Split[3];
+ end
+
+ Player:SendMessage(cChatColor.Green .. "Regenerating chunk ["..X..", "..Z.."]");
+ Player:GetWorld():RegenerateChunk(X, Z);
+ return true;
+end \ No newline at end of file
diff --git a/Core/save-reload-stop.lua b/Core/save-reload-stop.lua
new file mode 100644
index 000000000..57744b088
--- /dev/null
+++ b/Core/save-reload-stop.lua
@@ -0,0 +1,19 @@
+function HandleSaveAllCommand( Split, Player )
+ cRoot:Get():SaveAllChunks();
+ Player:SendMessage(cChatColor.Green .. "All the worlds are saved")
+ return true;
+end
+
+function HandleStopCommand( Split, Player )
+ Server = cRoot:Get():GetServer()
+ Server:SendMessage( cChatColor.Green .. "Stopping the server..." )
+ cRoot:Get():QueueExecuteConsoleCommand("stop")
+ return true
+end
+
+function HandleReloadCommand( Split, Player )
+ Server = cRoot:Get():GetServer()
+ Server:SendMessage( cChatColor.Green .. "Reloading all plugins." )
+ cRoot:Get():GetPluginManager():ReloadPlugins()
+ return true
+end \ No newline at end of file
diff --git a/Core/spawn.lua b/Core/spawn.lua
new file mode 100644
index 000000000..2b07c5767
--- /dev/null
+++ b/Core/spawn.lua
@@ -0,0 +1,7 @@
+function HandleSpawnCommand(Split, Player)
+ World = Player:GetWorld()
+ SetBackCoordinates(Player)
+ Player:TeleportToCoords(World:GetSpawnX(), World:GetSpawnY(), World:GetSpawnZ())
+ LOGINFO(Player:GetName() .. " returned to spawn.")
+ return true
+end \ No newline at end of file
diff --git a/Core/teleport.lua b/Core/teleport.lua
new file mode 100644
index 000000000..4d3d98fee
--- /dev/null
+++ b/Core/teleport.lua
@@ -0,0 +1,38 @@
+function HandleTPCommand(a_Split, a_Player)
+ if ((#a_Split == 2) or (#a_Split == 3)) then
+ -- Teleport to player specified in a_Split[2], tell them unless a_Split[3] equals "-h":
+ TeleportToPlayer(a_Player, a_Split[2], (a_Split[3] ~= "-h"));
+ return true;
+ elseif (#a_Split == 4) then
+ -- Teleport to XYZ coords specified in a_Split[2, 3, 4]:
+ SetBackCoordinates(a_Player);
+ a_Player:TeleportToCoords(a_Split[2], a_Split[3], a_Split[4]);
+ a_Player:SendMessage(cChatColor.Green .. "You teleported to {" .. a_Split[2] .. ", " .. a_Split[3] .. ", " .. a_Split[4] .. "}");
+ return true;
+ else
+ a_Player:SendMessage( cChatColor.Green .. "Usage: /tp [PlayerName] (-h) or /tp [X Y Z]" )
+ return true
+ end
+end
+
+-- Teleports a_SrcPlayer to a player named a_DstPlayerName; if a_TellDst is true, will send a notice to the destination player
+function TeleportToPlayer(a_SrcPlayer, a_DstPlayerName, a_TellDst)
+ local teleport = function(OtherPlayer)
+ if (OtherPlayer == a_SrcPlayer) then
+ -- Asked to teleport to self?
+ a_SrcPlayer:SendMessage(cChatColor.Green .. "Y' can't teleport to yerself!");
+ else
+ SetBackCoordinates(a_SrcPlayer);
+ a_SrcPlayer:TeleportToEntity(OtherPlayer);
+ a_SrcPlayer:SendMessage(cChatColor.Green .. "You teleported to " .. OtherPlayer:GetName() .. "!");
+ if (a_TellDst) then
+ OtherPlayer:SendMessage(cChatColor.Green .. Player:GetName().." teleported to you!");
+ end
+ end
+ end
+
+ local World = a_SrcPlayer:GetWorld();
+ if (not(World:DoWithPlayer(a_DstPlayerName, teleport))) then
+ a_SrcPlayer:SendMessage(cChatColor.Green .. "Can't find player " .. a_DstPlayerName);
+ end
+end \ No newline at end of file
diff --git a/Core/time.lua b/Core/time.lua
new file mode 100644
index 000000000..85593695a
--- /dev/null
+++ b/Core/time.lua
@@ -0,0 +1,23 @@
+function HandleTimeCommand( Split, Player )
+ if Split[2] == nil then
+ Player:SendMessage( cChatColor.Green .. "Usage: /time [Day/Night/Set/Add]" )
+ return true
+ end
+ local Server = cRoot:Get():GetServer()
+ if( string.upper( Split[2] ) == "DAY") then
+ Player:GetWorld():SetTimeOfDay( 0 )
+ Server:SendMessage( cChatColor.Green .. Player:GetName() .. " set the time to Day.")
+ elseif( string.upper( Split[2] ) == "NIGHT") then
+ Player:GetWorld():SetTimeOfDay( 12000 + 1000 )
+ Server:SendMessage( cChatColor.Green .. Player:GetName() .. " set the time to Night.")
+ elseif( string.upper(Split[2]) == "SET" ) and ( tonumber(Split[3]) ~= nil) then
+ Player:GetWorld():SetTimeOfDay( tonumber(Split[3]) )
+ Server:SendMessage( cChatColor.Green .. Player:GetName() .. " set the time to " .. Split[3] )
+ elseif( string.upper(Split[2]) == "ADD" ) and ( tonumber(Split[3]) ~= nil) then
+ Player:GetWorld():SetTimeOfDay( Player:GetWorld():GetTimeOfDay() + Split[3] )
+ Server:SendMessage( cChatColor.Green .. Player:GetName() .. " Added " .. Split[3] .. " to the time" )
+ else
+ Player:SendMessage( cChatColor.Green .. "Usage: /time [Day/Night/Set/Add]" )
+ end
+ return true
+end \ No newline at end of file
diff --git a/Core/top.lua b/Core/top.lua
new file mode 100644
index 000000000..bc2343f7f
--- /dev/null
+++ b/Core/top.lua
@@ -0,0 +1,11 @@
+function HandleTopCommand( Split, Player )
+ local World = Player:GetWorld()
+
+ local PlayerPos = Player:GetPosition()
+ local Height = World:GetHeight( math.floor(PlayerPos.x), math.floor(PlayerPos.z) )
+ SetBackCoordinates( Player )
+ Player:TeleportToCoords( PlayerPos.x, Height+1, PlayerPos.z )
+ Player:SendMessage("Teleported to the top block")
+
+ return true
+end \ No newline at end of file
diff --git a/Core/viewdistance.lua b/Core/viewdistance.lua
new file mode 100644
index 000000000..dfd310aa7
--- /dev/null
+++ b/Core/viewdistance.lua
@@ -0,0 +1,10 @@
+function HandleViewDistanceCommand( Split, Player )
+ if( #Split ~= 2 ) then
+ Player:SendMessage( cChatColor.Green .. "Usage: /viewdistance [".. cClientHandle.MIN_VIEW_DISTANCE .."-".. cClientHandle.MAX_VIEW_DISTANCE .."]" )
+ return true
+ end
+
+ Player:GetClientHandle():SetViewDistance( Split[2] )
+ Player:SendMessage(cChatColor.Green .. "Your viewdistance has been set to " .. Player:GetClientHandle():GetViewDistance() )
+ return true
+end \ No newline at end of file
diff --git a/Core/weather.lua b/Core/weather.lua
new file mode 100644
index 000000000..7176e544e
--- /dev/null
+++ b/Core/weather.lua
@@ -0,0 +1,10 @@
+function HandleToggleDownfallCommand( Split, Player )
+ World = Player:GetWorld()
+ if World:GetWeather() == 0 then
+ World:SetWeather(1)
+ else
+ World:SetWeather(0)
+ end
+ Player:SendMessage( cChatColor.Green .. "Weather toggled")
+ return true
+end \ No newline at end of file
diff --git a/Core/web_chat.lua b/Core/web_chat.lua
new file mode 100644
index 000000000..dfb17091e
--- /dev/null
+++ b/Core/web_chat.lua
@@ -0,0 +1,157 @@
+local CHAT_HISTORY = 50
+local LastMessageID = 0
+
+local JavaScript = [[
+ <script type="text/javascript">
+ function createXHR()
+ {
+ var request = false;
+ try {
+ request = new ActiveXObject('Msxml2.XMLHTTP');
+ }
+ catch (err2) {
+ try {
+ request = new ActiveXObject('Microsoft.XMLHTTP');
+ }
+ catch (err3) {
+ try {
+ request = new XMLHttpRequest();
+ }
+ catch (err1) {
+ request = false;
+ }
+ }
+ }
+ return request;
+ }
+
+ function OpenPage( url, postParams, callback )
+ {
+ var xhr = createXHR();
+ xhr.onreadystatechange=function()
+ {
+ if (xhr.readyState == 4)
+ {
+ callback( xhr )
+ }
+ };
+ xhr.open( (postParams!=null)?"POST":"GET", url , true);
+ if( postParams != null )
+ {
+ xhr.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
+ }
+ xhr.send(postParams);
+ }
+
+ function LoadPageInto( url, postParams, storage )
+ {
+ OpenPage( url, postParams, function( xhr )
+ {
+ var ScrollBottom = storage.scrollTop + storage.offsetHeight;
+ var bAutoScroll = (ScrollBottom >= storage.scrollHeight); // Detect whether we scrolled to the bottom of the div
+
+ results = xhr.responseText.split("<<divider>>");
+ if( results[2] != LastMessageID ) return; // Check if this message was meant for us
+
+ LastMessageID = results[1];
+ if( results[0] != "" )
+ {
+ storage.innerHTML += results[0];
+
+ if( bAutoScroll == true )
+ {
+ storage.scrollTop = storage.scrollHeight;
+ }
+ }
+ } );
+
+
+ return false;
+ }
+
+ function SendChatMessage()
+ {
+ var MessageContainer = document.getElementById('ChatMessage');
+ if( MessageContainer.value == "" ) return;
+
+ var postParams = "ChatMessage=" + MessageContainer.value;
+ OpenPage( "/~webadmin/Core/Chat/", postParams, function( xhr )
+ {
+ RefreshChat();
+ } );
+ MessageContainer.value = "";
+ }
+
+ function RefreshChat()
+ {
+ var postParams = "JustChat=true&LastMessageID=" + LastMessageID;
+ LoadPageInto("/~webadmin/Core/Chat/", postParams, document.getElementById('ChatDiv'));
+ }
+
+ setInterval(RefreshChat, 1000);
+ window.onload = RefreshChat;
+
+ var LastMessageID = 0;
+
+ </script>
+]]
+
+local ChatLogMessages = {}
+
+function AddMessage( PlayerName, Message )
+ LastMessageID = LastMessageID + 1
+ table.insert( ChatLogMessages, { name = PlayerName, message = Message, id = LastMessageID } )
+ while( #ChatLogMessages > CHAT_HISTORY ) do
+ table.remove( ChatLogMessages, 1 )
+ end
+end
+
+function OnChat( Player, Message )
+ AddMessage( Player:GetName(), Message )
+end
+
+function HandleRequest_Chat( Request )
+ if( Request.PostParams["JustChat"] ~= nil ) then
+ local LastIdx = 0
+ if( Request.PostParams["LastMessageID"] ~= nil ) then LastIdx = tonumber( Request.PostParams["LastMessageID"] ) end
+ local Content = ""
+ for key, value in pairs(ChatLogMessages) do
+ if( value.id > LastIdx ) then
+ Content = Content .. "[" .. value.name .. "]: " .. value.message .. "<br>"
+ end
+ end
+ Content = Content .. "<<divider>>" .. LastMessageID .. "<<divider>>" .. LastIdx
+ return Content
+ end
+
+ if( Request.PostParams["ChatMessage"] ~= nil ) then
+ if( Request.PostParams["ChatMessage"] == "/help" ) then
+ Commands = "Available commands"
+ AddMessage(Commands, "<br>" .. "/help, /reload" )
+ return Commands
+ elseif( Request.PostParams["ChatMessage"] == "/reload" ) then
+ Server = cRoot:Get():GetServer()
+ Server:SendMessage( cChatColor.Green .. "Reloading all plugins." )
+ AddMessage("Reloading all plugins", "")
+ cRoot:Get():GetPluginManager():ReloadPlugins()
+ return ""
+ else
+ cmd = Request.PostParams["ChatMessage"]
+ if string.sub(cmd,1,string.len("/")) == "/" then
+ AddMessage('Unknown Command "' .. Request.PostParams["ChatMessage"] .. '"', "")
+ return ""
+ end
+ end
+ local Message = "[WebAdmin]: " .. Request.PostParams["ChatMessage"]
+ cRoot:Get():GetServer():SendMessage( Message )
+ AddMessage("WebAdmin", Request.PostParams["ChatMessage"] )
+ return ""
+ end
+
+ local Content = JavaScript
+ Content = Content .. [[
+ <div style="font-family: Courier; border: 1px solid #DDD; padding: 10px; width: 97%; height: 200px; overflow: scroll;" id="ChatDiv"></div>
+ <input type="text" id="ChatMessage" onKeyPress="if (event.keyCode == 13) { SendChatMessage(); }"><input type="submit" value="Submit" onClick="SendChatMessage();">
+ ]]
+ return Content
+end \ No newline at end of file
diff --git a/Core/web_manageplugins.lua b/Core/web_manageplugins.lua
new file mode 100644
index 000000000..543638183
--- /dev/null
+++ b/Core/web_manageplugins.lua
@@ -0,0 +1,157 @@
+local function Button_RemovePlugin( Name, Index )
+ return "<form method='POST'><input type='hidden' name='PluginName' value='"..Name.."'><input type='hidden' name='PluginIndex' value='"..Index.."'><input type='submit' name='RemovePlugin' value='Remove'></form>"
+end
+
+local function Button_EnablePlugin( Name )
+ return [[<form method="POST"><input type="hidden" name="PluginName", value="]].. Name ..[["><input type="submit" name="EnablePlugin" value="Enable"></form>]]
+end
+
+local function Button_DisablePlugin( Name )
+ return [[<form method="POST"><input type="hidden" name="PluginName", value="]].. Name ..[["><input type="submit" name="DisablePlugin" value="Disable"></form>]]
+end
+
+local function FindPluginID( SettingsIni, PluginName )
+ local KeyIdx = SettingsIni:FindKey("Plugins")
+ local NumValues = SettingsIni:GetNumValues( KeyIdx )
+
+ for i = 0, NumValues-1 do
+ LOGINFO( SettingsIni:GetValue(KeyIdx, i) )
+ if( SettingsIni:GetValue(KeyIdx, i) == PluginName ) then
+ return i
+ end
+ end
+
+ return nil
+end
+
+local function RemovePluginFromIni( SettingsIni, PluginName )
+ local KeyIdx = SettingsIni:FindKey("Plugins")
+ local PluginIdx = FindPluginID( SettingsIni, PluginName )
+
+ if( PluginIdx == nil ) then
+ LOGINFO("Got nil! NOOOO")
+ return false
+ end
+
+ local Name = SettingsIni:GetValue( KeyIdx, PluginIdx )
+ if( Name ~= PluginName ) then
+ LOGINFO("not the same name T_T '" .. Name .. "' '" .. PluginName .. "'")
+ end
+ if( (Name == PluginName) and (SettingsIni:DeleteValueByID( KeyIdx, PluginIdx ) == true) ) then
+ return SettingsIni:WriteFile()
+ end
+
+ return false
+end
+
+local function AddPluginToIni( SettingsIni, PluginName )
+ RemovePluginFromIni( SettingsIni, PluginName ) -- Make sure there are no duplicates
+
+ if( SettingsIni:SetValue("Plugins", "Plugin", PluginName, true ) == true ) then
+ return SettingsIni:WriteFile()
+ end
+
+ return false
+end
+
+local function HandlePluginListChanges( Request, SettingsIni )
+ local Content = ""
+
+ if( Request.PostParams["EnablePlugin"] ~= nil
+ and Request.PostParams["PluginName"] ~= nil ) then
+
+ local PluginName = Request.PostParams["PluginName"]
+
+ local PM = cRoot:Get():GetPluginManager()
+ if( PM:LoadPlugin( PluginName ) == false ) then
+ Content = "Could not enable '".. PluginName .."'!"
+ end
+
+ if( AddPluginToIni( SettingsIni, PluginName ) == true ) then
+ Content = "Enabled plugin '".. PluginName .."'"
+ else
+ Content = "Enabled plugin '".. PluginName .."' but could not add it to settings.ini"
+ end
+
+
+ elseif( Request.PostParams["DisablePlugin"] ~= nil
+ and Request.PostParams["PluginName"] ~= nil ) then
+
+ local PluginName = Request.PostParams["PluginName"]
+
+ local PM = cRoot:Get():GetPluginManager()
+ PM:DisablePlugin( PluginName )
+
+ if( RemovePluginFromIni( SettingsIni, PluginName ) == true ) then
+ Content = "Disabled plugin '".. PluginName .."'"
+ else
+ Content = "Disabled plugin '".. PluginName .."' but could not remove it from settings.ini"
+ end
+
+
+
+ end
+
+ if( #Content > 0 ) then
+ return "<p><font color='red'><strong>INFO: " .. Content .. "</strong></font></p>"
+ else
+ return ""
+ end
+end
+
+function HandleRequest_ManagePlugins( Request )
+ local Content = ""
+
+ if( Request.PostParams["reload"] ~= nil ) then
+ Content = Content .. "<head><meta http-equiv=\"refresh\" content=\"2;\"></head>"
+ Content = Content .. "<p>Reloading plugins... This can take a while depending on the plugins you're using.</p>"
+ cRoot:Get():GetPluginManager():ReloadPlugins()
+ return Content
+ end
+
+ local SettingsIni = cIniFile("settings.ini")
+ if( SettingsIni:ReadFile() == true ) then
+ Content = Content .. HandlePluginListChanges( Request, SettingsIni )
+ else
+ Content = Content .. "Cannot find/modify settings.ini"
+ end
+
+ local PluginManager = cRoot:Get():GetPluginManager()
+ PluginManager:FindPlugins() -- Refreshes the plugin list
+ local PluginList = PluginManager:GetAllPlugins()
+
+ Content = Content .. "<h4>Currently installed plugins</h4>"
+ Content = Content .. "<table>"
+ ActivePluginsName = {}
+ ActivePluginVersion = {}
+ InactivePlugins = {}
+ for k, Plugin in pairs(PluginList) do
+ if( Plugin ) then
+ table.insert( ActivePluginsName, k )
+ table.insert( ActivePluginVersion, Plugin:GetVersion() )
+ else
+ table.insert( InactivePlugins, k )
+ end
+ end
+ table.sort( ActivePluginsName )
+ table.sort( InactivePlugins )
+ for i = 1, #ActivePluginsName do
+ Content = Content .. "<tr><td>".. ActivePluginsName[i] .."</td>"
+ Content = Content .. "<td>" .. ActivePluginsName[i] .. " V. " .. ActivePluginVersion[i] .. "</td><td>" .. Button_DisablePlugin(ActivePluginsName[i]) .. "</td>"
+ Content = Content .. "</tr>"
+ end
+ for i = 1, #InactivePlugins do
+ Content = Content .. "<tr><td>".. InactivePlugins[i] .."</td>"
+ Content = Content .. "<td></td><td>" .. Button_EnablePlugin(InactivePlugins[i]) .. "</td>"
+ Content = Content .. "</tr>"
+ end
+ Content = Content .. "</table>"
+
+ Content = Content .. "<h4>Reload</h4>"
+ Content = Content .. "<form method='POST'>"
+ Content = Content .. "<p>Click the reload button to reload all plugins according to <strong>settings.ini</strong>!"
+ Content = Content .. "<input type='submit' name='reload' value='Reload!'></p>"
+ Content = Content .. "</form>"
+
+ return Content
+end \ No newline at end of file
diff --git a/Core/web_manageserver.lua b/Core/web_manageserver.lua
new file mode 100644
index 000000000..a2936c1a8
--- /dev/null
+++ b/Core/web_manageserver.lua
@@ -0,0 +1,35 @@
+function HandleRequest_ManageServer( Request )
+ local Content = ""
+ if (Request.PostParams["RestartServer"] ~= nil) then
+ cRoot:Get():QueueExecuteConsoleCommand("restart");
+ elseif (Request.PostParams["ReloadServer"] ~= nil) then
+ cRoot:Get():GetPluginManager():ReloadPlugins();
+ elseif (Request.PostParams["StopServer"] ~= nil) then
+ cRoot:Get():QueueExecuteConsoleCommand("stop");
+ elseif (Request.PostParams["WorldSaveAllChunks"] ~= nil) then
+ cRoot:Get():GetWorld(Request.PostParams["WorldSaveAllChunks"]):SaveAllChunks();
+ end
+ Content = Content .. [[
+ <form method="POST">
+ <table>
+ <th colspan="2">Manage Server</th>
+ <tr><td><input type="submit" value="Restart Server" name="RestartServer"> restart the server</td></tr> <br />
+ <tr><td><input type="submit" value="Reload Server" name="ReloadServer"> reload the server</td></tr> <br />
+ <tr><td><input type="submit" value="Stop Server" name="StopServer"> stop the server</td></tr> <br />
+ </th>
+ </table>
+ <table>
+ <th colspan="2">Manage Worlds</th>
+ ]]
+ local LoopWorlds = function( World )
+ Content = Content .. [[
+ <tr><td><input type="submit" value="]] .. World:GetName() .. [[" name="WorldSaveAllChunks"> Save all the chunks of world ]] .. World:GetName() .. [[</td></tr> <br />
+
+ ]]
+ end
+ cRoot:Get():ForEachWorld( LoopWorlds )
+ Content = Content .. "</th></table>"
+
+ return Content
+end
+
diff --git a/Core/web_permissions.lua b/Core/web_permissions.lua
new file mode 100644
index 000000000..7a8af56e9
--- /dev/null
+++ b/Core/web_permissions.lua
@@ -0,0 +1,134 @@
+local function HTML_Option( value, text, selected )
+ if( selected == true ) then
+ return [[<option value="]] .. value .. [[" selected>]] .. text .. [[</option>]]
+ else
+ return [[<option value="]] .. value .. [[">]] .. text .. [[</option>"]]
+ end
+end
+
+local function ShowUsersTable()
+ local Content = "<h4>Users</h4>"
+
+ local NumUsers = UsersIni:GetNumKeys()
+
+ Content = Content .. "<table>"
+
+ if( NumUsers > 0 ) then
+ Content = Content .. "<tr><th></th><th>User</th><th>Groups</th></tr>"
+
+ for i=0, NumUsers-1 do
+ local UserName = UsersIni:GetKeyName( i )
+
+ Content = Content .. "<tr>"
+ Content = Content .. "<td style='width: 10px;'>" .. i .. ".</td>"
+ Content = Content .. "<td>" .. UserName .. "</td>"
+ Content = Content .. "<td>"
+ Content = Content .. UsersIni:GetValue( UserName, "Groups", "-" )
+ Content = Content .. "</td>"
+ Content = Content .. "</tr>"
+ end
+ else
+ Content = Content .. "<tr><td>None</td></tr>"
+ end
+ Content = Content .. "</table>"
+
+
+ return Content
+end
+
+local function ShowGroupsTable()
+ local Content = "<h4>Groups</h4>"
+
+ local NumGroups = GroupsIni:GetNumKeys()
+
+ Content = Content .. "<table>"
+ if( NumGroups > 0 ) then
+ Content = Content .. "<tr><th></th><th>Name</th><th>Permissions</th><th>Color</th></tr>"
+
+ for i=0, NumGroups-1 do
+ local GroupName = GroupsIni:GetKeyName( i )
+
+ Content = Content .. "<tr>"
+ Content = Content .. "<td style='width: 10px;'>" .. i .. ".</td>"
+ Content = Content .. "<td>" .. GroupName .. "</td>"
+ Content = Content .. "<td>"
+ Content = Content .. GroupsIni:GetValue( GroupName, "Permissions", "-" )
+ Content = Content .. "</td>"
+ Content = Content .. "<td>"
+ Content = Content .. GroupsIni:GetValue( GroupName, "Color", "-" )
+ Content = Content .. "</td>"
+ Content = Content .. "</tr>"
+ end
+ else
+ Content = Content .. "<tr><td>None</td></tr>"
+ end
+ Content = Content .. "</table>"
+
+ return Content
+end
+
+local function HTML_Select_Group( name, defaultValue )
+ Groups = ""
+ for I=0, GroupsIni:GetNumKeys() - 1 do
+ Groups = Groups ..
+ HTML_Option(GroupsIni:KeyName(I), GroupsIni:KeyName(I), defaultValue == GroupsIni:KeyName(I) )
+ end
+ return [[<select name="]] .. name .. [[">]] .. Groups .. [[</select>]]
+end
+
+
+local function AddPlayers( Request )
+ local Content = "<h4>Add or change Players</h4>"
+ if( Request.PostParams["AddPlayerToGroup"] ~= nil ) then
+ if Request.PostParams["AddPlayer"] ~= "" then
+ if Request.PostParams["AddGroups"] ~= "" then
+ if GroupsIni:FindKey(Request.PostParams["AddGroup"]) == -1 then
+ return "Group does not exist"
+ end
+ UsersIni:DeleteKey(Request.PostParams["AddPlayer"])
+ UsersIni:GetValueSet(Request.PostParams["AddPlayer"], "Groups", Request.PostParams["AddGroup"])
+ UsersIni:WriteFile()
+ local loopPlayers = function( Player )
+ if Player:GetName() == Request.PostParams["AddPlayer"] then
+ Player:SendMessage( cChatColor.Green .. "You were moved to group " .. Request.PostParams["AddGroup"] )
+ Player:LoadPermissionsFromDisk()
+ end
+ end
+ local loopWorlds = function ( World )
+ World:ForEachPlayer( loopPlayers )
+ end
+ cRoot:Get():ForEachWorld( loopWorlds )
+ end
+ end
+ end
+ Content = Content .. [[
+ <form method="POST">
+ <table>
+ <tr><td style="width: 20%;">Player:</td>
+ <td><input type="text" name="AddPlayer" value=""></td></tr><br>
+ <tr><td style="width: 20%;">Group:</td>
+ <td>]] .. HTML_Select_Group("AddGroup", GroupsIni:KeyName(0) ) .. [[</td></tr>
+ </table>
+ <input type="submit" value="Add Player" name="AddPlayerToGroup">]]
+
+ return Content
+end
+
+function HandleRequest_Permissions( Request )
+ GroupsIni = cIniFile("groups.ini")
+ if( GroupsIni:ReadFile() == false ) then
+ return "Could not read groups.ini!"
+ end
+ UsersIni = cIniFile("users.ini")
+ if( UsersIni:ReadFile() == false ) then
+ return "Could not read users.ini!"
+ end
+
+ local Content = ""
+
+ Content = Content .. AddPlayers( Request )
+ Content = Content .. ShowGroupsTable()
+ Content = Content .. ShowUsersTable()
+
+ return Content
+end \ No newline at end of file
diff --git a/Core/web_playerlist.lua b/Core/web_playerlist.lua
new file mode 100644
index 000000000..6ac25db86
--- /dev/null
+++ b/Core/web_playerlist.lua
@@ -0,0 +1,38 @@
+function HandleRequest_PlayerList( Request )
+ local World = cRoot:Get():GetDefaultWorld()
+ local Content = ""
+
+ if( Request.Params["playerlist-kick"] ~= nil ) then
+ local KickPlayerName = Request.Params["playerlist-kick"]
+ local FoundPlayerCallback = function( Player )
+ if( Player:GetName() == KickPlayerName ) then
+ Player:GetClientHandle():Kick("You were kicked from the game!")
+ Content = Content .. "<p>" .. KickPlayerName .. " has been kicked from the game!</p>"
+ end
+ end
+ if( World:DoWithPlayer( KickPlayerName, FoundPlayerCallback ) == false ) then
+ Content = Content .. "<p>Could not find player " .. KickPlayerName .. " !</p>"
+ end
+ end
+
+ Content = Content .. "<p>Connected Players: <b>" .. World:GetNumPlayers() .. "</b></p>"
+ 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><a href='?playerlist-kick=" .. Player:GetName() .. "'>Kick</a></td>"
+ Content = Content .. "</tr>"
+ end
+ cRoot:Get():ForEachPlayer( AddPlayerToTable )
+
+ if( PlayerNum == 0 ) then
+ Content = Content .. "<tr><td>None</td></tr>"
+ end
+ Content = Content .. "</table>"
+ Content = Content .. "<br>"
+ return Content
+end \ No newline at end of file
diff --git a/Core/web_serversettings.lua b/Core/web_serversettings.lua
new file mode 100644
index 000000000..700d84ae1
--- /dev/null
+++ b/Core/web_serversettings.lua
@@ -0,0 +1,924 @@
+-- Some HTML helper functions
+local function HTML_Option( value, text, selected )
+ if( selected == true ) then
+ return [[<option value="]] .. value .. [[" selected>]] .. text .. [[</option>]]
+ else
+ return [[<option value="]] .. value .. [[">]] .. text .. [[</option>"]]
+ end
+end
+
+local function HTML_Select_On_Off( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("1", "On", defaultValue == 1 )
+ .. HTML_Option("0", "Off", defaultValue == 0 )
+ .. [[</select>]]
+end
+
+local function HTML_Select_Version( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("0", "Latest Version", defaultValue == 0 )
+ .. HTML_Option("61", "1.5.2", defaultValue == 1 )
+ .. HTML_Option("60", "1.5.0", defaultValue == 2 )
+ .. HTML_Option("49", "1.4.5", defaultValue == 3 )
+ .. HTML_Option("47", "1.4.2", defaultValue == 4 )
+ .. HTML_Option("39", "1.3.2", defaultValue == 5 )
+ .. HTML_Option("29", "1.2.5", defaultValue == 6 )
+ .. [[</select>]]
+end
+
+
+local function ShowGeneralSettings( Request )
+ local Content = ""
+ local InfoMsg = nil
+
+ local SettingsIni = cIniFile("settings.ini")
+ if( SettingsIni:ReadFile() == false ) then
+ InfoMsg = "<b style=\"color: red;\">ERROR: Could not read settings.ini!</b>"
+ end
+
+ if( Request.PostParams["general_submit"] ~= nil ) then
+
+ SettingsIni:SetValue("Server", "Description",Request.PostParams["Server_Description"],false )
+ if( tonumber( Request.PostParams["Server_MaxPlayers"] ) ~= nil ) then
+ SettingsIni:SetValue("Server", "MaxPlayers", Request.PostParams["Server_MaxPlayers"], false )
+ end
+ if( tonumber( Request.PostParams["Server_Port"] ) ~= nil ) then
+ if( tonumber( Request.PostParams["Server_Port"] ) > 0 ) then
+ SettingsIni:SetValue("Server", "Port", Request.PostParams["Server_Port"], false )
+ end
+ end
+ if( tonumber( Request.PostParams["Server_PortsIPv6"] ) ~= nil ) then
+ SettingsIni:SetValue("Server", "PortsIPv6", Request.PostParams["Server_PortsIPv6"], false )
+ end
+ if( tonumber( Request.PostParams["Server_Version"] ) ~= nil ) then
+ SettingsIni:SetValue("Server", "PrimaryServerVersion", Request.PostParams["Server_Version"], false )
+ end
+ if( tonumber( Request.PostParams["Authentication_Authenticate"] ) ~= nil ) then
+ SettingsIni:SetValue("Authentication", "Authenticate", Request.PostParams["Authentication_Authenticate"], false )
+ end
+ if( tonumber( Request.PostParams["Limit_World"] ) ~= nil ) then
+ SettingsIni:SetValue("Worlds", "LimitWorld", Request.PostParams["Limit_World"], false )
+ end
+ if( tonumber( Request.PostParams["LimitWorldWidth"] ) ~= nil ) then
+ SettingsIni:SetValue("Worlds", "LimitWorldWidth", Request.PostParams["LimitWorldWidth"], false )
+ end
+
+ if( SettingsIni:WriteFile() == false ) then
+ InfoMsg = [[<b style="color: red;">ERROR: Could not write to settings.ini!</b>]]
+ else
+ InfoMsg = [[<b style="color: green;">INFO: Successfully saved changes to settings.ini</b>]]
+ end
+ end
+
+
+ Content = Content .. [[
+ <form method="POST">
+ <h4>General Settings</h4>]]
+
+ if( InfoMsg ~= nil ) then
+ Content = Content .. "<p>" .. InfoMsg .. "</p>"
+ end
+ Content = Content .. [[
+ <table>
+ <th colspan="2">Server</th>
+ <tr><td style="width: 50%;">Description:</td>
+ <td><input type="text" name="Server_Description" value="]] .. SettingsIni:GetValue("Server", "Description") .. [["></td></tr>
+ <tr><td>Max Players:</td>
+ <td><input type="text" name="Server_MaxPlayers" value="]] .. SettingsIni:GetValue("Server", "MaxPlayers") .. [["></td></tr>
+ <tr><td>Port:</td>
+ <td><input type="text" name="Server_Port" value="]] .. SettingsIni:GetValue("Server", "Port") .. [["></td></tr>
+ <tr><td>PortsIPv6:</td>
+ <td><input type="text" name="Server_PortsIPv6" value="]] .. SettingsIni:GetValue("Server", "PortsIPv6") .. [["></td></tr>
+ <tr><td>Shown Version:</td>
+ <td>]] .. HTML_Select_Version("Server_Version", SettingsIni:GetValueI("Server", "PrimaryServerVersion") ) .. [[</td></tr>
+ </table><br />
+
+ <table>
+ <th colspan="2">Authentication</th>
+ <tr><td style="width: 50%;">Authenticate:</td>
+ <td>]] .. HTML_Select_On_Off("Authentication_Authenticate", SettingsIni:GetValueI("Authentication", "Authenticate") ) .. [[</td></tr>
+ </table><br />
+
+ <table>
+ <th colspan="2">LimitWorld</th>
+ <tr><td style="width: 50%;">Limit World:</td>
+ <td>]] .. HTML_Select_On_Off("Limit_World", SettingsIni:GetValueI("Worlds", "LimitWorld") ) .. [[</td></tr>
+ <tr><td>Max Chunks from spawn:</td>
+ <td><input type="text" name="LimitWorldWidth" value="]] .. SettingsIni:GetValue("Worlds", "LimitWorldWidth") .. [["></td></tr>
+ </table><br />
+ <input type="submit" value="Save Settings" name="general_submit"> WARNING: Any changes made here might require a server restart in order to be applied!
+ </form>]]
+
+ return Content
+end
+
+
+local function ShowMonstersSettings( Request )
+ local Content = ""
+ local InfoMsg = nil
+
+ local SettingsIni = cIniFile("settings.ini")
+ if( SettingsIni:ReadFile() == false ) then
+ InfoMsg = "<b style=\"color: red;\">ERROR: Could not read settings.ini!</b>"
+ end
+
+ if( Request.PostParams["monsters_submit"] ~= nil ) then
+
+ if( tonumber( Request.PostParams["Monsters_AnimalsOn"] ) ~= nil ) then
+ SettingsIni:SetValue("Monsters", "AnimalsOn", Request.PostParams["Monsters_AnimalsOn"], false )
+ end
+ if( tonumber( Request.PostParams["Monsters_AnimalSpawnInterval"] ) ~= nil ) then
+ SettingsIni:SetValue("Monsters", "AnimalSpawnInterval", Request.PostParams["Monsters_AnimalSpawnInterval"], false )
+ end
+ SettingsIni:SetValue("Monsters", "Types", Request.PostParams["Monsters_Types"], false )
+ if( SettingsIni:WriteFile() == false ) then
+ InfoMsg = "<b style=\"color: red;\">ERROR: Could not write to settings.ini!</b>"
+ else
+ InfoMsg = "<b style=\"color: green;\">INFO: Successfully saved changes to settings.ini</b>"
+ end
+ end
+
+
+ Content = Content .. "<form method=\"POST\">"
+
+ Content = Content .. "<h4>Monsters Settings</h4>"
+ if( InfoMsg ~= nil ) then
+ Content = Content .. "<p>" .. InfoMsg .. "</p>"
+ end
+
+ Content = Content .. [[
+ <table>
+ <th colspan="2">Monsters</th>
+ <tr><td style="width: 50%;">Animals On:</td>
+ <td>]] .. HTML_Select_On_Off("Monsters_AnimalsOn", SettingsIni:GetValueI("Monsters", "AnimalsOn") ) .. [[</td></tr>
+ <tr><td>Animal Spawn Interval:</td>
+ <td><input type="text" name="Monsters_AnimalSpawnInterval" value="]] .. SettingsIni:GetValue("Monsters", "AnimalSpawnInterval") .. [["></td></tr>
+ <tr><td>Monster Types:</td>
+ <td><input type="text" name="Monsters_Types" value="]] .. SettingsIni:GetValue("Monsters", "Types") .. [["></td></tr>
+ </table><br />
+ <input type="submit" value="Save Settings" name="monsters_submit"> WARNING: Any changes made here might require a server restart in order to be applied!
+ </form>]]
+
+ return Content
+end
+
+local function ShowWorldsSettings( Request )
+ local Content = ""
+ local InfoMsg = nil
+ local bSaveIni = false
+
+ local SettingsIni = cIniFile("settings.ini")
+ if( SettingsIni:ReadFile() == false ) then
+ InfoMsg = [[<b style="color: red;">ERROR: Could not read settings.ini!</b>]]
+ end
+
+ if( Request.PostParams["RemoveWorld"] ~= nil ) then
+ Content = Content .. Request.PostParams["RemoveWorld"]
+ local WorldIdx = string.sub( Request.PostParams["RemoveWorld"], string.len("Remove ") )
+ local KeyIdx = SettingsIni:FindKey("Worlds")
+ local WorldName = SettingsIni:GetValue( KeyIdx, WorldIdx )
+ if( SettingsIni:DeleteValueByID( KeyIdx, WorldIdx ) == true ) then
+ InfoMsg = "<b style=\"color: green;\">INFO: Successfully removed world " .. WorldName .. "!</b><br />"
+ bSaveIni = true
+ end
+ end
+
+ if( Request.PostParams["AddWorld"] ~= nil ) then
+ if( Request.PostParams["WorldName"] ~= nil and Request.PostParams["WorldName"] ~= "" ) then
+ SettingsIni:SetValue("Worlds", "World", Request.PostParams["WorldName"], true )
+ InfoMsg = "<b style=\"color: green;\">INFO: Successfully added world " .. Request.PostParams["WorldName"] .. "!</b><br />"
+ bSaveIni = true
+ end
+ end
+
+ if( Request.PostParams["worlds_submit"] ~= nil ) then
+ SettingsIni:SetValue("Worlds", "DefaultWorld", Request.PostParams["Worlds_DefaultWorld"], false )
+ if( Request.PostParams["Worlds_World"] ~= nil ) then
+ SettingsIni:SetValue("Worlds", "World", Request.PostParams["Worlds_World"], true )
+ end
+ bSaveIni = true
+ end
+
+ if( bSaveIni == true ) then
+ if( InfoMsg == nil ) then InfoMsg = "" end
+ if( SettingsIni:WriteFile() == false ) then
+ InfoMsg = InfoMsg .. "<b style=\"color: red;\">ERROR: Could not write to settings.ini!</b>"
+ else
+ InfoMsg = InfoMsg .. "<b style=\"color: green;\">INFO: Successfully saved changes to settings.ini</b>"
+ end
+ end
+
+ Content = Content .. "<h4>Worlds Settings</h4>"
+ if( InfoMsg ~= nil ) then
+ Content = Content .. "<p>" .. InfoMsg .. "</p>"
+ end
+
+ Content = Content .. [[
+ <form method="POST">
+ <table>
+ <th colspan="2">Worlds</th>
+ <tr><td style="width: 50%;">Default World:</td>
+ <td><input type="Submit" name="Worlds_DefaultWorld" value="]] .. SettingsIni:GetValue("Worlds", "DefaultWorld") .. [["></td></tr>]]
+
+ local KeyIdx = SettingsIni:FindKey("Worlds")
+ local NumValues = SettingsIni:GetNumValues( KeyIdx )
+ for i = 0, NumValues-1 do
+ local ValueName = SettingsIni:GetValueName(KeyIdx, i )
+ if( ValueName == "World" ) then
+ local WorldName = SettingsIni:GetValue(KeyIdx, i)
+ Content = Content .. [[
+ <tr><td>]] .. ValueName .. [[:</td><td><div style="width: 100px; display: inline-block;">]] .. WorldName .. [[</div><input type="submit" value="Remove ]] .. i .. [[" name="RemoveWorld"></td></tr>]]
+ end
+ end
+
+ Content = Content .. [[
+ <tr><td>Add World:</td>
+ <td><input type='text' name='WorldName'><input type='submit' name='AddWorld' value='Add World'></td></tr>
+ </table><br />
+
+ <input type="submit" value="Save Settings" name="worlds_submit"> WARNING: Any changes made here might require a server restart in order to be applied!
+ </form>]]
+ return Content
+end
+
+local function SelectWorldButton( WorldName )
+ return "<form method='POST'><input type='hidden' name='WorldName' value='"..WorldName.."'><input type='submit' name='SelectWorld' value='Select'></form>"
+end
+
+local function HTML_Select_Dimension( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("0", "Overworld", defaultValue == 0 )
+ .. HTML_Option("-1", "Nether", defaultValue == 1 )
+ .. HTML_Option("1", "The End", defaultValue == 2 )
+ .. [[</select>]]
+end
+
+local function HTML_Select_Scheme( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("Default", "Default", defaultValue == "Default" )
+ .. HTML_Option("Forgetful", "Forgetful", defaultValue == "Forgetful" )
+ .. HTML_Option("Compact", "Compact", defaultValue == "Compact" )
+ .. [[</select>]]
+end
+
+local function HTML_Select_GameMode( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("0", "Survival", defaultValue == 0 )
+ .. HTML_Option("1", "Creative", defaultValue == 1 )
+ .. HTML_Option("2", "Adventure", defaultValue == 2 )
+ .. [[</select>]]
+end
+
+local function HTML_Select_Simulator( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("Floody", "Floody", defaultValue == 0 )
+ .. HTML_Option("Noop", "Noop", defaultValue == 1 )
+ .. HTML_Option("Vaporize", "Vaporize", defaultValue == 2 )
+ .. [[</select>]]
+end
+
+local function HTML_Select_BiomeGen( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("MultiStepMap", "MultiStepMap", defaultValue == "MultiStepMap" )
+ .. HTML_Option("DistortedVoronoi", "DistortedVoronoi", defaultValue == "DistortedVoronoi" )
+ .. HTML_Option("Voronoi", "Voronoi", defaultValue == "Voronoi" )
+ .. HTML_Option("CheckerBoard", "CheckerBoard", defaultValue == "CheckerBoard" )
+ .. HTML_Option("Constant", "Constant", defaultValue == "Constant" )
+ .. [[</select>]]
+end
+
+local function HTML_Select_HeightGen( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("Noise3D", "Noise3D", defaultValue == "Noise3D" )
+ .. HTML_Option("Biomal", "Biomal", defaultValue == "Biomal" )
+ .. HTML_Option("Classic", "Classic", defaultValue == "Classic" )
+ .. HTML_Option("Flat", "Flat", defaultValue == "Flat" )
+ .. [[</select>]]
+end
+
+local function HTML_Select_CompositionGen( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("Noise3D", "Noise3D", defaultValue == "Noise3D" )
+ .. HTML_Option("Biomal", "Biomal", defaultValue == "Biomal" )
+ .. HTML_Option("Classic", "Classic", defaultValue == "Classic" )
+ .. HTML_Option("SameBlock", "SameBlock", defaultValue == "SameBlock" )
+ .. HTML_Option("DebugBiomes", "DebugBiomes", defaultValue == "DebugBiomes" )
+ .. [[</select>]]
+end
+
+local function HTML_Select_Generator( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("Composable", "Composable", defaultValue == "Composable" )
+ .. [[</select>]]
+end
+
+local function HTML_Select_Biome( name, defaultValue )
+ return [[<select name="]] .. name .. [[">]]
+ .. HTML_Option("Ocean", "Ocean", defaultValue == "Ocean" )
+ .. HTML_Option("Plains", "Plains", defaultValue == "Plains" )
+ .. HTML_Option("Extreme Hills", "Extreme Hills", defaultValue == "Extreme Hills" )
+ .. HTML_Option("Forest", "Forest", defaultValue == "Forest" )
+ .. HTML_Option("Taiga", "Taiga", defaultValue == "Taiga" )
+ .. HTML_Option("Swampland", "Swampland", defaultValue == "Swampland" )
+ .. HTML_Option("River", "River", defaultValue == "River" )
+ .. HTML_Option("Hell", "Hell", defaultValue == "Hell" )
+ .. HTML_Option("Sky", "Sky", defaultValue == "Sky" )
+ .. HTML_Option("FrozenOcean", "FrozenOcean", defaultValue == "FrozenOcean" )
+ .. HTML_Option("FrozenRiver", "FrozenRiver", defaultValue == "FrozenRiver" )
+ .. HTML_Option("Ice Plains", "Ice Plains", defaultValue == "Ice Plains" )
+ .. HTML_Option("Ice Mountains", "Ice Mountains", defaultValue == "Ice Mountains" )
+ .. HTML_Option("MushroomIsland", "MushroomIsland", defaultValue == "MushroomIsland" )
+ .. HTML_Option("MushroomIslandShore", "MushroomIslandShore", defaultValue == "MushroomIslandShore" )
+ .. HTML_Option("Beach", "Beach", defaultValue == "Beach" )
+ .. HTML_Option("DesertHills", "DesertHills", defaultValue == "DesertHills" )
+ .. HTML_Option("ForestHills", "ForestHills", defaultValue == "ForestHills" )
+ .. HTML_Option("TaigaHills", "TaigaHills", defaultValue == "TaigaHills" )
+ .. HTML_Option("Extreme Hills Edge", "Extreme Hills Edge", defaultValue == "Extreme Hills Edge" )
+ .. HTML_Option("Jungle", "Jungle", defaultValue == "Jungle" )
+ .. HTML_Option("JungleHills", "JungleHills", defaultValue == "JungleHills" )
+ .. [[</select>]]
+end
+
+function ShowWorldSettings( Request )
+ local Content = ""
+ local InfoMsg = nil
+ local SettingsIni = cIniFile("settings.ini")
+ if( SettingsIni:ReadFile() == false ) then
+ InfoMsg = [[<b style="color: red;">ERROR: Could not read settings.ini!</b>]]
+ end
+ if (Request.PostParams["SelectWorld"] ~= nil and Request.PostParams["WorldName"] ~= nil) then -- World is selected!
+ WORLD = Request.PostParams["WorldName"]
+ SelectedWorld = cRoot:Get():GetWorld(WORLD)
+ elseif SelectedWorld == nil then
+ WORLD = SettingsIni:GetValue("Worlds", "DefaultWorld")
+ SelectedWorld = cRoot:Get():GetWorld( WORLD )
+ end
+ local WorldIni = cIniFile(SelectedWorld:GetName() .. "/world.ini")
+ WorldIni:ReadFile()
+ if (Request.PostParams["world_submit"]) ~= nil then
+ if( tonumber( Request.PostParams["World_Dimension"] ) ~= nil ) then
+ WorldIni:DeleteValue( "General", "Dimension" )
+ WorldIni:SetValue( "General", "Dimension", Request.PostParams["World_Dimension"] )
+ end
+ if( tonumber( Request.PostParams["World_Schema"] ) ~= nil ) then
+ WorldIni:DeleteValue( "General", "Schema" )
+ WorldIni:SetValue( "General", "Schema", Request.PostParams["World_Schema"] )
+ end
+ if( tonumber( Request.PostParams["World_SpawnX"] ) ~= nil ) then
+ WorldIni:DeleteValue( "SpawnPosition", "X" )
+ WorldIni:SetValue( "SpawnPosition", "X", Request.PostParams["World_SpawnX"] )
+ end
+ if( tonumber( Request.PostParams["World_SpawnY"] ) ~= nil ) then
+ WorldIni:DeleteValue( "SpawnPosition", "Y" )
+ WorldIni:SetValue( "SpawnPosition", "Y", Request.PostParams["World_SpawnY"] )
+ end
+ if( tonumber( Request.PostParams["World_SpawnZ"] ) ~= nil ) then
+ WorldIni:DeleteValue( "SpawnPosition", "Z" )
+ WorldIni:SetValue( "SpawnPosition", "Z", Request.PostParams["World_SpawnZ"] )
+ end
+ if( tonumber( Request.PostParams["World_Seed"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Seed", "Seed" )
+ WorldIni:SetValue( "Seed", "Seed", Request.PostParams["World_Seed"] )
+ end
+ if( tonumber( Request.PostParams["World_PVP"] ) ~= nil ) then
+ WorldIni:DeleteValue( "PVP", "Enabled" )
+ WorldIni:SetValue( "PVP", "Enabled", Request.PostParams["World_PVP"] )
+ end
+ if( tonumber( Request.PostParams["World_GameMode"] ) ~= nil ) then
+ WorldIni:DeleteValue( "GameMode", "GameMode" )
+ WorldIni:SetValue( "GameMode", "GameMode", Request.PostParams["World_GameMode"] )
+ end
+ if( tonumber( Request.PostParams["World_DeepSnow"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Physics", "DeepSnow" )
+ WorldIni:SetValue( "Physics", "DeepSnow", Request.PostParams["World_DeepSnow"] )
+ end
+ if( tonumber( Request.PostParams["World_SandInstantFall"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Physics", "SandInstantFall" )
+ WorldIni:SetValue( "Physics", "SandInstantFall", Request.PostParams["World_SandInstantFall"] )
+ end
+ if( tonumber( Request.PostParams["World_WaterSimulator"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Physics", "WaterSimulator" )
+ WorldIni:SetValue( "Physics", "WaterSimulator", Request.PostParams["World_WaterSimulator"] )
+ end
+ if( tonumber( Request.PostParams["World_LavaSimulator"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Physics", "LavaSimulator" )
+ WorldIni:SetValue( "Physics", "LavaSimulator", Request.PostParams["World_LavaSimulator"] )
+ end
+ if( tonumber( Request.PostParams["World_MaxSugarcaneHeight"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "MaxSugarcaneHeight" )
+ WorldIni:SetValue( "Plants", "MaxSugarcaneHeight", Request.PostParams["World_MaxSugarcaneHeight"] )
+ end
+ if( tonumber( Request.PostParams["World_MaxCactusHeight"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "MaxCactusHeight" )
+ WorldIni:SetValue( "Plants", "MaxCactusHeight", Request.PostParams["World_MaxCactusHeight"] )
+ end
+ if( tonumber( Request.PostParams["World_CarrotsBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsCarrotsBonemealable" )
+ WorldIni:SetValue( "Plants", "IsCarrotsBonemealable", Request.PostParams["World_CarrotsBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_CropsBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsCropsBonemealable" )
+ WorldIni:SetValue( "Plants", "IsCropsBonemealable", Request.PostParams["World_CropsBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_GrassBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsGrassBonemealable" )
+ WorldIni:SetValue( "Plants", "IsGrassBonemealable", Request.PostParams["World_GrassBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_SaplingBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsSaplingBonemealable" )
+ WorldIni:SetValue( "Plants", "IsSaplingBonemealable", Request.PostParams["World_SaplingBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_MelonStemBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsMelonStemBonemealable" )
+ WorldIni:SetValue( "Plants", "IsMelonStemBonemealable", Request.PostParams["World_MelonStemBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_MelonBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsMelonBonemealable" )
+ WorldIni:SetValue( "Plants", "IsMelonBonemealable", Request.PostParams["World_MelonBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_PotatoesBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsPotatoesBonemealable" )
+ WorldIni:SetValue( "Plants", "IsPotatoesBonemealable", Request.PostParams["World_PotatoesBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_PumpkinStemBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsPumpkinStemBonemealable" )
+ WorldIni:SetValue( "Plants", "IsPumpkinStemBonemealable", Request.PostParams["World_PumpkinStemBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_PumpkinBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsPumpkinBonemealable" )
+ WorldIni:SetValue( "Plants", "IsPumpkinBonemealable", Request.PostParams["World_PumpkinBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_SugarCaneBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsSugarCaneBonemealable" )
+ WorldIni:SetValue( "Plants", "IsSugarCaneBonemealable", Request.PostParams["World_SugarCaneBonemealable"] )
+ end
+ if( tonumber( Request.PostParams["World_CactusBonemealable"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Plants", "IsCactusBonemealable" )
+ WorldIni:SetValue( "Plants", "IsCactusBonemealable", Request.PostParams["World_CactusBonemealable"] )
+ end
+ if( ( Request.PostParams["World_BiomeGen"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "BiomeGen" )
+ WorldIni:SetValue( "Generator", "BiomeGen", Request.PostParams["World_BiomeGen"] )
+ end
+ if( ( Request.PostParams["World_Biome"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ConstantBiome" )
+ WorldIni:SetValue( "Generator", "ConstantBiome", Request.PostParams["World_Biome"] )
+ end
+ if( ( Request.PostParams["World_MultiStepMapOceanCellSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MultiStepMapOceanCellSize" )
+ WorldIni:SetValue( "Generator", "MultiStepMapOceanCellSize", Request.PostParams["World_MultiStepMapOceanCellSize"] )
+ end
+ if( ( Request.PostParams["World_MultiStepMapMushroomIslandSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MultiStepMapMushroomIslandSize" )
+ WorldIni:SetValue( "Generator", "MultiStepMapMushroomIslandSize", Request.PostParams["World_MultiStepMapMushroomIslandSize"] )
+ end
+ if( ( Request.PostParams["World_MultiStepMapRiverCellSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MultiStepMapRiverCellSize" )
+ WorldIni:SetValue( "Generator", "MultiStepMapRiverCellSize", Request.PostParams["World_MultiStepMapRiverCellSize"] )
+ end
+ if( ( Request.PostParams["World_MultiStepMapRiverWidth"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MultiStepMapRiverWidth" )
+ WorldIni:SetValue( "Generator", "MultiStepMapRiverWidth", Request.PostParams["World_MultiStepMapRiverWidth"] )
+ end
+ if( ( Request.PostParams["World_MultiStepMapLandBiomeSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MultiStepMapLandBiomeSize" )
+ WorldIni:SetValue( "Generator", "MultiStepMapLandBiomeSize", Request.PostParams["World_MultiStepMapLandBiomeSize"] )
+ end
+ if( ( Request.PostParams["World_DistortedVoronoiCellSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "DistortedVoronoiCellSize" )
+ WorldIni:SetValue( "Generator", "DistortedVoronoiCellSize", Request.PostParams["World_DistortedVoronoiCellSize"] )
+ end
+ if( ( Request.PostParams["World_DistortedVoronoiBiomes"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "DistortedVoronoiBiomes" )
+ WorldIni:SetValue( "Generator", "DistortedVoronoiBiomes", Request.PostParams["World_DistortedVoronoiBiomes"] )
+ end
+ if( ( Request.PostParams["World_VoronoiCellSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "VoronoiCellSize" )
+ WorldIni:SetValue( "Generator", "VoronoiCellSize", Request.PostParams["World_VoronoiCellSize"] )
+ end
+ if( ( Request.PostParams["World_VoronoiBiomesdVoronoiBiomes"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "VoronoiBiomes" )
+ WorldIni:SetValue( "Generator", "VoronoiBiomes", Request.PostParams["World_VoronoiBiomes"] )
+ end
+ if( ( Request.PostParams["World_CheckerBoardBiomes"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "CheckerBoardBiomes" )
+ WorldIni:SetValue( "Generator", "CheckerBoardBiomes", Request.PostParams["World_CheckerBoardBiomes"] )
+ end
+ if( ( Request.PostParams["World_CheckerBoardBiomeSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "CheckerBoardBiomeSize" )
+ WorldIni:SetValue( "Generator", "CheckerBoardBiomeSize", Request.PostParams["World_CheckerBoardBiomeSize"] )
+ end
+ if( ( Request.PostParams["World_HeightGen"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "HeightGen" )
+ WorldIni:SetValue( "Generator", "HeightGen", Request.PostParams["World_HeightGen"] )
+ end
+ if( ( Request.PostParams["World_FlatHeight"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "FlatHeight" )
+ WorldIni:SetValue( "Generator", "FlatHeight", Request.PostParams["World_FlatHeight"] )
+ end
+ if( ( Request.PostParams["World_CompositionGen"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "CompositionGen" )
+ WorldIni:SetValue( "Generator", "CompositionGen", Request.PostParams["World_CompositionGen"] )
+ end
+ if( ( Request.PostParams["World_Noise3DSeaLevel"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Noise3DSeaLevel" )
+ WorldIni:SetValue( "Generator", "Noise3DSeaLevel", Request.PostParams["World_Noise3DSeaLevel"] )
+ end
+ if( ( Request.PostParams["World_Noise3DHeightAmplification"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Noise3DHeightAmplification" )
+ WorldIni:SetValue( "Generator", "Noise3DHeightAmplification", Request.PostParams["World_Noise3DHeightAmplification"] )
+ end
+ if( ( Request.PostParams["World_Noise3DMidPoint"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Noise3DMidPoint" )
+ WorldIni:SetValue( "Generator", "Noise3DMidPoint", Request.PostParams["World_Noise3DMidPoint"] )
+ end
+ if( ( Request.PostParams["World_Noise3DFrequencyX"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Noise3DFrequencyX" )
+ WorldIni:SetValue( "Generator", "Noise3DFrequencyX", Request.PostParams["World_Noise3DFrequencyX"] )
+ end
+ if( ( Request.PostParams["World_Noise3DFrequencyY"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Noise3DFrequencyY" )
+ WorldIni:SetValue( "Generator", "Noise3DFrequencyY", Request.PostParams["World_Noise3DFrequencyY"] )
+ end
+ if( ( Request.PostParams["World_Noise3DFrequencyZ"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Noise3DFrequencyZ" )
+ WorldIni:SetValue( "Generator", "Noise3DFrequencyZ", Request.PostParams["World_Noise3DFrequencyZ"] )
+ end
+ if( ( Request.PostParams["World_Noise3DAirThreshold"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Noise3DAirThreshold" )
+ WorldIni:SetValue( "Generator", "Noise3DAirThreshold", Request.PostParams["World_Noise3DAirThreshold"] )
+ end
+ if( ( Request.PostParams["World_ClassicSeaLevel"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicSeaLevel" )
+ WorldIni:SetValue( "Generator", "ClassicSeaLevel", Request.PostParams["World_ClassicSeaLevel"] )
+ end
+ if( ( Request.PostParams["World_ClassicBeachHeight"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicBeachHeight" )
+ WorldIni:SetValue( "Generator", "ClassicBeachHeight", Request.PostParams["World_ClassicBeachHeight"] )
+ end
+ if( ( Request.PostParams["World_ClassicBeachDepth"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicBeachDepth" )
+ WorldIni:SetValue( "Generator", "ClassicBeachDepth", Request.PostParams["World_ClassicBeachDepth"] )
+ end
+ if( ( Request.PostParams["World_ClassicBlockTop"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicBlockTop" )
+ WorldIni:SetValue( "Generator", "ClassicBlockTop", Request.PostParams["World_ClassicBlockTop"] )
+ end
+ if( ( Request.PostParams["World_ClassicBlockMiddle"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicBlockMiddle" )
+ WorldIni:SetValue( "Generator", "ClassicBlockMiddle", Request.PostParams["World_ClassicBlockMiddle"] )
+ end
+ if( ( Request.PostParams["World_ClassicBlockBottom"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicBlockBottom" )
+ WorldIni:SetValue( "Generator", "ClassicBlockBottom", Request.PostParams["World_ClassicBlockBottom"] )
+ end
+ if( ( Request.PostParams["World_ClassicBlockBeach"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicBlockBeach" )
+ WorldIni:SetValue( "Generator", "ClassicBlockBeach", Request.PostParams["World_ClassicBlockBeach"] )
+ end
+ if( ( Request.PostParams["World_ClassicBlockBeachBottom"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicBlockBeachBottom" )
+ WorldIni:SetValue( "Generator", "ClassicBlockBeachBottom", Request.PostParams["World_ClassicBlockBeachBottom"] )
+ end
+ if( ( Request.PostParams["World_ClassicBlockSea"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "ClassicBlockSea" )
+ WorldIni:SetValue( "Generator", "ClassicBlockSea", Request.PostParams["World_ClassicBlockSea"] )
+ end
+ if( ( Request.PostParams["World_SameBlockType"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "SameBlockType" )
+ WorldIni:SetValue( "Generator", "SameBlockType", Request.PostParams["World_SameBlockType"] )
+ end
+ if( ( Request.PostParams["World_SameBlockBedrocked"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "SameBlockBedrocked" )
+ WorldIni:SetValue( "Generator", "SameBlockBedrocked", Request.PostParams["World_SameBlockBedrocked"] )
+ end
+ if( ( Request.PostParams["World_Structures"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Structures" )
+ WorldIni:SetValue( "Generator", "Structures", Request.PostParams["World_Structures"] )
+ end
+ if( ( Request.PostParams["World_Finishers"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Finishers" )
+ WorldIni:SetValue( "Generator", "Finishers", Request.PostParams["World_Finishers"] )
+ end
+ if( ( Request.PostParams["World_Generator"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "Generator" )
+ WorldIni:SetValue( "Generator", "Generator", Request.PostParams["World_Generator"] )
+ end
+ if( ( Request.PostParams["World_MineShaftsGridSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MineShaftsGridSize" )
+ WorldIni:SetValue( "Generator", "MineShaftsGridSize", Request.PostParams["World_MineShaftsGridSize"] )
+ end
+ if( ( Request.PostParams["World_MineShaftsMaxSystemSize"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MineShaftsMaxSystemSize" )
+ WorldIni:SetValue( "Generator", "MineShaftsMaxSystemSize", Request.PostParams["World_MineShaftsMaxSystemSize"] )
+ end
+ if( ( Request.PostParams["World_MineShaftsChanceCorridor"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MineShaftsChanceCorridor" )
+ WorldIni:SetValue( "Generator", "MineShaftsChanceCorridor", Request.PostParams["World_MineShaftsChanceCorridor"] )
+ end
+ if( ( Request.PostParams["World_MineShaftsChanceCrossing"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MineShaftsChanceCrossing" )
+ WorldIni:SetValue( "Generator", "MineShaftsChanceCrossing", Request.PostParams["World_MineShaftsChanceCrossing"] )
+ end
+ if( ( Request.PostParams["World_MineShaftsChanceStaircase"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "MineShaftsChanceStaircase" )
+ WorldIni:SetValue( "Generator", "MineShaftsChanceStaircase", Request.PostParams["World_MineShaftsChanceStaircase"] )
+ end
+ if( ( Request.PostParams["World_LavaLakesProbability"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "LavaLakesProbability" )
+ WorldIni:SetValue( "Generator", "LavaLakesProbability", Request.PostParams["World_LavaLakesProbability"] )
+ end
+ if( ( Request.PostParams["World_WaterLakesProbability"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "WaterLakesProbability" )
+ WorldIni:SetValue( "Generator", "WaterLakesProbability", Request.PostParams["World_WaterLakesProbability"] )
+ end
+ if( ( Request.PostParams["World_BottomLavaLevel"] ) ~= nil ) then
+ WorldIni:DeleteValue( "Generator", "BottomLavaLevel" )
+ WorldIni:SetValue( "Generator", "BottomLavaLevel", Request.PostParams["World_BottomLavaLevel"] )
+ end
+
+ WorldIni:WriteFile()
+ end
+ Content = Content .. "<h4>World for operations: " .. 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>" .. SelectWorldButton(World:GetName()) .. "</td>"
+ Content = Content .. "</tr>"
+ end
+ cRoot:Get():ForEachWorld(AddWorldToTable)
+ Content = Content .. "</table>"
+
+
+ Content = Content .. [[<table>
+ <form method="POST">
+ <br />
+ <th colspan="2">General</th>
+ <tr><td>Dimension:</td>
+ <td>]] .. HTML_Select_Dimension("World_Dimension", WorldIni:GetValueI("General", "Dimension") ) .. [[</td></tr>
+ </table>
+ <br />
+ <table>
+ <th colspan="2">Storage</th>
+ <tr><td>Schema:</td>
+ <td>]] .. HTML_Select_Scheme("World_Schema", WorldIni:GetValueI("Storage", "Schema") ) .. [[</td></tr>
+ </table>
+ <br />
+ <table>
+ <th colspan="2">Spawn Position</th>
+ <tr><td>X:</td>
+ <td><input type="text" name="World_SpawnX" value="]] .. WorldIni:GetValue("SpawnPosition", "X") .. [["></td></tr>
+ <tr><td>Y:</td>
+ <td><input type="text" name="World_SpawnY" value="]] .. WorldIni:GetValue("SpawnPosition", "Y") .. [["></td></tr>
+ <tr><td>Z:</td>
+ <td><input type="text" name="World_SpawnZ" value="]] .. WorldIni:GetValue("SpawnPosition", "Z") .. [["></td></tr>
+ </table>
+ <br />
+ <table>
+ <th colspan="2">Seed</th>
+ <tr><td>Seed:</td>
+ <td><input type="text" name="World_Seed" value="]] .. WorldIni:GetValue("Seed", "Seed") .. [["></td></tr>
+ </table>
+ <br />
+ <table>
+ <th colspan="2">PVP</th>
+ <tr><td style="width: 50%;">PVP:</td>
+ <td>]] .. HTML_Select_On_Off("World_PVP", WorldIni:GetValueI("PVP", "Enabled") ) .. [[</td></tr>
+ </table>
+ <br />
+ <table>
+ <th colspan="2">GameMode</th>
+ <tr><td style="width: 50%;">GameMode:</td>
+ <td>]] .. HTML_Select_GameMode("World_GameMode", WorldIni:GetValueI("GameMode", "GameMode") ) .. [[</td></tr>
+ </table>
+ <br />
+ <table>
+ <th colspan="2">Physics</th>
+ <tr><td style="width: 50%;">DeepSnow:</td>
+ <td>]] .. HTML_Select_On_Off("World_DeepSnow", WorldIni:GetValueI("Physics", "DeepSnow") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">SandInstantFall:</td>
+ <td>]] .. HTML_Select_On_Off("World_SandInstantFall", WorldIni:GetValueI("Physics", "SandInstantFall") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">WaterSimulator:</td>
+ <td>]] .. HTML_Select_Simulator("World_WaterSimulator", WorldIni:GetValue("Physics", "WaterSimulator") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">LavaSimulator:</td>
+ <td>]] .. HTML_Select_Simulator("World_LavaSimulator", WorldIni:GetValue("Physics", "LavaSimulator") ) .. [[</td></tr>
+ </table>
+ <br />
+ <table>
+ <th colspan="2">Plants</th>
+ <tr><td>MaxCactusHeight:</td>
+ <td><input type="text" name="World_MaxCactusHeight" value="]] .. WorldIni:GetValue("Plants", "MaxCactusHeight") .. [["></td></tr>
+ <tr><td>MaxSugarcaneHeigh:</td>
+ <td><input type="text" name="World_MaxSugarcaneHeight" value="]] .. WorldIni:GetValue("Plants", "MaxSugarcaneHeight") .. [["></td></tr>
+ <tr><td style="width: 50%;">CarrotsBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_CarrotsBonemealable", WorldIni:GetValueI("Plants", "IsCarrotsBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">CropsBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_CropsBonemealable", WorldIni:GetValueI("Plants", "IsCropsBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">GrassBonemealabl:</td>
+ <td>]] .. HTML_Select_On_Off("World_GrassBonemealable", WorldIni:GetValueI("Plants", "IsGrassBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">SaplingBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_SaplingBonemealable", WorldIni:GetValueI("Plants", "IsSaplingBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">MelonStemBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_MelonStemBonemealable", WorldIni:GetValueI("Plants", "IsMelonStemBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">MelonBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_MelonBonemealable", WorldIni:GetValueI("Plants", "IsMelonBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">PotatoesBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_PotatoesBonemealable", WorldIni:GetValueI("Plants", "IsPotatoesBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">PumpkinStemBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_PumpkinStemBonemealable", WorldIni:GetValueI("Plants", "IsPumpkinStemBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">PumpkinBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_PumpkinBonemealable", WorldIni:GetValueI("Plants", "IsPumpkinBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">SugarcaneBonemealabl:</td>
+ <td>]] .. HTML_Select_On_Off("World_SugarcaneBonemealable", WorldIni:GetValueI("Plants", "IsSugarcaneBonemealable") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">CactusBonemealable:</td>
+ <td>]] .. HTML_Select_On_Off("World_CactusBonemealable", WorldIni:GetValueI("Plants", "IsCactusBonemealable") ) .. [[</td></tr>
+ </table>
+ <br />
+ <table>
+ <th colspan="2">Generator</th>
+ <tr><td style="width: 50%;">BiomeGen:</td>
+ <td>]] .. HTML_Select_BiomeGen("World_BiomeGen", WorldIni:GetValue("Generator", "BiomeGen") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">HeightGen:</td>
+ <td>]] .. HTML_Select_HeightGen("World_HeightGen", WorldIni:GetValue("Generator", "HeightGen") ) .. [[</td></tr>
+ <tr><td style="width: 50%;">CompositionGen:</td>
+ <td>]] .. HTML_Select_CompositionGen("World_CompositionGen", WorldIni:GetValue("Generator", "CompositionGen") ) .. [[</td></tr>
+ <tr><td>Structures:</td>
+ <td><input type="text" size="50" name="World_Structures" value="]] .. WorldIni:GetValue("Generator", "Structures") .. [["></td></tr>
+ <tr><td>Finishers:</td>
+ <td><input type="text" size="50" name="World_Finishers" value="]] .. WorldIni:GetValue("Generator", "Finishers") .. [["></td></tr>
+ <tr><td style="width: 50%;">Generator:</td>
+ <td>]] .. HTML_Select_Generator("World_Generator", WorldIni:GetValue("Generator", "Generator") ) .. [[</td></tr>
+
+ </table>
+ <br />
+ <table>
+ <th colspan="1">Finetuning</th><br />
+ </table>
+ <table>
+ ]]
+ if WorldIni:GetValue( "Generator", "BiomeGen" ) == "Constant" then
+ Content = Content .. [[
+ <th colspan="2">Biome Generator</th>
+ <tr><td style="width: 50%;">ConstantBiome:</td>
+ <td>]] .. HTML_Select_Biome( "World_Biome", WorldIni:GetValue("Generator", "ConstantBiome" ) ) .. [[</td></tr>]]
+ elseif WorldIni:GetValue( "Generator", "BiomeGen" ) == "MultiStepMap" then
+ Content = Content .. [[
+ <th colspan="2">Biome Generator</th>
+ <tr><td>MultiStepMapOceanCellSize:</td>
+ <td><input type="text" name="World_MultiStepMapOceanCellSize" value="]] .. WorldIni:GetValue("Generator", "MultiStepMapOceanCellSize") .. [["></td></tr>
+ <tr><td>MultiStepMapOceanCellSize:</td>
+ <td><input type="text" name="World_MultiStepMapMushroomIslandSize" value="]] .. WorldIni:GetValue("Generator", "MultiStepMapMushroomIslandSize") .. [["></td></tr>
+ <tr><td>MultiStepMapOceanCellSize:</td>
+ <td><input type="text" name="World_MultiStepMapRiverCellSize" value="]] .. WorldIni:GetValue("Generator", "MultiStepMapRiverCellSize") .. [["></td></tr>
+ <tr><td>MultiStepMapOceanCellSize:</td>
+ <td><input type="text" name="World_MultiStepMapRiverWidth" value="]] .. WorldIni:GetValue("Generator", "MultiStepMapRiverWidth") .. [["></td></tr>
+ <tr><td>MultiStepMapOceanCellSize:</td>
+ <td><input type="text" name="World_MultiStepMapLandBiomeSize" value="]] .. WorldIni:GetValue("Generator", "MultiStepMapLandBiomeSize") .. [["></td></tr>]]
+ elseif WorldIni:GetValue( "Generator", "BiomeGen" ) == "DistortedVoronoi" then
+ Content = Content .. [[
+ <th colspan="2">Biome Generator</th>
+ <tr><td>DistortedVoronoiCellSize:</td>
+ <td><input type="text" name="World_DistortedVoronoiCellSize" value="]] .. WorldIni:GetValue("Generator", "DistortedVoronoiCellSize") .. [["></td></tr>
+ <tr><td>DistortedVoronoiBiomes:</td>
+ <td><input type="text" name="World_DistortedVoronoiBiomes" value="]] .. WorldIni:GetValue("Generator", "DistortedVoronoiBiomes") .. [["></td></tr>]]
+ elseif WorldIni:GetValue( "Generator", "BiomeGen" ) == "Voronoi" then
+ Content = Content .. [[
+ <th colspan="2">Biome Generator</th>
+ <tr><td>VoronoiCellSize:</td>
+ <td><input type="text" name="World_VoronoiCellSize" value="]] .. WorldIni:GetValue("Generator", "VoronoiCellSize") .. [["></td></tr>
+ <tr><td>VoronoiBiomes:</td>
+ <td><input type="text" name="World_VoronoiBiomes" value="]] .. WorldIni:GetValue("Generator", "VoronoiBiomes") .. [["></td></tr>]]
+ elseif WorldIni:GetValue( "Generator", "BiomeGen" ) == "CheckerBoard" then
+ Content = Content .. [[
+ <th colspan="2">Biome Generator</th>
+ <tr><td>CheckerBoardBiomes:</td>
+ <td><input type="text" name="World_CheckerBoardBiomes" value="]] .. WorldIni:GetValue("Generator", "CheckerBoardBiomes") .. [["></td></tr>
+ <tr><td>CheckerBoardBiomeSize:</td>
+ <td><input type="text" name="World_CheckerBoardBiomeSize" value="]] .. WorldIni:GetValue("Generator", "CheckerBoardBiomeSize") .. [["></td></tr>]]
+ end
+
+ if WorldIni:GetValue( "Generator", "CompositionGen" ) == "Noise3D" then
+ Content = Content .. [[
+ <th colspan="2">Composition Generator</th>
+ <tr><td>Noise3DSeaLevel:</td>
+ <td><input type="text" name="World_Noise3DSeaLevel" value="]] .. WorldIni:GetValue("Generator", "Noise3DSeaLevel") .. [["></td></tr>
+ <tr><td>Noise3DHeightAmplification:</td>
+ <td><input type="text" name="World_Noise3DHeightAmplification" value="]] .. WorldIni:GetValue("Generator", "Noise3DHeightAmplification") .. [["></td></tr>
+ <tr><td>Noise3DMidPoint:</td>
+ <td><input type="text" name="World_Noise3DMidPoint" value="]] .. WorldIni:GetValue("Generator", "Noise3DMidPoint") .. [["></td></tr>
+ <tr><td>Noise3DFrequencyX:</td>
+ <td><input type="text" name="World_Noise3DFrequencyX" value="]] .. WorldIni:GetValue("Generator", "Noise3DFrequencyX") .. [["></td></tr>
+ <tr><td>Noise3DFrequencyY:</td>
+ <td><input type="text" name="World_Noise3DFrequencyY" value="]] .. WorldIni:GetValue("Generator", "Noise3DFrequencyY") .. [["></td></tr>
+ <tr><td>Noise3DFrequencyZ:</td>
+ <td><input type="text" name="World_Noise3DFrequencyZ" value="]] .. WorldIni:GetValue("Generator", "Noise3DFrequencyZ") .. [["></td></tr>
+ <tr><td>Noise3DAirThreshold:</td>
+ <td><input type="text" name="World_Noise3DAirThreshold" value="]] .. WorldIni:GetValue("Generator", "Noise3DAirThreshold") .. [["></td></tr>]]
+ elseif WorldIni:GetValue( "Generator", "CompositionGen" ) == "Classic" then
+ Content = Content .. [[
+ <th colspan="2">Composition Generator</th>
+ <tr><td>ClassicSeaLevel:</td>
+ <td><input type="text" name="World_ClassicSeaLevel" value="]] .. WorldIni:GetValue("Generator", "ClassicSeaLevel") .. [["></td></tr>
+ <tr><td>ClassicBeachHeight:</td>
+ <td><input type="text" name="World_ClassicBeachHeight" value="]] .. WorldIni:GetValue("Generator", "ClassicBeachHeight") .. [["></td></tr>
+ <tr><td>ClassicBeachDepth:</td>
+ <td><input type="text" name="World_ClassicBeachDepth" value="]] .. WorldIni:GetValue("Generator", "ClassicBeachDepth") .. [["></td></tr>
+ <tr><td>ClassicBlockTop:</td>
+ <td><input type="text" name="World_ClassicBlockTop" value="]] .. WorldIni:GetValue("Generator", "ClassicBlockTop") .. [["></td></tr>
+ <tr><td>ClassicBlockMiddle:</td>
+ <td><input type="text" name="World_ClassicBlockMiddle" value="]] .. WorldIni:GetValue("Generator", "ClassicBlockMiddle") .. [["></td></tr>
+ <tr><td>ClassicBlockBottom:</td>
+ <td><input type="text" name="World_ClassicBlockBottom" value="]] .. WorldIni:GetValue("Generator", "ClassicBlockBottom") .. [["></td></tr>
+ <tr><td>ClassicBlockBeach:</td>
+ <td><input type="text" name="World_ClassicBlockBeach" value="]] .. WorldIni:GetValue("Generator", "ClassicBlockBeach") .. [["></td></tr>
+ <tr><td>ClassicBlockBeachBottom:</td>
+ <td><input type="text" name="World_ClassicBlockBeachBottom" value="]] .. WorldIni:GetValue("Generator", "ClassicBlockBeachBottom") .. [["></td></tr>
+ <tr><td>ClassicBlockSea:</td>
+ <td><input type="text" name="World_ClassicBlockSea" value="]] .. WorldIni:GetValue("Generator", "ClassicBlockSea") .. [["></td></tr>]]
+ elseif WorldIni:GetValue( "Generator", "CompositionGen" ) == "SameBlock" then
+ Content = Content .. [[
+ <th colspan="2">Composition Generator</th>
+ <tr><td>SameBlockType:</td>
+ <td><input type="text" name="World_SameBlockType" value="]] .. WorldIni:GetValue("Generator", "SameBlockType") .. [["></td></tr>
+ <tr><td>SameBlockBedrocked:</td>
+ <td><input type="text" name="World_SameBlockBedrocked" value="]] .. WorldIni:GetValue("Generator", "SameBlockBedrocked") .. [["></td></tr>]]
+ end
+ if WorldIni:GetValue( "Generator", "HeightGen" ) == "Flat" then
+ Content = Content .. [[
+ <th colspan="2">Height Generator</th>
+ <tr><td>FlatHeight:</td>
+ <td><input type="text" name="World_FlatHeight" value="]] .. WorldIni:GetValue("Generator", "FlatHeight") .. [["></td></tr>]]
+ end
+ if string.find( WorldIni:GetValue( "Generator", "Structures" ), "MineShafts" ) ~= nil then
+ Content = Content .. [[
+ <th colspan="2">MineShafts</th>
+ <tr><td>MineShaftsGridSize:</td>
+ <td><input type="text" name="World_MineShaftsGridSize" value="]] .. WorldIni:GetValue("Generator", "MineShaftsGridSize") .. [["></td></tr>
+ <tr><td>MineShaftsMaxSystemSize:</td>
+ <td><input type="text" name="World_MineShaftsMaxSystemSize" value="]] .. WorldIni:GetValue("Generator", "MineShaftsMaxSystemSize") .. [["></td></tr>
+ <tr><td>MineShaftsChanceCorridor:</td>
+ <td><input type="text" name="World_MineShaftsChanceCorridor" value="]] .. WorldIni:GetValue("Generator", "MineShaftsChanceCorridor") .. [["></td></tr>
+ <tr><td>MineShaftsChanceCrossing:</td>
+ <td><input type="text" name="World_MineShaftsChanceCrossing" value="]] .. WorldIni:GetValue("Generator", "MineShaftsChanceCrossing") .. [["></td></tr>
+ <tr><td>MineShaftsChanceStaircase:</td>
+ <td><input type="text" name="World_MineShaftsChanceStaircase" value="]] .. WorldIni:GetValue("Generator", "MineShaftsChanceStaircase") .. [["></td></tr>]]
+ end
+ if string.find( WorldIni:GetValue( "Generator", "Structures" ), "LavaLakes" ) ~= nil then
+ Content = Content .. [[
+ <th colspan="2">LavaLakes</th>
+ <tr><td>LavaLakesProbability:</td>
+ <td><input type="text" name="World_LavaLakesProbability" value="]] .. WorldIni:GetValue("Generator", "LavaLakesProbability") .. [["></td></tr>]]
+ end
+ if string.find( WorldIni:GetValue( "Generator", "Structures" ), "WaterLakes" ) ~= nil then
+ Content = Content .. [[
+ <th colspan="2">WaterLakes</th>
+ <tr><td>WaterLakesProbability:</td>
+ <td><input type="text" name="World_WaterLakesProbability" value="]] .. WorldIni:GetValue("Generator", "WaterLakesProbability") .. [["></td></tr>]]
+ end
+ if string.find( WorldIni:GetValue( "Generator", "Finishers" ), "BottomLava" ) ~= nil then
+ Content = Content .. [[
+ <th colspan="2">BottomLavaLevel</th>
+ <tr><td>BottomLavaLevel:</td>
+ <td><input type="text" name="World_BottomLavaLevel" value="]] .. WorldIni:GetValue("Generator", "BottomLavaLevel") .. [["></td></tr>]]
+ end
+ Content = Content .. [[</table>]]
+
+ Content = Content .. [[ <br />
+ <input type="submit" value="Save Settings" name="world_submit"> </form>WARNING: Any changes made here might require a server restart in order to be applied!
+ </form>]]
+ return Content
+end
+
+
+
+function HandleRequest_ServerSettings( Request )
+ local Content = ""
+
+ Content = Content .. [[
+ <p><b>Server Settings</b></p>
+ <table>
+ <tr>
+ <td><a href="?tab=General">General</a></td>
+ <td><a href="?tab=Monsters">Monsters</a></td>
+ <td><a href="?tab=Worlds">Worlds</a></td>
+ <td><a href="?tab=World">World</a></td>
+ </tr>
+ </table>
+ <br />]]
+
+ if( Request.Params["tab"] == "Monsters" ) then
+ Content = Content .. ShowMonstersSettings( Request )
+ elseif( Request.Params["tab"] == "Worlds" ) then
+ Content = Content .. ShowWorldsSettings( Request )
+ elseif( Request.Params["tab"] == "World" ) then
+ Content = Content .. ShowWorldSettings( Request )
+ else
+ Content = Content .. ShowGeneralSettings( Request ) -- Default to general settings
+ end
+
+ return Content
+end \ No newline at end of file
diff --git a/Core/web_whitelist.lua b/Core/web_whitelist.lua
new file mode 100644
index 000000000..61cc6fd8b
--- /dev/null
+++ b/Core/web_whitelist.lua
@@ -0,0 +1,79 @@
+local function HTMLDeleteButton( name )
+ return "<form method=\"POST\"><input type=\"hidden\" name=\"whitelist-delete\" value=\"".. name .."\"><input type=\"submit\" value=\"Remove from whitelist\"></form>"
+end
+
+function HandleRequest_WhiteList( Request )
+ local UpdateMessage = ""
+ if( Request.PostParams["whitelist-add"] ~= nil ) then
+ local PlayerName = Request.PostParams["whitelist-add"]
+
+ if( WhiteListIni:GetValueB("WhiteList", PlayerName, false) == true ) then
+ UpdateMessage = "<b>".. PlayerName.."</b> is already on the whitelist"
+ else
+ WhiteListIni:SetValueB("WhiteList", PlayerName, true )
+ UpdateMessage = "Added <b>" .. PlayerName .. "</b> to whitelist."
+ WhiteListIni:WriteFile()
+ end
+ elseif( Request.PostParams["whitelist-delete"] ~= nil ) then
+ local PlayerName = Request.PostParams["whitelist-delete"]
+ WhiteListIni:DeleteValue( "WhiteList", PlayerName )
+ UpdateMessage = "Removed <b>" .. PlayerName .. "</b> from whitelist."
+ WhiteListIni:WriteFile()
+ elseif( Request.PostParams["whitelist-reload"] ~= nil ) then
+ WhiteListIni:Erase() -- Empty entire loaded ini first, otherwise weird shit goes down
+ WhiteListIni:ReadFile()
+ UpdateMessage = "Loaded from disk"
+ elseif( Request.Params["whitelist-setenable"] ~= nil ) then
+ local Enabled = Request.Params["whitelist-setenable"]
+ local CreateNewValue = false
+ if( WhiteListIni:FindValue( WhiteListIni:FindKey("WhiteListSettings"), "WhiteListOn" ) == cIniFile.noID ) then -- Find out whether the value is in the ini
+ CreateNewValue = true
+ end
+
+ if( Enabled == "1" ) then
+ WhiteListIni:SetValueB("WhiteListSettings", "WhiteListOn", true, CreateNewValue )
+ else
+ WhiteListIni:SetValueB("WhiteListSettings", "WhiteListOn", false, CreateNewValue )
+ end
+ WhiteListIni:WriteFile()
+ end
+
+
+ local Content = ""
+
+ local WhiteListEnabled = WhiteListIni:GetValueB("WhiteListSettings", "WhiteListOn", false)
+ if( WhiteListEnabled == false ) then
+ Content = Content .. "<p>Whitelist is currently disabled! Click <a href='?whitelist-setenable=1'>here</a> to enable.</p>"
+ end
+
+
+ Content = Content .. "<h4>Whitelisted players</h4>"
+ Content = Content .. "<table>"
+ local KeyNum = WhiteListIni:FindKey("WhiteList")
+ local NumValues = WhiteListIni:GetNumValues(KeyNum)
+ if( NumValues > 0 ) then
+ for Num = 0, NumValues-1 do
+ if( WhiteListIni:GetValue(KeyNum, Num, "0") == "1" ) then
+ local PlayerName = WhiteListIni:GetValueName(KeyNum, Num )
+ Content = Content .. "<tr><td>" .. PlayerName .. "</td><td>" .. HTMLDeleteButton( PlayerName ) .. "</td></tr>"
+ end
+ end
+ else
+ Content = Content .. "<tr><td>None</td></tr>"
+ end
+ Content = Content .. "</table>"
+ Content = Content .. "<br><h4>Add player to whitelist</h4>"
+ Content = Content .. "<form method=\"POST\">"
+ Content = Content .. "<input type=\"text\" name=\"whitelist-add\"><input type=\"submit\" value=\"Add player\">"
+ Content = Content .. "</form>"
+ Content = Content .. "<form method=\"POST\">"
+ Content = Content .. "<input type=\"submit\" name=\"whitelist-reload\" value=\"Reload from disk\">"
+ Content = Content .. "</form>"
+ Content = Content .. "<br>"..UpdateMessage
+
+ if( WhiteListEnabled == true ) then
+ Content = Content .. "<br><br><p>Whitelist is currently enabled, click <a href='?whitelist-setenable=0'>here</a> to disable.</p>"
+ end
+
+ return Content
+end \ No newline at end of file
diff --git a/Core/webadmin/backup.html b/Core/webadmin/backup.html
new file mode 100644
index 000000000..239a255e5
--- /dev/null
+++ b/Core/webadmin/backup.html
@@ -0,0 +1,375 @@
+<!DOCTYPE html>
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
+<link rel="icon" href="data:application/octet-stream;base64,AAABAAIAEBAAAAEAIABoBAAAJgAAACAgAAABACAAqBAAAI4EAAAoAAAAEAAAACAAAAABACAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQEBAQQAAAAAAgIDBRghJ5o5TlumCg0QCQAAAAABAgIEAAEBAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBAgAAAAMAAAAACQwPMxsnL88jMz3/S2d6/0xoetcaIig6AAAAAAEBAQMBAQEDAAAAAAAAAAAAAAAAAQEBAwAAAAAEAwMEFhwhgRomMPwfLTj/IC86/DJHWPxKaH3/TGN0/jk+QYgEBgcFAAAAAAEBAgMAAAAAAAAAAgAAAAAKDRAuHSMpzB8rNP8dKTP8FiIp/QkXGv8sSEr/QV1u/UhnefxWdIb/P1dm0BIYHDEAAAAAAAEBAgAAAAARGB1oIC44/R0rNf8PGiL7DxUa/gwdHv8JKSP/HUdC/x9HQf81W17+Qllv+0lkef9ObYH+Ii42bAAAAAAAAAAAFyIqyBopMf8THSX6BRkY/wIbGP8HHhv/FTs1/yJhVP8lZ1b/H05I/xcuNf8jPET6UWp+/0xqfdAAAAAAAQECBxEcI9oOHh//BRgV/QwsJv8NKyb/EDEr/xU3Mv8zeW7/MHpr/ydqXP8oalz/HVtO/i9KUf9AW2zgBwkLDQEEBBgKGhfuCCMd/w4uKf4RNC7/FTcy/w8yLv8PMi7/LXFn/y55av86gW//OoV7/y11av4YTkj/GkFB8gUICh4BCActCSUf+xAxKv8TNjD/EzYx/w8xLP8PMCr/Fjgy/zp+c/8yfXP/OoN5/zN9cf86hHb/NHlt/y1xZP4LGhc0BhEORQ8zLP8SNC7+EDIt/xEzLf8PMCv/DTAs/w4xKv8vdWT/PYh4/y93bf8sdWj/N4R3/zWBdv43hHn/EysoTQgXFWEQMy//DzEs/Q8xK/8SNC3/FjUv/xEuK/8WPjf/OIBw/0OEdP83e27/N31w/zN8bP8vdWj8Mn5z/xg3MmgLHRp8FDkz/xExLPwNKyT/EjIs/xpEPP8kX1T/OY2C/0KVhv8zgG//NH9z/zuBdf8xeGX/PIF1/DSAdf8cRDyEDCMenBEvJ/8VODT4IVZM/C11af06inv/QZaG/z2Rgf84iXz/O5F+/z2Nff85iX3+OYJ2/DuBdPg5g3X/IVBIohIzLaUydGb/RJiJ/TyYiv88k4P/O4t6/j+Rg/w+j3/9PYt5/TyOgfwuhHf+Nox+/zyViP9Aloj9Q5WC/yxiVa0ECgkHEyciLh1BOWwsZV2sN39y4juNfv5Cmon/O5OF/z2Shf86kYT/NoyA/ziGeeUqZlywHEI8chAjHzQDBwUKAAAAAAAAAAAAAAAAAAAAAAQIBwsSKCQ9JU9GgDN2a8owdGjLH0xFghMpJUAFDAsNAAAAAAAAAAAAAAAAAAAAAP5/AAD8PwAA8A8AAOAHAADAAwAAgAEAAIABAACAAQAAgAEAAIABAACAAQAAgAAAAAAAAAAAAAAA4AcAAPw/AAAoAAAAIAAAAEAAAAABACAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQEBBAAAAAEAAAAAGB4leTRGUpAICQsDAAAAAAECAgQAAAEBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBAgABAQQAAAAADA4RHRsjK7UaJi7/U3SH/1Z1isgbJCosAAAAAAEBAgMBAQECAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBAQMAAAABAAAAABgeJGEkMz3wHSw1/yExOvxLaHn8TWuA/2SJovkzRVB1AAAAAAAAAAACAgIEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBAQIBAQEEAAAAAAoLDhkcJS2xHy03/xkmL/0fLjb8IC85/0FabP9IZHX8O1Jj/GCFnP9KZHTBEhccIwAAAAABAQIEAQEBAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAQEDAAAAAgAAAAAXHSJZICw27BQeJv8aJzD7JTZC/iQ1P/8nOUX/JzpJ/0hjdf9FX3H+V3iO+01tgv9Wanj0R0dHZwAAAAAAAAABAQICAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQEBAQEBBAAAAAAMDAwUJCouqSAwOv8XIir9Exwj/CM0P/8eLDf/IzM+/xclLv8oPlD/NUla/0Vhc/9EXnH/OU5f/DxPX/xudHn/Ulxjtg8WGxsAAAAAAQICBAEBAQIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQEBAwAAAAIAAAAAFhofUTI0NugdJSv/Gicw+yQ0P/0YJC7/GCQt/xEbJP8QGSD/CxUb/yhMTf9AWmz/PVds/z5Xaf8+VWf/Q15x/jtTZPtJX3D/VneK7iUxOlsAAAAAAAAAAgECAgMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAAACAkLER4oMKIdKTL/GCEn/RQfJ/weLDb/Gigy/x0lLP8aJS7/DiAj/wgOE/8HFRn/Gks8/0BNS/8xUFv/VXyS/0ZseP9Ye5D/XH+U/0Zhc/xFX3L9SGN2/ztPXqkPFBYUAAAAAAEBAQIAAAAAAAAAAAAAAAAAAAABAAAAABUbIUoqOkbjHy43/xIcJPseLTb9Gicv/xQgKP8NEhn/ISIk/xYkKv8MKyP/Bh0b/wYiHf8RQzz/JTE2/yNYT/8tTVX/KVRM/1N5if9dgJj/RmBy/0pmev1KZXn7Qltt/1NxhOcgKjJOAAAAAAAAAAEAAAAAAQEBBAAAAAATGiBhIjE8/xwrNPwXIyv8His1/yMzPf8OFh7/BgwS/wQSEv8IDxT/CxQa/wUfG/8HJyL/ES0m/ylrYv8YPD//E0I2/xg8Mv8UQTP/LklT/zJHWf80Slv/Ql1x/1yAmP8/VWf8Smd7/E5rgP8fKTFuAAAAAAEBAQQAAQEEAAAAABYhJ5QaJy//FSAo+RglLv8iMz3/Ex8o/wUOEv8GIR3/BB8a/wQYFv8EEBL/Ax4a/wsqJv8VODL/JGhY/xhXTP8kWUv/KWNT/ypuWf8aMDX/HCU0/yEwPv8iMD7/M0dY/0FdcP9egpr6W36T/zlQXacAAAAAAQEBBAAAAAMAAAAAFR8mrR0rNP8YJCz8Fykt/xYiKv8FCRD/BRkY/wglIf8FHhr/AxsY/wYhHf8PKyb/FTo2/xU7N/8ralj/IGRY/ydpV/8wdWr/JW1g/xw9P/8dSkn/FjQ0/xQ/O/8aMDf/TVhi/0ljdvxYe5D/R2NyvgAAAAAAAAACAAAAAQAAAAANFRzGEh0m/x0uN/wKHRn/Bg4T/wMUEv8JJyH/Dy0p/wYjH/8IJB//Gjsz/xQyK/8TNDD/DjMu/z96a/8veG3/J3Fg/zd8b/8oa1//FExD/yhjVv8aWEb/ImRa/xhXTv86SUz/QlNl/Uhmff9bfpPWAAAAAAAAAAAAAAAAAQIDAxEaI9wSIyj/CBYW/QYWE/8HGRr/CSsi/wosI/8RMSz/ES4o/wwtKP8QMy7/Cisn/w8uKv8YNzD/Pod9/zB/df82e3L/Mnho/yduWP8ueW3/N3Zq/ypyZf8nbV3/IFxT/xE4Of8zT1z+Mldc/ztRY+kHCwwNAAAAAAAAAAABBQUSER0d7wwcGP8IIxv+CSId/wsgHP8QMiz/EjYx/w4vKv8XODP/EjIu/w4yLv8KLir/Cywn/w8wKv8qcWj/MH50/ylzYf8ve2j/JnFb/zh+bf8+hHr/LXhu/zJ+bf8wcGf/E09G/x4/Qv4jVEz/IS8++QcKDR0AAAAAAAAAAAEIBiUGFBP+BxgU/wsrJP4HJSD/ES8q/w4xLv8OMi7/FjUu/xM3Mv8XOzf/FDg0/xEzL/8TODT/Cy4q/yRlW/83e3H/KG9g/zSEeP9AhXj/P35u/0GMgf8wf3b/NoR8/yxzaP8hXVT/ED88/xdQSP4gVFL/Bg4QMgAAAAAAAAAAAwsKOgUdGv8NJyH9Dy8p/w8xKf8WOjb/DDEs/xI2MP8UNzD/DTAo/xM2MP8MLib/FTUx/xU1MP8OMy7/PXdo/0KLgP8udW3/JnJo/zyFef9Ai4H/PYd+/y54a/8mcmn/O3xv/zR1aP8obmD/I2JY/CFmWf8LIBpJAAAAAAAAAAAGFBFSCSsk/wssJPwMLib/EjEo/xU3Mv8OMij/HEA4/w4zMP8OMSz/EDAq/wktJ/8NMCv/FDEp/xU3Mf89gnj/PYyA/zyDef8udWv/N4Z8/zB8cv8zd27/LnZj/0GOev9FjYD/OoR7/zuEdv8+gHD7O4Z6/xo2L2IAAAAAAAAAAAcYE20MMCn/EDEr+w4vJv8WODP/EzMv/w8yLP8TODT/DS8q/xAwKv8IKyf/DC8s/w8wK/8MLST/FTQt/zaBdv8pd2P/P4t2/zaEef85e27/Nnpt/y11bP8xeW//QJCD/zyMgf8we2n/N4N6/yduZPtBkYj/Ik5JfAAAAAAAAAAADyMfiBA0Lv8PMiz7GDk1/xAxLf8RMS3/DzIt/xAyLP8PMCf/FzQu/w4vKf8OMC3/EzQv/wgsJ/8JLCf/ImlT/zV3Zf9IkHv/OYh7/yNuaP80e2//KXJp/yNtXf82gnb/MH10/yp3av9AjoX/MH10+zB7cP8eT0mWAAAAAAAAAAARLCiiDjMu/wotJvsTODT/DC8r/wkqJf8PMCj/EDIr/w0yKv8ZOzb/FjUv/xQ2M/8TOjb/DS8r/xk8NP8ocGL/QIV0/0WBcf9Cf3D/Mnhu/zd6bv84e27/KXRk/zh7bP8tdmX/M3lt/zR6bP8veWj8MHxx/y1dUq8AAAAAAAAAAAsnJLsRMi7/DC4q/BU0Lv8OMSz/DS4p/xg4Mv8SNi//ETAq/xs/N/8aPTX/ETEs/xQvKv8YMyv/H05F/yZya/9Km4j/SI+A/zp6a/9Cf23/RYh7/zuGe/86e2v/RYuA/y57af86e2r/J29l/ypyZ/w+jIL/KWVbxwAAAAAAAAAADysn0Rc6Nf8PMS39DS8q/xUzLf8QMiz/DS8l/xEyKv8UNC//EzEs/xAtI/8QMyv/H1FN/zeBeP9CnI//Q5SF/0aRff87h3f/LXVl/yJsWv8xe3T/Q4l+/zh5Zf8reWT/Lnlm/zqHef84fHD/Im9p/Th/dP8pa2HcAAYGBwQIBw4TMy3kFjsy/xI1L/4PMSz/GTo1/xIyKv8KKyL/EzAq/xA0MP8ZQjr/JF1T/zp/cP8xiHb/LIh6/0egkf9Gn5D/NYZ2/ziGcv8whXr/NYuA/zN9dP9Ahnz/Mn91/yNrWP85emb/QYJ3/0SLe/8vd2/+NXpq/zF2ZuwHEREXBxAPIRI3MPQVNSv/GTcw/hY0Lv8UNDH/Cysn/xQ2MP8oX1f/KnFn/0ONf/8yinz/MIh9/z6JeP85in//No+H/yyBdv82iX7/QZOE/yt/aP87jnn/R417/zaFef89kIP/M3dq/0OHev84gXf/R5KA/0KJfv4yf3P/NXhn+hEeGysDDww3EjQr/hcyLP8JJx//Ciwp/yJQSv8ybmD/MYJv/zmUiP8ug3X/QIp8/zyOfP9ElYX/T5yN/0KWhf88i3f/PYh4/ziHfP9El4X/P5aC/zaMf/9Ek4b/M4R2/z2ThP85iX7/Qop9/y+BeP83emz/NHlm/zeCef4mcmn/CyAcQgQTEVQVOTH/GT85/CRYTfstdWr8QJWL/j+Thv8thHT/N4l7/zaIdP85hnL/PI58/zmOfv8+lIb/RZF+/0COe/9AkH7/Qot2/0CTgv8+mI3/MIh2/zOFcv88joL/OY+F/zeFev83in//N4x+/jyFcPw3f237OHpv+0iQf/8fRj1fCh4cTyRkWOxFnIj+TqSR/0idiP9Qo5P/M4N5/Sp9cPs+k4X8RJeL/jqLev8/j37/RpaH/z2SiP84hnn/PZKI/zCHdv86jXz/P46E/zSIfv8xiHv/J31x/y6Eef4rgG/8OYx9+zyPhv05jIH/SZ6Q/1Wyof8/lH//Oohx9yJHPV4AAAAABhAOChw2LzkmTEV3MGxcuDuHdu1Akob/QpuP/0uZiP8yh3r/MIB0/DuKffs4in38PpaD/j6ZjP89kYT/PpCC/0CNgP82g3b+MIV6/S6EevspfHP8Po5//0ihkP8+mon/N4+B/zKCdPM1c2jDH01FhBoyK0YEDQoRAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAQsKDxUuKkIsXliDMnRpwjeEcfRCloH/RJuK/zyRgP9AlIP/PYx+/TKEdvw8kIH8Q5eM/TSLf/8+lYX/SJyM/zuYjf8+lIj3O4F1ySVZU4wWMy1LBhAMFgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAQEBAgIDAQICBAEBAQIAAAAAAAAAAAAAAAAAAAAACxQRFhk2MkomWFGLOXhryEiZhvRElYf/N46G/zCGef9Dk4P/O5CF9SVpYMsrWlCQFzg0UAwZFxoAAAAAAAAAAAAAAAAAAAAAAAAAAgECAgQBAgIDAAEBAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAQEBAgIDAQMCBAEBAQIAAAAAAAAAAAAAAAAAAAAACBcTHx4+OVw5dWmnK2peqBo5Ml0MHBkiAAICAQAAAAAAAAAAAAAAAAABAQEBAgIEAQICAwABAQIAAAAAAAAAAAAAAAAAAAAAAAAAAP//f////D////gf///gB///wAP//wAA//4AAH/4AAAf8AAAD+AAAAfAAAADwAAAA8AAAAPAAAADwAAAA8AAAAPAAAADwAAAA8AAAAOAAAABgAAAAYAAAAGAAAABgAAAAYAAAAGAAAABgAAAAYAAAAHwAAAH/gAAf//gB////n//">
+<title>{TITLE}</title>
+
+<style type="text/css" media="screen">
+
+ /* reset CSS */
+
+ html, body, div, span, applet, object, iframe,
+ h1, h2, h3, h4, h5, h6, p, blockquote, pre,
+ a, abbr, acronym, address, big, cite, code,
+ del, dfn, em, font, img, ins, kbd, q, s, samp,
+ small, strike, strong, sub, sup, tt, var,
+ b, u, i, center,
+ dl, dt, dd, ol, ul, li,
+ fieldset, form, label, legend,
+ table, caption, tbody, tfoot, thead, tr, th, td {
+ margin: 0;
+ padding: 0;
+ border: 0;
+ outline: 0;
+ font-size: 100%;
+ vertical-align: baseline;
+ background: transparent;
+ }
+ body {
+ line-height: 1;
+ }
+ ol, ul {
+ list-style: none;
+ }
+ blockquote, q {
+ quotes: none;
+ }
+
+ /* remember to define focus styles! */
+ :focus {
+ outline: 0;
+ }
+
+ /* remove textarea resize at Safari */
+ textarea {
+ resize: none;
+ }
+
+ /* remember to highlight inserts somehow! */
+ ins {
+ text-decoration: none;
+ }
+ del {
+ text-decoration: line-through;
+ }
+
+ /* tables still need 'cellspacing="0"' in the markup */
+ table {
+ border-collapse: collapse;
+ border-spacing: 0;
+ }
+
+
+ /*
+ Origional from http://www.perspectived.com/
+ Modified by Ben Phelps
+ Made for FakeTruth - MCServer
+ */
+
+ /* Basic ---------------------------------------- */
+
+ .clear { clear: both; }
+
+ body {
+ background: white;
+ font-family: Arial, Helvetica, sans-serif;
+ font-size: 12px;
+ color: #646464;
+ text-align: center;
+ }
+
+ #wrapper {
+ text-align: left;
+ width: 930px;
+ margin: 0 auto;
+ }
+
+ /* Logo ---------------------------------------- */
+
+ h1 {
+ margin: 15px 0 10px 5px;
+ width: 180px;
+ height: 36px;
+ background: url(data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAALQAAAAkCAMAAAAXdeBDAAAAGXRFWHRTb2Z0d2FyZQBBZG9iZSBJbWFnZVJlYWR5ccllPAAAAuVQTFRFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAs7OzAAAAAAAAoqKiAAAAvLy8AAAAlZWVtbW1j4+Pra2tiYmJp6enAAAAhISEoaGhAAAAgICAm5ube3t7lZWVd3d3kZGRc3NzjIyMbGxsg4ODgICAeHh43NzcdXV1cnJyy8vLWVlZbGxswcHB09PTvLy8uLi4tLS0sLCwvLy8uLi4tbW1oaGhnp6era2tm5ubqqqq39/f29vblZWV09PT4ODgz8/P3NzckZGRxcXF0tLSwsLCzs7Oy8vLyMjIt7e3vLy85ubm7u7u3d3d5+fn2tra5OTk19fX1dXV3t7e29vb2dnZ1tbW0dHRv7+/8PDw7u7u6+vr8fHx5ubm4+Pj7Ozs4eHh3t7e5+fn5OTk2tra4uLi39/f1dXV3d3d29vb2dnZ19fX1dXV0tLS9fX18/Pzzs7O7u7u8/PzycnJ6urq6Ojo7+/v5ubm7Ozs4+Pj4eHh39/f5ubm5OTk4uLi4ODg2NjY3Nzc29vb19fX8vLy9/f39fX17e3t8/Pz6+vr8fHx7+/v5+fn7e3t5eXl6+vr6enp6Ojo4ODg39/f9PT0+Pj48fHx9vb27+/v9PT07e3t8/Pz7Ozs8fHx7+/v6Ojo7u7u5+fn7Ozs5eXl6urq5OTk6enp5+fn5ubm5OTk+Pj49/f39fX19PT0+fn58vLy8fHx9fX19PT08vLy8fHx6urq+Pj49vb29fX19PT08vLy8PDw+/v7+vr6+Pj49/f39vb29fX18/Pz/f39+/v7+vr6+fn5+Pj49/f3/f39/Pz8+vr6/v7+/f39a5KrdZmxf6G2iai8kq/BnLbHpr7NsMXSuszYxNPdxmZTynBeznpqztvj0YV11Y+B2OLp2ZmM3aOY4a2j4enu5Liv6MK66/D07MzG8NbR9ODd9fj59+vo+/X0ucu1kQAAANl0Uk5TAAECAwQFBgcICQoLDA0ODxAREhMUFBUWFhcXGBgYGRkaGhsbGxwcHB0dHh4fHyEhIiQkJSYnKCgpKSorLC0uLzAxMjIzMzc4Ojo6Ozs8Pj4/P0BBQ0VISUtLTExNTk5PUFFTV1dYWVpbXFxdXl5fYGBhYmJjZGVmZ2doaWprbGxtbW5ub3BxcXJzdHV2d3l6e3x9fX5+f4CAgYGCg4SIi4yNjY6Oj4+QkJGSkpOTlJSVlZaXmJqbnJ2dnp+foKGip6+wsbKztb6/wMHCw8TOz9DR0tPf4OHv8LXp8fEAAAi/SURBVHja3Zh/dBRXFcdhZ+a9eTPzZnaXmJam0FYUEQWLrVVbqdZaf6EWQW2txN/SWiAmxFqtIlWr9bdWqkbwF6WQYIq/+WFpwSZqTahhg6RhNptkl9nsbjeb2eyv+dv73g6wlcyewXMazvGek3Dm5jLv8+689733vTn/q81ldr5zzsWxuVWr55sbCAiiBCYKAeZ1nYIgigJ4Zh2Zj+0OXesTgQ987pOEZUVVVYXISIJQPi3mJETG0kXADggIL5CRWDMy57kCaDgdBMgK1de0gi2jGsESZJt5iXpjS8utGkHiLFMDIHrNgfJBFYs1i0Ei73iifIAggIEHrNDWnuGpFFg50vEKVYbcArNye0+lUCj13aUgYbahRbInbqbu1zAf2XXpR8bN1CZZYItA1jb0pcaiJrdYorxzIRYFYN7qZC2wTOVXMuR+dqGR2hU3Y4NLFSlwJtGIfmbKNFOt4BIkQndOj5rR8dMpsETMjCae+gASJbLKSSftUsWeSJbWz3aqgXBvPGomOnWWajfRoWOjAN2uIWBedOh0NJoYPvJgW1tb+47I1Jg5Vl6AsPrkZLLU+f5bdjjpzNOzDo1pdzw2Fi2vVlBVFgRMf5oyYXl8lmIk00MJc7S8e6mhU02jerC5JzFavgyRlztWbl9j2NC3lvJbpMDFgJ6Ojh/VZb4XA5KycmhkNAXQOpG1ncDfv9HQQNsQZsK3cNvTn5SQ0lKwCveEdYWQd25BrugxUQHjAl/fPKL9Q2t747F/x82pjSpXC0Gme+EJoNt1Vb2jHI1FVlMmawFWYiQgB6mWCIcOaVgCA2ZX3BEGQyI4vAsXWN1of9Bd8diJZ0dG+3QiwuSRsq4cHf8rgzao3jMWnX5Al88oMdNnAQRPlOlwMrcvrBMYk2WrWmyIqlGqqYRJPE+kwK2a0Jr8wo9nNPzRL/QvTpupH4HsAQ4DLX+ZQQeNN02b8W6DSLWVh5mA+EbcHaKkWhF5sdGWdfREIj0dyzSCBDAJY1nGCKo/r/9uguEB/uQZLQZ8Qe+JxwZffGx0ZGixgiSsbXzOTDz2RQYdDm1PmFNrNXTee+ZKMpO8fP+DhiYjAGLF5oYux86m01nb6bqBACr+4Id1/cZHH7pUxne+HkE63fp7522A5xn9IiHgF7ppM6DuokRWjD7Av+7zDHrevEgsFgkq0vndnVtcMvmhjkUKJFvEyqf7ckkrmU7Dr1zfXQTLXyoWv95ZydnblB8UKut5BYL/Rw4Uih9S6Qav6B9CnD/oSGPj0fFouVmn+sOwUH7W9DmmHg0Nw9H4Xp0IM1Z/KOOFjDVhR7ZqMpbVO5yMlS2eGhw8VYTJOC9RtOPp9Ak7adk/picnMv/UZL5jyO0ly+4INntGP+QfOhxeXY6O9c4L31QeGettaLyHQTeuKJsALQdm3PyI0Na+UtZKl3ZSjS7uzVr23z7e0Nj00t8Wk2nnZaoeSadtK1s6uJD+xLYKLSBOTJp6sklnxXLP6AOXin6XRyRoGLsS5nObm34HctccCrdz6GsYNJ0JmquFrOjNvcV0srQrFN5tW/bh5aHQvPm/KQHFVkULDsK3n/x7s0bURZDqPtAg+DxrSlau+5JOz2gVCX434nGod4uhpDzzielo/HFdD7bXzbSbbBHJmvEAbMjK5qZTyUz/8qCuhzsZxf0qUUODaSt94n06rB3aYVulZhVLMgXRcd5SL1oM+IamCtEeTpmn/wFyt1JV9ba6a9qlZtgKUE9kjn0vb+W/FdapsYtTaBgrDCP/3bAiQX4XD01ke6B8qisdkPf5364TDcy+oQkmRu/YyGmmITKhbXXVwy10DFtSgjsgjX/KWc41IeMshQj+wTT4dBxg3cx2iGHbvCuXdN58yb560XP8Q8sSUpunzOho/xICX73trE5P33yeTgOre0KDNYLp1Y5l/xkwrm0In6UICMSArTUYVmHGMLNlTjLbGw69chj+aWjorhftHxoECWrh43HoouEluAodNNZMzVQRWQty2wJJ5NRIexU0fAz6tU2dVQomyVUM+ExCtXGspvjnLOGh0N460RcELQQkcn15/AnAFxCHbvPqPUSE9xedKyBDHPpqBm1blXc/5lKwfkRSOIbBNwQ8vQEW8x+uexaWtqEb2z2jLxSaadjb/vJWLAUCLnRtlye4bQ7CYPK7Slb+ayrMhfUqt1Ss/PeLlv17RvFVqsisEcQqx2C7+FyqfwmJXqcp2ke9oi8YGl4tSkgSAM6Fph799KcU7SSkLEgJxoSGYYVW3v5MZqIAFN8I65qqvu6RLUQLcgx4r9ukO0n7X5lsr04w0fu9on1CI5VDY4F/fN5DAnRriq3u2pMLrTm5XKVBjcvvDoPTCO8uJSePzr+3YFlp5ztNDUEjuO6pXP4rtAaDp/rI5ETBKn5MRbDl2zyifUMrDFrFgdoeTuHQyrkz4hCcEcF29PMz4lXKlVAk8r3fXHtzey8rw+8JzTtsW5POH++9dkV7twM1ehtlH/w4K6duqteWLCgphiyyJeUd7cMAkDwK0AQ9D5psAuhN5NxpfMQ9jY/y07gsK6ucSSubL1UKWYttJ5UuBY5kruA4BWjf7IOXqxRaoLPJgK5Dh36j0Mo6EJjBEo9on9AifiQeG8BSLbSA7wbou7HHvYcsSUhZ9aQ9YYFN5CJbVRnJ6pLDxYzFLVM8dDkhykA6PSDDe91UQ39X7fV4i+gZ7ceA6tW/HviCVNumwAh4f3k/ljxvmAQBkSs7TpYKheLQnusVJIIMErqxr1TI5QqVvg0gZAjfNzBwH3Lfy0DJeod31ezBO9qXsfOPexqqnQlagGa8y1MJFqviB85bW1o+QiHNTHEENrn3tnZ1tb6RsmMBkyJUcznJ5PIyyRX8OtF+jEsGG/S/fPyIOdOtKZuf2+NhonAPBLqTI6qmKQTDLPhrmbjXjnPmuW60/wtqryt07/tp3oA8z8MdCHHXjBcC7mOd6Bfk7r3udC94aDf6/9T+AzWzIkAbVeu4AAAAAElFTkSuQmCC) no-repeat left top;
+ }
+
+ h1 a {
+ display: block;
+ width: 225px;
+ height: 28px;
+ }
+
+ h1 span { display: none; }
+
+ a {
+ color: #646464;
+ }
+
+ /* Container ---------------------------------------- */
+
+ #containerHolder {
+ background: #eee;
+ padding: 5px;
+ }
+
+
+ #container {
+ background: #fff url(data:image/gif;base64,R0lGODlhtAABAIAAAN3d3f///yH5BAAAAAAALAAAAAC0AAEAAAIMjI+py+0Po5y0WgYKADs%3D) repeat-y left top;
+ border: 1px solid #ddd;
+ width: 918px;
+
+ }
+
+ #connectHolder {
+ background: #eee;
+ padding: 5px;
+ margin-bottom:8px;
+ }
+
+
+ #connect {
+ border: 1px solid #ddd;
+ background-color: #fff;
+ padding:5px;
+ width: 908px;
+ }
+
+ .pics {
+ height: 375px;
+ width: 600px;
+ }
+
+ .pics img {
+ padding: 5px;
+ border: 1px solid #ddd;
+ background-color: #eee;
+ width: 600px;
+ height: 375px;
+ margin-left: 15px;
+ }
+
+ /* Login -------------------------------------- */
+
+ #loginLogo {
+ margin: 0 auto;
+ margin-top:100px;
+ width: 180px;
+ height: 36px;
+ background-image: url(data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAALQAAAAkCAMAAAAXdeBDAAAAGXRFWHRTb2Z0d2FyZQBBZG9iZSBJbWFnZVJlYWR5ccllPAAAAuVQTFRFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAs7OzAAAAAAAAoqKiAAAAvLy8AAAAlZWVtbW1j4+Pra2tiYmJp6enAAAAhISEoaGhAAAAgICAm5ube3t7lZWVd3d3kZGRc3NzjIyMbGxsg4ODgICAeHh43NzcdXV1cnJyy8vLWVlZbGxswcHB09PTvLy8uLi4tLS0sLCwvLy8uLi4tbW1oaGhnp6era2tm5ubqqqq39/f29vblZWV09PT4ODgz8/P3NzckZGRxcXF0tLSwsLCzs7Oy8vLyMjIt7e3vLy85ubm7u7u3d3d5+fn2tra5OTk19fX1dXV3t7e29vb2dnZ1tbW0dHRv7+/8PDw7u7u6+vr8fHx5ubm4+Pj7Ozs4eHh3t7e5+fn5OTk2tra4uLi39/f1dXV3d3d29vb2dnZ19fX1dXV0tLS9fX18/Pzzs7O7u7u8/PzycnJ6urq6Ojo7+/v5ubm7Ozs4+Pj4eHh39/f5ubm5OTk4uLi4ODg2NjY3Nzc29vb19fX8vLy9/f39fX17e3t8/Pz6+vr8fHx7+/v5+fn7e3t5eXl6+vr6enp6Ojo4ODg39/f9PT0+Pj48fHx9vb27+/v9PT07e3t8/Pz7Ozs8fHx7+/v6Ojo7u7u5+fn7Ozs5eXl6urq5OTk6enp5+fn5ubm5OTk+Pj49/f39fX19PT0+fn58vLy8fHx9fX19PT08vLy8fHx6urq+Pj49vb29fX19PT08vLy8PDw+/v7+vr6+Pj49/f39vb29fX18/Pz/f39+/v7+vr6+fn5+Pj49/f3/f39/Pz8+vr6/v7+/f39a5KrdZmxf6G2iai8kq/BnLbHpr7NsMXSuszYxNPdxmZTynBeznpqztvj0YV11Y+B2OLp2ZmM3aOY4a2j4enu5Liv6MK66/D07MzG8NbR9ODd9fj59+vo+/X0ucu1kQAAANl0Uk5TAAECAwQFBgcICQoLDA0ODxAREhMUFBUWFhcXGBgYGRkaGhsbGxwcHB0dHh4fHyEhIiQkJSYnKCgpKSorLC0uLzAxMjIzMzc4Ojo6Ozs8Pj4/P0BBQ0VISUtLTExNTk5PUFFTV1dYWVpbXFxdXl5fYGBhYmJjZGVmZ2doaWprbGxtbW5ub3BxcXJzdHV2d3l6e3x9fX5+f4CAgYGCg4SIi4yNjY6Oj4+QkJGSkpOTlJSVlZaXmJqbnJ2dnp+foKGip6+wsbKztb6/wMHCw8TOz9DR0tPf4OHv8LXp8fEAAAi/SURBVHja3Zh/dBRXFcdhZ+a9eTPzZnaXmJam0FYUEQWLrVVbqdZaf6EWQW2txN/SWiAmxFqtIlWr9bdWqkbwF6WQYIq/+WFpwSZqTahhg6RhNptkl9nsbjeb2eyv+dv73g6wlcyewXMazvGek3Dm5jLv8+689733vTn/q81ldr5zzsWxuVWr55sbCAiiBCYKAeZ1nYIgigJ4Zh2Zj+0OXesTgQ987pOEZUVVVYXISIJQPi3mJETG0kXADggIL5CRWDMy57kCaDgdBMgK1de0gi2jGsESZJt5iXpjS8utGkHiLFMDIHrNgfJBFYs1i0Ei73iifIAggIEHrNDWnuGpFFg50vEKVYbcArNye0+lUCj13aUgYbahRbInbqbu1zAf2XXpR8bN1CZZYItA1jb0pcaiJrdYorxzIRYFYN7qZC2wTOVXMuR+dqGR2hU3Y4NLFSlwJtGIfmbKNFOt4BIkQndOj5rR8dMpsETMjCae+gASJbLKSSftUsWeSJbWz3aqgXBvPGomOnWWajfRoWOjAN2uIWBedOh0NJoYPvJgW1tb+47I1Jg5Vl6AsPrkZLLU+f5bdjjpzNOzDo1pdzw2Fi2vVlBVFgRMf5oyYXl8lmIk00MJc7S8e6mhU02jerC5JzFavgyRlztWbl9j2NC3lvJbpMDFgJ6Ojh/VZb4XA5KycmhkNAXQOpG1ncDfv9HQQNsQZsK3cNvTn5SQ0lKwCveEdYWQd25BrugxUQHjAl/fPKL9Q2t747F/x82pjSpXC0Gme+EJoNt1Vb2jHI1FVlMmawFWYiQgB6mWCIcOaVgCA2ZX3BEGQyI4vAsXWN1of9Bd8diJZ0dG+3QiwuSRsq4cHf8rgzao3jMWnX5Al88oMdNnAQRPlOlwMrcvrBMYk2WrWmyIqlGqqYRJPE+kwK2a0Jr8wo9nNPzRL/QvTpupH4HsAQ4DLX+ZQQeNN02b8W6DSLWVh5mA+EbcHaKkWhF5sdGWdfREIj0dyzSCBDAJY1nGCKo/r/9uguEB/uQZLQZ8Qe+JxwZffGx0ZGixgiSsbXzOTDz2RQYdDm1PmFNrNXTee+ZKMpO8fP+DhiYjAGLF5oYux86m01nb6bqBACr+4Id1/cZHH7pUxne+HkE63fp7522A5xn9IiHgF7ppM6DuokRWjD7Av+7zDHrevEgsFgkq0vndnVtcMvmhjkUKJFvEyqf7ckkrmU7Dr1zfXQTLXyoWv95ZydnblB8UKut5BYL/Rw4Uih9S6Qav6B9CnD/oSGPj0fFouVmn+sOwUH7W9DmmHg0Nw9H4Xp0IM1Z/KOOFjDVhR7ZqMpbVO5yMlS2eGhw8VYTJOC9RtOPp9Ak7adk/picnMv/UZL5jyO0ly+4INntGP+QfOhxeXY6O9c4L31QeGettaLyHQTeuKJsALQdm3PyI0Na+UtZKl3ZSjS7uzVr23z7e0Nj00t8Wk2nnZaoeSadtK1s6uJD+xLYKLSBOTJp6sklnxXLP6AOXin6XRyRoGLsS5nObm34HctccCrdz6GsYNJ0JmquFrOjNvcV0srQrFN5tW/bh5aHQvPm/KQHFVkULDsK3n/x7s0bURZDqPtAg+DxrSlau+5JOz2gVCX434nGod4uhpDzzielo/HFdD7bXzbSbbBHJmvEAbMjK5qZTyUz/8qCuhzsZxf0qUUODaSt94n06rB3aYVulZhVLMgXRcd5SL1oM+IamCtEeTpmn/wFyt1JV9ba6a9qlZtgKUE9kjn0vb+W/FdapsYtTaBgrDCP/3bAiQX4XD01ke6B8qisdkPf5364TDcy+oQkmRu/YyGmmITKhbXXVwy10DFtSgjsgjX/KWc41IeMshQj+wTT4dBxg3cx2iGHbvCuXdN58yb560XP8Q8sSUpunzOho/xICX73trE5P33yeTgOre0KDNYLp1Y5l/xkwrm0In6UICMSArTUYVmHGMLNlTjLbGw69chj+aWjorhftHxoECWrh43HoouEluAodNNZMzVQRWQty2wJJ5NRIexU0fAz6tU2dVQomyVUM+ExCtXGspvjnLOGh0N460RcELQQkcn15/AnAFxCHbvPqPUSE9xedKyBDHPpqBm1blXc/5lKwfkRSOIbBNwQ8vQEW8x+uexaWtqEb2z2jLxSaadjb/vJWLAUCLnRtlye4bQ7CYPK7Slb+ayrMhfUqt1Ss/PeLlv17RvFVqsisEcQqx2C7+FyqfwmJXqcp2ke9oi8YGl4tSkgSAM6Fph799KcU7SSkLEgJxoSGYYVW3v5MZqIAFN8I65qqvu6RLUQLcgx4r9ukO0n7X5lsr04w0fu9on1CI5VDY4F/fN5DAnRriq3u2pMLrTm5XKVBjcvvDoPTCO8uJSePzr+3YFlp5ztNDUEjuO6pXP4rtAaDp/rI5ETBKn5MRbDl2zyifUMrDFrFgdoeTuHQyrkz4hCcEcF29PMz4lXKlVAk8r3fXHtzey8rw+8JzTtsW5POH++9dkV7twM1ehtlH/w4K6duqteWLCgphiyyJeUd7cMAkDwK0AQ9D5psAuhN5NxpfMQ9jY/y07gsK6ucSSubL1UKWYttJ5UuBY5kruA4BWjf7IOXqxRaoLPJgK5Dh36j0Mo6EJjBEo9on9AifiQeG8BSLbSA7wbou7HHvYcsSUhZ9aQ9YYFN5CJbVRnJ6pLDxYzFLVM8dDkhykA6PSDDe91UQ39X7fV4i+gZ7ceA6tW/HviCVNumwAh4f3k/ljxvmAQBkSs7TpYKheLQnusVJIIMErqxr1TI5QqVvg0gZAjfNzBwH3Lfy0DJeod31ezBO9qXsfOPexqqnQlagGa8y1MJFqviB85bW1o+QiHNTHEENrn3tnZ1tb6RsmMBkyJUcznJ5PIyyRX8OtF+jEsGG/S/fPyIOdOtKZuf2+NhonAPBLqTI6qmKQTDLPhrmbjXjnPmuW60/wtqryt07/tp3oA8z8MdCHHXjBcC7mOd6Bfk7r3udC94aDf6/9T+AzWzIkAbVeu4AAAAAElFTkSuQmCC);
+ }
+
+ #loginHolder {
+ background: #eee;
+ padding: 5px;
+ width: 310px;
+ margin: 0 auto;
+ height: 90px;
+ margin-top:20px;
+ }
+
+ #login {
+ padding:10px;
+ width: 288px;
+ height: 68px;
+ border: 1px solid #ddd;
+ background:#fff;
+ text-align: left;
+ }
+
+
+ /* Sidebar ---------------------------------------- */
+
+ #sidebar {
+ width: 179px;
+ float: left;
+ }
+
+ #sidebar .sideNav { width: 179px; }
+
+ #sidebar .sideNav li { border-bottom: 1px solid #ddd; width: 179px; }
+
+ #sidebar .sideNav li a {
+ display: block;
+ color: #646464;
+ background: #f6f6f6;
+ text-decoration: none;
+ height: 29px;
+ line-height: 29px;
+ padding: 0 19px;
+ width: 141px;
+ }
+
+ #sidebar .sideNav li a:hover { background: #fdfcf6; }
+
+ #sidebar .sideNav li a.active, #sidebar .sideNav li a.active:hover {
+ background: #f0f7fa;
+ color: #c66653;
+ }
+
+ /* Breadcrumb ---------------------------------------- */
+
+ h2 {
+ width: 718px;
+ float: right;
+ color: #646464;
+ font-size: 16px;
+ line-height: 16px;
+ font-weight: bold;
+ margin: 20px 0 0 0;
+ padding: 0 0 10px 0;
+ border-bottom: 1px solid #ddd;
+ }
+
+ h2 a {
+ color: #646464;
+ text-decoration: none;
+ }
+
+ h2 a.active { color: #c66653; }
+
+ h2 a:hover { text-decoration: underline; }
+
+ /* Content ---------------------------------------- */
+
+ #main {
+ width: 700px;
+ float: right;
+ padding: 0 19px 0 0;
+ }
+
+ #main p {
+
+ padding: 10px;
+
+ }
+
+ h3 {
+ font-size: 14px;
+ line-height: 14px;
+ font-weight: bold;
+ color: #5494af;
+ padding: 0 0 0 10px;
+ margin: 20px 0 10px;
+ }
+
+ h4 {
+ padding: 0 0 0 10px;
+ margin: 20px 0 10px;
+ }
+
+ #main ul {
+ padding: 0 0 0 10px;
+ list-style-type: circle;
+ list-style-position: inside;
+ }
+
+ #main table {
+ border-top: 1px solid #ddd;
+ width: 700px;
+ }
+
+ #main table tr th {
+ text-align: left;
+ background: #f6f6f6;
+ padding: 0px 20px;
+ height: 20px;
+ line-height: 20px;
+ border-bottom: 1px solid #ddd;
+ }
+
+ #main table tr td {
+ background: #f6f6f6;
+ padding: 0px 20px;
+ height: 29px;
+ line-height: 29px;
+ border-bottom: 1px solid #ddd;
+ }
+
+ #main table tr.odd td {
+ background: #fbfbfb;
+ }
+
+ #main table tr:hover td { background: #fdfcf6; }
+
+ #main table .action {
+ text-align: right;
+ padding: 0 20px 0 10px;
+ }
+
+ #main table tr .action a { margin: 0 0 0 10px; text-decoration: none; color: #9b9b9b; }
+ #main table tr:hover .action .edit { color: #c5a059; }
+ #main table tr:hover .action .delete { color: #a02b2b; }
+ #main table tr:hover .action .view { color: #55a34a; }
+
+ #main table tr:hover .action a:hover { text-decoration: underline; }
+
+ fieldset {
+ border: 1px solid #ddd;
+ padding: 19px;
+ margin: 0 0 20px 0;
+ background: #fbfbfb;
+ }
+
+ form p { margin: 0 0 14px 0; float: left; width: 100%; }
+
+ label {
+ display: block;
+ width: 100%;
+ margin: 0 0 7px 0;
+ line-height: 12px;
+ }
+
+ /* Footer ---------------------------------------- */
+
+ #footer {
+ margin: 10px 0 30px 0;
+ font-size: 11px;
+ line-height: 11px;
+ color: #9B9B9B;
+ padding: 0 0 0 5px;
+ }
+
+ #footer a { color: #9B9B9B; }
+
+ #footer a:hover { text-decoration: none; }
+</style>
+
+</head>
+
+<body>
+ <div id="wrapper">
+ <!-- h1 tag stays for the logo, you can use the a tag for linking the index page -->
+ <h1><a href="./"><span>{TITLE}</span></a></h1>
+
+ <div id="containerHolder">
+ <div id="container">
+ <div id="sidebar">
+ <ul class="sideNav">
+ {MENU}
+ </ul>
+ <!-- // .sideNav -->
+ </div>
+ <!-- // #sidebar -->
+
+ <!-- h2 stays for breadcrumbs -->
+ <h2>Welcome {USERNAME}</h2>
+
+ <div id="main">
+ <h3>{PLUGIN_NAME}</h3>
+
+ {CONTENT}
+
+ </div>
+ <!-- // #main -->
+
+ <div class="clear"></div>
+ </div>
+ <!-- // #container -->
+ </div>
+ <!-- // #containerHolder -->
+
+ <p id="footer">MCServer is using: {MEM}MB of memory; Current chunk count: {NUMCHUNKS} </p>
+ </div>
+ <!-- // #wrapper -->
+</body>
+</html>
diff --git a/Core/webadmin/template.html b/Core/webadmin/template.html
new file mode 100644
index 000000000..16c78bdd0
--- /dev/null
+++ b/Core/webadmin/template.html
@@ -0,0 +1,152 @@
+<!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>
+ <li class='active'><a href='./../../../webadmin/Core/Manage_Server'>Manage Server</a></li>
+ <li><a href='./../../../webadmin/Core/Server_Settings'>Server Settings</a></li>
+ <li><a href='./../../../webadmin/Core/Chat'>Chat</a></li>
+ <li><a href='./../../../webadmin/Core/Playerlist'>Playerlist</a></li>
+ <li><a href='./../../../webadmin/Core/Whitelist'>Whitelist</a></li>
+ <li><a href='./../../../webadmin/Core/Permissions'>Permissions</a></li>
+ <li class='last'><a href='./../../../webadmin/Core/Manage_Plugins'>Manage Plugins</a></li>
+
+ </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>
diff --git a/Core/worldlimiter.lua b/Core/worldlimiter.lua
new file mode 100644
index 000000000..8bd9b5509
--- /dev/null
+++ b/Core/worldlimiter.lua
@@ -0,0 +1,21 @@
+function OnPlayerMoving( Player )
+ if LimitWorld == true then
+ local World = Player:GetWorld()
+ local SpawnX = math.floor(World:GetSpawnX() / 16)
+ local SpawnZ = math.floor(World:GetSpawnZ() / 16)
+ local X = math.floor(Player:GetPosX() / 16)
+ local Z = math.floor(Player:GetPosZ() / 16)
+ if ( (SpawnX + LimitWorldWidth - 1) < X ) then
+ Player:TeleportToCoords(Player:GetPosX() - 1, Player:GetPosY(), Player:GetPosZ())
+ end
+ if ( (SpawnX - LimitWorldWidth + 1) > X ) then
+ Player:TeleportToCoords(Player:GetPosX() + 1, Player:GetPosY(), Player:GetPosZ())
+ end
+ if ( (SpawnZ + LimitWorldWidth - 1) < Z ) then
+ Player:TeleportToCoords(Player:GetPosX(), Player:GetPosY(), Player:GetPosZ() - 1)
+ end
+ if ( (SpawnZ - LimitWorldWidth + 1) > Z ) then
+ Player:TeleportToCoords(Player:GetPosX(), Player:GetPosY(), Player:GetPosZ() + 1)
+ end
+ end
+end \ No newline at end of file