Alexa Amundson
78fbe80f2a
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
48 lines
1.5 KiB
Bash
Executable File
48 lines
1.5 KiB
Bash
Executable File
#!/bin/bash
|
|
# BR-Solar - Solar system orbits
|
|
clear
|
|
trap 'printf "\033[?25h\033[0m"; clear; exit' INT TERM EXIT
|
|
printf '\033[?25l'
|
|
COLS=$(tput cols) LINES=$(tput lines)
|
|
CX=$((COLS/2)) CY=$((LINES/2))
|
|
T=0
|
|
|
|
NAMES=("☿" "♀" "🜨" "♂" "♃" "♄" "⛢" "♆")
|
|
RADII=(3 5 7 10 14 18 22 26)
|
|
SPEEDS=(47 35 30 24 13 10 7 5)
|
|
COLORS=(245 228 82 196 214 220 51 69)
|
|
|
|
while true; do
|
|
printf '\033[2J\033[H'
|
|
|
|
# Draw orbits
|
|
for ((p=0;p<8;p++)); do
|
|
r=${RADII[$p]}
|
|
for ((a=0;a<360;a+=15)); do
|
|
ox=$(echo "scale=0; $CX + $r * 2 * c($a * 0.0174)" | bc -l 2>/dev/null)
|
|
oy=$(echo "scale=0; $CY + $r * s($a * 0.0174)" | bc -l 2>/dev/null)
|
|
[[ -n "$ox" && -n "$oy" ]] && (( ox>0 && ox<COLS && oy>0 && oy<LINES )) && \
|
|
printf '\033[%d;%dH\033[38;5;236m·\033[0m' "$oy" "$ox"
|
|
done
|
|
done
|
|
|
|
# Draw sun
|
|
printf '\033[%d;%dH\033[1;38;5;226m☀\033[0m' "$CY" "$CX"
|
|
|
|
# Draw planets
|
|
for ((p=0;p<8;p++)); do
|
|
r=${RADII[$p]}
|
|
s=${SPEEDS[$p]}
|
|
angle=$(( (T * s / 10) % 360 ))
|
|
px=$(echo "scale=0; $CX + $r * 2 * c($angle * 0.0174)" | bc -l 2>/dev/null)
|
|
py=$(echo "scale=0; $CY + $r * s($angle * 0.0174)" | bc -l 2>/dev/null)
|
|
[[ -n "$px" && -n "$py" ]] && (( px>0 && px<COLS && py>0 && py<LINES )) && \
|
|
printf '\033[%d;%dH\033[38;5;%dm%s\033[0m' "$py" "$px" "${COLORS[$p]}" "${NAMES[$p]}"
|
|
done
|
|
|
|
printf '\033[1;1H\033[38;5;226m☀ BR-Solar \033[38;5;69m[q=quit]\033[0m'
|
|
T=$((T+1))
|
|
sleep 0.1
|
|
read -rsn1 -t 0.01 K && [[ "$K" == "q" ]] && exit
|
|
done
|