nycki.net/static/qrplay/v3b.min.txt
nycki 12e098255d
All checks were successful
/ build (push) Successful in 45s
v3b
2025-07-11 18:38:49 -07:00

1 line
No EOL
1.2 KiB
Text

data:text/html,<META%20NAME=VIEWPORT%20CONTENT=INITIAL=SCALE=1><CENTER><P><A%20HREF=http://nycki.net/qrplay>qrplay%20v3b</A></P><TEXTAREA%20ID=F%20STYLE=WIDTH:MIN(40EM,99%);HEIGHT:9LH></TEXTAREA><P><BUTTON%20onclick="F.A?.close();F.A=A=new%20AudioContext;S='@xx'+F.value;B=[];K=O=T=Z=L=0;U=137;V=40;C=['+g','-b+c%23deff%23g','g++ddb--g++ddb',,'+ea-g--b++g++c%23','a%23ga%23g-a%23+g-b+g','-a++c%23-aae+e--a','-ffed%23ddc%23','dddddd%23e','--ba%23bb-a+a%23-b'].map(c=>`{o06m${c}}x`);M=_=>{[a,b,c,d]=S;s=1;z='\n;+-@.3cdefgabx012456789jtsiqhwmuvo{}'.indexOf(a);z<0?0:z<2?K=z:K?0:z<4?O+=a+1|0:z<5?(O=0,L=1):z<6?L*=3/2:z<7?L/=3:z<15?(z-=7,o=new%20OscillatorNode(A,{type:'square',detune:100*(z*2-(z>2)-(b=='!')+(b=='%23')+12*O-9)}),g=new%20GainNode(A,{gain:z<7&&.5**(12-V/5)}),o.connect(g),g.connect(A.destination),o.start(T),o.stop(T+=7.5*L/U)):z<22&&b=='['?(m=0,d=B.findIndex.call(S,c=>c=='['?!++m:c==']'?!--m:0),C[a]=S.slice(s,d),s=d+1):z<24?S=C[a]+S.slice(s--):z<31?L=2**(z-25):z<32?L=U/2**11:z<33?(U=b+c+d,s+=3):z<34?(V=b+c,s+=2):z<35?(O=b+c-4,s+=2):z<36?B[Z++]={L,O,T,U,V}:{L,O,T,U,V}=B[--Z];S=S.slice(s);S&&setTimeout(M)};M()">%23play</BUTTON>%20<BUTTON%20ONCLICK=F.A.close()>%23stop</BUTTON>