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

scripts/donut.sh

@@ -0,0 +1,64 @@
+#!/bin/bash
+# BR-Donut - Spinning donut (inspired by donut.c)
+clear
+trap 'printf "\033[?25h\033[0m"; clear; exit' INT TERM EXIT
+printf '\033[?25l'
+COLS=$(tput cols) LINES=$(tput lines)
+W=$((COLS > 80 ? 80 : COLS))
+H=$((LINES > 24 ? 24 : LINES - 2))
+
+A=0
+while true; do
+  output=""
+  declare -a buf zbuf
+  for ((i=0;i<W*H;i++)); do buf[$i]=' '; zbuf[$i]=0; done
+
+  j=0
+  while (( j < 628 )); do
+    i=0
+    while (( i < 628 )); do
+      SI=$(echo "s($i/100)" | bc -l)
+      CI=$(echo "c($i/100)" | bc -l)
+      SJ=$(echo "s($j/100)" | bc -l)
+      CJ=$(echo "c($j/100)" | bc -l)
+      SA=$(echo "s($A/100)" | bc -l)
+      CA=$(echo "c($A/100)" | bc -l)
+
+      H2=$(echo "$CJ + 2" | bc -l)
+      D=$(echo "1 / ($SI * $H2 * $SA + $SJ * $CA + 5)" | bc -l)
+      T=$(echo "$SI * $H2 * $CA - $SJ * $SA" | bc -l)
+
+      X=$(echo "scale=0; $W/2 + $W/3 * $D * ($CI * $H2 * $CA - $T * 0)" | bc 2>/dev/null)
+      Y=$(echo "scale=0; $H/2 + $H/3 * $D * ($CI * $H2 * $SA + $SJ * $CA)" | bc 2>/dev/null)
+
+      if [[ -n "$X" && -n "$Y" ]] && (( X >= 0 && X < W && Y >= 0 && Y < H )); then
+        L=$(echo "scale=0; 8 * ($SJ * $SA - $SI * $CJ * $CA) * $D" | bc 2>/dev/null)
+        (( L < 0 )) && L=0
+        IDX=$((Y*W+X))
+        DINT=$(echo "scale=0; $D * 10000" | bc 2>/dev/null)
+        if (( DINT > zbuf[IDX] )); then
+          zbuf[$IDX]=$DINT
+          CHARS=".,-~:;=!*#$@"
+          (( L > 11 )) && L=11
+          (( L < 0 )) && L=0
+          buf[$IDX]=${CHARS:$L:1}
+        fi
+      fi
+      i=$((i+40))
+    done
+    j=$((j+40))
+  done
+
+  printf '\033[H\033[38;5;205m'
+  for ((y=0;y<H;y++)); do
+    line=""
+    for ((x=0;x<W;x++)); do
+      line+="${buf[$((y*W+x))]}"
+    done
+    echo "$line"
+  done
+  printf '\033[38;5;69m🍩 BR-Donut [q=quit]\033[0m'
+
+  A=$((A+4))
+  read -rsn1 -t 0.01 K && [[ "$K" == "q" ]] && exit
+done