The Virtual Cowboy ' s Latest Hit!

1 Like

hi @hitsware

it’s not often that we get on this forum this kind of music :slight_smile:
Everything is done with spi ?
what is your set up ?
Cheers

Every thing except harmonica and voice.
Raspberry Pi using Audacity to record and Imagine
for slideshow.
Record SPi music with built in recorder.
Play the .wav with VLC through the RPi
and mix with microphone ( small mixer )
back into RPi via USB into Audacity …

# BALL.......D(7)
mn=[:r]; for jn in 1..1023
  mn[jn]=hz_to_midi(jn*16).round
end; use_bpm 150; vk=0; vs=0; vr=0; vd=0

c=[9,9,9,0,9,0,0,0, 8,0,9,0,7,0,8,0,
   9,9,9,0,7,0,0,0, 8,0,0,0,0,0,0,0]
p=[1,0,0,0,6,0,3,3, 0,0,1,0,6,0,2,2]
o=[1,2,3]; m=[1,4,3,4]; z=[2,0,1,1,3,0,1,1]
r=[8,1,1,1]; v=[5,1,1,1]

for a in 0..3; play 81, release: 0.01, amp: 1; sleep 2 ; end

use_synth :dsaw
play 38, detune: 0.01, sustain: 720, release: 0, amp: 0.1
play 45, detune: 0.01, sustain: 720, release: 0, amp: 0.1

for t in 0..44
  if t>0 then vr=1; end; if t>1 then vs=1; end
  if t>2 then vk=1; end; if t>4 then vd=1; end
  for i in 0..31; ;x=i%4; y=i%8; w=i%16; n=mn[9*m[x]]
    
    synth :piano, note: mn[c[i]*choose(o)], amp: vk
    synth :piano, note: mn[c[i]*choose(o)], amp: vk
    synth :fm, note: n, release: r[x]/4.0, amp: v[x]*vs/4.0
    synth :hollow, note: 98, release: 0.1, amp: z[y]*vr*8
    synth :beep, note: mn[9*p[w]], release: 0.01, amp: vd*2
    sleep 0.5
end; end
2 Likes

The Virtual Cowboys strike again !

mn=[:r]; for jn in 1..1023
  mn[jn]=hz_to_midi(11*jn).round-36
end; use_bpm 110; puts mn[36]

c=[36,48,32,48, 36,48,32,48, 36,48,32,48, 36,48,32,48,
   36,48,32,48, 36,48,32,48, 48,48,54,54, 36,45,30,30,
   48,48,54,54];     z=[2,0,1,1,9,0,1,1]
m=[2,0,4,0,3,0,4,0]; d=[0,0,0,0,1,0,0,0]
f=[2,0,0,0,0,0,0,0]; o=[1,2,2]
s=[:fm,  :pluck,:pretty_bell]
e=[1.0,    2.0,     0.2     ]
v=[1.1,    1.0,     0.5     ]

for i in 0..3; play 79, release: 0.01, amp: 0.25; sleep 1; end

loop do
  for x in 0..35; for y in 0..7; r=rand_i(3)
      
      synth :beep, note: 79, release: 0.01, amp: z[y]/16.0

      synth :dtri, note: mn[c[x]*4], detune: -5.0,
        sustain: f[y], release: 0, amp: 0.3

      synth s[r], note:  mn[c[x]*m[y]*o[r]],
        cutoff: 57, release: e[r], amp: v[r]

  sleep 0.25; end; end; end
2 Likes

Now with Stunning Graphics and a Cast of Thousands !