This is adjust.c in view mode; [Download] [Up]
adjust(actdev,desdev,actweight,pchval,framefirst,framelast) float actdev,desdev,actweight,*pchval,framefirst,framelast; { int i,j; float x,devfact; /* two heuristics here: only shrinking range, and no pitches < 50 hz */ devfact = (desdev > actdev) ? actdev : desdev/actdev; for(j=0,i=(int)framefirst; i<=(int)framelast; i++,j++) { x = (pchval[j]-actweight) * devfact + actweight; pchval[j] = (x >50) ? x : pchval[j]; } }
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.