Online BASH Compiler

#!/bin/bash # created by flockaroo (florian berger) 2025 # genuary2025 # genuary7 - "use software not intended to create art or images" function cos80q { let xm=$1%80; let y=79-$xm*$xm/79; echo $y; } function abs { if [ $1 -ge 0 ]; then echo $1; else echo "${1:1}"; fi } function sin80 { # full period 4x80=320 let xp=$1%320 ; let xm=$1%80; let q=xp/80 if [[ $q -eq 0 || $q -eq 2 ]]; then let xm=79-xm; fi y=$(cos80q xm) if [[ $q -eq 2 || $q -eq 3 ]]; then y=-$y; fi echo "$y" } N=5 sci=() yp=() for i in $(seq 0 $N); do sc=80; for k in $(seq $i $(($N-1))); do let sc=sc*7/10 ; done sci[$i]=$sc; yp[$i]=0; done cnt=0 line00=" " line0=". . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ." line1="..............................................................................." line2=":::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::" line3="xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" line4="XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX" line5="###############################################################################" linei=("$line0" "$line1" "$line2" "$line3" "$line4" "$line5") while true; do line=$line00 for i in $(seq 0 $N); do sc100=${sci[$i]} y=$(sin80 $(($i*50+$cnt*4*100/$sc100))) let "y=y+$(sin80 $(($i*50+$cnt*5*100/$sc100)))/2" let "y=y+$(sin80 $(($i*50+$cnt*7*100/$sc100)))/3" let y=y*sc100/100/3+70-i*9 let dy=$y-${yp[$i]} char="|" if [ $((y- ${yp[$i]})) -lt -1 ]; then char="/"; fi if [ $((y- ${yp[$i]})) -gt 1 ]; then char="\\"; fi if [ $((y- ${yp[$i]})) -gt 3 ]; then char="="; fi if [ $((y- ${yp[$i]})) -lt -3 ]; then char="="; fi if [[ $y -ge 0 ]]; then let yn=y+1 lineX=${linei[i]} if [[ $i -eq 0 && $((cnt%2)) -eq 1 ]]; then lineX=" "$lineX; fi line=${lineX:0:$y}$char${line:$yn} fi yp[$i]=$y let isc100=isc100*7/10 done echo "$line" let cnt++ sleep .017 done