euphony 0.1.1

music composition environment for programmers
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

use crate::units::time::{Beat, Tempo};

pub(crate) use bach::time::scheduler::{self, Scheduler};

pub use bach::time::scheduler::Timer;

bach::scope::define!(resolution, Beat);

mod tempo {
    use super::*;

    bach::scope::define!(scope, Tempo);
}

pub fn tempo() -> Tempo {
    tempo::scope::try_borrow_with(|t| t.unwrap_or(Tempo::DEFAULT))
}

pub fn set_tempo(tempo: Tempo) -> Tempo {
    let duration = tempo * beats_per_tick();
    crate::output::set_tick_duration(duration);
    tempo::scope::set(Some(tempo)).unwrap_or(Tempo::DEFAULT)
}

pub fn delay(beats: Beat) -> Timer {
    scheduler::scope::borrow_with(|handle| {
        let ticks = beats / beats_per_tick();
        let ticks = ticks.whole();
        handle.delay(ticks)
    })
}

pub fn now() -> Beat {
    scheduler::scope::borrow_with(|handle| beats_per_tick() * handle.ticks())
}

fn beats_per_tick() -> Beat {
    resolution::try_borrow_with(|v| v.unwrap_or(Beat::DEFAULT_RESOLUTION))
}