[sc-dev] UGen creation q

[Casey Basichis <caseybasichis@xxxxxxxxx>]

So, i think i got it.  So now what do i do save it as
a source in plugins then what?

#include "SC_PlugIn.h"

static InterfaceTable *ft;

struct LFPulseLock : public Unit
{
	float mPhase, mFreqMul, mDuty;
	float mPrevFreq;
};

extern "C" {
void LFPulseLock_next_a(LFPulseLock *unit, int
inNumSamples);
void LFPulseLock_next_k(LFPulseLock *unit, int
inNumSamples);
void LFPulseLock_Ctor(LFPulseLock* unit);
}

void LFPulseLock_next_a(LFPulseLock	float *out =
ZOUT(0);
	float *freq = ZIN(0);
	float nextDuty = ZIN0(2);
	float duty = unit->mDuty;
	
	float freqmul = unit->mFreqMul;
	float phase = unit->mPhase;
	float frequency = unit->mPrevFreq;
	
	LOOP(inNumSamples, 
		float z;
		if (phase >= 1.f) {
			phase -= 1.f;
			duty = unit->mDuty = nextDuty;
			// output at least one sample from the opposite
polarity
			z = duty < 0.5 ? 1.f : 0.f;
			frequency = ZXP(freq) * freqmul;
		} else {
			z = phase < duty ? 1.f : 0.f;
			ZXP(freq);
		}

		phase += frequency;
		ZXP(out) = z;
	);

	unit->mPrevFreq = frequency;
	unit->mPhase = phase;
}

void LFPulseLock_next_k(LFPulseLock *unit, int
inNumSamples)
{
	float *out = ZOUT(0);
	float freq = ZIN0(0) * unit->mFreqMul;
	float nextDuty = ZIN0(2);
	float duty = unit->mDuty;
	
	float phase = unit->mPhase;
	float frequency = unit->mPrevFreq;
	LOOP(inNumSamples, 
		float z;
		if (phase >= 1.f) {
			phase -= 1.f;
			duty = unit->mDuty = nextDuty;
			// output at least one sample from the opposite
polarity
			z = duty < 0.5 ? 1.f : 0.f;
			frequency = freq;
		} else {
			z = phase < duty ? 1.f : 0.f;
		}
		phase += frequency;
		ZXP(out) = z;
	);

	unit->mPrevFreq = frequency;
	unit->mPhase = phase;
}

void LFPulse_Ctor(LFPulseLock* unit)
{
	if (INRATE(0) == calc_FullRate) {
		SETCALC(LFPulse_next_a);
	} else {
		SETCALC(LFPulse_next_k);
	}

	unit->mFreqMul = unit->mRate->mSampleDur;
	unit->mPhase = ZIN0(1);
	unit->mDuty = ZIN0(2);
	unit->mPrevFreq = ZIN0(0) * unit->mFreqMul;
	
	LFPulseLock_next_k(unit, 1);

}

void load(InterfaceTable *inTable)
{
	ft = inTable;

	DefineSimpleUnit(LFPulseLock);
}

__________________________________________________
Do you Yahoo!?
Yahoo! Mail Plus - Powerful. Affordable. Sign up now.
http://mailplus.yahoo.com