Skip to main content

Command Palette

Search for a command to run...

WCCC_Psychedelic

Distorted & Glitch mainly through Code

Published
2 min read
WCCC_Psychedelic

CyberTrioPsyched

For this week's Creative Code challenge by @sableRaph: “Psychedelic“, CyberTrioPsyched  is coded with #LiveCodeLab, #HydraVIdeoSynth & #SonicPi. Where Different HydraVideoSynth coded filters alter the perception being seen with a SonicPi coded Composition in the background

Poem

DIstored & Glitch
Flipping to Distortion
Colors spilling & Switch
Altering Perception

Video

https://youtu.be/fghs4GoMC4I

## Code

Hydra Cam Distortion


 s0.initCam(3)

src(s0).scrollX().modulateRotate(src(s0),10.5).modulateScale(osc(1,2,1).pixelate(500,500),0.15).colorama().invert().out()

speed = 0.5

Hydra Sketch Distortion

s0.initScreen()

src(s0).scrollX().modulateRotate(src(s0),10.5).modulateScale(osc(1,2,1).pixelate(500,500),0.15).colorama().invert().out()

speed = 0.5

LiveCodeLab

simpleGradient yellow,orange,violet

animationStyle paintOver

20 times with i
	if time % 15 > 10
		stroke purple
		fill aqua
		15 times with i
		scale 0.175
		move sin(time), cos(time),Math.hypot(time % 6, cos(time)* 2)
		rect
	if time % 15 < 5
		stroke violet
		fill limegreen
		15 times with i
		scale 0.515
		move cos(time), cos(time),Math.hypot(time % 6, cos(time)* 2)
		rotate 
		rect
	else
		stroke yellow
		fill red
		15 times with i
		scale 0.315
		rotate (time % 30) * 5
		move cos(time), cos(time),Math.hypot(time % 6, cos(time)* 2)
		rect

SonicPi



live_loop :guit do
  use_random_seed Time.now.to_i/2
  with_fx :ping_pong, mix: rrand(0.1,0.7) do
    with_fx :echo, mix: 0.6, phase: 0.25 do
      sample :guit_em9, rate: 0.5, beat_stretch: [0.25,0.5].choose
    end
    sample :guit_em9, rate: -0.5, beat_stretch: (dice(10) + 1/17)
    sleep [3,6,9].choose
  end
end


live_loop :boom do
  use_random_seed Time.now.to_i/4
  with_fx :reverb,  room: 1 do
    sample :bd_boom, amp: 10, rate: 0.7 * (dice(10) + 1/17)
    sample :bd_boom, amp: dice(10), rate: -0.7
  end
  sleep [2,3,4].choose
end

notes = (ring :E4, :Fs4, :B4, :Cs5, :D5, :Fs4,:E4, :Cs5, :B4, :Fs4, :D5, :Cs5)
live_loop :faster do
  use_random_seed Time.now.to_i/5
  use_synth [:piano,:beep, :prophet].choose
  play notes.tick, release: 0.1
  sleep [0.3,0.6,0.45].choose
end

live_loop :slower do
  use_random_seed Time.now.to_i/6
    use_synth :rodeo
  play notes.tick, release: 0.1
  
  sleep [4,8,16].choose
end

WCCChallenge

Part 3 of 50

Submissions to the WCCChallenge

Up next

WCCC_Cracked

Coding Relics from Another Realm