logi-tracman-marble-scroll.lua

// License:MIT
local buttonNum = 4 -- Left small button is 3, Right small button is 4
local scrolling = false
local scrollSteps = -2 -- When negative, it scrolls in reverse.

hooksMouseUp = hs.eventtap.new({hs.eventtap.event.types.otherMouseUp}, function(e)
    if (e:getProperty(hs.eventtap.event.properties.mouseEventButtonNumber) == buttonNum and scrolling) then
        scrolling = false
        return true
    end
    return false
end)

hooksMouseDragged = hs.eventtap.new({hs.eventtap.event.types.otherMouseDragged}, function(e)
    if (e:getProperty(hs.eventtap.event.properties.mouseEventButtonNumber) ~= buttonNum) then
        return false
    end
    scrolling = true
    local curMousePos = hs.mouse.absolutePosition()
    local posX = e:getProperty(hs.eventtap.event.properties.mouseEventDeltaX)
    local posY = e:getProperty(hs.eventtap.event.properties.mouseEventDeltaY)
    local scrollEvent = hs.eventtap.event.newScrollEvent({posX * scrollSteps, posY * scrollSteps}, {}, "pixel")
    hs.mouse.absolutePosition(curMousePos)
    return true, {scrollEvent}
end)

hooksMouseUp:start()
hooksMouseDragged:start()