| Bytes | Lang | Time | Link |
|---|---|---|---|
| 196 | JCram | 240724T091425Z | Kamila S |
JCram, 196 bytes (SBCS).
⍉⍩a⌹⍵⍯bⒼ⍸i0Sfζλ∆⍖Ⓑ⍅u⊂⊗⍞∇Ⓦ⍋⍗ⓎM⑨5∧kϸ⏧θ⍫χ↑λ⑥⍷XⓂⓃλ⍵⁸Ͽο⊙∃⍞⍗⊐B⍈Ⓟ⍨≥qϿ⊤⍌sy⟃A⍡lX⍳Ⓐφ⌾z⁷2A⍢Ⓚ↑4v○θϾ⍷z⌻Ⓐ⋆⍂ζϿⒾⒿ⍈⍺ptL⁰B²Ⓠ○ⓆI⟃Ⓑb⍺BO⊐②⍤¹⎇⏚⍉⏧⍆≥⑤ν∼KⓇ⊥○←⍭⁸μ⁷⍔⍴×r²6⍟⍗⁴3⍷E×Ⓣ⑨⊑⍐⌷⍋MpM⍥⍪θⓌ⍉⍜Ⓛη→⍩⍞n⟃⍞⊤⍱Ⓗ⍺f⌸ⒸV⊐F∼³⊂Ⓙ⍔Ⓡ⑥⍊⍣⍋ξ5②
Encodes the following ES6 program:
let d,q=0,r=0,s,v=b=>x=>y=>b?y:x,B=(b,n)=>!n?_=>y=>y:z=>z(v((b>>(n-1))&1))(B(b,n-1)),f=n=>n>=d.length?_=>y=>y:z=>z(B(d[n],8))(f(n+1)),l=(b,x=0)=>b(b=>t=>_=>l(t,2*x+b(_=>0)(_=>1)()))(Buffer.from([x])),o=p=>p(c=>(process.stdout.write(l(c)),t=>_=>o(t)))(0),g=_=>r?(s>>--r)&1:(s=d[q++],r=8,s>>--r&1),p=_=>{let x,y;if(g()){for(x=0;g();x++);return(...a)=>a[x]}else if(g()){x=p();y=p();return(...a)=>x(...a)(b=>y(...a)(b))}x=p();return(...a)=>b=>x(b,...a)};process.stdin.on('readable',_=>(d=process.stdin.read())&&o(p()()(f(q))))