blob: b340d9fd507f0cfbaab0a382dc40ae128265566b (
plain)
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
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
#N canvas 507 79 570 531 10;
#X obj 0 694 cnv 15 552 21 empty empty empty 20 12 0 14 -233017 -33289
0;
#X obj 0 359 cnv 3 550 3 empty empty inlets 8 12 0 13 -228856 -1 0
;
#N canvas 627 335 354 247 META 0;
#X text 1 32 LICENSE SIBSD;
#X text 1 127 LIBRARY cyclone;
#X text 1 108 OUTLET_0 signal;
#X text 1 70 INLET_0 float signal;
#X text 1 0 KEYWORDS signal amplifier amp overdriven distortion analog
sumulate;
#X text 1 51 DESCRIPTION simulate an analog amplifier being overdriven
;
#X text 1 89 INLET_1 ?????;
#X text 0 147 VERSION 0.1-alpha57;
#X text 0 165 AUTHOR Krzysztof Czaja;
#X text 1 183 RELEASE_DATE 2002;
#X text 2 202 WEBSITE http://suita.chopin.edu.pl/~czaja/miXed/externs/cyclone.html
;
#X text 2 234 HELP_PATCH_AUTHORS Christoph Kummerer. Revised by Jonathan
Wilkes for Pd-extended 0.42 to conform to the PDDP template. Alex Cleveland
updated this patch for Pd-l2ork version 2013.05.28. Fred Jan Kraan
adapted the patch to pd-extended 2015-02-02;
#X restore 504 696 pd META;
#X obj 0 446 cnv 3 550 3 empty empty outlets 8 12 0 13 -228856 -1 0
;
#X obj 0 483 cnv 3 550 3 empty empty arguments 8 12 0 13 -228856 -1
0;
#X obj 0 520 cnv 3 550 3 empty empty more_info 8 12 0 13 -228856 -1
0;
#N canvas 313 476 428 109 Related_objects 0;
#X obj 0 0 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0;
#X text 6 1 Related Objects;
#X restore 198 696 pd Related_objects;
#X obj 85 368 cnv 17 3 35 empty empty 0 5 9 0 16 -228856 -162280 0
;
#X obj 85 455 cnv 17 3 17 empty empty 0 5 9 0 16 -228856 -162280 0
;
#X obj 0 0 cnv 15 552 40 empty empty overdrive~ 3 12 0 18 -204280 -1
0;
#X obj 480 6 overdrive~;
#X text 112 367 float;
#X text 112 388 signal;
#X text 112 454 signal;
#X text 181 454 - simulated overdriven signal;
#X text 95 493 1) float;
#X text 181 493 - intial drive;
#X text 124 531 overdrive~ simulates the distortion caused when an
analog amplifier is fed a signal that is too high for the inputs. This
is generally known as "overdriving" the amplifier \, and it causes
a characteristic distortion that is often used to generate a "fat"
sound.;
#X floatatom 133 116 5 0 0 0 - - -;
#X obj 136 94 hsl 128 15 1 12 0 1 empty empty drive_factor 45 9 1 12
-262131 -1 -1 5500 1;
#X obj 14 94 osc~ 400;
#X obj 85 417 cnv 17 3 17 empty empty 1 5 9 0 16 -228856 -162280 0
;
#X text 12 23 Simulate an analog amplifier being overdriven;
#X text 18 48 simulates distortion by applying a non-linear transfer
function to the incoming signal.;
#X text 124 608 If the "drive" is 1 \, the signal is unchanged. Increasing
the "drive" increases the amount of distortion. If the "drive" is less
than 1 \, then it causes a different kind of distortion. If the "drive"
is less than 0 \, VERY LOUD distortion can result \, so be careful!
;
#X floatatom 275 117 5 0 1 0 - - -;
#X text 112 417 float;
#X obj 133 294 output~;
#X obj 278 95 hsl 128 15 0 1 0 1 empty empty drive_amount 45 9 1 12
-262131 -1 -1 6600 1;
#X obj 133 205 cyclone/overdrive~;
#N canvas 678 584 450 300 view 0;
#X obj 50 119 tgl 15 1 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
;
#X obj 125 80 tabwrite~ \$0overdrive;
#X obj 50 137 metro 100;
#X obj 126 28 inlet~;
#X text 43 254 The view array is placed in a subpatch as it can cause
dropouts in the audio;
#X text 114 105 1;
#X text 109 236 -1;
#X obj 5 2 cnv 15 425 20 empty empty empty 3 12 0 14 -204280 -1 0;
#X obj 129 111 hsl 195 140 0 127 0 0 eliminate_outlet eliminate_inlet
empty -2 -8 0 10 -262144 -262144 -262144 0 1;
#N canvas 0 22 450 300 (subpatch) 0;
#X array \$0overdrive 200 float 0;
#X coords 0 1 199 -1 200 140 1;
#X restore 126 111 graph;
#X text 8 5 View graph;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X connect 3 0 1 0;
#X restore 210 295 pd view waveform;
#X text 319 292 <- click to see wave form;
#X text 179 377 - set drive factor;
#X text 181 417 - set amount of overdrive (amplification);
#X connect 18 0 29 0;
#X connect 19 0 18 0;
#X connect 20 0 29 0;
#X connect 25 0 29 1;
#X connect 28 0 25 0;
#X connect 29 0 30 0;
#X connect 29 0 27 0;
#X connect 29 0 27 1;
|
