sndfnint.c

Audacity是一款用於錄音和編輯聲音的、免費的開放源碼軟體。它可以執行於Mac OS X、Microsoft Windows、GNU/Linux和其它作業系統

}


#include "areson.h"

/* xlc_snd_areson -- interface to C routine snd_areson */
/**/
LVAL xlc_snd_areson(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    long arg4 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_areson(arg1, arg2, arg3, arg4);
    return cvsound(result);
}


#include "resonvc.h"

/* xlc_snd_resonvc -- interface to C routine snd_resonvc */
/**/
LVAL xlc_snd_resonvc(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type arg2 = getsound(xlgasound());
    double arg3 = testarg2(xlgaanynum());
    long arg4 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_resonvc(arg1, arg2, arg3, arg4);
    return cvsound(result);
}


#include "resoncv.h"

/* xlc_snd_resoncv -- interface to C routine snd_resoncv */
/**/
LVAL xlc_snd_resoncv(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    sound_type arg3 = getsound(xlgasound());
    long arg4 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_resoncv(arg1, arg2, arg3, arg4);
    return cvsound(result);
}


#include "aresonvc.h"

/* xlc_snd_aresonvc -- interface to C routine snd_aresonvc */
/**/
LVAL xlc_snd_aresonvc(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type arg2 = getsound(xlgasound());
    double arg3 = testarg2(xlgaanynum());
    long arg4 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_aresonvc(arg1, arg2, arg3, arg4);
    return cvsound(result);
}


#include "aresoncv.h"

/* xlc_snd_aresoncv -- interface to C routine snd_aresoncv */
/**/
LVAL xlc_snd_aresoncv(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    sound_type arg3 = getsound(xlgasound());
    long arg4 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_aresoncv(arg1, arg2, arg3, arg4);
    return cvsound(result);
}


#include "resonvv.h"

/* xlc_snd_resonvv -- interface to C routine snd_resonvv */
/**/
LVAL xlc_snd_resonvv(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type arg2 = getsound(xlgasound());
    sound_type arg3 = getsound(xlgasound());
    long arg4 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_resonvv(arg1, arg2, arg3, arg4);
    return cvsound(result);
}


#include "aresonvv.h"

/* xlc_snd_aresonvv -- interface to C routine snd_aresonvv */
/**/
LVAL xlc_snd_aresonvv(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type arg2 = getsound(xlgasound());
    sound_type arg3 = getsound(xlgasound());
    long arg4 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_aresonvv(arg1, arg2, arg3, arg4);
    return cvsound(result);
}


#include "offset.h"

/* xlc_snd_offset -- interface to C routine snd_offset */
/**/
LVAL xlc_snd_offset(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_offset(arg1, arg2);
    return cvsound(result);
}


#include "slope.h"

/* xlc_snd_slope -- interface to C routine snd_slope */
/**/
LVAL xlc_snd_slope(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type result;

    xllastarg();
    result = snd_slope(arg1);
    return cvsound(result);
}


#include "delay.h"

/* xlc_snd_delay -- interface to C routine snd_delay */
/**/
LVAL xlc_snd_delay(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_delay(arg1, arg2, arg3);
    return cvsound(result);
}


#include "delaycv.h"

/* xlc_snd_delaycv -- interface to C routine snd_delaycv */
/**/
LVAL xlc_snd_delaycv(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    sound_type arg3 = getsound(xlgasound());
    sound_type result;

    xllastarg();
    result = snd_delaycv(arg1, arg2, arg3);
    return cvsound(result);
}


#include "shape.h"

/* xlc_snd_shape -- interface to C routine snd_shape */
/**/
LVAL xlc_snd_shape(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type arg2 = getsound(xlgasound());
    double arg3 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_shape(arg1, arg2, arg3);
    return cvsound(result);
}


#include "sampler.h"

/* xlc_snd_sampler -- interface to C routine snd_sampler */
/**/
LVAL xlc_snd_sampler(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    double arg4 = testarg2(xlgaanynum());
    double arg5 = testarg2(xlgaanynum());
    double arg6 = testarg2(xlgaanynum());
    sound_type arg7 = getsound(xlgasound());
    long arg8 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_sampler(arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8);
    return cvsound(result);
}


#include "exp.h"

/* xlc_snd_exp -- interface to C routine snd_exp */
/**/
LVAL xlc_snd_exp(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type result;

    xllastarg();
    result = snd_exp(arg1);
    return cvsound(result);
}


#include "siosc.h"

/* xlc_snd_siosc -- interface to C routine snd_siosc */
/**/
LVAL xlc_snd_siosc(void)
{
    LVAL arg1 = xlgetarg();
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    double arg4 = testarg2(xlgaanynum());
    sound_type arg5 = getsound(xlgasound());
    sound_type result;

    xllastarg();
    result = snd_siosc(arg1, arg2, arg3, arg4, arg5);
    return cvsound(result);
}


#include "follow.h"

/* xlc_snd_follow -- interface to C routine snd_follow */
/**/
LVAL xlc_snd_follow(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    double arg4 = testarg2(xlgaanynum());
    long arg5 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_follow(arg1, arg2, arg3, arg4, arg5);
    return cvsound(result);
}


#include "gate.h"

/* xlc_snd_gate -- interface to C routine snd_gate */
/**/
LVAL xlc_snd_gate(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    double arg4 = testarg2(xlgaanynum());
    double arg5 = testarg2(xlgaanynum());
    double arg6 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_gate(arg1, arg2, arg3, arg4, arg5, arg6);
    return cvsound(result);
}


#include "quantize.h"

/* xlc_snd_quantize -- interface to C routine snd_quantize */
/**/
LVAL xlc_snd_quantize(void)
{
    sound_type arg1 = getsound(xlgasound());
    long arg2 = getfixnum(xlgafixnum());
    sound_type result;

    xllastarg();
    result = snd_quantize(arg1, arg2);
    return cvsound(result);
}


#include "ifft.h"

/* xlc_snd_ifft -- interface to C routine snd_ifft */
/**/
LVAL xlc_snd_ifft(void)
{
    double arg1 = testarg2(xlgaanynum());
    double arg2 = testarg2(xlgaanynum());
    LVAL arg3 = xlgetarg();
    long arg4 = getfixnum(xlgafixnum());
    LVAL arg5 = xlgetarg();
    sound_type result;

    xllastarg();
    result = snd_ifft(arg1, arg2, arg3, arg4, arg5);
    return cvsound(result);
}


#include "congen.h"

/* xlc_snd_congen -- interface to C routine snd_congen */
/**/
LVAL xlc_snd_congen(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_congen(arg1, arg2, arg3);
    return cvsound(result);
}


#include "fromobject.h"

/* xlc_snd_fromobject -- interface to C routine snd_fromobject */
/**/
LVAL xlc_snd_fromobject(void)
{
    double arg1 = testarg2(xlgaanynum());
    double arg2 = testarg2(xlgaanynum());
    LVAL arg3 = xlgetarg();
    sound_type result;

    xllastarg();
    result = snd_fromobject(arg1, arg2, arg3);
    return cvsound(result);
}


#include "fromarraystream.h"

/* xlc_snd_fromarraystream -- interface to C routine snd_fromarraystream */
/**/
LVAL xlc_snd_fromarraystream(void)
{
    double arg1 = testarg2(xlgaanynum());
    double arg2 = testarg2(xlgaanynum());
    LVAL arg3 = xlgetarg();
    sound_type result;

    xllastarg();
    result = snd_fromarraystream(arg1, arg2, arg3);
    return cvsound(result);
}


#include "coterm.h"

/* xlc_snd_coterm -- interface to C routine snd_coterm */
/**/
LVAL xlc_snd_coterm(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type arg2 = getsound(xlgasound());
    sound_type result;

    xllastarg();
    result = snd_coterm(arg1, arg2);
    return cvsound(result);
}


#include "convolve.h"

/* xlc_snd_convolve -- interface to C routine snd_convolve */
/**/
LVAL xlc_snd_convolve(void)
{
    sound_type arg1 = getsound(xlgasound());
    sound_type arg2 = getsound(xlgasound());
    sound_type result;

    xllastarg();
    result = snd_convolve(arg1, arg2);
    return cvsound(result);
}


#include "alpass.h"

/* xlc_snd_alpass -- interface to C routine snd_alpass */
/**/
LVAL xlc_snd_alpass(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_alpass(arg1, arg2, arg3);
    return cvsound(result);
}


#include "oneshot.h"

/* xlc_snd_oneshot -- interface to C routine snd_oneshot */
/**/
LVAL xlc_snd_oneshot(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_oneshot(arg1, arg2, arg3);
    return cvsound(result);
}


#include "chase.h"

/* xlc_snd_chase -- interface to C routine snd_chase */
/**/
LVAL xlc_snd_chase(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_chase(arg1, arg2, arg3);
    return cvsound(result);
}


#include "tapv.h"

/* xlc_snd_tapv -- interface to C routine snd_tapv */
/**/
LVAL xlc_snd_tapv(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    sound_type arg3 = getsound(xlgasound());
    double arg4 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_tapv(arg1, arg2, arg3, arg4);
    return cvsound(result);
}


#include "biquad.h"

/* xlc_snd_biquad -- interface to C routine snd_biquad */
/**/
LVAL xlc_snd_biquad(void)
{
    sound_type arg1 = getsound(xlgasound());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    double arg4 = testarg2(xlgaanynum());
    double arg5 = testarg2(xlgaanynum());
    double arg6 = testarg2(xlgaanynum());
    double arg7 = testarg2(xlgaanynum());
    double arg8 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_biquad(arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8);
    return cvsound(result);
}


#include "pluck.h"

/* xlc_snd_pluck -- interface to C routine snd_pluck */
/**/
LVAL xlc_snd_pluck(void)
{
    double arg1 = testarg2(xlgaanynum());
    double arg2 = testarg2(xlgaanynum());
    double arg3 = testarg2(xlgaanynum());
    double arg4 = testarg2(xlgaanynum());
    double arg5 = testarg2(xlgaanynum());
    sound_type result;

    xllastarg();
    result = snd_pluck(arg1, arg2, arg3, arg4, arg5);
    return cvsound(result);
}