ftp.nice.ch/pub/next/unix/audio/cmusic.bs.N.tar.gz#/src/frm/click.c

This is click.c in view mode; [Download] [Up]

#include <stdio.h>
#include <math.h>
#include <carl/carl.h>

main(narg,argv) int narg; char *argv[]; 
{
    float input, last;
    float thresh;
    long eof, n, c, nchan, channel;

    if(narg != 2){
	fprintf(stderr, "CLICK Usage: click threshold\n");
	exit(-1);
    } 
    thresh = expr(argv[1]);
    if(exprerr)
       {fprintf(stderr,"Illegal threshold expression '%s'\n",argv[1]);exit(-1);}
    if(isatty(0)){
	fprintf(stderr,"input must be a file or pipe.\n");
	exit(-1);
    }
    while ( getfloat(&input) > 0){
	if( fabs(input-last) > thresh) printf("%d %f\n",n,fabs(input-last));
	last = input;
	n++;
    }
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.