int main() { sp_data *sp; sp_create(&sp); sp_srand(sp, 12345); sp->sr = SR; sp->len = sp->sr * LEN; uint32_t t, u; SPFLOAT in = 0, out = 0; sp_mincer *unit[NUM]; sp_ftbl *wav; sp_ftbl_loadfile(sp, &wav, SAMPDIR "oneart.wav"); for(u = 0; u < NUM; u++) { sp_mincer_create(&unit[u]); sp_mincer_init(sp, unit[u], wav, 2048); } for(t = 0; t < sp->len; t++) { for(u = 0; u < NUM; u++) sp_mincer_compute(sp, unit[u], &in, &out); } for(u = 0; u < NUM; u++) sp_mincer_destroy(&unit[u]); sp_destroy(&sp); sp_ftbl_destroy(&wav); return 0; }
void process(AUAudioFrameCount frameCount, AUAudioFrameCount bufferOffset) override { for (int frameIndex = 0; frameIndex < frameCount; ++frameIndex) { int frameOffset = int(frameIndex + bufferOffset); position = double(positionRamper.getAndStep()); amplitude = double(amplitudeRamper.getAndStep()); pitchRatio = double(pitchRatioRamper.getAndStep()); mincer->time = position; mincer->amp = amplitude; mincer->pitch = pitchRatio; // for (int channel = 0; channel < channels; ++channel) { float *outL = (float *)outBufferListPtr->mBuffers[0].mData + frameOffset; float *outR = (float *)outBufferListPtr->mBuffers[1].mData + frameOffset; if (started) { sp_mincer_compute(sp, mincer, NULL, outL); *outR = *outL; } else { *outL = 0; *outR = 0; } // } } }
void process(sp_data *sp, void *udata) { UserData *ud = udata; SPFLOAT osc = 0, mincer = 0, randi = 0; sp_randi_compute(sp, ud->randi, NULL, &randi); ud->mincer->time = randi; ud->mincer->amp = 1; ud->mincer->pitch = 1; sp_mincer_compute(sp, ud->mincer, NULL, &mincer); sp->out[0] = mincer; }
int sporth_mincer(sporth_stack *stack, void *ud) { plumber_data *pd = ud; SPFLOAT out = 0; sp_ftbl * ft = NULL; const char *ftname = NULL; SPFLOAT time = 0; SPFLOAT amp = 0; SPFLOAT pitch = 0; SPFLOAT winsize = 0; sp_mincer *mincer = NULL; switch(pd->mode) { case PLUMBER_CREATE: #ifdef DEBUG_MODE plumber_print(pd, "mincer: Creating\n"); #endif sp_mincer_create(&mincer); plumber_add_ugen(pd, SPORTH_MINCER, mincer); if(sporth_check_args(stack, "ffffs") != SPORTH_OK) { plumber_print(pd,"Not enough arguments for mincer\n"); stack->error++; return PLUMBER_NOTOK; } ftname = sporth_stack_pop_string(stack); winsize = sporth_stack_pop_float(stack); pitch = sporth_stack_pop_float(stack); amp = sporth_stack_pop_float(stack); time = sporth_stack_pop_float(stack); sporth_stack_push_float(stack, 0); break; case PLUMBER_INIT: #ifdef DEBUG_MODE plumber_print(pd, "mincer: Initialising\n"); #endif ftname = sporth_stack_pop_string(stack); winsize = sporth_stack_pop_float(stack); pitch = sporth_stack_pop_float(stack); amp = sporth_stack_pop_float(stack); time = sporth_stack_pop_float(stack); mincer = pd->last->ud; if(plumber_ftmap_search(pd, ftname, &ft) == PLUMBER_NOTOK) { stack->error++; return PLUMBER_NOTOK; } sp_mincer_init(pd->sp, mincer, ft, winsize); sporth_stack_push_float(stack, 0); break; case PLUMBER_COMPUTE: winsize = sporth_stack_pop_float(stack); pitch = sporth_stack_pop_float(stack); amp = sporth_stack_pop_float(stack); time = sporth_stack_pop_float(stack); mincer = pd->last->ud; mincer->time = time; mincer->amp = amp; mincer->pitch = pitch; sp_mincer_compute(pd->sp, mincer, NULL, &out); sporth_stack_push_float(stack, out); break; case PLUMBER_DESTROY: mincer = pd->last->ud; sp_mincer_destroy(&mincer); break; default: plumber_print(pd, "mincer: Unknown mode!\n"); break; } return PLUMBER_OK; }