Add whole-take time shifting
Ctrl+Shift+Left/Right move every note in the take by one grid cell, for clips that landed off the beat. Since the whole take moves together, notes cannot collide with each other; the hazard is the item boundary. Notes pushed past either end stop sounding but are not deleted, so the operation is reversible -- shifting back restores them. The plain keys still refuse when that would happen and report the count, because a clip that has silently lost its first bar is a bad thing to discover later. Ctrl+Alt+Shift forces it and names the consequence. Positions are converted through QN rather than offset in raw ticks, so shifts stay musically correct across tempo changes.
This commit is contained in:
+10
-2
@@ -55,7 +55,11 @@ $actions = @(
|
||||
@('RSmidigrid_veldn', 32060, 'MIDI Grid: Velocity down', 'MidiGrid_VelDown.lua'),
|
||||
@('RSmidigrid_longer', 32060, 'MIDI Grid: Lengthen note one cell', 'MidiGrid_Lengthen.lua'),
|
||||
@('RSmidigrid_shorter',32060, 'MIDI Grid: Shorten note one cell', 'MidiGrid_Shorten.lua'),
|
||||
@('RSmidigrid_join', 32060, 'MIDI Grid: Join run of repeated notes', 'MidiGrid_Join.lua')
|
||||
@('RSmidigrid_join', 32060, 'MIDI Grid: Join run of repeated notes', 'MidiGrid_Join.lua'),
|
||||
@('RSmidigrid_shl', 32060, 'MIDI Grid: Shift all notes one cell left', 'MidiGrid_ShiftLeft.lua'),
|
||||
@('RSmidigrid_shr', 32060, 'MIDI Grid: Shift all notes one cell right', 'MidiGrid_ShiftRight.lua'),
|
||||
@('RSmidigrid_shlf', 32060, 'MIDI Grid: Shift all notes left (force)', 'MidiGrid_ShiftLeftForce.lua'),
|
||||
@('RSmidigrid_shrf', 32060, 'MIDI Grid: Shift all notes right (force)', 'MidiGrid_ShiftRightForce.lua')
|
||||
)
|
||||
|
||||
# flags, keycode, section, id
|
||||
@@ -78,7 +82,11 @@ $keys = @(
|
||||
@(21, 32808, 32060, 'RSmidigrid_veldn'),
|
||||
@(1, 76, 32060, 'RSmidigrid_longer'),
|
||||
@(5, 76, 32060, 'RSmidigrid_shorter'),
|
||||
@(17, 74, 32060, 'RSmidigrid_join')
|
||||
@(17, 74, 32060, 'RSmidigrid_join'),
|
||||
@(13, 32805, 32060, 'RSmidigrid_shl'),
|
||||
@(13, 32807, 32060, 'RSmidigrid_shr'),
|
||||
@(29, 32805, 32060, 'RSmidigrid_shlf'),
|
||||
@(29, 32807, 32060, 'RSmidigrid_shrf')
|
||||
)
|
||||
|
||||
$backup = "$kb.midigrid-backup"
|
||||
|
||||
Reference in New Issue
Block a user