mirror of
https://codeberg.org/unspeaker/tek.git
synced 2025-12-08 20:56:43 +01:00
horizontal time cursor
This commit is contained in:
parent
3177e4ab58
commit
d9b3bd150e
8 changed files with 341 additions and 249 deletions
|
|
@ -3,6 +3,15 @@ use ratatui::style::Stylize;
|
|||
|
||||
type Sequence = std::collections::BTreeMap<u32, Vec<::midly::MidiMessage>>;
|
||||
|
||||
mod keys;
|
||||
use keys::*;
|
||||
|
||||
mod horizontal;
|
||||
use horizontal::*;
|
||||
|
||||
mod vertical;
|
||||
use vertical::*;
|
||||
|
||||
pub struct Sequencer {
|
||||
name: String,
|
||||
/// JACK transport handle.
|
||||
|
|
@ -10,8 +19,10 @@ pub struct Sequencer {
|
|||
/// Holds info about tempo
|
||||
timebase: Arc<Timebase>,
|
||||
/// Sequencer resolution, e.g. 16 steps per beat.
|
||||
/// FIXME: grid in ppm will simplify calculations
|
||||
resolution: usize,
|
||||
/// Steps in sequence, e.g. 64 16ths = 4 beat loop.
|
||||
/// FIXME: play start / end / loop in ppm
|
||||
steps: usize,
|
||||
|
||||
/// JACK MIDI input port that will be created.
|
||||
|
|
@ -105,37 +116,36 @@ fn process_in (s: &mut Sequencer, scope: &ProcessScope, transport: &::jack::Tran
|
|||
let step = steps % s.steps;
|
||||
let tick = step * s.timebase.ppq() / s.resolution;
|
||||
let mut sequence = &mut s.sequences[s.sequence];
|
||||
let mut writer = s.output_port.writer(scope);
|
||||
for event in s.input_port.iter(scope) {
|
||||
match midly::live::LiveEvent::parse(event.bytes).unwrap() {
|
||||
|
||||
midly::live::LiveEvent::Midi { channel: _, message } => match message {
|
||||
|
||||
midly::MidiMessage::NoteOn { key, vel: _ } => {
|
||||
s.notes_on[key.as_int() as usize] = true;
|
||||
let contains = sequence.contains_key(&(tick as u32));
|
||||
if contains {
|
||||
sequence.get_mut(&(tick as u32)).unwrap().push(message.clone());
|
||||
} else {
|
||||
sequence.insert(tick as u32, vec![message.clone()]);
|
||||
}
|
||||
if s.monitoring {
|
||||
writer.write(&event).expect(&format!("{event:?}"))
|
||||
}
|
||||
if s.recording {
|
||||
match midly::live::LiveEvent::parse(event.bytes).unwrap() {
|
||||
midly::live::LiveEvent::Midi { channel: _, message } => match message {
|
||||
midly::MidiMessage::NoteOn { key, vel: _ } => {
|
||||
s.notes_on[key.as_int() as usize] = true;
|
||||
let contains = sequence.contains_key(&(tick as u32));
|
||||
if contains {
|
||||
sequence.get_mut(&(tick as u32)).unwrap().push(message.clone());
|
||||
} else {
|
||||
sequence.insert(tick as u32, vec![message.clone()]);
|
||||
}
|
||||
},
|
||||
midly::MidiMessage::NoteOff { key, vel: _ } => {
|
||||
s.notes_on[key.as_int() as usize] = false;
|
||||
let contains = sequence.contains_key(&(tick as u32));
|
||||
if contains {
|
||||
sequence.get_mut(&(tick as u32)).unwrap().push(message.clone());
|
||||
} else {
|
||||
sequence.insert(tick as u32, vec![message.clone()]);
|
||||
}
|
||||
},
|
||||
_ => {}
|
||||
},
|
||||
|
||||
midly::MidiMessage::NoteOff { key, vel: _ } => {
|
||||
s.notes_on[key.as_int() as usize] = false;
|
||||
let contains = sequence.contains_key(&(tick as u32));
|
||||
if contains {
|
||||
sequence.get_mut(&(tick as u32)).unwrap().push(message.clone());
|
||||
} else {
|
||||
sequence.insert(tick as u32, vec![message.clone()]);
|
||||
}
|
||||
},
|
||||
|
||||
_ => {}
|
||||
|
||||
},
|
||||
|
||||
_ => {}
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -198,7 +208,7 @@ fn render (s: &Sequencer, buf: &mut Buffer, mut area: Rect) -> Usually<Rect> {
|
|||
y: y + header.height,
|
||||
width: area.width.max(3 + time1 - time0),
|
||||
height: 3 + note1 - note0,
|
||||
})?,
|
||||
}, steps)?,
|
||||
};
|
||||
Ok(draw_box(buf, Rect {
|
||||
x,
|
||||
|
|
@ -230,23 +240,23 @@ fn draw_header (s: &Sequencer, buf: &mut Buffer, area: Rect, beat: usize) -> Usu
|
|||
//Style::default().dim()
|
||||
//});
|
||||
buf.set_string(x + 10, y + 1,
|
||||
&format!("⏺ MON"), if s.monitoring {
|
||||
Style::default().bold().green()
|
||||
} else {
|
||||
Style::default().bold().dim()
|
||||
});
|
||||
buf.set_string(x + 17, y + 1,
|
||||
&format!("⏺ REC"), if s.recording {
|
||||
Style::default().bold().red()
|
||||
} else {
|
||||
Style::default().bold().dim()
|
||||
});
|
||||
buf.set_string(x + 24, y + 1,
|
||||
buf.set_string(x + 17, y + 1,
|
||||
&format!("⏺ DUB"), if s.overdub {
|
||||
Style::default().bold().yellow()
|
||||
} else {
|
||||
Style::default().bold().dim()
|
||||
});
|
||||
buf.set_string(x + 24, y + 1,
|
||||
&format!("⏺ MON"), if s.monitoring {
|
||||
Style::default().bold().green()
|
||||
} else {
|
||||
Style::default().bold().dim()
|
||||
});
|
||||
let clips = draw_clips(s, buf, area)?;
|
||||
Ok(Rect { x, y, width: area.width, height: 3 })
|
||||
}
|
||||
|
|
@ -268,106 +278,7 @@ fn draw_clips (s: &Sequencer, buf: &mut Buffer, area: Rect) -> Usually<Rect> {
|
|||
Ok(Rect { x, y, width: 14, height: 14 })
|
||||
}
|
||||
|
||||
const KEYS_VERTICAL: [&'static str; 6] = [
|
||||
"▀", "▀", "▀", "█", "▄", "▄",
|
||||
];
|
||||
|
||||
fn draw_keys_vertical (s: &Sequencer, buf: &mut Buffer, mut area: Rect, beat: usize) {
|
||||
let ppq = s.timebase.ppq() as u32;
|
||||
let Rect { x, y, .. } = area;
|
||||
let (note0, note1) = s.note_axis;
|
||||
for key in note0..note1 {
|
||||
let x = x + 5 + key - note0;
|
||||
if key % 12 == 0 {
|
||||
let octave = format!("C{}", (key / 12) as i8 - 4);
|
||||
buf.set_string(x, y, &octave, Style::default());
|
||||
}
|
||||
let mut color = KEY_STYLE[key as usize % 12];
|
||||
let mut is_on = s.notes_on[key as usize];
|
||||
let step = beat % s.steps;
|
||||
let (a, b, c) = (
|
||||
(step + 0) as u32 * ppq / s.resolution as u32,
|
||||
(step + 1) as u32 * ppq / s.resolution as u32,
|
||||
(step + 2) as u32 * ppq / s.resolution as u32,
|
||||
);
|
||||
let key = ::midly::num::u7::from(key as u8);
|
||||
is_on = is_on || contains_note_on(&s.sequences[s.sequence], key, a, b);
|
||||
is_on = is_on || contains_note_on(&s.sequences[s.sequence], key, b, c);
|
||||
if is_on {
|
||||
color = Style::default().red();
|
||||
}
|
||||
buf.set_string(x, y - 1, &format!("▄"), color);
|
||||
}
|
||||
}
|
||||
|
||||
fn draw_vertical (s: &Sequencer, buf: &mut Buffer, mut area: Rect, beat: usize) -> Usually<Rect> {
|
||||
let ppq = s.timebase.ppq() as u32;
|
||||
area.x = area.x + 13;
|
||||
let Rect { x, y, .. } = area;
|
||||
let (time0, time1) = s.time_axis;
|
||||
let (note0, note1) = s.note_axis;
|
||||
let bw = Style::default().dim().on_black();
|
||||
let bg = Style::default().on_black();
|
||||
draw_keys_vertical(s, buf, area, beat);
|
||||
for step in time0..time1 {
|
||||
let y = y - time0 + step / 2;
|
||||
let step = step as usize;
|
||||
//buf.set_string(x + 5, y, &" ".repeat(32.max(note1-note0)as usize), bg);
|
||||
if step % s.resolution == 0 {
|
||||
buf.set_string(x + 2, y, &format!("{:2} ", step + 1), Style::default());
|
||||
}
|
||||
for k in note0..note1 {
|
||||
let key = ::midly::num::u7::from_int_lossy(k as u8);
|
||||
if step % 2 == 0 {
|
||||
let (a, b, c) = (
|
||||
(step + 0) as u32 * ppq / s.resolution as u32,
|
||||
(step + 1) as u32 * ppq / s.resolution as u32,
|
||||
(step + 2) as u32 * ppq / s.resolution as u32,
|
||||
);
|
||||
let (character, style) = match (
|
||||
contains_note_on(&s.sequences[s.sequence], key, a, b),
|
||||
contains_note_on(&s.sequences[s.sequence], key, b, c),
|
||||
) {
|
||||
(true, true) => ("█", bg),
|
||||
(true, false) => ("▀", bg),
|
||||
(false, true) => ("▄", bg),
|
||||
(false, false) => ("·", bw),
|
||||
};
|
||||
buf.set_string(x + 5 + k - note0, y, character, style);
|
||||
}
|
||||
}
|
||||
if beat % s.steps == step as usize {
|
||||
buf.set_string(x + 4, y, if beat % 2 == 0 { "▀" } else { "▄" }, Style::default().yellow());
|
||||
for key in note0..note1 {
|
||||
let _color = if s.notes_on[key as usize] {
|
||||
Style::default().red()
|
||||
} else {
|
||||
KEY_STYLE[key as usize % 12]
|
||||
};
|
||||
}
|
||||
}
|
||||
}
|
||||
let height = (time1-time0)/2;
|
||||
buf.set_string(x + 2, y + height + 1, format!(
|
||||
"Q 1/{} | N {} ({}-{}) | T {} ({}-{})",
|
||||
4 * s.resolution,
|
||||
s.note_axis.0 + s.note_cursor,
|
||||
s.note_axis.0,
|
||||
s.note_axis.1 - 1,
|
||||
s.time_axis.0 + s.time_cursor + 1,
|
||||
s.time_axis.0 + 1,
|
||||
s.time_axis.1,
|
||||
), Style::default().dim());
|
||||
buf.set_string(
|
||||
x + 5 + s.note_cursor,
|
||||
y + s.time_cursor / 2,
|
||||
if s.time_cursor % 2 == 0 { "▀" } else { "▄" },
|
||||
Style::default()
|
||||
);
|
||||
Ok(Rect { x, y, width: area.width, height: height + 1 })
|
||||
}
|
||||
|
||||
fn contains_note_on (sequence: &Sequence, k: ::midly::num::u7, start: u32, end: u32) -> bool {
|
||||
pub fn contains_note_on (sequence: &Sequence, k: ::midly::num::u7, start: u32, end: u32) -> bool {
|
||||
for (_, (_, events)) in sequence.range(start..end).enumerate() {
|
||||
for event in events.iter() {
|
||||
match event {
|
||||
|
|
@ -383,91 +294,6 @@ fn contains_note_on (sequence: &Sequence, k: ::midly::num::u7, start: u32, end:
|
|||
return false
|
||||
}
|
||||
|
||||
|
||||
const KEY_WHITE: Style = Style {
|
||||
fg: Some(Color::Gray),
|
||||
bg: None,
|
||||
underline_color: None,
|
||||
add_modifier: ::ratatui::style::Modifier::empty(),
|
||||
sub_modifier: ::ratatui::style::Modifier::empty(),
|
||||
};
|
||||
|
||||
const KEY_BLACK: Style = Style {
|
||||
fg: Some(Color::Black),
|
||||
bg: None,
|
||||
underline_color: None,
|
||||
add_modifier: ::ratatui::style::Modifier::empty(),
|
||||
sub_modifier: ::ratatui::style::Modifier::empty(),
|
||||
};
|
||||
|
||||
const KEY_STYLE: [Style;12] = [
|
||||
KEY_WHITE, KEY_BLACK, KEY_WHITE, KEY_BLACK, KEY_WHITE,
|
||||
KEY_WHITE, KEY_BLACK, KEY_WHITE, KEY_BLACK, KEY_WHITE, KEY_BLACK, KEY_WHITE,
|
||||
];
|
||||
|
||||
fn draw_keys_horizontal (s: &Sequencer, buf: &mut Buffer, mut area: Rect) -> Usually<Rect> {
|
||||
let Rect { x, y, .. } = area;
|
||||
let (note0, note1) = s.note_axis;
|
||||
let (time0, time1) = s.time_axis;
|
||||
let bw = Style::default().dim();
|
||||
let bg = Style::default().on_black();
|
||||
for i in 0..32.max(note1-note0)/2 {
|
||||
let y = y + i;
|
||||
buf.set_string(x + 2, y, KEYS_VERTICAL[(i % 6) as usize], bw);
|
||||
buf.set_string(x + 3, y, "█", bw);
|
||||
buf.set_string(x + 6, y, &"·".repeat((time1 - time0) as usize), bg.dim());
|
||||
if i % 6 == 0 {
|
||||
let octave = format!("C{}", ((note1 - i) / 6) as i8 - 4);
|
||||
buf.set_string(x + 4, y, &octave, Style::default());
|
||||
}
|
||||
}
|
||||
Ok(area)
|
||||
}
|
||||
|
||||
fn draw_horizontal (s: &Sequencer, buf: &mut Buffer, mut area: Rect) -> Usually<Rect> {
|
||||
area.x = area.x + 13;
|
||||
let Rect { x, y, width, .. } = area;
|
||||
let (time0, time1) = s.time_axis;
|
||||
let (note0, note1) = s.note_axis;
|
||||
let bw = Style::default().dim();
|
||||
let bg = Style::default().on_black();
|
||||
draw_keys_horizontal(s, buf, area)?;
|
||||
for step in time0..time1 {
|
||||
let time_start = step as u32 * s.timebase.ppq() as u32;
|
||||
let time_end = (step + 1) as u32 * s.timebase.ppq() as u32;
|
||||
for (_, (_, events)) in s.sequences[s.sequence].range(time_start..time_end).enumerate() {
|
||||
if events.len() > 0 {
|
||||
buf.set_string(x + 5 + step as u16, y, "█", bw);
|
||||
}
|
||||
}
|
||||
}
|
||||
let height = 32.max(note1 - note0) / 2;
|
||||
buf.set_string(x - 13, y + height, format!("├{}┤", "-".repeat((width - 2).into())),
|
||||
Style::default().dim());
|
||||
buf.set_string(x - 11, y + height + 1, format!(
|
||||
"Sync 4/4 Quantize 1/{} Notes {} ({}-{}) Time {} ({}-{})",
|
||||
4 * s.resolution,
|
||||
s.note_axis.0 + s.note_cursor,
|
||||
s.note_axis.0,
|
||||
s.note_axis.1 - 1,
|
||||
s.time_axis.0 + s.time_cursor + 1,
|
||||
s.time_axis.0 + 1,
|
||||
s.time_axis.1,
|
||||
), Style::default().not_dim());
|
||||
buf.set_string(
|
||||
x + 6 + s.time_cursor,
|
||||
y + s.note_cursor / 2,
|
||||
if s.note_cursor % 2 == 0 { "▀" } else { "▄" },
|
||||
Style::default()
|
||||
);
|
||||
Ok(Rect {
|
||||
x: x - 13,
|
||||
y,
|
||||
width: time1 - time0 + 19,
|
||||
height: height + 3
|
||||
})
|
||||
}
|
||||
|
||||
pub fn handle (s: &mut Sequencer, event: &AppEvent) -> Usually<bool> {
|
||||
handle_keymap(s, event, KEYMAP)
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue