-
Notifications
You must be signed in to change notification settings - Fork 148
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Release Move cursor to equivalent position inside previous similarly …
…named Region v1.00
- Loading branch information
Showing
1 changed file
with
51 additions
and
0 deletions.
There are no files selected for viewing
51 changes: 51 additions & 0 deletions
51
...ns/amagalma_Move cursor to equivalent position inside previous similarly named Region.lua
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,51 @@ | ||
-- @description Move cursor to equivalent position inside previous similarly named Region | ||
-- @author amagalma | ||
-- @version 1.00 | ||
-- @donation https://www.paypal.me/amagalma | ||
|
||
local cur_pos = reaper.GetCursorPosition() | ||
local cur_region, _ = {} | ||
_, cur_region.idx = reaper.GetLastMarkerAndCurRegion( 0, cur_pos ) | ||
if cur_region.idx == -1 then return end | ||
_, _, cur_region.start, _, cur_region.name = reaper.EnumProjectMarkers( cur_region.idx ) | ||
local cur_pos_in_Region = cur_pos - cur_region.start | ||
|
||
|
||
local function KeepWords(str) | ||
local t, c = {}, 0 | ||
for word in str:gmatch("%w+") do | ||
if not tonumber(word) then | ||
c = c + 1 | ||
t[c] = word | ||
end | ||
end | ||
return table.concat(t) | ||
end | ||
|
||
|
||
local function compareStrings(A, B) | ||
if A == B then | ||
return true | ||
end | ||
|
||
local numA, numB = tonumber(A), tonumber(B) | ||
if numA and numB then | ||
return numB <= numA | ||
end | ||
|
||
return KeepWords(A) == KeepWords(B) | ||
end | ||
|
||
|
||
for i = cur_region.idx-1, 0, -1 do | ||
local _, isrgn, pos, rgnend, name = reaper.EnumProjectMarkers( i ) | ||
if isrgn then | ||
if compareStrings(cur_region.name, name) then | ||
local wanted_pos = pos + cur_pos_in_Region | ||
if wanted_pos <= rgnend then | ||
reaper.SetEditCurPos(pos + cur_pos_in_Region, true, true) | ||
break | ||
end | ||
end | ||
end | ||
end |