#!/bin/bash
# Tetris Game
# 10.21.2003 xhchen<[email protected]>
#顏色定義
cRed=1
cGreen=2
cYellow=3
cBlue=4
cFuchsia=5
cCyan=6
cWhite=7
colorTable=($cRed $cGreen $cYellow $cBlue $cFuchsia $cCyan $cWhite)
#位置和大小
iLeft=3
iTop=2
((iTrayLeft = iLeft + 2))
((iTrayTop = iTop + 1))
((iTrayWidth = 10))
((iTrayHeight = 15))
#顏色設置
cBorder=$cGreen
cScore=$cFuchsia
cScoreValue=$cCyan
#控制信號
#改游戲使用兩個進程，一個用於接收輸入，一個用於游戲流程和顯示界面;
#當前者接收到上下左右等按鍵時，通過向後者發送signal的方式通知後者。
sigRotate=25
sigLeft=26
sigRight=27
sigDown=28
sigAllDown=29
sigExit=30
#七中不同的方塊的定義
#通過旋轉，每種方塊的顯示的樣式可能有幾種
box0=(0 0 0 1 1 0 1 1)
box1=(0 2 1 2 2 2 3 2 1 0 1 1 1 2 1 3)
box2=(0 0 0 1 1 1 1 2 0 1 1 0 1 1 2 0)
box3=(0 1 0 2 1 0 1 1 0 0 1 0 1 1 2 1)
box4=(0 1 0 2 1 1 2 1 1 0 1 1 1 2 2 2 0 1 1 1 2 0 2 1 0 0 1 0 1 1 1 2)
box5=(0 1 1 1 2 1 2 2 1 0 1 1 1 2 2 0 0 0 0 1 1 1 2 1 0 2 1 0 1 1 1 2)
box6=(0 1 1 1 1 2 2 1 1 0 1 1 1 2 2 1 0 1 1 0 1 1 2 1 0 1 1 0 1 1 1 2)
#所有其中方塊的定義都放到box變量中
box=($ $ $ $ $ $ $)
#各種方塊旋轉後可能的樣式數目
countBox=(1 2 2 2 4 4 4)
#各種方塊再box數組中的偏移
offsetBox=(0 1 3 5 7 11 15)
#每提高一個速度級需要積累的分數
iScoreEachLevel=50 #be greater than 7
#運行時數據
sig=0 #接收到的signal
iScore=0 #總分
iLevel=0 #速度級
boxNew=() #新下落的方塊的位置定義
cBoxNew=0 #新下落的方塊的顏色
iBoxNewType=0 #新下落的方塊的種類
iBoxNewRotate=0 #新下落的方塊的旋轉角度
boxCur=() #當前方塊的位置定義
cBoxCur=0 #當前方塊的顏色
iBoxCurType=0 #當前方塊的種類
iBoxCurRotate=0 #當前方塊的旋轉角度
boxCurX=-1 #當前方塊的x坐標位置
boxCurY=-1 #當前方塊的y坐標位置
iMap=() #背景方塊圖表
#初始化所有背景方塊為-1, 表示沒有方塊
for ((i = 0; i < iTrayHeight * iTrayWidth; i++)); do iMap[$i]=-1; done
#接收輸入的進程的主函數
function RunAsKeyReceiver()
{
local pidDisplayer key aKey sig cESC sTTY
pidDisplayer=
aKey=(0 0 0)
cESC=`echo -ne ""`
cSpace=`echo -ne ""`
#保存終端屬性。在read -s讀取終端鍵時，終端的屬性會被暫時改變。
#如果在read -s時程序被不幸殺掉，可能會導致終端混亂，
#需要在程序退出時恢復終端屬性。
sTTY=`stty -g`
#捕捉退出信號
trap "MyExit;" INT TERM
trap "MyExitNoSub;" $sigExit
#隱藏光標
echo -ne "[?25l"
while (( 1 ))
do
#讀取輸入。注-s不回顯，-n讀到一個字符立即返回
read -s -n 1 key
aKey[0]=$
aKey[1]=$
aKey[2]=$key
sig=0
#判斷輸入了何種鍵
if [[ $key == $cESC && $ == $cESC ]]
then
#ESC鍵
MyExit
elif [[ $ == $cESC && $ == "[" ]]
then
if [[ $key == "A" ]]; then sig=$sigRotate #<向上鍵>
elif [[ $key == "B" ]]; then sig=$sigDown #<向下鍵>
elif [[ $key == "D" ]]; then sig=$sigLeft #<向左鍵>
elif [[ $key == "C" ]]; then sig=$sigRight #<向右鍵>
fi
elif [[ $key == "W" || $key == "w" ]]; then sig=$sigRotate #W, w
elif [[ $key == "S" || $key == "s" ]]; then sig=$sigDown #S, s
elif [[ $key == "A" || $key == "a" ]]; then sig=$sigLeft #A, a
elif [[ $key == "D" || $key == "d" ]]; then sig=$sigRight #D, d
elif [[ "[$key]" == "[]" ]]; then sig=$sigAllDown #空格鍵
elif [[ $key == "Q" || $key == "q" ]] #Q, q
then
MyExit
fi
if [[ $sig != 0 ]]
then
#向另一進程發送消息
kill -$sig $pidDisplayer
fi
done
}
#退出前的恢復
function MyExitNoSub()
{
local y
#恢復終端屬性
stty $sTTY
((y = iTop + iTrayHeight + 4))
#顯示光標
echo -e "[?25h[$;0H"
exit
}
function MyExit()
{
#通知顯示進程需要退出
kill -$sigExit $pidDisplayer
MyExitNoSub
}
#處理顯示和游戲流程的主函數
function RunAsDisplayer()
{
local sigThis
InitDraw
#掛載各種信號的處理函數
trap "sig=$sigRotate;" $sigRotate
trap "sig=$sigLeft;" $sigLeft
trap "sig=$sigRight;" $sigRight
trap "sig=$sigDown;" $sigDown
trap "sig=$sigAllDown;" $sigAllDown
trap "ShowExit;" $sigExit
while (( 1 ))
do
#根據當前的速度級iLevel不同，設定相應的循環的次數
for ((i = 0; i < 21 - iLevel; i++))
do
sleep 0.02
sigThis=$sig
sig=0
#根據sig變量判斷是否接受到相應的信號
if ((sigThis == sigRotate)); then BoxRotate; #旋轉
elif ((sigThis == sigLeft)); then BoxLeft; #左移一列
elif ((sigThis == sigRight)); then BoxRight; #右移一列
elif ((sigThis == sigDown)); then BoxDown; #下落一行
elif ((sigThis == sigAllDown)); then BoxAllDown; #下落到底
fi
done
#kill -$sigDown $$
BoxDown #下落一行
done
}
#BoxMove(y, x), 測試是否可以把移動中的方塊移到(x, y)的位置, 返回0則可以, 1不可以
function BoxMove()
{
local j i x y xTest yTest
yTest=
xTest=
for ((j = 0; j < 8; j += 2))
do
((i = j + 1))
((y = $ + yTest))
((x = $ + xTest))
if (( y < 0 || y >= iTrayHeight || x < 0 || x >= iTrayWidth))
then
#撞到牆壁了
return 1
fi
if ((${iMap[y * iTrayWidth + x]} != -1 ))
then
#撞到其他已經存在的方塊了
return 1
fi
done
return 0;
}
#將當前移動中的方塊放到背
