Files
blackroad/scripts/fire.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

56 lines
1.6 KiB
Bash
Executable File

#!/bin/bash
# BR-Fire - Terminal fire effect
clear
trap 'printf "\033[?25h\033[0m"; clear; exit' INT TERM EXIT
printf '\033[?25l'
COLS=$(tput cols) LINES=$(($(tput lines) - 1))
declare -a grid
SIZE=$((COLS * LINES))
for ((i=0;i<SIZE;i++)); do grid[$i]=0; done
FIRE_CHARS=(' ' '.' ':' '*' 'o' 'O' '#' '@')
FIRE_COLORS=(0 52 88 124 160 196 208 214 220 226 228 230 231)
while true; do
# Set bottom row to random values
for ((x=0;x<COLS;x++)); do
grid[$(( (LINES-1)*COLS + x ))]=$(( RANDOM % 12 ))
done
# Propagate fire upward
for ((y=LINES-2;y>=0;y--)); do
for ((x=0;x<COLS;x++)); do
idx=$((y*COLS+x))
below=$(( (y+1)*COLS + x ))
left=$(( (y+1)*COLS + (x>0 ? x-1 : 0) ))
right=$(( (y+1)*COLS + (x<COLS-1 ? x+1 : x) ))
avg=$(( (grid[below] + grid[left] + grid[right] + grid[$(( (y+2<LINES ? y+2 : y+1)*COLS + x ))]) / 4 ))
decay=$(( RANDOM % 2 ))
val=$((avg - decay))
(( val < 0 )) && val=0
grid[$idx]=$val
done
done
# Render
printf '\033[H'
for ((y=0;y<LINES;y++)); do
line=""
for ((x=0;x<COLS;x++)); do
v=${grid[$((y*COLS+x))]}
if (( v == 0 )); then
line+=' '
else
ci=$v
(( ci >= ${#FIRE_COLORS[@]} )) && ci=$(( ${#FIRE_COLORS[@]} - 1 ))
ch=$(( v * ${#FIRE_CHARS[@]} / 13 ))
(( ch >= ${#FIRE_CHARS[@]} )) && ch=$(( ${#FIRE_CHARS[@]} - 1 ))
line+="\033[38;5;${FIRE_COLORS[$ci]}m${FIRE_CHARS[$ch]}"
fi
done
printf '%b\033[0m\n' "$line"
done
printf '\033[1;1H\033[38;5;214m🔥 BR-Fire \033[38;5;69m[q=quit]\033[0m'
read -rsn1 -t 0.03 K && [[ "$K" == "q" ]] && exit
done