Files
blackroad/scripts/tornado.sh
Alexa Amundson 78fbe80f2a Initial monorepo — everything BlackRoad in one place
bin/       230 CLI tools (ask-*, br-*, agent-*, roadid, carpool)
scripts/   99 automation scripts
fleet/     Node configs and deployment
workers/   Cloudflare Worker sources (roadpay, road-search, squad webhooks)
roadc/     RoadC programming language
roadnet/   Mesh network (5 APs, WireGuard)
operator/  Memory system scripts
config/    System configs
dotfiles/  Shell configs
docs/      Documentation

BlackRoad OS — Pave Tomorrow.

RoadChain-SHA2048: d1a24f55318d338b
RoadChain-Identity: alexa@sovereign
RoadChain-Full: d1a24f55318d338b24b60bad7be39286379c76ae5470817482100cb0ddbbcb97e147d07ac7243da0a9f0363e4e5c833d612b9c0df3a3cd20802465420278ef74875a5b77f55af6fe42a931b8b635b3d0d0b6bde9abf33dc42eea52bc03c951406d8cbe49f1a3d29b26a94dade05e9477f34a7d4d4c6ec4005c3c2ac54e73a68440c512c8e83fd9b1fe234750b898ef8f4032c23db173961fe225e67a0432b5293a9714f76c5c57ed5fdf35b9fb40fd73c03ebf88b7253c6a0575f5afb6a6b49b3bda310602fb1ef676859962dad2aebbb2875814b30eee0a8ba195e482d4cbc91d8819e7f38f6db53e8063401649c77bb994371473cabfb917fb53e8cbe73d60
2026-03-14 17:08:41 -05:00

48 lines
1.4 KiB
Bash
Executable File

#!/bin/bash
# BR-Tornado - Spinning tornado vortex
clear
trap 'printf "\033[?25h\033[0m"; clear; exit' INT TERM EXIT
printf '\033[?25l'
COLS=$(tput cols) LINES=$(tput lines)
CX=$((COLS/2))
T=0
DEBRIS='~*.:;+#@%&'
COLORS=(240 244 248 252 231 195 159 123 87 51)
while true; do
printf '\033[2J\033[H'
for ((y=2;y<LINES-1;y++)); do
# Width increases toward bottom
w=$(( (y * 2) + 2 ))
offset=$(echo "scale=0; s(($T + $y) * 0.3) * $w / 3" | bc -l 2>/dev/null || echo "0")
cx=$(( CX + offset ))
# Draw funnel
hw=$((w/2))
for ((dx=-hw;dx<=hw;dx++)); do
px=$((cx + dx))
if (( px > 0 && px < COLS )); then
# Only draw edges and some interior
if (( dx == -hw || dx == hw || RANDOM % w < 3 )); then
ci=$(( y * ${#COLORS[@]} / LINES ))
(( ci >= ${#COLORS[@]} )) && ci=$((${#COLORS[@]}-1))
ch=${DEBRIS:$((RANDOM % ${#DEBRIS})):1}
printf '\033[%d;%dH\033[38;5;%dm%s\033[0m' "$y" "$px" "${COLORS[$ci]}" "$ch"
fi
fi
done
done
# Ground debris
for ((i=0;i<COLS;i++)); do
if (( RANDOM % 5 == 0 )); then
printf '\033[%d;%dH\033[38;5;94m%s\033[0m' "$((LINES-1))" "$((i+1))" "${DEBRIS:$((RANDOM % ${#DEBRIS})):1}"
fi
done
printf '\033[1;1H\033[38;5;248m🌪 BR-Tornado \033[38;5;69m[q=quit]\033[0m'
T=$((T+1))
sleep 0.08
read -rsn1 -t 0.01 K && [[ "$K" == "q" ]] && exit
done