joric

Oneliner music collection

Jan 18th, 2012
252
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.51 KB | None | 0 0
  1. Test it here: http://entropedia.co.uk/generative_music/
  2. Or here: http://wurstcaptures.untergrund.net/music/
  3. Or here: http://www.bemmu.com/music/index.html
  4.  
  5. l33t tune:
  6. (t%31337>>3)|(t|t>>7)
  7.  
  8. http://pelulamu.net/countercomplex/music_formula_collection.txt
  9.  
  10. Collection of oneliner music formulas. Version 2011-10-18
  11.  
  12. I've tried to collect all the formulas in the related threads etc.
  13. (excluding those that clearly sound like random first experiments or total
  14. crap; when several variants are available, i've chosen the shortest one)
  15.  
  16. If you think I've missed something that should be here, please let me know.
  17.  
  18. ====== 1ST ITERATION ======
  19.  
  20. // viznut 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  21. t*(((t>>12)|(t>>8))&(63&(t>>4)))
  22.  
  23. // tejeez 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  24. (t*(t>>5|t>>8))>>(t>>16)
  25.  
  26. // visy 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  27. t*(((t>>9)|(t>>13))&(25&(t>>6)))
  28.  
  29. // tejeez 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  30. t*(((t>>11)&(t>>8))&(123&(t>>3)))
  31.  
  32. // visy 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  33. t*(t>>8*((t>>15)|(t>>8))&(20|(t>>19)*5>>t|(t>>3)))
  34.  
  35. // tejeez 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  36. (-t&4095)*(255&t*(t&(t>>13)))>>12)+(127&t*(234&t>>8&t>>3)>>(3&t>>14))
  37.  
  38. // visy 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg "Space Invaders vs Pong"
  39. t*(t>>((t>>9)|(t>>8))&(63&(t>>4)))
  40.  
  41. ====== 2ND ITERATION ======
  42.  
  43. // viznut 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  44. (t>>6|t|t>>(t>>16))*10+((t>>11)&7)
  45.  
  46. // pyryp 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  47. v=(v>>1)+(v>>4)+t*(((t>>16)|(t>>6))&(69&(t>>9)))
  48.  
  49. // red- 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  50. (t|(t>>9|t>>7))*t&(t>>11|t>>9)
  51.  
  52. // miiro 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  53. t*5&(t>>7)|t*3&(t*4>>10)
  54.  
  55. // viznut 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y (xpansive+varjohukka)
  56. (t>>7|t|t>>6)*10+4*(t&t>>13|t>>6)
  57.  
  58. // skurk+raer 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  59. ((t&4096)?((t*(t^t%255)|(t>>4))>>1):(t>>3)|((t&8192)?t<<2:t))
  60.  
  61. // xpansive 2011-09-29 http://pouet.net/topic.php?which=8357&page=2 "Lost in Space"
  62. ((t*(t>>8|t>>9)&46&t>>8))^(t&t>>13|t>>6)
  63.  
  64. ====== 3RD ITERATION ======
  65.  
  66. // viznut 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  67. (t*5&t>>7)|(t*3&t>>10)
  68.  
  69. // bst 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  70. (int)(t/1e7*t*t+t)%127|t>>4|t>>5|t%127+(t>>16)|t
  71.  
  72. // kb 2011-10-04 http://pouet.net/topic.php?which=8357&page=8 44kHz
  73. ((t/2*(15&(0x234568a0>>(t>>8&28))))|t/2>>(t>>11)^t>>12)+(t/16&t&24)
  74.  
  75. // viznut 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  76. (t&t%255)-(t*3&t>>13&t>>6)
  77.  
  78. // droid 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  79. t>>4|t&((t>>5)/(t>>7-(t>>15)&-t>>7-(t>>15)))
  80.  
  81. // ryg 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o 44.1 kHz
  82. ((t*("36364689"[t>>13&7]&15))/12&128)+(((((t>>12)^(t>>12)-2)%11*t)/4|t>>13)&127)
  83.  
  84. // stephth 2011-10-03 http://news.ycombinator.com/item?id=3063359
  85. (t*9&t>>4|t*5&t>>7|t*3&t/1024)-1
  86.  
  87. // viznut+oasiz 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o "Dante's Inferno" short version
  88. ((t*(t>>12)&(201*t/100)&(199*t/100))&(t*(t>>14)&(t*301/100)&(t*399/100)))+((t*(t>>16)&(t*202/100)&(t*198/100))-(t*(t>>17)&(t*302/100)&(t*298/100)))
  89.  
  90. // viznut+oasiz 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o "Dante's Inferno" long version
  91. ((t*(t>>12)&(201*t/100)&(199*t/100))&(t*(t>>14)&(t*301/100)&(t*399/100)))+((t*(t>>16)&(t*202/100)&(t*198/100))-(t*(t>>18)&(t*302/100)&(t*298/100)))
  92.  
  93. // mu6k 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o "Long-line Theory", Chaos Theory cover, optimized by ryg, p01 et al., JS-only
  94. w=t>>9,k=32,m=2048,a=1-t/m%1,d=(14*t*t^t)%m*a,y=[3,3,4.7,2][p=w/k&3]*t/4,h="IQNNNN!!]]!Q!IW]WQNN??!!W]WQNNN?".charCodeAt(w/2&15|p/3<<4)/33*t-t,s=y*.98%80+y%80+(w>>7&&a*((5*t%m*a&128)*(0x53232323>>w/4&1)+(d&127)*(0xa444c444>>w/4&1)*1.5+(d*w&1)+(h%k+h*1.99%k+h*.49%k+h*.97%k-64)*(4-a-a))),s*s>>14?127:s
  95.  
  96. // 216 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  97. t*(t^t+(t>>15|1)^(t-1280^t)>>10)
  98.  
  99. // mu6k http://www.youtube.com/watch?v=tCRPUv8V22o 32.0 kHz
  100. (3e3/(y=t&16383)&1)*35 +(x=t*"6689"[t>>16&3]/24&127)*y/4e4 +((t>>8^t>>10|t>>14|x)&63)
  101.  
  102. ====== 0XA VIDEOS ======
  103.  
  104. // harism 2011-10-09 http://0xa.kuri.mu/2011/10/09/bitop-videos/
  105. ((t>>1%128)+20)*3*t>>14*t>>18
  106.  
  107. // tangent128 2011-10-09 http://0xa.kuri.mu/2011/10/09/bitop-videos/
  108. t*(((t>>9)&10)|((t>>11)&24)^((t>>10)&15&(t>>15)))
  109.  
  110. // ultrageranium 2011-10-12 http://0xa.kuri.mu/2011/10/09/bitop-videos/
  111. (t*t/256)&(t>>((t/1024)%16))^t%64*(0xC0D3DE4D69>>(t>>9&30)&t%32)*t>>18
  112.  
  113. ====== ALL COLLECTED FORMULAS (length order) ======
  114.  
  115. // trivial minimum: plain sawtooth
  116. t
  117.  
  118. // minimal sierpinski harmony
  119. t&t>>8
  120.  
  121. // "the 42 melody", separately discovered by several people on irc etc
  122. t*(42&t>>10)
  123.  
  124. // danharaj 2011-10-03 http://www.reddit.com/r/programming/comments/kyj77/algorithmic_symphonies_from_one_line_of_code_how/ "fractal trees", 216's version
  125. t|t%255|t%257
  126.  
  127. // droid 2011-10-05 http://pouet.net/topic.php?which=8357&page=10
  128. t>>6&1?t>>5:-t>>4
  129.  
  130. // Niklas_Roy 2011-10-14 http://countercomplex.blogspot.com/2011/10/algorithmic-symphonies-from-one-line-of.html
  131. t*(t>>9|t>>13)&16
  132.  
  133. // krcko 2011-10-04 http://rafforum.rs/index.php/topic,123.0.html
  134. (t&t>>12)*(t>>4|t>>8)
  135.  
  136. // viznut 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  137. (t*5&t>>7)|(t*3&t>>10)
  138.  
  139. // tejeez 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  140. (t*(t>>5|t>>8))>>(t>>16)
  141.  
  142. // miiro 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  143. t*5&(t>>7)|t*3&(t*4>>10)
  144.  
  145. // robert 2011-10-11 http://countercomplex.blogspot.com/2011/10/algorithmic-symphonies-from-one-line-of.html
  146. (t>>13|t%24)&(t>>7|t%19)
  147.  
  148. // Niklas_Roy 2011-10-14 http://countercomplex.blogspot.com/2011/10/algorithmic-symphonies-from-one-line-of.html
  149. (t*((t>>9|t>>13)&15))&129
  150.  
  151. // viznut 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  152. (t&t%255)-(t*3&t>>13&t>>6)
  153.  
  154. // krcko 2011-10-04 http://rafforum.rs/index.php/topic,123.0.html
  155. (t&t>>12)*(t>>4|t>>8)^t>>6
  156.  
  157. // blueberry 2011-10-05 http://pouet.net/topic.php?which=8357&page=12 11kHz
  158. t*(((t>>9)^((t>>9)-1)^1)%13)
  159.  
  160. // rrola 2011-10-04 http://pouet.net/topic.php?which=8357&page=9 optimized by ryg
  161. t*(0xCA98>>(t>>9&14)&15)|t>>8
  162.  
  163. // tonic 2011-10-01 http://pouet.net/topic.php?which=8357&page=5 "mr. arpeggiator playing a solo"
  164. (t/8)>>(t>>9)*t/((t>>14&3)+4)
  165.  
  166. // FreeFull 2011-10-12 http://countercomplex.blogspot.com/2011/10/algorithmic-symphonies-from-one-line-of.html
  167. (~t/100|(t*3))^(t*3&(t>>5))&t
  168.  
  169. // red- 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  170. (t|(t>>9|t>>7))*t&(t>>11|t>>9)
  171.  
  172. // harism 2011-10-09 http://0xa.kuri.mu/2011/10/09/bitop-videos/
  173. ((t>>1%128)+20)*3*t>>14*t>>18
  174.  
  175. // droid 2011-10-04 http://pouet.net/topic.php?which=8357&page=9
  176. t&(sin(t&t&3)*t>>5)/(t>>3&t>>6)
  177.  
  178. // viznut 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  179. t*(((t>>12)|(t>>8))&(63&(t>>4)))
  180.  
  181. // visy 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  182. t*(((t>>9)|(t>>13))&(25&(t>>6)))
  183.  
  184. // 216 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  185. t*(t^t+(t>>15|1)^(t-1280^t)>>10)
  186.  
  187. // tejeez 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  188. t*(((t>>11)&(t>>8))&(123&(t>>3)))
  189.  
  190. // viznut 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y (xpansive+varjohukka)
  191. (t>>7|t|t>>6)*10+4*(t&t>>13|t>>6)
  192.  
  193. // stephth 2011-10-03 http://news.ycombinator.com/item?id=3063359
  194. (t*9&t>>4|t*5&t>>7|t*3&t/1024)-1
  195.  
  196. // visy 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg "Space Invaders vs Pong"
  197. t*(t>>((t>>9)|(t>>8))&(63&(t>>4)))
  198.  
  199. // viznut 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  200. (t>>6|t|t>>(t>>16))*10+((t>>11)&7)
  201.  
  202. // yumeji 2011-10-04 http://pouet.net/topic.php?which=8357&page=9
  203. (t>>1)*(0xbad2dea1>>(t>>13)&3)|t>>5
  204.  
  205. // ryg 2011-10-04 http://pouet.net/topic.php?which=8357&page=8
  206. (t>>4)*(13&(0x8898a989>>(t>>11&30)))
  207.  
  208. // marmakoide 2011-10-04 http://pouet.net/topic.php?which=8357&page=8
  209. (t>>(t&7))|(t<<(t&42))|(t>>7)|(t<<5)
  210.  
  211. // robert 2011-10-11 http://countercomplex.blogspot.com/2011/10/algorithmic-symphonies-from-one-line-of.html
  212. (t>>7|t%45)&(t>>8|t%35)&(t>>11|t%20)
  213.  
  214. // lucasvb 2011-10-03 http://www.reddit.com/r/programming/comments/kyj77/algorithmic_symphonies_from_one_line_of_code_how/
  215. (t>>6|t<<1)+(t>>5|t<<3|t>>3)|t>>2|t<<1
  216.  
  217. // bear @ celephais
  218. t+(t&t^t>>6)-t*((t>>9)&(t%16?2:6)&t>>9)
  219.  
  220. // xpansive 2011-09-29 http://pouet.net/topic.php?which=8357&page=2 "Lost in Space"
  221. ((t*(t>>8|t>>9)&46&t>>8))^(t&t>>13|t>>6)
  222.  
  223. // rez 2011-10-05 http://pouet.net/topic.php?which=8357&page=11 js-only optimized by ryg
  224. t*(1+"4451"[t>>13&3]/10)&t>>9+(t*0.003&3)
  225.  
  226. // marmakoide 2011-10-03 http://pouet.net/topic.php?which=8357&page=7 "Lemmings March"
  227. (t>>5)|(t<<4)|((t&1023)^1981)|((t-67)>>4)
  228.  
  229. // droid 2011-10-04 http://pouet.net/topic.php?which=8357&page=9
  230. t>>4|t&(t>>5)/(t>>7-(t>>15)&-t>>7-(t>>15))
  231.  
  232. // rez 2011-10-03 http://pouet.net/topic.php?which=8357&page=7
  233. t*(t/256)-t*(t/255)+t*(t>>5|t>>6|t<<2&t>>1)
  234.  
  235. // viznut 2011-10-06 #countercomplex "moon scanner generalization", based on jaffa's formula
  236. ((t>>5&t)-(t>>5)+(t>>5&t))+(t*((t>>14)&14))
  237.  
  238. // viznut 2011-10-04 http://pouet.net/topic.php?which=8357&page=9
  239. (t*((3+(1^t>>10&5))*(5+(3&t>>14))))>>(t>>8&3)
  240.  
  241. // droid 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  242. t>>4|t&DIV((t>>5),(t>>7-(t>>15)&-t>>7-(t>>15)))
  243.  
  244. // pyryp 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  245. v=(v>>1)+(v>>4)+t*(((t>>16)|(t>>6))&(69&(t>>9)))
  246.  
  247. // bst 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o
  248. (int)(t/1e7*t*t+t)%127|t>>4|t>>5|t%127+(t>>16)|t
  249.  
  250. // tangent128 2011-10-09 http://0xa.kuri.mu/2011/10/09/bitop-videos/
  251. t*(((t>>9)&10)|((t>>11)&24)^((t>>10)&15&(t>>15)))
  252.  
  253. // tejeez 2011-10-05 #countercomplex
  254. (~t>>2)*((127&t*(7&t>>10))<(245&t*(2+(5&t>>14))))
  255.  
  256. // lokori 2011-10-04 #suomiscene
  257. (t+(t>>2)|(t>>5))+(t>>3)|((t>>13)|(t>>7)|(t>>11))
  258.  
  259. // visy 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  260. t*(t>>8*((t>>15)|(t>>8))&(20|(t>>19)*5>>t|(t>>3)))
  261.  
  262. // Aaron_Krister_Johnson 2011-10-14 http://countercomplex.blogspot.com/2011/10/algorithmic-symphonies-from-one-line-of.html
  263. (t>>4)|(t%10)|(((t%101)|(t>>14))&((t>>7)|(t*t%17)))
  264.  
  265. // jounim 2011-10-04 #suomiscene
  266. ((t&((t>>5)))+(t|((t>>7))))&(t>>6)|(t>>5)&(t*(t>>7))
  267.  
  268. // spikey 2011-10-04 #suomiscene based on jounim's formula
  269. ((t&((t>>23)))+(t|(t>>2)))&(t>>3)|(t>>5)&(t*(t>>7))
  270.  
  271. // akx 2011-10-05 http://twitter.com/#!/akx
  272. (((((t*((t>>9|t>>13)&15))&255/15)*9)%(1<<7))<<2)%6<<4
  273.  
  274. // bst 2011-10-05 http://pouet.net/topic.php?which=8357&page=10
  275. ((t%42)*(t>>4)|(0x15483113)-(t>>4))/(t>>16)^(t|(t>>4))
  276.  
  277. // skurk 2011-10-04 http://pouet.net/topic.php?which=8357&page=8
  278. t*(t>>((t&4096)?((t*t)/4096):(t/4096)))|(t<<(t/256))|(t>>4)
  279.  
  280. // skurk+raer 2011-09-30 http://www.youtube.com/watch?v=qlrs2Vorw2Y
  281. ((t&4096)?((t*(t^t%255)|(t>>4))>>1):(t>>3)|((t&8192)?t<<2:t))
  282.  
  283. // yumeji 2011-10-06 http://pouet.net/topic.php?which=8357&page=12 "badbeats & safe"
  284. t*((0xbadbea75>>((t>>12)&30)&3)*0.25*(0x5afe5>>((t>>16)&28)&3))
  285.  
  286. // bst 2011-10-11 http://pouet.net/topic.php?which=8357&page=18
  287. t>>16|((t>>4)%16)|((t>>4)%192)|(t*t%64)|(t*t%96)|(t>>16)*(t|t>>5)
  288.  
  289. // bear @ celephais
  290. t>>6^t&37|t+(t^t>>11)-t*((t%24?2:6)&t>>11)^t<<1&(t&598?t>>4:t>>10)
  291.  
  292. // kb 2011-10-04 http://pouet.net/topic.php?which=8357&page=8 44kHz
  293. ((t/2*(15&(0x234568a0>>(t>>8&28))))|t/2>>(t>>11)^t>>12)+(t/16&t&24)
  294.  
  295. // bst 2011-10-05 http://pouet.net/topic.php?which=8357&page=12
  296. (t>>5)|(t>>4)|((t%42)*(t>>4)|(0x15483113)-(t>>4))/(t>>16)^(t|(t>>4))
  297.  
  298. // tejeez 2011-09-18 http://www.youtube.com/watch?v=GtQdIYUtAHg
  299. (-t&4095)*(255&t*(t&(t>>13)))>>12)+(127&t*(234&t>>8&t>>3)>>(3&t>>14))
  300.  
  301. // ultrageranium 2011-10-12 http://0xa.kuri.mu/2011/10/09/bitop-videos/
  302. (t*t/256)&(t>>((t/1024)%16))^t%64*(0xC0D3DE4D69>>(t>>9&30)&t%32)*t>>18
  303.  
  304. // visy 2011-10-06 http://pouet.net/topic.php?which=8357&page=13
  305. (t%25-(t>>2|t*15|t%227)-t>>3)|((t>>5)&(t<<5)*1663|(t>>3)%1544)/(t%17|t%2048)
  306.  
  307. // ryg 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o 44.1 kHz
  308. ((t*("36364689"[t>>13&7]&15))/12&128)+(((((t>>12)^(t>>12)-2)%11*t)/4|t>>13)&127)
  309.  
  310. // mu6k http://www.youtube.com/watch?v=tCRPUv8V22o 32.0 kHz
  311. (3e3/(y=t&16383)&1)*35 +(x=t*"6689"[t>>16&3]/24&127)*y/4e4 +((t>>8^t>>10|t>>14|x)&63)
  312.  
  313. // Ola 2011-10-11 http://countercomplex.blogspot.com/2011/10/algorithmic-symphonies-from-one-line-of.html
  314. ((1-(((t+10)>>((t>>9)&((t>>14))))&(t>>4&-2)))*2)*(((t>>10)^((t+((t>>6)&127))>>10))&1)*32+128
  315.  
  316. // raer 2011-10-07 http://pouet.net/topic.php?which=8357&page=16 stereo 11kHz
  317. L: ((t&4096)?((t*(t^t%255)|(t>>4))>>1):(t>>3)|((t&8192)?t<<2:t)) R: t*(((t>>9)^((t>>9)-1)^1)%13)
  318.  
  319. // ryg 2011-10-04 http://pouet.net/topic.php?which=8357&page=8
  320. ((t>>4)*(13&(0x8898a989>>(t>>11&30)))&255)+((((t>>9|(t>>2)|t>>8)*10+4*((t>>2)&t>>15|t>>8))&255)>>1)
  321.  
  322. // gasman 2011-10-05 http://pouet.net/topic.php?which=8357&page=12 js-only
  323. (t<<3)*[8/9,1,9/8,6/5,4/3,3/2,0][[0xd2d2c8,0xce4088,0xca32c8,0x8e4009][t>>14&3]>>(0x3dbe4688>>((t>>10&15)>9?18:t>>10&15)*3&7)*3&7]
  324.  
  325. // a1k0n http://news.ycombinator.com/item?id=3063359 js-only
  326. SS=function(s,o,r,p){var c=s.charCodeAt((t>>r)%p);return c==32?0:31&t*Math.pow(2,c/12-o)},SS("0 0 7 7 037:<<",6,10,32) + (t&4096?SS("037",4,8,3)*(4096-(t&4095))>>12 : 0)
  327.  
  328. // mu6k 2011-10-10 http://www.youtube.com/watch?v=tCRPUv8V22o "Long-line Theory", Chaos Theory cover, optimized by ryg, p01 et al., JS-only
  329. w=t>>9,k=32,m=2048,a=1-t/m%1,d=(14*t*t^t)%m*a,y=[3,3,4.7,2][p=w/k&3]*t/4,h="IQNNNN!!]]!Q!IW]WQNN??!!W]WQNNN?".charCodeAt(w/2&15|p/3<<4)/33*t-t,s=y*.98%80+y%80+(w>>7&&a*((5*t%m*a&128)*(0x53232323>>w/4&1)+(d&127)*(0xa444c444>>w/4&1)*1.5+(d*w&1)+(h%k+h*1.99%k+h*.49%k+h*.97%k-64)*(4-a-a))),s*s>>14?127:s
Add Comment
Please, Sign In to add comment