|
# Rotary Harmonograph figures (page 0) |
|
|
|
# Load the synth, set the default params, and disable any overall filters |
|
load_synthdefs ENV['HOME'] + '/.sonic-pi/synthdefs' |
|
use_synth_defaults attack: 0.5, sustain: 5, release: 0.5, amp: 1.5 |
|
set_mixer_control! hpf_bypass: 1, lpf_bypass: 1, limiter_bypass: 1, leak_dc_bypass: 1 |
|
|
|
# Change 'comment' to 'uncomment' in *one* of the following blocks to generate that figure: |
|
|
|
comment do |
|
# 3:2 equal amp. concurrent (p0) |
|
synth :lisa, ratio: 2, right_phase: 0.25, phase: -0.01 |
|
synth :lisa, ratio: 3, right_phase: 0.25, phase: -0.01 |
|
end |
|
comment do |
|
# 3:2 inv. amp. concurrent (p0) |
|
synth :lisa, ratio: 2, right_phase: 0.25, phase: -0.01, amp: 1.2 |
|
synth :lisa, ratio: 3, right_phase: 0.25, phase: -0.01, amp: 0.8 |
|
end |
|
comment do |
|
# 3:2 inv. amp. counterc. (p0) |
|
synth :lisa, ratio: 2, right_phase: 0.25, phase: 0.49, amp: 1.2 |
|
synth :lisa, ratio: 3, right_phase: -0.25, phase: 0.49, amp: 0.8 |
|
end |
|
|
|
comment do |
|
# 2:1 equal amp. concurrent (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.98 |
|
synth :lisa, ratio: 2, right_phase: 0.25, phase: 0.98 |
|
end |
|
comment do |
|
# 2:1 equal amp. counterc. (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.48 |
|
synth :lisa, ratio: 2, right_phase: -0.25, phase: 0.48 |
|
end |
|
comment do |
|
# 2:1 inv. amp. counterc. (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: -0.02, amp: 1.2 |
|
synth :lisa, ratio: 2, right_phase: -0.25, phase: -0.02, amp: 0.6 |
|
end |
|
|
|
comment do |
|
# 2:1 inv. amp. concurrent (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.98, amp: 1.2 |
|
synth :lisa, ratio: 2, right_phase: 0.25, phase: 0.98, amp: 0.6 |
|
end |
|
comment do |
|
# 7:3 inv. amp. counterc. (p0) |
|
synth :lisa, ratio: 3, right_phase: 0.25, phase: 0.98, amp: 1.2 |
|
synth :lisa, ratio: 7, right_phase: -0.25, phase: 0.98, amp: 0.5 |
|
end |
|
comment do |
|
# 5:2 equal amp. counterc (p0) |
|
synth :lisa, ratio: 2, right_phase: 0.25, phase: 0.74 |
|
synth :lisa, ratio: 5, right_phase: -0.25, phase: 0.74 |
|
end |
|
|
|
comment do |
|
# 5:2 inv. amp. counterc. (p0) |
|
synth :lisa, ratio: 2, right_phase: 0.25, phase: 0.49, amp: 1.2 |
|
synth :lisa, ratio: 5, right_phase: -0.25, phase: 0.49, amp: 0.5 |
|
end |
|
comment do |
|
# 3:1 equal amp. counterc. (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.24, amp: 0.9 |
|
synth :lisa, ratio: 3, right_phase: -0.25, phase: 0.24, amp: 0.9 |
|
end |
|
comment do |
|
# 3:1 equal amp. concurrent (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: -0.02, amp: 0.9 |
|
synth :lisa, ratio: 3, right_phase: 0.25, phase: -0.02, amp: 0.9 |
|
end |
|
|
|
comment do |
|
# 3:1 inv. amp. concurrent (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: -0.02, amp: 1.2 |
|
synth :lisa, ratio: 3, right_phase: 0.25, phase: -0.02, amp: 0.4 |
|
end |
|
comment do |
|
# 3:1 inv. amp. counterc. (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.23, amp: 1.2 |
|
synth :lisa, ratio: 3, right_phase: -0.25, phase: 0.23, amp: 0.4 |
|
end |
|
comment do |
|
# 4:1 equal amp. concurrent (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.48 |
|
synth :lisa, ratio: 4, right_phase: 0.25, phase: 0.48 |
|
end |
|
|
|
comment do |
|
# 4:1 inv. amp. concurrent (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.48, amp: 1.2 |
|
synth :lisa, ratio: 4, right_phase: 0.25, phase: 0.48, amp: 0.3 |
|
end |
|
comment do |
|
# 5:1 equal amp. concurrent (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.48, amp: 0.9 |
|
synth :lisa, ratio: 5, right_phase: 0.25, phase: 0.48, amp: 0.9 |
|
end |
|
comment do |
|
# 5:1 inv. amp. concurrent (p0) |
|
synth :lisa, ratio: 1, right_phase: 0.25, phase: 0.48, amp: 0.9, amp: 1.2 |
|
synth :lisa, ratio: 5, right_phase: 0.25, phase: 0.48, amp: 0.9, amp: 0.25 |
|
end |