999014170d
http://forum.mc-server.org/showthread.php?tid=625&pid=5720#pid5720 git-svn-id: http://mc-server.googlecode.com/svn/trunk@1089 0a769ca7-a7f5-676a-18bf-c427514a06d6
81 lines
2.5 KiB
Lua
81 lines
2.5 KiB
Lua
|
|
-- 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)
|
|
PluginManager:AddHook(Plugin, cPluginManager.HOOK_TAKE_DAMAGE)
|
|
|
|
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
|
|
|
|
|
|
|
|
|
|
|
|
function OnTakeDamage(Receiver, TDI)
|
|
-- Receiver is cPawn
|
|
-- TDI is TakeDamageInfo
|
|
|
|
LOG(Receiver:GetClass() .. " was dealt RawDamage " .. TDI.RawDamage .. ", FinalDamage " .. TDI.FinalDamage .. " (that is, " .. (TDI.RawDamage - TDI.FinalDamage) .. " HPs covered by armor)");
|
|
end
|
|
|
|
|
|
|