ReaLive-ProjectTabsList/Realive_ProjectTabsList_Nav_Next.lua

70 lines
1.8 KiB
Lua

--------------------------------------
----------// HEADER //----------------
--------------------------------------
--[[
* REALIVE: Reaper Setup for a Complete Live Playback Engine
* ReaScript Name: Realive_ProjectTabsList_Nav_Next.lua
* Description: Realive_ProjectTabsList_Nav_Next
* Instructions:
* Author: Alex Paquette, Modified Script from to MPL, Mespotine
* Repository:
* Repository URI:
* File URI:
* Licence: GPL v3
* Forum Thread:
* Forum Thread URI: https://forum.cockos.com/showthread.php?p=1854775#post1854775
* REAPER: 5
* Extensions: SWS/S&M
* Version: 2.00
--]]
--[[
* Changelog:
* v1.0 (2019-06-02)
+ Initial Release
--]]
--------------------------------------
----------// VARIABLES //-------------
--------------------------------------
local reaper = reaper -------// Performance Enhancement //----------
local debug = false
-----------------------------------------------------------
-----// DEBUG FUNCTION //----------------------------------
-----------------------------------------------------------
if debug then reaper.ShowConsoleMsg("") end
function Msg(value)
if debug then
reaper.ShowConsoleMsg(tostring(value) .. "\n")
end
end
function ProjectNavigation_Next()
local nextproj = ''
if reaper.HasExtState('Realive_Playlist', 'nextProjectID') then
nextproj = reaper.GetExtState('Realive_Playlist', 'nextProjectID')
end
local nextproj_ID, fn = reaper.EnumProjects(nextproj-1,'')
reaper.SelectProjectInstance(nextproj_ID)
end
------------------------------------------
---------// RUN FUNCTION //--------------
------------------------------------------
function run()
ProjectNavigation_Next()
end
------------------------------------------
---------// RUNTIME //-------------------
------------------------------------------
run()