From cda079f83b74a0ec3a2ceff482f91676f654977e Mon Sep 17 00:00:00 2001 From: "madmaxoft@gmail.com" Date: Tue, 16 Oct 2012 08:20:45 +0000 Subject: Turned sTick plugin into general Debuggers plugin, added the Blaze Rod Of Enquiry (rclk with a blaze rod prints out the blocktypes and metas) git-svn-id: http://mc-server.googlecode.com/svn/trunk@968 0a769ca7-a7f5-676a-18bf-c427514a06d6 --- MCServer/Plugins/Debuggers/Debuggers.lua | 69 ++++++++++++++++++++++++++++++++ 1 file changed, 69 insertions(+) create mode 100644 MCServer/Plugins/Debuggers/Debuggers.lua (limited to 'MCServer/Plugins/Debuggers/Debuggers.lua') diff --git a/MCServer/Plugins/Debuggers/Debuggers.lua b/MCServer/Plugins/Debuggers/Debuggers.lua new file mode 100644 index 000000000..6e39e6393 --- /dev/null +++ b/MCServer/Plugins/Debuggers/Debuggers.lua @@ -0,0 +1,69 @@ + +-- Global variables +PLUGIN = {} -- Reference to own plugin object + + + + + +function Initialize(Plugin) + PLUGIN = Plugin + + Plugin:SetName("Debuggers") + Plugin:SetVersion(1) + + PluginManager = cRoot:Get():GetPluginManager() + PluginManager:AddHook(Plugin, cPluginManager.E_PLUGIN_BLOCK_PLACE) + + LOG("Initialized " .. Plugin:GetName() .. " v." .. Plugin:GetVersion()) + return true +end + + + + + +function OnBlockPlace(Player, BlockX, BlockY, BlockZ, BlockFace, HeldItem) + + -- dont check if the direction is in the air + if BlockFace == BLOCK_FACE_NONE then + return false + end + + if (HeldItem.m_ItemType == E_ITEM_STICK) then + -- Magic sTick of ticking: set the pointed block for ticking at the next tick + Player:SendMessage(cChatColor.LightGray .. "Setting next block tick to {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}") + Player:GetWorld():SetNextBlockTick(BlockX, BlockY, BlockZ); + return true + end + + if (HeldItem.m_ItemType == E_ITEM_BLAZE_ROD) then + -- Magic rod of query: show block types and metas for both neighbors of the pointed face + local Type = 0; + local Meta = 0; + Type, Meta = Player:GetWorld():GetBlockTypeMeta(BlockX, BlockY, BlockZ, Type, Meta); + if (Type == E_BLOCK_AIR) then + Player:SendMessage(cChatColor.LightGray .. "Block {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}: air:" .. Meta); + else + local TempItem = cItem(Type, 1, Meta); + Player:SendMessage(cChatColor.LightGray .. "Block {" .. BlockX .. ", " .. BlockY .. ", " .. BlockZ .. "}: " .. ItemToFullString(TempItem) .. " (" .. Type .. ":" .. Meta .. ")"); + end + + local X = BlockX; + local Y = BlockY; + local Z = BlockZ; + X, Y, Z = AddDirection(BlockX, BlockY, BlockZ, BlockFace); + Type, Meta = Player:GetWorld():GetBlockTypeMeta(X, Y, Z, Type, Meta); + if (Type == E_BLOCK_AIR) then + Player:SendMessage(cChatColor.LightGray .. "Block {" .. X .. ", " .. Y .. ", " .. Z .. "}: air:" .. Meta); + else + local TempItem = cItem(Type, 1, Meta); + Player:SendMessage(cChatColor.LightGray .. "Block {" .. X .. ", " .. Y .. ", " .. Z .. "}: " .. ItemToFullString(TempItem) .. " (" .. Type .. ":" .. Meta .. ")"); + return true; + end + end +end + + + + -- cgit v1.2.3