It must finally be time for mixer scroll actions!

[mlprod]

As the title suggests. Been living with mixer scroll being reversed compared to horiz arrange scroll for years now. Just get it to the action list and all is well.

Thanks Justin and Schwa!=)

[skylar_battles]

Interesting. If I remember correctly mine works correctly but I will check again. On you on a Mac? Here is my scroll issue: https://forum.cockos.com/showthread.php?t=273166

Setting up scroll to work “intuitively” gets really confusing, mine is basically there besides this bug I think.

Even though I have it reversed in preferences it doesn’t also work globally as it should and sometime I have to set additional actions to reverse scroll for certain things. Curious about your experience with it all.

I just checked and mine does work correctly! It may be cause I "start" by reversing vertical and horizontal scroll from preferences and then make further adjustments in the actions lists. In the past, I just did it all in the actions list.

[mlprod]

"Correctly" is subjective, I am asking for mixer scroll actions so one can choose direction.

[vitalker]

I've made such scripts commerically, but since the sponsor allowed me to post it, here we go:

Scroll one page up:

local mixer_id, isDocked = reaper.BR_Win32_GetMixerHwnd()
local mcp_id = reaper.JS_Window_FindChild(mixer_id, '', true)
retval, position, pageSize, min, max, trackPos = reaper.JS_Window_GetScrollInfo(mcp_id, 'h')
if retval then
  local newpos = position-pageSize
  if newpos < 0 then newpos = 0 end
  local ok = reaper.JS_Window_SetScrollPos(mcp_id, 'h', newpos)
end

One page down:

local mixer_id, isDocked = reaper.BR_Win32_GetMixerHwnd()
local mcp_id = reaper.JS_Window_FindChild(mixer_id, '', true)
retval, position, pageSize, min, max, trackPos = reaper.JS_Window_GetScrollInfo(mcp_id, 'h')
if retval then
  local ok = reaper.JS_Window_SetScrollPos(mcp_id, 'h', position+pageSize)
end

Dependencies:
SWS
js_ReaScriptAPI https://forum.cockos.com/showthread.php?t=212174

[mlprod]

Originally Posted by vitalker

I've made such scripts commerically, but since the sponsor allowed me to post it, here we go:

Scroll one page up:

PHP Code:

local mixer_id, isDocked = reaper.BR_Win32_GetMixerHwnd()
local mcp_id = reaper.JS_Window_FindChild(mixer_id, '', true)
retval, position, pageSize, min, max, trackPos = reaper.JS_Window_GetScrollInfo(mcp_id, 'h')
if retval then
  local newpos = position-pageSize
  if newpos < 0 then newpos = 0 end
  local ok = reaper.JS_Window_SetScrollPos(mcp_id, 'h', newpos)
end 


One page down:

PHP Code:

local mixer_id, isDocked = reaper.BR_Win32_GetMixerHwnd()
local mcp_id = reaper.JS_Window_FindChild(mixer_id, '', true)
retval, position, pageSize, min, max, trackPos = reaper.JS_Window_GetScrollInfo(mcp_id, 'h')
if retval then
  local ok = reaper.JS_Window_SetScrollPos(mcp_id, 'h', position+pageSize)
end 


Dependencies:
SWS
js_ReaScriptAPI https://forum.cockos.com/showthread.php?t=212174

Cool will try it! Possible to get it to do one track at a time instead?

[vitalker]

Originally Posted by mlprod

Cool will try it! Possible to get it to do one track at a time instead?

I'll see whether it is easy.

[vitalker]

Wasn't easy, but I've made it.

Up:

i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
while i>2 and not reaper.IsTrackVisible(reaper.GetTrack(0,i-2), true) do
  i = i-1
end
if i>=2 then reaper.SetMixerScroll(reaper.GetTrack(0,i-2)) end

Down:

i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
while i<reaper.CountTracks(0)-1 and not reaper.IsTrackVisible(reaper.GetTrack(0,i), true) do
  i = i+1
end
reaper.SetMixerScroll(reaper.GetTrack(0,i))

[mlprod]

Originally Posted by vitalker

Wasn't easy, but I've made it.

Up:

PHP Code:

i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
while i>2 and not reaper.IsTrackVisible(reaper.GetTrack(0,i-2), true) do
  i = i-1
end
if i>=2 then reaper.SetMixerScroll(reaper.GetTrack(0,i-2)) end 


Down:

PHP Code:

i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
while i<reaper.CountTracks(0)-1 and not reaper.IsTrackVisible(reaper.GetTrack(0,i), true) do
  i = i+1
end
reaper.SetMixerScroll(reaper.GetTrack(0,i)) 


Thanks a lot for your effort. Are these ReaScrips though?

[vitalker]

Originally Posted by mlprod

Thanks a lot for your effort. Are these ReaScrips though?

Hm, yes. What else they could be?

[mlprod]

Originally Posted by vitalker

Hm, yes. What else they could be?

Hehe, asking cause that code pasted into a new script doesn't "compile" for me. Anyway, also realised that there's probably no way to turn off regular mixer mouse wheel scroll anyway which would probably conflict with this?

[vitalker]

Originally Posted by mlprod

Hehe, asking cause that code pasted into a new script doesn't "compile" for me. Anyway, also realised that there's probably no way to turn off regular mixer mouse wheel scroll anyway which would probably conflict with this?

Show me what are you doing.
Not sure what do you mean.

[Javier Robledo]

Great as always Vitalker ¡¡¡

[mlprod]

Originally Posted by vitalker

Show me what are you doing.
Not sure what do you mean.

Probably something wrong...just copy paste.

[vitalker]

Originally Posted by mlprod

Probably something wrong...just copy paste.

Don't know what is your browser or system, but copy it to a text editor and then to IDE. It works here, so don't know what is blocking copying. Looks like your OS doesn't like spaces.

[mlprod]

Originally Posted by vitalker

Don't know what is your browser or system, but copy it to a text editor and then to IDE. It works here, so don't know what is blocking copying. Looks like your OS doesn't like spaces.

You are right, the spaces weren't "translated" correctly in the IDE. Anyway, thanks for the effort, seems to work fine! Though me myself need actions to be able to use the mouse wheel which of course still is reverse scrolling in the mixer compared to what I would like.

[vitalker]

Originally Posted by mlprod

You are right, the spaces weren't "translated" correctly in the IDE. Anyway, thanks for the effort, seems to work fine! Though me myself need actions to be able to use the mouse wheel which of course still is reverse scrolling in the mixer compared to what I would like.

Is your mouse wheel assigned to some action? I don't remember whether mixer offers actions accessible via mouse wheel.

[mlprod]

Originally Posted by vitalker

Is your mouse wheel assigned to some action? I don't remember whether mixer offers actions accessible via mouse wheel.

Probaby but this needs to be a mouse wheel specific action.

[vitalker]

Originally Posted by mlprod

Probaby but this needs to be a mouse wheel specific action.

Okay, I'll see what I can do. Stay tuned.

[vitalker]

You wanted reversed. It means when you scroll up, mixer shows next tracks. When you scroll down, mixer shows previous tracks. MCP and TCP hijack scroll, so if you want it to work, scroll outside mixer or tracks panels, for example over arrange window.

local _,_,_,_,_,_,val = reaper.get_action_context()
if val>0 then
  --down
  i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
  while i<reaper.CountTracks(0)-1 and not reaper.IsTrackVisible(reaper.GetTrack(0,i), true) do
    i = i+1
  end
  reaper.SetMixerScroll(reaper.GetTrack(0,i))
elseif val<0 then
  --up
  i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
  while i>2 and not reaper.IsTrackVisible(reaper.GetTrack(0,i-2), true) do
    i = i-1
  end
  if i>=2 then reaper.SetMixerScroll(reaper.GetTrack(0,i-2)) end
end

[mlprod]

Originally Posted by vitalker

You wanted reversed. It means when you scroll up, mixer shows next tracks. When you scroll down, mixer shows previous tracks. MCP and TCP hijack scroll, so if you want it to work, scroll outside mixer or tracks panels, for example over arrange window.

local _,_,_,_,_,_,val = reaper.get_action_context()
if val>0 then
  --down
  i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
  while i<reaper.CountTracks(0)-1 and not reaper.IsTrackVisible(reaper.GetTrack(0,i), true) do
    i = i+1
  end
  reaper.SetMixerScroll(reaper.GetTrack(0,i))
elseif val<0 then
  --up
  i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
  while i>2 and not reaper.IsTrackVisible(reaper.GetTrack(0,i-2), true) do
    i = i-1
  end
  if i>=2 then reaper.SetMixerScroll(reaper.GetTrack(0,i-2)) end
end

Thanks for the effort, it works indeed.
Only sad thing if course is I cant have the mouse on the mixer. But yes thanks man!
/m

[vitalker]

Originally Posted by mlprod

Thanks for the effort, it works indeed.
Only sad thing if course is I cant have the mouse on the mixer. But yes thanks man!
/m

Yeah, perhaps there is something for intercepting mouse. I'll check whether Julian Sader has some function for this.

[vitalker]

I've spent too much time on this... At least it works. Don't assign mousewheel to it, because it works without it and now it runs in background (deferred script).

function main()
  mixer_id, _ = reaper.BR_Win32_GetMixerHwnd()
  reaper.JS_WindowMessage_Intercept(mixer_id, 'WM_MOUSEWHEEL', false)
  window, _, _ = reaper.BR_GetMouseCursorContext()
  _, _, time, _, val, _, _ = reaper.JS_WindowMessage_Peek(mixer_id, 'WM_MOUSEWHEEL')
  if window == 'mcp' and (time_new < time or time_new == 0) then
    time_new = time
    if val>0 then
      --down
      i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
      while i<reaper.CountTracks(0)-1 and not reaper.IsTrackVisible(reaper.GetTrack(0,i), true) do
        i = i+1
      end
      reaper.SetMixerScroll(reaper.GetTrack(0,i))
    elseif val<0 then
      --up
      i = reaper.GetMediaTrackInfo_Value(reaper.GetMixerScroll(), 'IP_TRACKNUMBER')
      while i>2 and not reaper.IsTrackVisible(reaper.GetTrack(0,i-2), true) do
        i = i-1
      end
      if i>=2 then reaper.SetMixerScroll(reaper.GetTrack(0,i-2)) end
    end
  end
  reaper.defer(main)
end

time_new = 0
main()
reaper.atexit(reaper.JS_WindowMessage_ReleaseAll())

[mlprod]

Wow great work man! Expect a donation very soon.

Thanks/m

[vitalker]

Originally Posted by mlprod

Wow great work man! Expect a donation very soon.

Thanks/m

Thanks, received! Did you try it?

[vitalker]

Originally Posted by vitalker

Thanks, received! Did you try it?

I didn't try whether it is possible, but maybe you would want normal Reaper scrolling, but with reversed response?

[mlprod]

Originally Posted by vitalker

I didn't try whether it is possible, but maybe you would want normal Reaper scrolling, but with reversed response?

Seem to work fine with mouse wheel, less good with trackpad. The script above is the direction I want.

[vitalker]

Originally Posted by mlprod

Seem to work fine with mouse wheel, less good with trackpad. The script above is the direction I want.

So what can be changed then?

[mlprod]

Originally Posted by vitalker

So what can be changed then?

It's great as it is! Thx man.

[vitalker]

Originally Posted by mlprod

It's great as it is! Thx man.

But if it can be improved with little effort, I guess it's worth it.

[mlprod]

Originally Posted by vitalker

But if it can be improved with little effort, I guess it's worth it.

Happy with it as it is!

[vitalker]

Originally Posted by mlprod

Happy with it as it is!

All right, I hope it will be useful.