Move Cursor to Next Beat

[MusoBob]

There doesn't seem to be anything in the API's to go to measure/beat it all seems to be time.

I just need to move the cursor to the next beat

reaper.Main_OnCommand(41044, 0) -- Move edit cursor forward one beat

is moving 2 beats forward.


If I use as a command Script: spk77_Move edit cursor forward by 1 frame (or 1 beat).eel

it works but I don't want to call on it externally from the script so I would like to add it as a

function in the Lua script:


eel code

function move_cursor_right() local(snap, grid_vis, state, beat_in_meas, meas, closest_beat_in_secs)
(
  GetToggleCommandState(40370) ? state = 1 : state = 0;
  
  !state ? ( // ruler time unit is not "H:M:S:F"
    beat_in_meas = TimeMap2_timeToBeats(0, GetCursorPosition(), meas, 0, 0, 0);
    closest_beat_in_secs = TimeMap2_beatsToTime(0, floor(beat_in_meas + 0.5), meas);
    
    closest_beat_in_secs > GetCursorPosition() ? (
      SetEditCurPos(TimeMap2_beatsToTime(0, floor(beat_in_meas + 0.5), meas), 1, 0);
    ) : (
      SetEditCurPos(TimeMap2_beatsToTime(0, floor(beat_in_meas + 0.5) + 1, meas), 1, 0);
    );
  ) : ( // ruler time unit is "H:M:S:F"
    ApplyNudge(0, 2, 6, 18, 0.501, 0, 0); // nudge edit cursor right by 0.501 frames (snap to unit)
  );

  Undo_OnStateChange("Move edit cursor right by 1 frame (or 1 beat)");
);

but I can't get the Lua translation

  --GetToggleCommandState(40370) ? state = 1 : state = 0;
  state = reaper.GetToggleCommandState( 40370 )
  
  if state == 0 then  -- ruler time unit is not "H:M:S:F"
    beat_in_meas = reaper.TimeMap2_timeToBeats(0, reaper.GetCursorPosition(), meas, 0, 0, 0)
    closest_beat_in_secs = reaper.TimeMap2_beatsToTime(0, math.floor(beat_in_meas + 0.5), meas)
    
    if closest_beat_in_secs > reaper.GetCursorPosition() then
      reaper.SetEditCurPos(reaper.TimeMap2_beatsToTime(0, math.floor(beat_in_meas + 0.5), meas), 1, 0)
    
      reaper.SetEditCurPos(reaper.TimeMap2_beatsToTime(0, math.floor(beat_in_meas + 0.5) + 1, meas), 1, 0)
    end
  end  
  if state == 1 then -- ruler time unit is "H:M:S:F"
    reaper.ApplyNudge(0, 2, 6, 18, 0.501, 0, 0); -- nudge edit cursor right by 0.501 frames (snap to unit)
  end

[MusoBob]

it's simple when you find out how !

cur_pos = reaper.GetCursorPosition()
retval, measures, cml, fullbeats, cdenom = reaper.TimeMap2_timeToBeats(0, cur_pos)
current_measure = reaper.TimeMap2_beatsToTime(0, fullbeats +1)
reaper.SetEditCurPos2( 0, current_measure, 0, 0 )

[hopi]

now Bob... there is a 'signature quote'

it's simple when you find out how !

so how about the reverse lua? previous beat

[MusoBob]

cur_pos = reaper.GetCursorPosition()
retval, measures, cml, fullbeats, cdenom = reaper.TimeMap2_timeToBeats(0, cur_pos)
current_measure = reaper.TimeMap2_beatsToTime(0, fullbeats -1)
reaper.SetEditCurPos2( 0, current_measure, 0, 0 )

[hopi]

great! thanks Bob

[nofish]

Note that TimeMap2_timeToBeats() / TimeMap2_beatsToTime() don't take into account if a swing grid is set:
https://forum.cockos.com/showthread.php?t=220305

Justin posted some code for it in that thread.

[MusoBob]

Originally Posted by nofish

Note that TimeMap2_timeToBeats() / TimeMap2_beatsToTime() don't take into account if a swing grid is set...

Thanks I'll look into that more. I just created another script below to insert a stretch marker @ every beat depending what the grid is set to then it will snap the first stretch marker to the first beat and so on to fit the constant tempo item to the project's tempo map. If you can try it with your swing grid as it may not work if the stretch markers are not offset for the swing in the source item ??

Originally Posted by MusoBob

Here's an updated script to try, just set the item on the start beat, run the script and set the items original tempo in the popup.
Let me know if it works for you.

right click Save Link/Target As
ReaTrak set item bpm and fit to project tempo map.lua

Watch Video

[hopi]

Bob... it would be nice if you had your own repository on Reapack... so we can find just your scripts in a folder, like say, "MusoBob"... within the Scripts folder

OH... and it would be way nice if these scripts were OK in the MIDI Ed. actions list... must be a small thing to add???