dofile(reaper.AZ_GetLuaInitPath())

require("reaper_AZSTOKE_BRONZE")  

require("reaper_AZSTOKE_SILVER")  

・RIGDOCKSをインポート

-- NG

function OKtoNG()

・メディアをNGにする関数

    allCount,_ = reaper.AZ_GetSelectedMediaTypeCount(0,"")

・ 選択されたメディアの数を取得

    

    mutedMedia = {}

    

    for i = 0,allCount-1 do

       name = reaper.AZ_GetSelectedMediaName(0,i)

・ メディアの名前を取得

       name = name.."_ng"

・ 名前の末尾に"_ng"を追加

       reaper.AZ_SetSelectedMediaName(0,i,name)

・ メディアの名前を設定

       

       table.insert(mutedMedia, name)

・ ミュートしたメディアの名前をリストに追加

       

       reaper.AZ_SetSelectedMediaMute(0, i, true)

・ メディアをミュートに設定

    end

    

    Msg("以下のメディアをNGにしました")

    ShowObject(mutedMedia)

・ ミュートしたメディアのリストを表示

end

-- OK

function NGtoOK()

・NGのメディアをOKにする関数

    allCount,_ = reaper.AZ_GetSelectedMediaTypeCount(0,"")

・ 選択されたメディアの数を取得

    

    okMedia = {}

    

    for i = 0, allCount-1 do

       name = reaper.AZ_GetSelectedMediaName(0,i)

・ メディアの名前を取得

       name = reaper.AZ_ReplaceSearchString(name, "_ng", "")

・ 名前から"_ng"を削除

       reaper.AZ_SetSelectedMediaName(0,i,name)

・ メディアの名前を設定

       

       table.insert(okMedia, name)

       

・ OKにしたメディアの名前をリストに追加

       reaper.AZ_SetSelectedMediaMute(0, i, false)

・ メディアをミュート解除に設定

    end

    

    Msg("以下のメディアをOKにしました")

    ShowObject(okMedia)

・ ミュート解除したメディアのリストを表示

end 

function SeparateTakesToNG()

    retval, inputList = reaper.AZ_GetUserInputList("Select processing mode", 1, "OK to NG: 0 / NG to OK: 1", "0")

    if retval == false then return end

・ ユーザーに処理モードの選択を促す

    

    if(inputList[1] == "1") then

        NGtoOK()

・ 1ならOKにする処理を実行

    else

        OKtoNG()

・ それ以外ならNGにする処理を実行

    end

end

SeparateTakesToNG()

・メイン処理の実行