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
107
108
109
|
class::WaveTerrain
summary::wave terrain synthesis
related:: Classes/VMScan2D
categories:: UGens>Buffer
//SLUGens released under the GNU GPL as extensions for SuperCollider 3, by Nick Collins, http://composerprogrammer.com/index.html
keyword:: SLUGens
Description::
Specify a surface z(x,y) via a buffer and scan it from the x and y inputs.
classmethods::
method::ar
argument::bufnum
Your surface is a two dimensional array, but specified via a one dimensional buffer. The convention is exhibited below; note that you have to pass in the surface dimensions as well.
argument::x
argument::y
audio rate scanning instructions. Both values must be in the range 0.0 to 1.0, or they are wrapped into this range.
Examples::
code::
//create buffer. I want the equation z = 2*(((x/100)**2) + ((abs(sin(10*y))/50)**(1/3)))-1
//over a 100 by 50 area
//2d to 1d conversion follows index= y*rowlength+ x
(
var width= 100; //= num cols
var height=50; //=num rows, though indexing bottom to top; i.e., standard Cartesian co-ordinates
a=Array.fill(width*height,{arg i;
var xnow, ynow, x, y;
xnow= i%width;
ynow= (i-xnow).div(width);
x=xnow/width;
y=ynow/height;
2*(((x)**2) + ((abs(sin(10*y)))**(1/3)))-1
});
b=Buffer.sendCollection(s, a, 1);
)
//test scanning; you can't move fast enough... scan controls should also be audio rate!
{WaveTerrain.ar(b.bufnum,MouseX.kr(0.0,1.0), MouseY.kr(0.0,1.0),100,50)}.play
//LFNoise adds some drift to explore the landscape more
{WaveTerrain.ar(b.bufnum,SinOsc.ar(MouseX.kr(1,200,'exponential')).abs + LFNoise2.ar(2),SinOsc.ar(MouseY.kr(1,300,'exponential'),pi*0.5).abs,100,50)}.play
//change surface equation
(
var width= 100; //= num cols
var height=50; //=num rows, though indexing bottom to top; i.e., standard Cartesian co-ordinates
a=Array.fill(width*height,{arg i;
var xnow, ynow, x, y;
xnow= i%width;
ynow= (i-xnow).div(width);
x=xnow/width;
y=ynow/height;
(((cos(5*x+1.7))**3) - ((abs(sin(23*y)))**(1/3)))
});
b.sendCollection(a);
)
//change surface equation
(
var width= 100; //= num cols
var height=50; //=num rows, though indexing bottom to top; i.e., standard Cartesian co-ordinates
a=Array.fill(width*height,{arg i;
var xnow, ynow, x, y;
xnow= i%width;
ynow= (i-xnow).div(width);
x=xnow/width;
y=ynow/height;
(((1.3*(cos(rrand(1,2)*x+1.7))**2) - ((abs(sin(rrand(1.2,4.9)*y)))**(1/2)))).max(-1.0).min(1.0)
});
b.sendCollection(a);
)
::
|
