TYCOON WORK 0005: Upgrader not recording new value?

I created an part which when touched by another, it checks if it is a tycoon part or not, and if yes, it will increase it's value.

Here's the script i am using:

script.Parent.Touched:connect(function(h)
    if h:FindFirstChild("Money Value") and h.Reflectance == 0 then -- this last argument is to prevent multiple increases of the same part
        h["Money Value"].Value = h["Money Value"].Value * 1.5 + 1
        h.Reflectance = 0.3
        print ("Success!! Now the part values "..h["Money Value"].Value)
        else print ("???")
    end
end)

It worked, until I added a buy button to it. It does not do anything to the parts who touch it. Nothing in the ouput, no success or failure message. But when i touch that part with my character, it prints the failure message. Why? (Below, the script who generates the tycoon parts:)

PartsPerMinute = script.Parent["Parts Per Minute"]
MValue = script.Parent["Initial Part Value"]
SCh = script.Parent["Storage Charge Every Drop"]

function Drop(money, storagecharge)
    if script.Parent.Parent.Parent.MineralProducer.MineStorage.Value >= storagecharge then
        local Part = game.ServerStorage.MineralInstances.CopperS:Clone()
        Part.Position = script.Parent.Position - Vector3.new(0,0.5,0)
        Part.Parent = script.Parent
        local Val = Instance.new("NumberValue")
        Val.Parent = Part
        Val.Value = money
        Val.Name = "Money Value"
        script.Parent.Parent.Parent.MineralProducer.MineStorage.Value = script.Parent.Parent.Parent.MineralProducer.MineStorage.Value - storagecharge
    end
end

while true do
    wait (60/PartsPerMinute.Value)
    Drop(MValue.Value, SCh.Value)
end