beryann

Aléatoire #1 début


with_fx :level, amp: 0.4 do
  
use_random_source :white
  
live_loop :source do
    

beryann

 
  live_loop :kick do
  sample :bd_haus
  sleep 1
  end
  puts scale(:c4,:major)
  
  play chord_degree(:i, :c4, :major, 4)
  
  progression = (ring, :i, :vi, :ii, :v)

beryann

use_bpm 100
set :kill,false #flag used to stop live_loops
fadeInitiate = rt(30) #use rt( ) function to set time independent of bpm
fadeTime = rt(30)
use_debug false #remove printout of synths playing
cells = [
  [2],
  [1,1],
  [1,0.5,0.5],
  [0.5,0.5,1],

beryann

in_thread do
  
  with_fx :reverb do
    loop do
      sample :sn_zome , amp: rand_i, rate: rand, pan: rand
      sleep 1
      sample :misc_crow, amp: rand, pan: rand, rate: rand
      sleep 1
      sample :vinyl_hiss,amp: rand
      

beryann

use_bpm 30

a = 0.15
b = 0.2


live_loop :round do
with_fx :reverb, room: 0.8, mix: 0.8 do
with_fx :flanger, phase: 0.8, wave: 2, mix: 0.5 do

beryann

use_bpm 110

I define my chords

define :chord1 do
with_fx :wobble, phase: 1, phase_slide: 4 do |e|
use_synth :dsaw
play chord(:c3, :major, invert: 1), release: 4
control e, phase: 0.025
sleep 4

beryann

use_synth :piano

with_fx :eq, amp: 0.7 do
  with_fx :reverb, mix: 0.8 do
    live_loop :note do
      play (ring, :c4, :d4, :e4, :f4, :g4).choose, amp: 0.8 if rand< 0.6
      sleep 0.25
    end
    
    

beryann

noise(10,10)
.kaleid()
.colorama(1,1,1)
  .out()

beryann

osc(10, 0.1, 10)
	.colorama(0.1)
	.repeat(3, 3)
.rotate(1,0.2)
	.saturate(1)
	.pixelate(50, 50)
	.out(o0)
render(o0)

beryann

 
osc(10,0.2,1.236)
.kaleid()
.rotate(0.8)
.invert()
.out(o0)

 
osc(10,0.2,2.589)
.kaleid()