{
   "name" : "bytebeat homage",
   "author" : "blueprint",
   "ancestor_list" : [],
   "description" : "// these are variations on http://sccode.org/1-5ei#c1021\r\n// my variations are based on bytebeat stuff I did for the midiboy, arduino code\r\n// here https://github.com/poetaster/bytebeats/blob/master/bytebeats.ino\r\n// that thing draws pictures, too.",
   "labels" : [
      "math"
   ],
   "is_private" : null,
   "id" : "1-5gW",
   "code" : "// these are variations on http://sccode.org/1-5ei#c1021\r\n// my variations are based on bytebeat stuff I did for the midiboy, arduino code\r\n// here https://github.com/poetaster/bytebeats/blob/master/bytebeats.ino\r\n// that thing draws pictures, too.\r\n\r\n//  t / 13 >> (1 + ((t >> 12) & 3)) | i / 2 >> 2 & (t / 6) >> 7 | t & 31 * t * (i >> 8)\r\n// (t / 3 >> (t % 40 + 5) | t / (24 + t & 3) >> (t % (15 - ((t >> 15) % 8) * 6) + 5)) / 8\r\n\r\n// one more noise than ....\r\n(\r\n\tNdef(\\bits1, {\r\n\t\tvar t = PulseCount.ar(Impulse.ar(8e3));\r\n\t\tvar u = PulseCount.ar(Impulse.ar(7009));\r\n\t\tvar sig = HPF.ar(\r\n\t\t\t(\r\n\t\t\t    ((t >> 12) | (t >> 8) & (63 & t) >> 4)\r\n\t\t\t\t- 3 % 256\r\n\t\t\t) / - 3 % 512\r\n\t\t\t, 20\r\n\t\t) * 0.1;\r\n\t\tvar sig2 = LPF.ar(HPF.ar(gcd(t*u, u+t), WhiteNoise.ar()*2000 + 1000), 20);\r\n\t\tsig2 = sig2*sig;\r\n\t\tsig = 0.3*Splay.ar( Limiter.ar( Greyhole.ar(sig + sig2, sig, 0.5, sig), 0.5).flatten);\r\n\t}).play;\r\n)\r\n\r\n// two, pingy but more than the original.\r\n(\r\n\tNdef(\\bits2, {\r\n\t\tvar t = PulseCount.ar(Impulse.ar(8e3));\r\n\t\tvar u = PulseCount.ar(Impulse.ar(7009));\r\n\t\tvar sig = HPF.ar(\r\n\t\t\t(\r\n\t\t\t(t / 3 >> (t % 40 + 5)) | ((t / (24 + t & 3) >> (t % (15 - ((t >> 15) % 8) * 6) + 5)) / 8)\r\n\t\t\t\t- 3 % 256\r\n\t\t\t) / 127-1 * 3\r\n\t\t\t, 20\r\n\t\t) * 0.1;\r\n\t\tvar sig2 = LPF.ar( HPF.ar(gcd(t*u, u+t), WhiteNoise.ar()*2000 + 1000), 20);\r\n\t\tsig2 = sig2*sig;\r\n\t\tsig = 0.3*Splay.ar( Limiter.ar( Greyhole.ar(sig + sig2, sig, 0.5, sig), 0.5).flatten);\r\n\t}).play.scope;\r\n)\r\n// three is much like 2 more high frequency reflections.\r\n(\r\n\tNdef(\\bits3, {\r\n\t\tvar t = PulseCount.ar(Impulse.ar(8e3));\r\n\t\tvar u = PulseCount.ar(Impulse.ar(7009));\r\n\t\tvar sig = HPF.ar(\r\n\t\t\t(\r\n\t\t\t    ( t / 13 >> (1 + ((t >> 12) & 3))) |\r\n\t\t\t    ( t / 2 >> 2 & (t / 6) >> 7 ) |\r\n\t\t\t    (t & 31 * t * (t >> 8))\r\n\t\t\t\t- 3 % 128\r\n\t\t\t) / 64-1 * 3\r\n\t\t\t, 20\r\n\t\t) * 0.1;\r\n\t\tvar sig2 = LPF.ar( HPF.ar(gcd(t*u, u+t), WhiteNoise.ar()*2200 + 1000), 20);\r\n\t\tsig2 = sig2*sig;\r\n\t\tsig = 0.3* Splay.ar( Limiter.ar( Greyhole.ar(sig + sig2, sig, 0.5, sig), 0.5).flatten);\r\n\t}).play.scope;\r\n)\r\n\r\n// four is slow, minimal. very.\r\n(\r\n\tNdef(\\bits4, {\r\n\t\tvar t = PulseCount.ar(Impulse.ar(8e3));\r\n\t\tvar u = PulseCount.ar(Impulse.ar(7009));\r\n\t\tvar sig = HPF.ar(\r\n\t\t\t(\r\n\t\t\t    (t ** t >> 8) | (t << 3 & 56 ** t)\r\n\t\t\t\t- 3 % 32\r\n\t\t\t) / -3 % 16\r\n\t\t\t, 20\r\n\t\t) * 0.1;\r\n\t\tvar sig2 = LPF.ar( HPF.ar(gcd(t*u, u+t), WhiteNoise.ar()*2200 + 1000), 20);\r\n\t\tsig2 = sig2*sig;\r\n\t\tsig = 0.3* Splay.ar( Limiter.ar( Greyhole.ar(sig + sig2, sig, 0.5, sig), 0.5).flatten);\r\n\t}).play.scope;\r\n)\r\n\r\n(\r\n\tNdef(\\bits5, {\r\n\t\tvar t = PulseCount.ar(Impulse.ar(7099));\r\n\t\tvar u = PulseCount.ar(Impulse.ar(7009));\r\n\t\tvar sig = HPF.ar(\r\n\t\t\t(\r\n\t\t\t    t * ((t >> 12 | t >> 8) & 63 & t >> 4)\r\n\t\t\t    - 3 % 32\r\n\t\t\t) / -3 % 16\r\n\t\t\t, 25\r\n\t\t) * 0.1;\r\n\t\tvar sig2 = LPF.ar( HPF.ar(gcd(t*u, u+t), WhiteNoise.ar()*2000 + 1001), 20);\r\n\t\tsig2 = sig2*sig;\r\n\t\tsig = 0.3* Splay.ar( Limiter.ar( Greyhole.ar(sig + sig2, sig, 0.5, sig), 0.5).flatten);\r\n\t}).play.scope;\r\n)\r\n\r\n// really sci fi ... astroid belt mining operation.\r\n(\r\n\tNdef(\\bits5, {\r\n\t\tvar t = PulseCount.ar(Impulse.ar(8e3));\r\n\t\tvar u = PulseCount.ar(Impulse.ar(7009));\r\n\t\tvar sig = HPF.ar(\r\n\t\t\t(\r\n\t\t\t  ( ( ( ( (t>>12) ** (t>>12) -2 ) %11 *t ) /4 | t>>13 ) & 127)\r\n\t\t\t)\r\n\t\t\t, 20\r\n\t\t) * 0.1;\r\n\t\tvar sig2 = LPF.ar( HPF.ar(gcd(t*u, u+t), WhiteNoise.ar()*1900 + 800), 10);\r\n\t\tsig2 = sig2*sig;\r\n\t\tsig = 0.3* Splay.ar( Limiter.ar( Greyhole.ar(sig + sig2, sig, 0.5, sig), 0.5).flatten);\r\n\t}).play.scope;\r\n)\r\n\r\n\r\n// noisy swinging wings and whips.\r\n(\r\n\tNdef(\\bits6, {\r\n\t\tvar t = PulseCount.ar(Impulse.ar(8e3));\r\n\t\tvar u = PulseCount.ar(Impulse.ar(7009));\r\n\t\tvar sig = HPF.ar(\r\n\t\t\t(\r\n\t\t\t   t / 13 >> (1 + ((t >> 12) & 3)) | t / 2 >> 2 & (t / 6) >> 7 | t & 31 * t * (t >> 8)\r\n\t\t\t    - 3 % 32\r\n\t\t\t) / - 3 % 64\r\n\t\t\t, 20\r\n\t\t) * 0.1;\r\n\t\tvar sig2 = LPF.ar( HPF.ar(gcd(t*u, u+t), WhiteNoise.ar()*2000 + 1000), 20);\r\n\t\tsig2 = sig2*sig;\r\n\t\tsig = 0.3* Splay.ar( Limiter.ar( Greyhole.ar(sig + sig2, sig, 0.5, sig), 0.5).flatten);\r\n\t}).play.scope;\r\n)\r\n\r\n// ping/pong cricket match.\r\n(\r\n\tNdef(\\bits7, {\r\n\t\tvar t = PulseCount.ar(Impulse.ar(8e3));\r\n\t\tvar u = PulseCount.ar(Impulse.ar(7009));\r\n\t\tvar sig = HPF.ar(\r\n\t\t\t(\r\n\t\t\t    ((t << 1) ** ((t << 1) + (t >> 7)&t >> 12)) |\r\n\t\t\t    t >> (4 - ( 1 ** 7 & (t >> 19))) |\r\n\t\t\t    t >> 7\r\n\t\t\t    - 3 % 64\r\n\t\t\t) / - 3 % 32\r\n\t\t\t, 20\r\n\t\t) * 0.1;\r\n\t\tvar sig2 = LPF.ar( HPF.ar(gcd(t*u, u+t), WhiteNoise.ar()*1900 + 1000), 20);\r\n\t\tsig2 = sig2*sig;\r\n\t\tsig = 0.3* Splay.ar( Limiter.ar( Greyhole.ar(sig + sig2, sig, 0.9, sig), 0.9).flatten);\r\n\t}).play.scope;\r\n)"
}