s416496/musique
1
0
Fork 0
Code Issues 3 Pull Requests 1 Projects Releases Wiki Activity

Support for midi program change message

Browse Source
This commit is contained in:
Robert Bendun 2022-06-11 19:00:36 +02:00
parent b930ef4e6e
commit e6aed50fe9
1 changed files with 26 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
src/interpreter.cc
View File

@ -432,6 +432,32 @@ Interpreter::Interpreter()
unreachable(); unreachable();
}); });
{
constexpr auto pgmchange = +[](Interpreter &i, std::vector<Value> args) -> Result<Value> {
using Program = Shape<Value::Type::Number>;
using Channel_Program = Shape<Value::Type::Number, Value::Type::Number>;
if (Program::typecheck(args)) {
auto [program] = Program::move_from(args);
i.midi_connection->send_program_change(0, program.as_int());
return Value{};
}
if (Channel_Program::typecheck(args)) {
auto [chan, program] = Channel_Program::move_from(args);
i.midi_connection->send_program_change(chan.as_int(), program.as_int());
return Value{};
}
unreachable();
};
global.force_define("instrument", pgmchange);
global.force_define("pgmchange", pgmchange);
global.force_define("program_change", pgmchange);
}
operators["+"] = plus_minus_operator<std::plus<>>; operators["+"] = plus_minus_operator<std::plus<>>;
operators["-"] = plus_minus_operator<std::minus<>>; operators["-"] = plus_minus_operator<std::minus<>>;
operators["*"] = binary_operator<std::multiplies<>>; operators["*"] = binary_operator<std::multiplies<>>;