fsyn/examples/bl_saw_example.fs at master · akjmicro/fsyn · GitHub

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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
include ../fsyn.fs

make_biquad_struct bqstruct
bqstruct reinit_biquad

: bl_saw_example
begin
  \ 1st voice
  0.5e 51e bl_saw
  bqstruct false
  \ resonance:
  0.46e
  \ cutoff freq:
  2700e 0.3e sinewave 2800e f+
  biquad
  0.2e f*
  0.083e panmix

  \ 2nd voice
  0.5e 51.107e bl_saw
  bqstruct false
  \ resonance:
  0.45e
  \ cutoff freq:
  2700e 0.317e sinewave 2800e f+
  biquad
  0.2e f*
  0.25e panmix

  \ 3rd voice
  0.5e 51.213e bl_saw
  bqstruct false
  \ resonance:
  0.417e
  \ cutoff freq:
  2700e 0.298e sinewave 2800e f+
  biquad
  0.2e f*
  0.417e panmix

  \ 4th voice
  0.5e 51.011e bl_saw
  bqstruct false
  \ resonance:
  0.5e
  \ cutoff freq:
  2700e 0.136e sinewave 2800e f+
  biquad
  0.2e f*
  0.583e panmix

  \ 5th voice
  0.5e 51.141e bl_saw
  bqstruct false
  \ resonance:
  0.5e
  \ cutoff freq:
  2700e 0.311e sinewave 2800e f+
  biquad
  0.2e f*
  0.75e panmix

  \ 6th voice
  0.5e 50.718e bl_saw
  bqstruct false
  \ resonance:
  0.5e
  \ cutoff freq:
  2700e 0.372e sinewave 2800e f+
  biquad
  0.2e f*
  0.916e panmix

  stereo_out
  ( ADVANCE SAMPLE COUNTER )
  t+ \ advance counter
again ;

bl_saw_example