70 lines
1.8 KiB
Lua
70 lines
1.8 KiB
Lua
--------------------------------------
|
|
----------// HEADER //----------------
|
|
--------------------------------------
|
|
--[[
|
|
* REALIVE: Reaper Setup for a Complete Live Playback Engine
|
|
* ReaScript Name: Realive_ProjectTabsList_Nav_Prev.lua
|
|
* Description: Realive_ProjectTabsList_Nav_Prev
|
|
* 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_Prev()
|
|
local prevproj = ''
|
|
if reaper.HasExtState('Realive_Playlist', 'prevProjectID') then
|
|
prevproj = reaper.GetExtState('Realive_Playlist', 'prevProjectID')
|
|
end
|
|
local prevproj_ID, fn = reaper.EnumProjects(prevproj-1,'')
|
|
reaper.SelectProjectInstance(prevproj_ID)
|
|
end
|
|
|
|
|
|
------------------------------------------
|
|
---------// RUN FUNCTION //--------------
|
|
------------------------------------------
|
|
function run()
|
|
ProjectNavigation_Prev()
|
|
end
|
|
|
|
|
|
|
|
------------------------------------------
|
|
---------// RUNTIME //-------------------
|
|
------------------------------------------
|
|
run()
|
|
|