function ShowChildrenInMCP(tr, is_show)
local _,tr_chunk = reaper.GetTrackStateChunk(tr,'',true)
local BUSCOMP_var1 = tr_chunk:match('BUSCOMP (%d+)')
local tr_chunk_out = tr_chunk:gsub('BUSCOMP '..BUSCOMP_var1..' %d+', 'BUSCOMP '..BUSCOMP_var1..' '..(is_show and 0 or 1))
reaper.SetTrackStateChunk(tr, tr_chunk_out,true)
end
tr = reaper.GetTrack(0,0)
ShowChildrenInMCP(tr, true)--Select all tracks, Unselect all tracks
reaper.PreventUIRefresh(1)--замораживаем GUI
counttracks = reaper.CountTracks(0) -- даёт значение кол-ва треков (кроме Мастера)
if counttracks == 0 then return end -- если треков нет, остановить скрипт
for i=1, counttracks do -- создаём цикл опроса по каждому треку (кроме Мастера)
local track = reaper.GetTrack(0, i-1) -- получаем объект Медиа Трек для каждого порядкового номера трека (кроме Мастера)
reaper.SetMediaTrackInfo_Value(track, "I_SELECTED", 1) -- выделям трек (если 1 то выделить, если 0 снять выделение)
end
reaper.PreventUIRefresh(-1)--размораживаем GUI--Удалить выделенные треки
reaper.Undo_BeginBlock()--для того, чтобы можно было отменить действие(Ctrl+Z)
kolichestvo = reaper.CountSelectedTracks( 0 ) --получаем кол-ва выделенных треков (кроме Мастера)
for i = kolichestvo-1,0,-1 do --создаём цикл опроса по каждому выделенному треку (кроме Мастера)
local track = reaper.GetSelectedTrack(0,i) --Получаем выбранный трек из проекта
if track then --Если трек присутствует
reaper.DeleteTrack( track ) --удаляем трек
end
end
reaper.Undo_EndBlock("Delete select track",1)--завершаем действие отменить действие(Ctrl+Z)if update_gfx then -- cначала определяем триггер, по которому в какой-либо из буферов будет писаться графика
gfx.dest = 1 -- номер буфера 1..32 (кажется)
gfx.setimgdim(1, -1, -1) -- этим я сбрасываю графику внутри этого буфера, иначе она будет писаться поверх того, что уже есть
gfx.setimgdim(1, w, h) -- определяем размеры записываемой графики
gfx.a = 1
gfx.rect(0,0, w,h) -- рисуем что требуется
end
gfx.dest = -1 -- -1 - это основной слой
gfx.a = 1 -- альфа для буферов
gfx.blit(1, 1, 0, -- этим вытаскиваем первый буфер и сразу его переворачиваем/обрезаем/сжимаем при необходимости
0,0,w,h,
0,0,w,h,0,0)
--------------------------------------------------
-- Ф-я инициализирует gfx-окно с заданными параметрами
-- Кроме того, установим шрифт, который будем использовать
function Init()
local name,width,height,dockstate,xpos,ypos = "Test", 1000, 200, 0, 200, 200
gfx.init(name,width,height,dockstate,xpos,ypos)
local fontidx, fontface, fontsz, fontflags = 1, "Verdana", 20
gfx.setfont(1,"Verdana",20) -- set font 1
end
--------------------------------------------------
-- Здесь будем рисовать каждый кадр, в дефолтный framebuffer
-- Описываю подробно встречающиеся ф-и, хотя все это в документации
function Draw()
-- Информационная строка -------------
gfx.set(1,0.6,1,1) -- r,g,b,a, устанавливаем цвет, которым будем рисовать info
gfx.x, gfx.y = 10, 10 -- уст. gfx.x, gfx.y, строки рисуются отталкиваясь от этих координат!
local info = "Внутри окна нажмите правую, левую кнопку мыши, Alt, Ctrl, Shift, нажмите все одновременно."
gfx.drawstr(info)
-- Иллюстрация -----------------------
gfx.set(1,0.7,0.4,1) -- цвет, которым будем рисовать иллюстрацию
-- Текущее значение mouse_cap --
gfx.x, gfx.y = 10, 80
gfx.drawstr("mouse_cap = " .. gfx.mouse_cap)
local x, y = 900, 80 -- начальные координаты, рисовать будем справа налево, от младшего к старшим разрядам
local w, h = 40, 40 -- здесь зададим ширину и высоту квадратиков, соответствующих разрядам
for i = 0, 15, 1 do -- будем идти от нулевого, до 15 разряда. В Lua счет от единицы, но нам здесь удобнее, никто не запрещает!
gfx.rect(x, y, w, h, 0) -- рисуем квадратик, соотв. разряду
-- над квадратиком - номер разряда
gfx.x, gfx.y = x, y - h -- уст. gfx.x, gfx.y
-- от gfx.x, gfx.y - говорил выше, но...здесь тоже есть возможность выравнивания, опять же, используются флаги!!!
gfx.drawstr(tostring(i), 5, gfx.x + w, gfx.y + h) -- над квадратиком - номер разряда, flags = 5!
------------------------------
-- вот здесь мы создадим битовую маску
local Mask = 1<<i -- с помощью сдвига влево("<<") устанавливаем один конкретный бит
if gfx.mouse_cap&Mask ~= 0 then -- с помощью побитового "И"("&") проверяем, установлен ли этот бит в mouse_cap
-- в квадратике - значение маски
gfx.x, gfx.y = x, y
gfx.drawstr(tostring(Mask), 5, gfx.x + w, gfx.y + h)
end
------------------------------
x = x - w
end
end
--------------------------------------------------
-- Осн. луп будет вызывать ф-ю Draw() примерно 30 раз в секунду, пока gfx-окно открыто
function mainloop()
---------------
Draw()
---------------
local char = gfx.getchar() -- символ с клавиатуры, а если =-1 - окно gfx закрыто
if char~=-1 then reaper.defer(mainloop) end -- defer(пока окно открыто)
gfx.update() -- обновляет кадр
end
--------------------------------------------------
Init() -- Инициализируем окно
mainloop() -- Запускаем осн. луп
counttracks = reaper.CountTracks(0) -- даёт значение кол-ва трековif counttracks ~= nil then -- если треков нет, то и ни чего не делатьif counttracks > 0 thenif counttracks == 0 then return end -- если треков нет, остановить скриптselecttrack = reaper.GetTrack(0, i-1 ) --получаем объект Трек для каждого порядкового номера трекаselecttrack = reaper.SetMediaTrackInfo_Value(selecttrack,"I_SELECTED",1)--(выделям трек)Если 1 то выделить, Если 0 снять выделениеtrack = reaper.GetTrack(0, i-1 )counttracks = reaper.CountTracks(0) -- даёт значение кол-ва треков (кроме Мастера)
if counttracks == 0 then return end -- если треков нет, остановить скрипт
for i=1, counttracks do -- создаём цикл опроса по каждому треку (кроме Мастера)
local track = reaper.GetTrack(0, i-1) -- получаем объект Медиа Трек для каждого порядкового номера трека (кроме Мастера)
reaper.SetMediaTrackInfo_Value(track, "I_SELECTED", 1) -- выделям трек (если 1 то выделить, если 0 снять выделение)
endfor i=0, reaper.CountTracks(0)-1 do
reaper.SetMediaTrackInfo_Value(reaper.GetTrack(0, i), "I_SELECTED", 1)
endfor i=1, reaper.CountTracks(0) do
reaper.SetTrackSelected( reaper.GetTrack(0, i-1), 1 )
endreaper.Main_OnCommand(40296,0)Учиться нужно начиная с азбуки.
Эммм... Это откуда такое? Я вот в документации не нашел ничего подобного: https://www.lua.org/pil/4.3.4.html
Это да, это нужно, но в данном случае проверка была лишней. Там просто цикл не будет выполняться, если CountTracks вернет 0.
Когда это будет нужно, тогда и надо переменные заводить. Извиняюсь конечно, но в данном случае это просто было создание сущностей (объявление переменных) без должной на то необходимости.
Не знаю, не искал - но ни у кого нет циклов с i=0, да и как-то привычнее понимать, что кол-во чего либо считается с еденицы. Мне более НЕ Удобно то, как это в Рипере сделанно - с нуля.
В данном случаи и во многих других проверка лишняя, но пишешь какой-то скрипт и по ходу -- была лишней, а стала не лишней.
@Alex_V, вы видимо знакомы с програмированием?
counttracks = reaper.CountTracks(0) -- даёт значение кол-ва треков
if counttracks == 0 then return end -- если треков нет, остановить скрипт
for i=1, counttracks do -- создаём цикл опроса по каждому треку
track = reaper.GetTrack(0, i-1) -- получаем объект Медиа Трек для каждого порядкового номера трека
reaper.SetMediaTrackInfo_Value(track, "I_SELECTED", 1) -- выделям трек (если 1 то выделить, если 0 снять выделение)
end
endfor i=0, reaper.CountTracks(0)-1 do
reaper.SetMediaTrackInfo_Value(reaper.GetTrack(0, i), "I_SELECTED", 1)
endНу, в Lua индексация массивов обычно - с единицы (но, в принципе, может быть с любого индекса). Поэтому, думается, и перебор индексов делают чаще с 1. Почему в Рипере индексы с нуля, это как раз понятно. Он написан на C, а там индексация с нуля. В большинстве языков программирования ровно точно так же. На деле это во многом удобнее.
reaper.PreventUIRefresh(1)--замораживаем GUI
reaper.Undo_BeginBlock() --для того, чтобы можно было отменить действие (Ctrl+Z)
for i=1,reaper.CountSelectedTracks (0) do --создаём цикл опроса по каждому выделенному треку (кроме Мастера)
tr = reaper.GetSelectedTrack( 0, 0 ) --получаем выбранный трек из проекта (кроме Мастера)
reaper.SetMediaTrackInfo_Value(tr,"I_SELECTED",0)--Снимаем выделения
end
kol_vo = reaper.CountTracks( 0 ) -- даёт значение кол-ва треков в проекте (кроме Мастера)
if kol_vo == 0 then return end -- если треков нет, остановить скрипт
for i = 1,kol_vo do --создаём цикл опроса по каждому треку в проекте (кроме Мастера)
track = reaper.GetTrack(0,i-1) --получаем Трек для каждого порядкового номера трека
item = reaper.CountTrackMediaItems( track )--подсчитать количество item в треке
if item == 0 then --если item нет, то
reaper.SetMediaTrackInfo_Value( track, "I_SELECTED", 1 )-- выделям трек
end
end
for i = 1,reaper.CountSelectedTracks( 0 ) do --создаём цикл опроса по каждому выделенному треку (кроме Мастера)
local track = reaper.GetSelectedTrack( 0, 0 ) --получаем выбранный трек из проекта (кроме Мастера)
track = reaper.DeleteTrack( track ) --удаляем трэк
end
reaper.Undo_EndBlock("Remove all tracks with no items",1) --завершаем действие отменить действие(Ctrl+Z)
reaper.PreventUIRefresh(-1)--размораживаем GUIreaper.PreventUIRefresh(1)
reaper.Undo_BeginBlock()
for i = reaper.CountTracks(0) - 1, 0, -1 do
local track = reaper.GetTrack(0,i)
if reaper.GetTrackMediaItem(track, 0) == nil then
reaper.DeleteTrack(track)
end
end
reaper.Undo_EndBlock("Remove all tracks with no items",1)
reaper.PreventUIRefresh(-1)Я же написал - я не програмист от слова ВООБЩЕ, по этому мне с еденицы понятнее
Ну а я всего лишь попытался объяснить, откуда ноги растут. Вот и все.
На самом деле, если лезть в программирование, то надо понимать, что там, как правило (с некоторыми исключениями), все индексируется с нуля. Но надо быть готовым к индексации любого вида.
reaper.Undo_BeginBlock()
c = 1 -- задаём параметр, который нам поможет знать - сколько треков без айтемов удаляется
-- в процессе прохождения цикла ( 1 - потому как сразу смещаем порядковый номер с 1 на ноль
-- при первом же цикле
for i=1, reaper.CountTracks(0) do
i = i-c -- по сути меняем значение порядкового номера трека, отнимая от него удалённые треки
local track = reaper.GetTrack(0, i)
if reaper.GetTrackMediaItem(track, 0) == nil then -- если айтемов на треке нет, то -
reaper.DeleteTrack(track)
c = c+1 -- при каждом цикле, если трек удаляется, мы их кол-во приплюсовываем
end
end
reaper.Undo_EndBlock("Remove all tracks without items", 1)У вас возможно. У меня этот вариант войдёт в используемый благодаря вам - частенько бывает нужен, но как Я его решал раньше - написал выше.
kol_vo = reaper.CountTracks( 0 )
item = reaper.CountTrackMediaItems( track )С точки зрения обучения изменять счетчик цикла внутри тела цикла - моветон. В некоторых компилируемых языках такое даже не компилируется.
Отлично - прислушаюсь к мнению программиста и делать этого впредь не стану, собственно и не делал ни когда - не было необходимости!
index_k = 0
if IndexUp < IndexDown then
for i=1, #RegionName do
if RegionName[i].Index > IndexUp and i <= IndexDown then
prevIndex = IndexDown - index_k
RegionName[prevIndex].SongName = RegionName[prevIndex-1].SongName
index_k = index_k+1
end
end
RegionName[IndexUp].SongName = SongNameDown
end if IndexUp < IndexDown then
for i=#RegionName, 1, -1 do
if RegionName[i].Index > IndexUp and i <= IndexDown then
RegionName[i].SongName = RegionName[i-1].SongName
end
end
RegionName[IndexUp].SongName = SongNameDown
endЯ чуть ещё подумал - а я ведь там не меняю счётчик цикла, он как отсчитывал от i=1 до reaper.CountTracks(0), так и отсчитывает.
Можно так, а можно и цикл другого типа - не со счетчиком, а while (работать будет слегка медленнее). Но цикл от конца в начало списка получается проще для понимания и в реализации. Тут главное - понять проблему, которая возникает при удалении элементов, если идти по списку от начала и при этом удалять из него элементы.
Но тогда вся система исчислений должна начинаться с нуля.
Нет, не должна. Не надо путать количество элементов, номер элемента в списке и его индекс. Количество элементов в списке, если он не пуст, больше нуля. Индекс элемента в списке - это не его порядковый номер, это способ адресации элементов. Это, кстати, может вообще не числом быть (в ассоциативном массиве, например).
Так в вашем же примере первом вы кол-во элементов задали с нуля (ноль у вас тоже был еденицей измерения) - иначе ваш цикл с нуля и не заработал бы.
Я это знаю. В Lua таблицах индекс это ключ и он может быть хоть объектом, хоть функцией, хоть таблицей.
Да. Так и воспринимаю.
