# 230430 0046 YT Jumping off point Ghir Ghir bassline by Advaita
# Saved 230430 0046
# Performance https://youtu.be/r5Z2B978mUQ
# Backup
# Created by https://linktr.ee/relaxnow
# Ghir Ghir by Advaita from Scott's bass lessons https://youtu.be/Amhekzbgcx0?t=449
# Cd version https://www.youtube.com/watch?v=UAg8nFfqvsw
set_volume! 1
use_bpm 65
# "Tanpura"/drone like intro
use_synth :growl #:fs3 :b2
#play :fs2, attack: 8, release: 8, amp: 1
#play :b2, attack: 8, release: 8, amp: 1
with_fx :ixi_techno, phase: 0.25*6*4 do
live_loop :main do
tick
# auto transpose of bass
rep = 12*4
puts n=knit(0,rep,-3,rep).look
# manual transpose of bass
# n=0 # 0 -3
bass= 1
case bass
when 0
when 1
notes = [:b2, :b1, :e2, :fs2, :a2, :b1, :e2, :fs2, :a2, :fs2, :a2, :fs2]
r = line(0.3,0.6,steps: 16).look
use_synth :beep
play notes.look+n, release: r, cutoff: 110
use_synth :saw
play notes.look+n, release: r, cutoff: 90
end
drum = 1
case drum
when 0
when 1 # drumset
sample :bd_haus, cutoff: 100, amp: 4 if bools(1,0,0,0,0,0).look
sample :bd_haus, cutoff: 80, amp: 2 if bools(0,1,0,0,1,0).look
sample :sn_generic, finish: 0.035, cutoff: 95, amp: 4 if bools(0,0,0,1,0,0).look
sample :sn_generic, finish: 0.005, cutoff: 130, amp: [1,2,1].choose if bools(1).look
when 2 # + turned tabla that fits to n
sample :bd_haus, cutoff: 100, amp: 4 if bools(1,0,0,0,0,0).look
sample :bd_haus, cutoff: 80, amp: 2 if bools(0,1,0,0,1,0).look
sample :sn_generic, finish: 0.035, cutoff: 95, amp: 4 if bools(0,0,0,1,0,0).look
sample :sn_generic, finish: 0.005, cutoff: 130, amp: [1,2,1].choose if bools(1).look
sample :tabla_tun1, amp: 1, rpitch: 7.8+n, finish: 0.2, pan: rdist(0.5) if bools(0,1,1,0,1,1).look and one_in(3)
end
sleep 0.25
end
end
# ----- Improviz code
#paintOver()
#motionBlur()
#background(0)
#t = time/5
#scale(2%t)
##stroke(0,0,255)
#stroke(t%255,2%t%100,0)
#s = 2%t
#strokeSize(s)
#noFill()
#
#rotate(t,t/(3),t)
#cube(4)
#rotate(2*t,-t/(1),-t)
#strokeSize(s+0.2)
#stroke(0)
#cube(4)
#------
/
set_volume! 1
with_fx :reverb, room: 0.8 do
with_fx :distortion do |distortion|
with_fx :ixi_techno do
# with_fx :vowel do |vowel|
with_fx :tanh,krunch: 0.8 do
live_loop :asdas do
tick
use_synth :saw
bassnotes = 1
case bassnotes
when 1
root = :c2-knit(0,16, 4,16).look
#play root+[0,0,0,12].look, slide: 2
when 2
root = :c2-knit(0,16, 4,16, 7,16, 5,16).look
end
saw = 2
case saw
when 0
sleep [2,1,1,2,1,1,1].look*0.25
when 1
# original 1
play root+[0,0,12].look, release: [0.8,0.1,0.7,0.2,0.4].look, pan: rdist(0.5), amp: [2,1,1,2,1,1,1].look*line(0.25,1,steps: 16).look
sleep [2,1,1,2,1,1,1].look*0.25
when 2
# Didgeridoo drone
#play root+[0,0,12].look, release: [0.8,0.1,0.7,0.2,0.4].look, pan: rdist(0.5), amp: [2,1,1,2,1,1,1].look*line(0.25,1,steps: 16).look
play root+[0,0,0,0,12].look, release: [0.8,0.1,0.7,0.2,0.4].look, pan: rdist(0.5), amp: [2,1,1,2,1,1,1].look
sleep [2,1,1,2,1,1,1].look*0.25
end
# putsline(0.25,1,steps: 16).look
#sleep [2,1,1,1,1].look*0.25
#puts m=rrand_i(0,1)
m =0.4
#puts vs = [1,2,3,4,5].choose
vs = 3
v =4
# control vowel, mix: m, vowel_sound: vs, voice: v
control distortion, distort: [0,0,0,0.6].look
end
# end
end
end
end
live_loop :mel1 do
stop
tick
use_synth :beep #:saw
root = :c2-knit(0,16*2, 4,16*2).look+12+knit(3,8, 7,8).look+12+12
#play root+[0,0,0,12].look, slide: 2
play root+[0,0,12].look, release: [0.8,0.1,0.7,0.2,0.4].look, pan: rdist(0.25)
sleep [2,1,1,2,1,1,1].look*0.5
end
end #end_reverb
live_loop :noiseada do
tick
# sample :bd_haus, cutoff: knit(80,12,90,12).look, amp: 2 if bools(1,0,0).look
# sample :bd_haus, cutoff: 110, amp: 1 if bools(0,0,0,1).look
#sample :sn_generic, finish: 0.01, amp: [2,1,1,2,1,1,1].look*line(0.25,1,steps: 16).look+[0,0,0,1,2].choose-0.25, pan: rdist(0.6)
sleep [2,1,1,2,1,1,1].look*0.25
#sleep [4,1,2].look*0.25
end
/