1/////////////////////////////////////////////
2// Phatt Pad 2
3// Copyright (C) David Olofson, 2002
4/////////////////////////////////////////////
5
6wid = target;
7
8w_format wid, MONO16, 33488;
9w_blank wid, 33488, 1;
10
11// The exact desired frequency is 523.25 Hz,
12// but as we need a perfect loop, we'll round
13// all frequencies so that we get integer
14// numbers of periods per loop.
15
16w_env AMPLITUDE,
17		0,	.15,
18		.25,	.25,
19		.5,	.25,
20		.25,	.15;
21w_env MOD1,
22		0,	0,
23		.5,	.1,
24		.5,	0;
25w_env FREQUENCY, 519;
26w_osc wid, TRIANGLE;
27w_env FREQUENCY, 521;
28w_osc wid, TRIANGLE;
29
30w_env MOD1,
31		0,	0,
32		.2,	.2,
33		.3,	.07,
34		.3,	.15,
35		.2,	0;
36w_env FREQUENCY, 523;
37w_osc wid, TRIANGLE;
38w_env FREQUENCY, 526;
39w_osc wid, TRIANGLE;
40
41p_param target, WAVE, wid;
42p_param target, DRIVER, POLY;
43p_param target, ENV_SKIP, 1;
44p_param target, ENV_L0, 0;
45p_param target, ENV_DELAY, 0;
46p_param target, ENV_T1, .001;
47p_param target, ENV_L1, 1;
48p_param target, ENV_HOLD, .05;
49p_param target, ENV_T2, .1;
50p_param target, ENV_L2, .6;
51p_param target, ENV_T3, -1;
52p_param target, ENV_T4, .02;
53