wat

local function wtf(i, x, y, s, nt)
    if x > tpt.mousex then
        sim.partProperty(i, "vx", sim.partProperty(i, "vx")-1)
    elseif x < tpt.mousex then
        sim.partProperty(i, "vx", sim.partProperty(i, "vx")+1)
    end
    if y > tpt.mousey then
        sim.partProperty(i, "vy", sim.partProperty(i, "vy")-1)
    elseif y < tpt.mousey then
        sim.partProperty(i, "vy", sim.partProperty(i, "vy")+1)
    end
end

elem.property(elem.DEFAULT_PT_DUST, "Update", wtf)

local function wtf2(i, x, y, s, nt)
    if x > tpt.mousex then
        sim.partProperty(i, "vx", sim.partProperty(i, "vx")+1)
    elseif x < tpt.mousex then
        sim.partProperty(i, "vx", sim.partProperty(i, "vx")-1)
    end
    if y > tpt.mousey then
        sim.partProperty(i, "vy", sim.partProperty(i, "vy")+1)
    elseif y < tpt.mousey then
        sim.partProperty(i, "vy", sim.partProperty(i, "vy")+1)
    end
end

elem.property(elem.DEFAULT_PT_WATR, "Update", wtf2)