Skip to content

Commit 8068a8e

Browse files
committed
start adding Documentation for CaosPercLib Classes
1 parent f96ef76 commit 8068a8e

2 files changed

Lines changed: 47 additions & 0 deletions

File tree

Lines changed: 24 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,24 @@
1+
s.boot;
2+
/////////////////////////////////////////////////////////
3+
//Pseudo Class, Chord Generator in the common
4+
//key disposition.
5+
////////////////////////////////////////////////////////
6+
//Example CaosChords.ar:
7+
//arguments:
8+
//|chord = 'M', att = 0.1, rel = 1, note = 57, iphase = 0.025, width = 0.25, cutf = 120, rq = 0.5, pan = 0, gate = 0, amp = 0.5|
9+
//chord arg type=['M', 'm', 'M7', 'm7', 'Mmaj7', 'mmaj7', '5dim7', '5aug7'];
10+
x={CaosChords.ar('M',0.01,10,36,0.1,0.1,220,0.5,0,1,0.5)};
11+
x.play;
12+
//
13+
(
14+
Tdef(\progresion,{
15+
var chort = Pseq(['M', 'm', 'M7', 'm7', 'Mmaj7', 'mmaj7', '5dim7', '5aug7'],inf,).asStream;
16+
loop{{CaosChords.ar(chort.next,0.01,5,60,0.1,0.1,MouseX.kr(60,1200),0.75,0,1,1)}.play;
17+
chort.value.postln;
18+
5.wait}//0.5.wait
19+
}).quant_(4);
20+
)
21+
Tdef(\progresion).play;
22+
s.scope
23+
//
24+
Help.gui;
Lines changed: 23 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,23 @@
1+
s.boot;
2+
/////////////////////////////////////////////////////////
3+
//Pseudo Class, Chord Generator in the common
4+
//Guitarr disposition.
5+
////////////////////////////////////////////////////////
6+
7+
//Example CaosGuit Chords.ar:
8+
//arguments:
9+
//|chord = 'M', att = 0.1, rel = 1, note = 57, cutf = 120, rq = 0.5, pan = 0, gate = 0, amp = 0.5|
10+
//chord arg types =['M', 'm', 'M7', 'm7', 'Mmaj7', 'mmaj7', 'M9', 'M9m', 'm9', 'm9m'];
11+
y={CaosGuitChords.ar('Mmaj7',0.01,4,48,MouseX.kr(120,1250),0.5,0,1,0.5)};
12+
y.play;
13+
//
14+
(
15+
Tdef(\prog,{
16+
var chtime = Pseq(['M', 'm', 'M7', 'm7', 'Mmaj7', 'mmaj7', 'M9', 'M9m', 'm9', 'm9m'],inf,1).asStream;
17+
loop{{CaosGuitChords.ar(chtime.next,0.01,2,48,MouseX.kr(120,12000),0.5,0,1,1)}.play;
18+
chtime.value.postln;
19+
2.wait}
20+
})
21+
)
22+
Tdef(\prog).play ;
23+
//

0 commit comments

Comments
 (0)