User: Samboy

{{semi-retired|date=May of 2020}}

#include // cc -o microrg32 microrg32.c ; WORK=3 ; LEN=4 #######

#include // SECRET="Something random like qhohxks5mx9elv6ujgx3"

#include // export P="$LEN:$SECRET:x.org" ## Public domain code

#define b(z) for(c=0;c<(z);c++) // ./microrg32 $WORK $LEN | head -1 | tail

uint32_t c,e[42],f[42],g=19,h=13,r,s,n[45],i,k;char*q;void m(){int c;r=0;b

(12)f[c+c%3*h]^=e[c+1];b(g){r=(r+c)%32;i=c*7%g;k=e[i++];k^=e[i%g]|~e[(i+1)

%g];n[c]=n[c+g]=k>>r|k<<-r%32;}for(c=39;c--;f[c+1]=f[c])e[c]=n[c]^n[c+1]^n

[c+4];*e^=1;b(3)e[c+h]^=f[c*h]=f[c*h+h];}int main(int p,char **v){q=getenv

("P");if(q&&p>2){for(;;m()){b(3){for(r=0;r<4;){f[c*h]^=k=(*q?*q&255:1)<<8*

r++;e[16+c]^=k;if(!*q++){p=0;b(17+(1<<*v[1]%32))m();b(983){s=e[1+c%2];r=c;

b(4){p=p>0?p:*v[2]%16;i=s;s>>=8;if(p!=0){i&=31;i+=i<8?50:89;}printf(p?"%c"

:"%02x",i&255);}c=r;if(c%2)m();if(--p<1||c>981)puts("");}return 0;}}}}}}//

I have a [https://www.samiam.org website] and a [https://www.samiam.org/blog/ blog].

I have, over the years, contributed a number of images to the Wikipedia.

My preferred gender pronouns are he/him/his.

The Fine-structure constant:

$$\backslash alpha\; =\; \backslash frac\{e^2\}\{2\; \backslash varepsilon\_0\; h\; c\}\; \backslash approx\; \backslash frac\{1\}\{137\}$$

where

• {{mvar|e}} is the elementary charge ({{physconst|e}});
• {{mvar|h}} is the Planck constant ({{physconst|h}});
• {{mvar|c}} is the speed of light ({{physconst|c}});
• {{mvar|ε}}{{sub|0}} is the electric constant ({{physconst|eps0}}).

es:User:Samboy