Experimental music from very short C programs
category: code [glöplog]
i call this one magpie sounds
(JS)
(JS)
Code:
typeof q==='undefined'&&(q=1),t%1600==0?q=random()*2:0,(sin(t/4*q)+cos(t/3.95*q))/2*64+128
its sample rate 16000
intersect
Code:
w=t*('1214'[~~(t/2000)%4]/(1+(~~(t/32000)%2)*0.3)),w%72+w%71+w%73attempt at making speech synthesis
Code:
speech="this is what i speak",
rate=1,
vowel=["0500505055","5005055500","5005","01231231254","050543050050005"],
v=(vindex)=>(vowel[vindex].charCodeAt(~~(t/3)%vowel[vindex].length)-48)*10,
s=speech[~~(t/1000*rate)%speech.length],
s=="a"?v(0):s=="e"?v(1):s=="i"?v(2):s=="o"?v(3):s=="u"?v(4):s==" "|s=="."|s==","|s==";"|s==":"|s=="/"?0:t*27>>4&t*46>>5Code:
speech="this is what i speak",
rate=1,
vowel=["0500505055","5005055500","5005","01231231254","050543050050005"],
v=(vindex)=>(vowel[vindex].charCodeAt(~~(t/3)%vowel[vindex].length)-48)*10,
s=speech[~~(t/1000*rate)%speech.length],
s=="a"?v(0):s=="e"?v(1):s=="i"|s=="y"?v(2):s=="o"?v(3):s=="u"?v(4):s==" "|s=="."|s==","|s==";"|s==":"|s=="/"?0:t*27>>4&t*46>>5changed i vowel to also assign to y
Quote:
jpg.exe bytebeat
Code:(t*(((t/10|0)^(t/10|0)-1280)%11)/2&127)+(t*(((t/640|0)^(t/640|0)-2)%13)/2&127)^t // 16000 hz
this is just gabriel miceli's techno but with ^t
white noise i guess
Code:
((t/512^t/256)*(t|t/4|t/8)/t)*(t^t/9^t/18)
Quote:
white noise i guess
Code:((t/512^t/256)*(t|t/4|t/8)/t)*(t^t/9^t/18)
i mean its not really a white noise, but i mean its close enough
uhh
Code:
(t*((t-9800^t)>>10)&t>>2)-(t&t>>12|1)
noi=(x,a)=>sin(x/9E3*x*x*x)/256*a,kick=sin(1.6**(-t/512%32+8))/2,snare=noi(int(t/3)*'01'[t>>14&1],-(t/128%128)+128)/3,hihat=noi(t,16-sqrt(-t&4095)/1.5),mel=min(max(atan(tan(t*[1,4,1,4,1.05,4,1.05,4][t>>13&7]*'10'[t>>12&1]/2/41)^sin(t/41)),-1),1)/((t/512&7)+3),bas=asin(sin(t*[1,1.05,1,1.05,0,1,1.05,1][t>>14&7]/41))/4,(kick+snare+hihat+mel+bas)/1.5+(a=t*[1,1,1,1,1.5,1.5,1.33,1.33][t>>15&7],b=t*[1,1.33][t>>14&1],sin(t*'6868686834343434'[t>>13&15]/41)/8+4*b%256/256/4+atan(tan(a/41)+cos(a/100))/[4,8,16,32][t>>13&3])+(sin(100*2**(-t/2048%8))/2+tan(cbrt(sin(t*[1,0,2,4,0,2,3,2,1.5,2,1,0,2,3,2,1.5][t>>13&15]/41)))/[2,3,4,6,8,12,16,24][t/[1,1.5][t>>12&1]>>10&7]/4+cbrt(asin(sin(t/[2,3,2.5,4][t>>16&3]/41)))/6) combination of 3 floatbeats into 1
(t*(t&4096?4:2)+(t>>6&1?t>>4:-t>>4))-(t^t>>8)*.3+t*(7&t>>11)+1*(t>>3|t|t>>(t>>16)) interesting... (16k)
"the harder level"
sin(2e3/(y=t&4095))*512+(t*'38582'[t>>3&4])+(r=t*(4&0x3335>>(t>>12&12))) (11025kz)
sin(2e3/(y=t&4095))*512+(t*'38582'[t>>3&4])+(r=t*(4&0x3335>>(t>>12&12))) (11025kz)
ripoff of "alright fine" by SArpnt
(t>>4&t/("CombinationAcquired".charCodeAt(t/2/"450953693"[t>>13&7]*(t>>14&3)%6)+t/(t>>15&1|2)%2))+(t>>12&1?-1:cos(t))
(t>>4&t/("CombinationAcquired".charCodeAt(t/2/"450953693"[t>>13&7]*(t>>14&3)%6)+t/(t>>15&1|2)%2))+(t>>12&1?-1:cos(t))
ttjkl
x=parseInt('takektakrkrkekroktpatetahogokoketo'[(t>>13|t>>2^t>>15)*(t>>14&5)%32],36)/((t>>16^t>>14)&1?1:1.5),y=((t/3*x&64))+(t/4*x&64)*-t>>10
x=parseInt('takektakrkrkekroktpatetahogokoketo'[(t>>13|t>>2^t>>15)*(t>>14&5)%32],36)/((t>>16^t>>14)&1?1:1.5),y=((t/3*x&64))+(t/4*x&64)*-t>>10
the
//32000hz
tan((t-(t>>4&t>>8)&t>>12)-1/2%128-18.5)*2&t>>6|4E5/(t&16383)
//32000hz
tan((t-(t>>4&t>>8)&t>>12)-1/2%128-18.5)*2&t>>6|4E5/(t&16383)
"the sieprinski maestro"
siep=((t&t>>8)-1),beat=sin(2e3/(yu=t&4095))*cos(t*'3513828485'[t>>13&7])+(sqrt(5E3*(t&4095)&128)),(siep+beat) "16000hz"
siep=((t&t>>8)-1),beat=sin(2e3/(yu=t&4095))*cos(t*'3513828485'[t>>13&7])+(sqrt(5E3*(t&4095)&128)),(siep+beat) "16000hz"
remix of "i bet nobody thought of using cbrt" (32000hz)
sin(100*2**(-t/2048%8)/[4.42,4,6,2,6,1,6,6,2][t>>13&7])/2+cos(cbrt(tan(t*[1.43,0,52,4.33,0,2,343,2,1.5,142,1,0,2,3,2,1.5][t>>13&15]/64)))/[2.44,3.55,4.22,6,8,12,16,24][t/[1,1.5][t>>12&1]>>10&7]/4+cbrt(asin(sin(t/[2,3,2.5,4][t>>16&3]/41)))/4
sin(100*2**(-t/2048%8)/[4.42,4,6,2,6,1,6,6,2][t>>13&7])/2+cos(cbrt(tan(t*[1.43,0,52,4.33,0,2,343,2,1.5,142,1,0,2,3,2,1.5][t>>13&15]/64)))/[2.44,3.55,4.22,6,8,12,16,24][t/[1,1.5][t>>12&1]>>10&7]/4+cbrt(asin(sin(t/[2,3,2.5,4][t>>16&3]/41)))/4
t*(0xCAEDBD23CAEDBD23>>(t>>9&17))|t>>8
caedbd23, sounds like a phone when sped up to 16000kz!
caedbd23, sounds like a phone when sped up to 16000kz!
i mean 16000hz fuc