This is combset.m in view mode; [Download] [Up]
#include <math.h>
#include "../H/ugens.h"
#include "../H/combs.h"
combset(loopt,rvt,init,a)
float loopt,*a,rvt;
{
int j;
a[0] = ((float)START + (loopt * SR + .5));
a[1] = (float)pow(.001,(double)(loopt/rvt));
if(!init) {
for(j=START; j<(int)*a; j++) a[j] = 0;
a[STARTM1] = START;
}
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.