PurpleFloatingObjects
For this week's Creative Code challenge by @sableRaph: "Community”, PurpleFloatingObjects is made by taking code from different communities and their prompts and putting it together. Coded with Hydra, LiveCodeLab & SonicPi.
Communities & Code Involved
Poem
Communities of Objects
Conjuring this project
Where pixels and blurs
Etches upon the scene, in spurs
As they float
For this is what the story has Wrote
Video
Code
LiveCodeLab
simpleGradient black,color(119,1,141),white
ambientLight 255,255 - ((time % 10) * 3),255
fill 119,1,141
if time % 35 < 12
scale 0.1,0.2,0.2
else if time % 35 > 12 && time % 35 < 26
scale 0.12,0.1,0.15
else
scale 0.23, 0.11, 0.05
if time % 60 > 30
animationStyle motionBlur
else
animationStyle paintOver
ball sin(10),wave(0.10), time % 10 + 1
if time % 45 < 15
rotate sin(time % 18)
else if time % 45 > 15 && time % 45 < 30
rotate cos(time %9)
else
rotate tan(14 - time % 5)
1 times
move 8,0,0
peg time % 3 + 1
1 times
move -19,0,0
box sin(wave(0.75))
Hydra
s0.initScreen()
src(s0).modulateScale(src(s0).kaleid(2)).modulateRotate(src(s0).noise(3,1,1)).out()
SonicPi
Drone Based
require 'csv'
Environmental = CSV.parse(File.read("C:/Creatuve Code Challenges/Sonification Challenges/May 2023/annual Tweaked- annual.csv"),headers: true)
puts Environmental[63][0]
puts Environmental[0][0]
puts Environmental[30][0]
i = 0
live_loop :sunspots_tempannual do
use_bpm 90
puts Environmental[i]["year"].to_i
with_fx :echo, mix: 0.65 do
use_synth :piano
play Environmental[i]["sunspots"].to_f/2
end
with_fx :ping_pong do
with_fx :ixi_techno, mix: rrand(0.1,0.3) do
sample :guit_e_fifths, rate: Environmental[i]["tempannual"].to_f
sample "C:/SonicPi/SoundStreams/Samples/Samplings/Samplings/James/insect-19.wav", rate: Environmental[i]["tempannual"].to_f
end
end
sleep Environmental[i]["cfcs"].to_f
if i >= 63
i = 0
end
i += 1
end
live_loop :c02annual do
use_bpm 90
puts Environmental[i]["year"].to_i
with_fx :echo, mix: 0.65 do
use_synth :chiplead
play Environmental[i]["co2annual"].to_f/ 3
end
with_fx :distortion do
use_synth :piano
play Environmental[i]["oilspills"].to_f/ 3, sustain: 1
end
sleep Environmental[i]["cfcs"].to_f
if i >= 63
i = 0
end
i += 1
end
63 Years of Air
live_loop :Dontsk do
with_fx :distortion, distort: [0.5, 0.4,0.3,0.2,0.1,0.2,0.3,0.4,0.5].tick do
with_fx :ping_pong , mix: rrand(0.4,0.8) do
with_fx :hpf, mix: 0.67 do
with_fx [:whammy,:flanger,:vowel].choose, mix: rrand(0.24,0.72) do
use_synth [:piano,:saw,:tb303].choose
play choose( [:G4,:Bs3,:C1,:As4,:E2]),decay: dice(3) ,sustain: dice(8),amp: dice(4)
sample :ambi_drone
sample :bd_haus, rate: [0.9,-0.78,1.2,-1.2,0.4].tick if spread(7,12).tick
sleep [0.25,0.5,1,2,4,8].choose
end
end
end
end
end