cuberite-2a/MCServer/Plugins/DiamondMover/DiamondMover.lua

-- DiamondMover.lua

-- An example Lua plugin using the cBlockArea object
-- When a player rclks with a diamond in their hand, an area around the clicked block is moved in the direction the player is facing





-- Global variables
PLUGIN = {}	-- Reference to own plugin object
MOVER_SIZE_X = 4;
MOVER_SIZE_Y = 4;
MOVER_SIZE_Z = 4;





function Initialize(Plugin)
	PLUGIN = Plugin;
	
	Plugin:SetName("DiamondMover");
	Plugin:SetVersion(1);
	
	PluginManager = cRoot:Get():GetPluginManager();
	PluginManager:AddHook(Plugin, cPluginManager.HOOK_PLAYER_USED_ITEM);
	return true;
end





function OnPlayerUsedItem(Player, BlockX, BlockY, BlockZ, BlockFace, CursorX, CursorY, CursorZ)

	-- Don't check if the direction is in the air
	if (BlockFace == -1) then
		return false;
	end;

	if (Player:HasPermission("diamondmover.move") == false) then
		return true;
	end;

	-- Rclk with a diamond to push in the direction the player is facing
	if (Player:GetEquippedItem().m_ItemType == E_ITEM_DIAMOND) then
		local Area = cBlockArea();
		Area:Read(Player:GetWorld(),
			BlockX - MOVER_SIZE_X, BlockX + MOVER_SIZE_X,
			BlockY - MOVER_SIZE_Y, BlockY + MOVER_SIZE_Y,
			BlockZ - MOVER_SIZE_Z, BlockZ + MOVER_SIZE_Z
		);

		local PlayerPitch = Player:GetPitch();
		if (PlayerPitch < -70) then  -- looking up
			BlockY = BlockY + 1;
		else
			if (PlayerPitch > 70) then  -- looking down
				BlockY = BlockY - 1;
			else
				local PlayerRot = Player:GetRotation() + 180;  -- Convert [-180, 180] into [0, 360] for simpler conditions
				if ((PlayerRot < 45) or (PlayerRot > 315)) then
					BlockZ = BlockZ - 1;
				else
					if (PlayerRot < 135) then
						BlockX = BlockX + 1;
					else
						if (PlayerRot < 225) then
							BlockZ = BlockZ + 1;
						else
							BlockX = BlockX - 1;
						end;
					end;
				end;
			end;
		end;

		Area:Write(Player:GetWorld(), BlockX - MOVER_SIZE_X, BlockY - MOVER_SIZE_Y, BlockZ - MOVER_SIZE_Z);
		return false;
	end
end