-
Notifications
You must be signed in to change notification settings - Fork 2
/
[6] Uzun ince bir yoldayım.rb
125 lines (120 loc) · 2.25 KB
/
[6] Uzun ince bir yoldayım.rb
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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
## Variables ##
bpm = 120
beat = 0.5
## Functions ##
define :saz do |note, time|
use_synth :saw
play note
sleep time
end
define :akor do |root, mode, lenght|
with_fx :reverb, mix: 0.3 do
use_synth :square
play chord(root, mode) ,release: lenght
sleep lenght
end
end
## Chord Progresion ##
in_thread do
loop do
2.times do
akor :a3, :min , 4*beat
akor :g3, :maj , 2*beat
akor :a3, :min , 2*beat
akor :c3, :maj , 2*beat
akor :g3, :maj , 2*beat
akor :a3, :min , 4*beat
end
akor :g3, :maj , 4*beat
akor :d3, :maj , 4*beat
akor :a3, :min , 4*beat
akor :d3, :maj , 4*beat
akor :a3, :min , 4*beat
akor :g3, :maj , 4*beat
akor :f3, :maj , 2*beat
akor :g3, :maj , 2*beat
akor :a3, :min , 4*beat
end
end
## Melody ##
loop do
2.times do
#bar1#
sleep beat
saz :c5, beat/2
saz :d5, beat/2
saz :d5, beat
saz :c5, beat/4
saz :b4, beat/4
saz :a4, beat/2
#bar2#
saz :c5, beat/2
saz :b4, beat
saz :a4, beat/2
saz :a4, beat/2
saz :a4, beat*1.5
#bar3#
saz :e5, beat/2
saz :d5, beat/2
saz :e5, beat/2
saz :c5, beat/2
saz :d5, beat
saz :c5, beat/4
saz :b4, beat/4
saz :a4, beat/2
#bar4#
saz :c5, beat/2
saz :b4, beat
saz :a4, beat/2
saz :a4, beat/2
saz :a4, beat*1.5
end
#bar5#
sleep beat
saz :fs5, beat/2
saz :g5, beat/2
saz :g5, beat/2
saz :g5, beat*1.5
#bar6#
saz :g5, beat/2
saz :fs5, beat
saz :e5, beat/2
saz :g5, beat/2
saz :fs5, beat*1.5
#bar7#
saz :g5, beat/2
saz :e5, beat
saz :d5, beat/2
saz :fs5, beat/2
saz :e5, beat*1.5
#bar8#
saz :e5, beat/2
saz :d5, beat/2
saz :e5, beat/2
saz :c5, beat/2
saz :e5, beat/2
saz :d5, beat*1.5
#bar9#
saz :d5, beat
saz :c5, beat/4
saz :b4, beat/4
saz :a4, beat/2
saz :d5, beat/2
saz :b4, beat/2
saz :c5, beat
#bar10#
saz :c5, beat/2
saz :b4, beat/2
saz :b4, beat/2
saz :a4, beat/2
saz :c5, beat/2
saz :b4, beat*1.5
#bar11#
saz :b4, beat/2
saz :a4, beat
saz :g4, beat/2
saz :b4, beat/2
saz :a4, beat*1.5
#bar12#
saz :a4, beat*4
end