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
91 lines
2.2 KiB
Bash
Executable File
91 lines
2.2 KiB
Bash
Executable File
#!/bin/bash
|
|
# BR-Snake - Terminal snake game
|
|
# Usage: ./snake.sh
|
|
|
|
clear
|
|
COLS=$(tput cols) LINES=$(tput lines)
|
|
W=$((COLS > 40 ? 40 : COLS - 2))
|
|
H=$((LINES > 20 ? 20 : LINES - 2))
|
|
|
|
declare -a SX SY
|
|
SX=($(( W/2 )) $(( W/2-1 )) $(( W/2-2 )))
|
|
SY=($(( H/2 )) $(( H/2 )) $(( H/2 )))
|
|
LEN=3 DIR=0 SCORE=0
|
|
FX=$(( RANDOM % (W-2) + 1 )) FY=$(( RANDOM % (H-2) + 1 ))
|
|
|
|
draw_border() {
|
|
printf '\033[H\033[38;5;205m'
|
|
for ((i=0;i<=W;i++)); do printf '█'; done; echo
|
|
for ((j=1;j<H;j++)); do
|
|
printf '\033[%d;1H█\033[%d;%dH█' $((j+1)) $((j+1)) $((W+1))
|
|
done
|
|
printf '\033[%d;1H' $((H+1))
|
|
for ((i=0;i<=W;i++)); do printf '█'; done
|
|
printf '\033[0m'
|
|
}
|
|
|
|
place_food() {
|
|
FX=$(( RANDOM % (W-2) + 2 )) FY=$(( RANDOM % (H-2) + 2 ))
|
|
printf '\033[%d;%dH\033[38;5;214m●\033[0m' "$FY" "$FX"
|
|
}
|
|
|
|
stty -echo -icanon min 0 time 0
|
|
trap 'stty sane; printf "\033[?25h\033[0m"; clear; exit' INT TERM EXIT
|
|
printf '\033[?25l'
|
|
draw_border
|
|
place_food
|
|
|
|
DX=(1 0 -1 0) DY=(0 1 0 -1)
|
|
|
|
while true; do
|
|
read -rsn1 -t 0.1 KEY
|
|
if [[ "$KEY" == $'\033' ]]; then
|
|
read -rsn2 -t 0.01 SEQ
|
|
case "$SEQ" in
|
|
'[A') [[ $DIR != 1 ]] && DIR=3;;
|
|
'[B') [[ $DIR != 3 ]] && DIR=1;;
|
|
'[C') [[ $DIR != 2 ]] && DIR=0;;
|
|
'[D') [[ $DIR != 0 ]] && DIR=2;;
|
|
esac
|
|
elif [[ "$KEY" == "q" ]]; then exit; fi
|
|
|
|
# Erase tail
|
|
printf '\033[%d;%dH ' "${SY[$((LEN-1))]}" "${SX[$((LEN-1))]}"
|
|
|
|
# Shift body
|
|
for ((i=LEN-1;i>0;i--)); do
|
|
SX[$i]=${SX[$((i-1))]}
|
|
SY[$i]=${SY[$((i-1))]}
|
|
done
|
|
|
|
# Move head
|
|
SX[0]=$(( SX[0] + DX[DIR] ))
|
|
SY[0]=$(( SY[0] + DY[DIR] ))
|
|
|
|
# Wall collision
|
|
if (( SX[0] <= 1 || SX[0] >= W || SY[0] <= 1 || SY[0] >= H )); then
|
|
printf '\033[%d;1H\033[38;5;205mGAME OVER! Score: %d\033[0m\n' $((H+2)) $SCORE
|
|
read -rsn1; exit
|
|
fi
|
|
|
|
# Self collision
|
|
for ((i=1;i<LEN;i++)); do
|
|
if (( SX[0]==SX[i] && SY[0]==SY[i] )); then
|
|
printf '\033[%d;1H\033[38;5;205mGAME OVER! Score: %d\033[0m\n' $((H+2)) $SCORE
|
|
read -rsn1; exit
|
|
fi
|
|
done
|
|
|
|
# Food
|
|
if (( SX[0]==FX && SY[0]==FY )); then
|
|
((LEN++)); ((SCORE+=10))
|
|
SX+=("${SX[$((LEN-2))]}"); SY+=("${SY[$((LEN-2))]}")
|
|
place_food
|
|
fi
|
|
|
|
# Draw head
|
|
printf '\033[%d;%dH\033[38;5;82m█\033[0m' "${SY[0]}" "${SX[0]}"
|
|
# Score
|
|
printf '\033[%d;1H\033[38;5;69mScore: %d\033[0m' $((H+2)) $SCORE
|
|
done
|