wip: PhraseLength widget

crates/tek_sequencer/src/sequencer.rs

@@ -309,3 +309,43 @@ impl<E: Engine> PhrasePlayer<E> {
         self.overdub = !self.overdub;
     }
 }
+pub struct PhraseLength<E: Engine> {
+    _engine: PhantomData<E>,
+    pub ppq: usize,
+    pub bpb: usize,
+    pub pulses: usize,
+    pub focused: bool,
+    pub focus: PhraseLengthFocus
+}
+impl<E: Engine> PhraseLength<E> {
+    fn new (pulses: usize) -> Self {
+        Self {
+            _engine: Default::default(),
+            ppq: PPQ,
+            bpb: 4,
+            pulses,
+            focused: false,
+            focus: PhraseLengthFocus::Bar
+        }
+    }
+    pub fn bars (&self) -> usize {
+        self.pulses / (self.bpb * self.ppq)
+    }
+    pub fn beats (&self) -> usize {
+        self.pulses % (self.bpb * self.ppq)
+    }
+    pub fn ticks (&self) -> usize {
+        self.pulses % self.ppq
+    }
+    pub fn bars_string (&self) -> String {
+        format!("{}", self.bars())
+    }
+    pub fn beats_string (&self) -> String {
+        format!("{}", self.beats())
+    }
+    pub fn ticks_string (&self) -> String {
+        format!("{}", self.ticks())
+    }
+}
+#[derive(Copy,Clone)]
+pub enum PhraseLengthFocus { Bar, Beat, Tick }