Record Arm Track by Track Name?

[robgb]

I've searched but have been unable to find a script that does this, and my own attempts have been a disaster.

I'd like to toggle record arm a track, without selecting it, based on the track name. For example, I'd like to toggle record arm a track named GUITAR 1. (I don't want to have to select the track first, or have it selected at all.)

There are Actions that allow you to "Track: Toggle Record for Track #" that do exactly what I want by number, but I'm unable to open those scripts to find out what's going on and possibly modify them. I would simply use track numbers, but if I add new tracks, the numbers change, so I need to do it by name.

Anyone have any ideas?

[Edgemeal]

Maybe something like,..

local ok, search = reaper.GetUserInputs("Toggle track record arm", 1, "Track name:", "")
if not ok then return end
search = search:lower()
for i = 0, reaper.CountTracks()-1 do
  local track = reaper.GetTrack(0, i)
  local _, name = reaper.GetTrackName(track, '') 
  if name:lower() == search then -- toggle track record arm
    reaper.SetMediaTrackInfo_Value(track, "I_RECARM",math.abs(1-reaper.GetMediaTrackInfo_Value(track, "I_RECARM")))
    break -- exit loop (apply to first matching track name only)
  end
end

[Zeno]

Why not use reaconsole?
s 'trackname/number' a

[robgb]

Originally Posted by Edgemeal

Maybe something like,..

local ok, search = reaper.GetUserInputs("Toggle track record arm", 1, "Track name:", "")
if not ok then return end
search = search:lower()
for i = 0, reaper.CountTracks()-1 do
  local track = reaper.GetTrack(0, i)
  local _, name = reaper.GetTrackName(track, '') 
  if name:lower() == search then -- toggle track record arm
    reaper.SetMediaTrackInfo_Value(track, "I_RECARM",math.abs(1-reaper.GetMediaTrackInfo_Value(track, "I_RECARM")))
    break -- exit loop (apply to first matching track name only)
  end
end

I'd like to be able to do it without any user input, with the script already directed toward a specific track name.

[robgb]

Originally Posted by Zeno

Why not use reaconsole?
s 'trackname/number' a

I don't want to select the track. I simply want to arm it via scripting.

But this did give me an idea. By using Cycle Commands, I created a new command with CONSOLE a GUITAR, and that seems to work. Thanks.

[sonictim]

Originally Posted by robgb

I'd like to be able to do it without any user input, with the script already directed toward a specific track name.

Like this?
(You will have to substitute whatever Track Name you want to arm in the first line of code)

local trackname = "Desired Track You want to Record Arm Name"

trackname = trackname:lower()

for i = 0, reaper.CountTracks()-1 do
  local track = reaper.GetTrack(0, i)
  local _, name = reaper.GetTrackName(track, '') 
  if name:lower() == trackname then -- toggle track record arm
    reaper.SetMediaTrackInfo_Value(track, "I_RECARM",math.abs(1-reaper.GetMediaTrackInfo_Value(track, "I_RECARM")))
    break -- exit loop (apply to first matching track name only)
  end
end

(This is just Edgemeal's code again)

[Meo-Ada Mespotine]

Try this one. When you run it, it will ask you for the trackname.
If you enter one, it will create three actions in your actionlist, who allow you to arm, unarm and togglearm all tracks with that name(non case sensitive):

-- Create record-arm-actions, who arm/unarm/togglearm tracks with a certain name.
-- written by Meo-Ada Mespotine 22th of September 2020 - mespotine.de
-- licensed under MIT-license

retval, val = reaper.GetUserInputs("Give me a trackname", 1, "Trackname", "")
if retval==false or val=="" then reaper.MB("No action created", "Aborted", 0) return end

function WriteValueToFile(filename_with_path, value, binarymode, append)
  -- Writes value to filename_with_path
  -- Keep in mind, that you need to escape \ by writing \\, or it will not work
  -- binarymode

  -- check parameters
  if type(filename_with_path)~="string" then return -1 end
  --if type(value)~="string" then return -1 end
  value=tostring(value)
  
  -- prepare variables
  local binary, appendix, file
  if binarymode==nil or binarymode==true then binary="b" else binary="" end
  if append==nil or append==false then appendix="w" else appendix="a" end
  
  -- write file
  file=io.open(filename_with_path,appendix..binary)
  if file==nil then return -1 end
  file:write(value)
  file:close()
  return 1
end

Script=[[
-- recarm all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, 1)
  end
end
]]

WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_Arm_Tracks_Named_"..val..".lua", Script)

Script=[[
-- recunarm all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, 0)
  end
end
]]
WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_UnArm_Tracks_Named_"..val..".lua", Script)

Script=[[
-- toggle recarm of all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, -1)
  end
end
]]
WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_ToggleArm_Tracks_Named_"..val..".lua", Script)

Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_Arm_Tracks_Named_"..val..".lua", true)
Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_UnArm_Tracks_Named_"..val..".lua", true)
Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_ToggleArm_Tracks_Named_"..val..".lua", true)

reaper.MB("Created the following actions in the actionlist:\n\nRecord_Arm_Tracks_Named_"..val..".lua\nRecord_UnArm_Tracks_Named_"..val..".lua\nRecord_ToggleArm_Tracks_Named_"..val..".lua", "Success", 0)

[robgb]

Originally Posted by sonictim

Like this?
(You will have to substitute whatever Track Name you want to arm in the first line of code)

local trackname = "Desired Track You want to Record Arm Name"

trackname = trackname:lower()

for i = 0, reaper.CountTracks()-1 do
  local track = reaper.GetTrack(0, i)
  local _, name = reaper.GetTrackName(track, '') 
  if name:lower() == trackname then -- toggle track record arm
    reaper.SetMediaTrackInfo_Value(track, "I_RECARM",math.abs(1-reaper.GetMediaTrackInfo_Value(track, "I_RECARM")))
    break -- exit loop (apply to first matching track name only)
  end
end

(This is just Edgemeal's code again)

I tried this earlier and got an error.

[robgb]

Originally Posted by Meo-Ada Mespotine

Try this one. When you run it, it will ask you for the trackname.
If you enter one, it will create three actions in your actionlist, who allow you to arm, unarm and togglearm all tracks with that name(non case sensitive):

-- Create record-arm-actions, who arm/unarm/togglearm tracks with a certain name.
-- written by Meo-Ada Mespotine 22th of September 2020 - mespotine.de
-- licensed under MIT-license

retval, val = reaper.GetUserInputs("Give me a trackname", 1, "Trackname", "")
if retval==false or val=="" then reaper.MB("No action created", "Aborted", 0) return end

function WriteValueToFile(filename_with_path, value, binarymode, append)
  -- Writes value to filename_with_path
  -- Keep in mind, that you need to escape \ by writing \\, or it will not work
  -- binarymode

  -- check parameters
  if type(filename_with_path)~="string" then return -1 end
  --if type(value)~="string" then return -1 end
  value=tostring(value)
  
  -- prepare variables
  local binary, appendix, file
  if binarymode==nil or binarymode==true then binary="b" else binary="" end
  if append==nil or append==false then appendix="w" else appendix="a" end
  
  -- write file
  file=io.open(filename_with_path,appendix..binary)
  if file==nil then return -1 end
  file:write(value)
  file:close()
  return 1
end

Script=[[
-- recarm all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, 1)
  end
end
]]

WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_Arm_Tracks_Named_"..val..".lua", Script)

Script=[[
-- recunarm all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, 0)
  end
end
]]
WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_UnArm_Tracks_Named_"..val..".lua", Script)

Script=[[
-- toggle recarm of all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, -1)
  end
end
]]
WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_ToggleArm_Tracks_Named_"..val..".lua", Script)

Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_Arm_Tracks_Named_"..val..".lua", true)
Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_UnArm_Tracks_Named_"..val..".lua", true)
Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_ToggleArm_Tracks_Named_"..val..".lua", true)

reaper.MB("Created the following actions in the actionlist:\n\nRecord_Arm_Tracks_Named_"..val..".lua\nRecord_UnArm_Tracks_Named_"..val..".lua\nRecord_ToggleArm_Tracks_Named_"..val..".lua", "Success", 0)

Thanks! I'll check it out.

[robgb]

Originally Posted by Meo-Ada Mespotine

Try this one. When you run it, it will ask you for the trackname.
If you enter one, it will create three actions in your actionlist, who allow you to arm, unarm and togglearm all tracks with that name(non case sensitive):

-- Create record-arm-actions, who arm/unarm/togglearm tracks with a certain name.
-- written by Meo-Ada Mespotine 22th of September 2020 - mespotine.de
-- licensed under MIT-license

retval, val = reaper.GetUserInputs("Give me a trackname", 1, "Trackname", "")
if retval==false or val=="" then reaper.MB("No action created", "Aborted", 0) return end

function WriteValueToFile(filename_with_path, value, binarymode, append)
  -- Writes value to filename_with_path
  -- Keep in mind, that you need to escape \ by writing \\, or it will not work
  -- binarymode

  -- check parameters
  if type(filename_with_path)~="string" then return -1 end
  --if type(value)~="string" then return -1 end
  value=tostring(value)
  
  -- prepare variables
  local binary, appendix, file
  if binarymode==nil or binarymode==true then binary="b" else binary="" end
  if append==nil or append==false then appendix="w" else appendix="a" end
  
  -- write file
  file=io.open(filename_with_path,appendix..binary)
  if file==nil then return -1 end
  file:write(value)
  file:close()
  return 1
end

Script=[[
-- recarm all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, 1)
  end
end
]]

WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_Arm_Tracks_Named_"..val..".lua", Script)

Script=[[
-- recunarm all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, 0)
  end
end
]]
WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_UnArm_Tracks_Named_"..val..".lua", Script)

Script=[[
-- toggle recarm of all tracks with the name "]]..val..[["
-- automatically generated by a script written by Meo-Ada Mespotine 22th of September 2020
-- licensed under an MIT-license

Trackname="]]..val..[["
for i=0, reaper.CountTracks(0)-1 do
  Track=reaper.GetTrack(0, i)
  retval, CheckTrackName=reaper.GetTrackName(Track)
  if CheckTrackName:lower()==Trackname:lower() then
    reaper.CSurf_OnRecArmChange(Track, -1)
  end
end
]]
WriteValueToFile(reaper.GetResourcePath().."/Scripts/Record_ToggleArm_Tracks_Named_"..val..".lua", Script)

Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_Arm_Tracks_Named_"..val..".lua", true)
Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_UnArm_Tracks_Named_"..val..".lua", true)
Action=reaper.AddRemoveReaScript(true, 0, reaper.GetResourcePath().."/Scripts/Record_ToggleArm_Tracks_Named_"..val..".lua", true)

reaper.MB("Created the following actions in the actionlist:\n\nRecord_Arm_Tracks_Named_"..val..".lua\nRecord_UnArm_Tracks_Named_"..val..".lua\nRecord_ToggleArm_Tracks_Named_"..val..".lua", "Success", 0)

OKAY, this script is quite ingenious. THANK YOU SO MUCH for this. It's perfect. I've also looked at the scripts it generated to see where I initially went wrong, so it's been educational also.

[Meo-Ada Mespotine]

You're welcome

[lexaproductions]

reaconsole can enable tracks. No need for scripting there.
I think you can even setup a key command with the appropriate letter already setup in the console when opening it.

[robgb]

Originally Posted by lexaproductions

reaconsole can enable tracks. No need for scripting there.
I think you can even setup a key command with the appropriate letter already setup in the console when opening it.

Yes, I figured out how to do it using cycle commands and reaconsole, but I much prefer @Meo-Ada Mespotine's method.