Scroll track to top of arrange view ?

[Coachz]

Is it possible to scroll a selected track to the top of the arrange view ? Thanks buds !

[Fabian]

There is the

Track: Vertical scroll selected tracks into view (40913)

Maybe that will work?

I use in the same script the track height and lock came from

[Coachz]

Originally Posted by Fabian

There is the

Track: Vertical scroll selected tracks into view (40913)

Maybe that will work?

I use in the same script the track height and lock came from

Thanks but that just puts the track(s) in the middle and not top of the view.

[Edgemeal]

Check out this post from spk77,
https://forum.cockos.com/showpost.ph...&postcount=870

and some stuff I posted,
https://forum.cockos.com/showpost.ph...36&postcount=2

[Coachz]

Edgemeal, you come through again ! I used the code from the first example and got the track number from the selected track and it works great. Thanks again. You really rock.

-- clear console
reaper.ShowConsoleMsg("")

-- create simpler console messager
function Msg(param)
    reaper.ShowConsoleMsg(param.."\n")
end

function bool2string(b) return b and "true" or "false" end 

--debug  = true  -- disable main messages
--debug  = false  -- disable main messages


local floor = math.floor

function scroll_to_track(track_id, relative_y_pos, include_envelopes)
  relative_y_pos = relative_y_pos or 0 -- default position is "top"
  local p = "I_WNDH" -- Exclude envelope lane heights
  if not include_envelopes then -- Include envelope lane heights
    p = "I_TCPH"
  end
  -- Ignore hidden tracks
  if not reaper.IsTrackVisible(track_id, true) then
    return false
  end
  local tcp_y = reaper.GetMediaTrackInfo_Value(track_id, "I_TCPY")
  local tcp_h = reaper.GetMediaTrackInfo_Value(track_id, p)
  local arrange_id = reaper.JS_Window_FindChildByID(reaper.GetMainHwnd(), 0x3E8)
  local ok, ar_vsb_position, ar_vsb_page, ar_vsb_min, ar_vsb_max, ar_vsb_trackPos = reaper.JS_Window_GetScrollInfo(arrange_id, "v")
  if ok then
    ok = reaper.JS_Window_SetScrollPos(arrange_id, "v", tcp_y + ar_vsb_position - floor(relative_y_pos*(ar_vsb_page-tcp_h)))
  end
  return ok
end


selected_trk = reaper.GetSelectedTrack( 0, 0 )
tracknumber = reaper.GetMediaTrackInfo_Value(selected_trk, 'IP_TRACKNUMBER')


-- Example: scroll to selected track
local tr = reaper.GetTrack(0, tracknumber-1) -- Get track
if tr then
 -- Desc: scroll_to_track(track_id, relative_y_pos, include_envelopes)
  scroll_to_track(tr)
  --scroll_to_track(tr, 0.5, false)
  --scroll_to_track(tr, 1, false)
  --scroll_to_track(tr, 1, true)
end

[Skorobagatko]

Originally Posted by Coachz

Edgemeal, you come through again ! I used the code from the first example and got the track number from the selected track and it works great. Thanks again. You really rock.

-- clear console
reaper.ShowConsoleMsg("")

-- create simpler console messager
function Msg(param)
    reaper.ShowConsoleMsg(param.."\n")
end

function bool2string(b) return b and "true" or "false" end 

--debug  = true  -- disable main messages
--debug  = false  -- disable main messages


local floor = math.floor

function scroll_to_track(track_id, relative_y_pos, include_envelopes)
  relative_y_pos = relative_y_pos or 0 -- default position is "top"
  local p = "I_WNDH" -- Exclude envelope lane heights
  if not include_envelopes then -- Include envelope lane heights
    p = "I_TCPH"
  end
  -- Ignore hidden tracks
  if not reaper.IsTrackVisible(track_id, true) then
    return false
  end
  local tcp_y = reaper.GetMediaTrackInfo_Value(track_id, "I_TCPY")
  local tcp_h = reaper.GetMediaTrackInfo_Value(track_id, p)
  local arrange_id = reaper.JS_Window_FindChildByID(reaper.GetMainHwnd(), 0x3E8)
  local ok, ar_vsb_position, ar_vsb_page, ar_vsb_min, ar_vsb_max, ar_vsb_trackPos = reaper.JS_Window_GetScrollInfo(arrange_id, "v")
  if ok then
    ok = reaper.JS_Window_SetScrollPos(arrange_id, "v", tcp_y + ar_vsb_position - floor(relative_y_pos*(ar_vsb_page-tcp_h)))
  end
  return ok
end


selected_trk = reaper.GetSelectedTrack( 0, 0 )
tracknumber = reaper.GetMediaTrackInfo_Value(selected_trk, 'IP_TRACKNUMBER')


-- Example: scroll to selected track
local tr = reaper.GetTrack(0, tracknumber-1) -- Get track
if tr then
 -- Desc: scroll_to_track(track_id, relative_y_pos, include_envelopes)
  scroll_to_track(tr)
  --scroll_to_track(tr, 0.5, false)
  --scroll_to_track(tr, 1, false)
  --scroll_to_track(tr, 1, true)
end

Thanks for sharing!