Why Is This Block Creating System Not Aligning To The Grid Properly?

So i am making a block creation and breaking script but when the block places it is placed on the grid i have but it creates it like 1 block next to the mouse Here is the code:

local mouse = game:GetService('Players').LocalPlayer:GetMouse()
local HotbarItems = {'Grass','Stone','Bricks','Sand','WoolRed','MoltenRock','Netherrack','Water','Lava','Gravel'}
local ItemList = {'Grass','Dirt','Stone','Bedrock','DiamondOre','CopperOre','IronOre','EmeraldOre','GoldOre','RedstoneOre','MoltenRock','Bricks','Leaves','WoolDarkGray','WoolOrange','WoolGray','WoolBrown','WoolDarkGreen','WoolLightGreen','WoolGreen','WoolBlue','WoolLightBlue','WoolLightYellow','SpruceWood','OakWood','DarkOakWood','AcaciaWood','AcaciaWoodPlanks','DarkOakWoodPlanks','OakWoodPlanks','SpruceWoodPlanks','Concrete','Cobblestone','Sand','Gravel','Netherrack','WoolRed','Water','Lava'}
local Selected = 1

mouse.Button1Down:connect(function()
    local target = mouse.Target
    for index, value in ipairs(ItemList) do
    if target.Name == value then
    target:Destroy()
end
end
end)

mouse.Button2Down:connect(function()
    local PlacedObjectIdentifier = HotbarItems[Selected]
    local ClonedBlock = game:GetService('Lighting'):FindFirstChild(PlacedObjectIdentifier):Clone()
    ClonedBlock.Parent = game:GetService('Workspace')
    local p=mouse.Hit.p
    local x,y,z = p.x,p.y,p.z
    ClonedBlock.CFrame = CFrame.new(x-x%4,y-y%4,z-z%4)

end)

mouse.KeyDown:connect(function(key)
    if key == '1' then
        Selected = 1
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot1.Position))
    elseif key == '2' then
        Selected = 2
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot2.Position))
    elseif key == '3' then
        Selected = 3
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot3.Position))
    elseif key == '4' then
        Selected = 4
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot4.Position))
    elseif key == '5' then
        Selected = 5
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot5.Position))
    elseif key == '6' then
        Selected = 6
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot6.Position))
    elseif key == '7' then
        Selected = 7
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot7.Position))
    elseif key == '8' then
        Selected = 8
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot8.Position))
    elseif key == '9' then
        Selected = 9
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot9.Position))
    elseif key == '0' then
        Selected = 10
        script.Parent.Selector:TweenPosition(UDim2.new(script.Parent.Slot10.Position))
    end
end)