mirror of
https://github.com/vsariola/sointu.git
synced 2025-05-27 10:50:23 -04:00
8183c698da
This should make testing easier, as Synth can be assumed to stay the same during each call. Synth is also the part that we can parse from .asm/.json file and a Patch can be compiled into a synth. Synth can be eventually made quite opaque to the user. The user should not need to worry about opcodes etc.
53 lines
1.9 KiB
C
53 lines
1.9 KiB
C
#include <stdint.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include "../include/sointu.h"
|
|
|
|
#if UINTPTR_MAX == 0xffffffff // are we 32-bit?
|
|
#if defined(__clang__) || defined(__GNUC__)
|
|
#define CALLCONV __attribute__ ((stdcall))
|
|
#elif defined(_WIN32)
|
|
#define CALLCONV __stdcall // on 32-bit platforms, we just use stdcall, as all know it
|
|
#endif
|
|
#else // 64-bit
|
|
#define CALLCONV // the asm will use honor honor correct x64 ABI on all 64-bit platforms
|
|
#endif
|
|
|
|
#define BPM 100
|
|
#define SAMPLE_RATE 44100
|
|
#define TOTAL_ROWS 16
|
|
#define SAMPLES_PER_ROW SAMPLE_RATE * 4 * 60 / (BPM * 16)
|
|
const int su_max_samples = SAMPLES_PER_ROW * TOTAL_ROWS;
|
|
|
|
void CALLCONV su_render_song(float* buffer) {
|
|
Synth* synth;
|
|
SynthState* synthState;
|
|
const unsigned char commands[] = { su_envelope_id, // MONO
|
|
su_envelope_id, // MONO
|
|
su_out_id + 1, // STEREO
|
|
su_advance_id };// MONO
|
|
const unsigned char values[] = { 64, 64, 64, 80, 128, // envelope 1
|
|
95, 64, 64, 80, 128, // envelope 2
|
|
128};
|
|
int retval;
|
|
// initialize Synth
|
|
synth = (Synth*)malloc(sizeof(Synth));
|
|
memcpy(synth->Commands, commands, sizeof(commands));
|
|
memcpy(synth->Values, values, sizeof(values));
|
|
synth->NumVoices = 1;
|
|
synth->Polyphony = 0;
|
|
// initialize SynthState
|
|
synthState = (SynthState*)malloc(sizeof(SynthState));
|
|
memset(synthState, 0, sizeof(SynthState));
|
|
synthState->RandSeed = 1;
|
|
// triger first voice
|
|
synthState->SynthWrk.Voices[0].Note = 64;
|
|
retval = su_render(synth, synthState, buffer, su_max_samples / 2);
|
|
synthState->SynthWrk.Voices[0].Release++;
|
|
buffer = buffer + su_max_samples;
|
|
retval = su_render(synth, synthState, buffer, su_max_samples / 2);
|
|
free(synth);
|
|
free(synthState);
|
|
return;
|
|
}
|