Track and envelope height

[Coachz]

Is there a function that will allow me to set the track height and envelope Heights in code in the TCP? Thanks as always

[Fabian]

For setting the track height (and locking it) I use this:

    reaper.SetMediaTrackInfo_Value(track, "I_HEIGHTOVERRIDE", height);
    reaper.SetMediaTrackInfo_Value(track, "B_HEIGHTLOCK", LOCK_IT)

This is in Lua but looks the same in the other languages https://mespotin.uber.space/Ultrasch...rackInfo_Value

For envelope height I think you need to use SWS https://mespotin.uber.space/Ultrasch...vSetProperties

[Coachz]

Originally Posted by Fabian

For setting the track height (and locking it) I use this:

    reaper.SetMediaTrackInfo_Value(track, "I_HEIGHTOVERRIDE", height);
    reaper.SetMediaTrackInfo_Value(track, "B_HEIGHTLOCK", LOCK_IT)

This is in Lua but looks the same in the other languages https://mespotin.uber.space/Ultrasch...rackInfo_Value

For envelope height I think you need to use SWS https://mespotin.uber.space/Ultrasch...vSetProperties

Tha is Fabian! I'll give it a whirl.

[Win Conway]

Originally Posted by Fabian

For setting the track height (and locking it) I use this:

    reaper.SetMediaTrackInfo_Value(track, "I_HEIGHTOVERRIDE", height);
    reaper.SetMediaTrackInfo_Value(track, "B_HEIGHTLOCK", LOCK_IT)

This is in Lua but looks the same in the other languages https://mespotin.uber.space/Ultrasch...rackInfo_Value

For envelope height I think you need to use SWS https://mespotin.uber.space/Ultrasch...vSetProperties

How do you actually make that in to a usable script ?

[Coachz]

This seems to work here:

-- 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

cntTracks = reaper.CountTracks( proj )
if debug then Msg("Num Tracks: " .. cntTracks) end

-- For each track
    for i = 0, cntTracks - 1 do

	 	local curTrack = reaper.GetTrack( 0, i )
	    retval, trackName = reaper.GetTrackName( curTrack, "" )
		if debug then Msg("\n Track Name: " .. i .. " is " .. trackName) end

		
       -- if track is track is selected 
       	selected =  reaper.IsTrackSelected( curTrack )
		if debug then Msg("\n Track is selected: " .. bool2string(selected)) end

		if selected then
			if debug then Msg("\nIn selected loop") end
			reaper.SetMediaTrackInfo_Value(curTrack, "I_HEIGHTOVERRIDE", 200)

			--include below line to lock track
			--reaper.SetMediaTrackInfo_Value(track, "B_HEIGHTLOCK", 1)
		end

    end

    reaper.TrackList_AdjustWindows( false )
    reaper.UpdateArrange()

[Meo-Ada Mespotine]

Originally Posted by Win Conway

How do you actually make that in to a usable script ?

Depends on what the script shall be useable in

[Coachz]

Originally Posted by Meo-Ada Mespotine

Depends on what the script shall be useable in

Not all of our brains run on machine language. :-)

[Win Conway]

It should be usable in Reaper, right?
Am I missing something?

[Coachz]

Originally Posted by Win Conway

It should be usable in Reaper, right?
Am I missing something?

Here are two examples. Just load them in the actions window under new action / load reascript. It works on selected tracks

[Win Conway]

Thanks, much appreciated, I will see if I can understand any of the code itself (doubtful)
Thanks again

[Coachz]

Originally Posted by Win Conway

Thanks, much appreciated, I will see if I can understand any of the code itself (doubtful)
Thanks again

Just ask me line by line what you don't get.

[Win Conway]

At work at the moment, but that's a great offer, thank you very much

[Coachz]

I need a way to reliably select the 1st envelope lane under the selected task if anyone knows how. This will allow me to set the env height there.

[Edgemeal]

You mean, select the first visible track envelope?

local env = reaper.GetTrackEnvelope(track, 0) -- first visible env
reaper.SetCursorContext(2, env) -- select the env

[Coachz]

Originally Posted by Edgemeal

You mean, select the first visible track envelope?

local env = reaper.GetTrackEnvelope(track, 0) -- first visible env
reaper.SetCursorContext(2, env) -- select the env

You saved the day again. Thanks Edgemeal !

[Coachz]

I have one small wrinkle in the code I need help with please. It works for the volume envelope but it doesn't work for other envelopes. Their heights are not changed like the volume is.



Custom: Rotate Envelope Out of Lane
Envelope: Show all envelopes for tracks
Script: edgemeal_Toggle envelope lanes for selected track.lua
Script: JB_set_trk_ht_200.lua
Script: JB_select_first_visible_envelope.lua
Script: JB_set_envelope_height_500.lua
Script: JB_scroll_select_track_top.lua


Script: JB_set_envelope_height_500.lua has code

 -- clear console
reaper.ShowConsoleMsg("")

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

debug  = false	-- disable main messages

envHeight = 500

tr = reaper.GetSelectedTrack( 0, 0 )
curMode = reaper.GetTrackAutomationMode( tr )


--if debug then Msg("Current Automation Mode is: " .. curMode) end

env = reaper.GetSelectedEnvelope( 0)


function SetEnvHeight(envelope, laneHeight)
local BR_env = reaper.BR_EnvAlloc( envelope, false )
local active, visible, armed, inLane, _, defaultShape, _, _, _, _, faderScaling = reaper.BR_EnvGetProperties( BR_env )
reaper.BR_EnvSetProperties( BR_env, active, visible, armed, inLane, laneHeight, defaultShape, faderScaling )
reaper.BR_EnvFree( BR_env, true )
end

SetEnvHeight(env, envHeight)

-- reaper.BR_EnvSetProperties(BR_Envelope envelope, boolean active, boolean
--visible, boolean armed, boolean inLane, integer laneHeight, integer
--defaultShape, boolean faderScaling)

[nofish]

From the gif it looks to me that when you bring the non-volume envelopes in the envelope lane, the volume envelope (green one in the media lane) is still selected, so this line

env = reaper.GetSelectedEnvelope( 0)

still refers to the volume envelope and so fails for the others.
Not sure but maybe you need this to select/set focus to the target envelope first.

https://forum.cockos.com/showthread.php?t=212833 (post #7)

[Coachz]

thanks nofish, I got lucky and found swapping

Script: edgemeal_Toggle envelope lanes for selected track.lua
for
Script: Toggle Envelope Lanes For Selected Track.lua

fixed it ! yay, thank you again for the help.