while :;do echo $LINES $COLUMNS $(( $RANDOM % $COLUMNS)) $(printf "\U$(($RANDOM % 500))");sleep 0.05;done|gawk '{a[$3]=0;for (x in a){o=a[x];a[x]=a[x]+1;printf "\033[%s;%sH\033[2;32m%s",o,x,$4;printf "\033[%s;%sH\033[1;37m%s\033[0;0H",a[x],x,$4;if (a[x] >= $1){a[x]=0;} }}'

@climagic Video description: the code provided in the toot in a terminal: when run, it creates a matrix-style cascade of variously-hued letters and symbols.

@climagic Useful improvement: $(printf "\U$(( ($RANDOM % 500) + 32 ))")

You don't want ASCII control chars in the streams.


😴👔🐇🕶️🔋💊🔌🖥️. ...

Sign in to participate in the conversation

Server run by the main developers of the project 🐘 It is not focused on any particular niche interest - everyone is welcome as long as you follow our code of conduct!