1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
/*
ugensa.h:
Copyright (C) 1997 J. Michael Clarke, based on ideas from CHANT (IRCAM)
This file is part of Csound.
The Csound Library is free software; you can redistribute it
and/or modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
Csound is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with Csound; if not, write to the Free Software
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
02110-1301 USA
*/
/* UGENSM.H */
#define PFRAC1(x) ((MYFLT)((x) & ftp1->lomask) * ftp1->lodiv)
typedef struct overlap {
struct overlap *nxtact;
struct overlap *nxtfree;
int32 timrem, dectim, formphs, forminc;
uint32 risphs;
int32 risinc, decphs, decinc;
MYFLT curamp, expamp;
} OVERLAP;
typedef struct {
OPDS h;
MYFLT *ar, *xamp, *xdens, *xtrans, *xspd, *koct, *kband, *kris, *kdur, *kdec;
MYFLT *iolaps, *ifna, *ifnb, *itotdur, *iphs, *itmode, *iskip;
OVERLAP basovrlap;
int32 durtogo, fundphs, fofcount, prvsmps, spdphs; /*last added JMC for FOG*/
MYFLT prvband, expamp, preamp, fogcvt; /*last added JMC for FOG*/
int16 xincod, ampcod, fundcod;
int16 formcod, fmtmod, speedcod; /*last added JMC for FOG*/
AUXCH auxch;
FUNC *ftp1, *ftp2;
} FOGS;
/*typedef struct {
OPDS h;
MYFLT *sr, *xamp, *xcps, *ifn, *iphs;
int32 lphs;
FUNC *ftp;
} JMC;
*/
|
