draw 是画出图形界面 keytest是获取键盘 tetris是整个游戏
tetris.sh
#!/bin/bash APP_NAME="${0##*[\\/]}" APP_VERSION="1.0" #颜色定义 iSumColor=7 #颜色总数 cRed=1 #红色 cGreen=2 #绿色 cYellow=3 #黄色 cBlue=4 #蓝色 cFuchsia=5 #紫红色 cCyan=6 #青色(蓝绿色) cWhite=7 #白色 #位置与大小 marginLeft=3 #边框左边距 marginTop=2 #边框上边距 ((mapLeft=marginLeft+2)) #棋盘左边距 ((mapTop=$marginTop+1)) #棋盘上边距 mapWidth=10 #棋盘宽度 mapHeight=15 #棋盘高度 #颜色设置 cBorder=$cGreen cScore=$cFuchsia cScoreValue=$cCyan #控制信号 #游戏使用两个进程,一个用于接收输入,一个用于游戏流程和显示界面; #当前者接收到上下左右等按键时,通过向后者发送signal的方式通知后者。 sigRotate=25 #向上键 sigLeft=26 sigRight=27 sigDown=28 sigAllDown=29 #空格键 sigExit=30 #方块定义,7大类19种样式 #前8位为方块坐标,后2位为方块刚出现的时候的位置 box0_0=(0 0 0 1 1 0 1 1 0 4) box1_0=(0 1 1 1 2 1 3 1 0 3) box1_1=(1 0 1 1 1 2 1 3 -1 3) box2_0=(0 0 1 0 1 1 2 1 0 4) box2_1=(0 1 0 2 1 0 1 1 0 3) box3_0=(0 1 1 0 1 1 2 0 0 4) box3_1=(0 0 0 1 1 1 1 2 0 4) box4_0=(0 2 1 0 1 1 1 2 0 3) box4_1=(0 1 1 1 2 1 2 2 0 3) box4_2=(1 0 1 1 1 2 2 0 -1 3) box4_3=(0 0 0 1 1 1 2 1 0 4) box5_0=(0 0 1 0 1 1 1 2 0 3) box5_1=(0 1 0 2 1 1 2 1 0 3) box5_2=(1 0 1 1 1 2 2 2 -1 3) box5_3=(0 1 1 1 2 0 2 1 0 4) box6_0=(0 1 1 0 1 1 1 2 0 3) box6_1=(0 1 1 1 1 2 2 1 0 3) box6_2=(1 0 1 1 1 2 2 1 -1 3) box6_3=(0 1 1 0 1 1 2 1 0 4) iSumType=7 #方块类型总数 boxStyle=(1 2 2 2 4 4 4) #各种方块旋转后可能的样式数目 iScoreEachLevel=50 #提升一个级别需要的分数 #运行时数据 sig=0 #接收到的signal iScore=0 #总分 iLevel=0 #速度级 boxNext=() #下一个方块 iboxNextColor=0 #下一个方块的颜色 iboxNextType=0 #下一个方块的种类 iboxNextStyle=0 #下一个方块的样式 boxCur=() #当前方块的位置定义 iBoxCurColor=0 #当前方块的颜色 iBoxCurType=0 #当前方块的种类 iBoxCurStyle=0 #当前方块的样式 boxCurX=-1 #当前方块的x坐标位置 boxCurY=-1 #当前方块的y坐标位置 map=() #棋盘图表 #初始化所有背景方块为-1, 表示没有方块 for ((i = 0; i < mapHeight * mapWidth; i++)) do map[$i]=-1 done #接收输入的进程的主函数 function RunAsKeyReceiver() { local pidDisplayer key aKey sig cESC sTTY pidDisplayer=$1 aKey=(0 0 0) cESC=`echo -ne "\033"` cSpace=`echo -ne "\040"` #保存终端属性。在read -s读取终端键时,终端的属性会被暂时改变。 #如果在read -s时程序被不幸杀掉,可能会导致终端混乱, #需要在程序退出时恢复终端属性。 sTTY=`stty -g` #捕捉退出信号 trap "MyExit;" INT QUIT trap "MyExitNoSub;" $sigExit #隐藏光标 echo -ne "\033[?25l" while : do #读取输入。注-s不回显,-n读到一个字符立即返回 read -s -n 1 key aKey[0]=${aKey[1]} aKey[1]=${aKey[2]} aKey[2]=$key sig=0 #判断输入了何种键 if [[ $key == $cESC && ${aKey[1]} == $cESC ]] then #ESC键 MyExit elif [[ ${aKey[0]} == $cESC && ${aKey[1]} == "[" ]] 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 } #退出前的恢复 MyExitNoSub() { local y #恢复终端属性 stty $sTTY ((y = marginTop + mapHeight + 4)) #显示光标 echo -e "\033[?25h\033[${y};0H" exit } MyExit() { #通知显示进程需要退出 kill -$sigExit $pidDisplayer MyExitNoSub } #处理显示和游戏流程的主函数 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 : 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 } #绘制当前方块,传第一个参数,0表示擦除当前方块,1表示绘制当前方块 DrawCurBox() { local i x y bErase sBox bErase=$1 if (( bErase == 0 )) then sBox="\040\040" #用两个空格擦除 else sBox="[]" echo -ne "\033[1m\033[3${iBoxCurColor}m\033[4${iBoxCurColor}m" fi for ((i = 0; i < 8; i += 2)) do ((y = mapTop + 1 + ${boxCur[$i]} + boxCurY)) ((x = mapLeft + 1 + 2 * (boxCurX + ${boxCur[$i + 1]}))) echo -ne "\033[${y};${x}H${sBox}" done echo -ne "\033[0m" } #移动方块 #BoxMove(y, x), 测试是否可以把移动中的方块移到(y, x)的位置, 返回0则可以, 1不可以 BoxMove() { local i x y xPos yPos yPos=$1 xPos=$2 for ((i = 0; i < 8; i += 2)) do #方块相对于棋盘坐标 ((y = yPos + ${boxCur[$i]})) ((x = xPos + ${boxCur[$i + 1]})) if (( y < 0 || y >= mapHeight || x < 0 || x >= mapWidth)) then #撞到墙壁了 return 1 fi if (( ${map[y * mapWidth + x]} != -1 )) then #撞到其他已经存在的方块了 return 1 fi done return 0; } #将方块贴到棋盘上 Box2Map() { local i j x y line #将当前移动中的方块贴到棋盘对应的区域 for ((i = 0; i < 8; i += 2)) do #计算方块相对于棋盘的坐标 ((y = ${boxCur[$i]} + boxCurY)) ((x = ${boxCur[$i + 1]} + boxCurX)) map[y*mapWidth+x]=$iBoxCurColor #将方块颜色赋给地图 done line=0 for ((i = 0; i < mapHeight; i++)) do for ((j = 0; j < mapWidth; j++)) do #如果棋盘上有空隙,跳出循环 [[ ${map[i*mapWidth+j]} -eq -1 ]] && break done [ $j -lt $mapWidth ] && continue #说明当前行可消去,可消去行数加一 (( line++ )) #第i行可被消除,将0行至第i-1行全部下移一行,从第i-1行开始移动 for ((j = i*mapWidth-1; j >= 0; j--)) do ((x = j + mapWidth)) map[$x]=${map[$j]} done #因为下移一行,第0行置空 for ((i = 0; i < mapWidth; i++)) do map[$i]=-1 done done [ $line -eq 0 ] && return #根据消去的行数line计算分数和速度级 ((x = marginLeft + mapWidth * 2 + 7)) ((y = marginTop + 11)) ((iScore += line * 2 - 1)) #显示新的分数 echo -ne "\033[1m\033[3${cScoreValue}m\033[${y};${x}H${iScore} " if ((iScore % iScoreEachLevel < line * 2 - 1)) then if ((iLevel < 20)) then ((iLevel++)) ((y = marginTop + 14)) #显示新的速度级 echo -ne "\033[3${cScoreValue}m\033[${y};${x}H${iLevel} " fi fi echo -ne "\033[0m" #重新显示背景方块 for ((i = 0; i < mapHeight; i++)) do #棋盘相对于屏幕的坐标 ((y = i + mapTop + 1)) ((x = mapLeft + 1)) echo -ne "\033[${y};${x}H" for ((j = 0; j < mapWidth; j++)) do ((tmp = i * mapWidth + j)) if ((${map[$tmp]} == -1)) then echo -ne " " else echo -ne "\033[1m\033[3${map[$tmp]}m\033[4${map[$tmp]}m[]\033[0m" fi done done } #左移一格 BoxLeft() { local x ((x = boxCurX - 1)) if BoxMove $boxCurY $x then DrawCurBox 0 ((boxCurX = x)) DrawCurBox 1 fi } #右移一格 BoxRight() { local x ((x = boxCurX + 1)) if BoxMove $boxCurY $x then DrawCurBox 0 ((boxCurX = x)) DrawCurBox 1 fi } #向下移一格 BoxDown() { local y ((y = boxCurY + 1)) #新的y坐标 if BoxMove $y $boxCurX #测试是否可以下落一行 then DrawCurBox 0 #将旧的方块抹去 ((boxCurY = y)) DrawCurBox 1 #显示新的下落后方块 else #走到这儿, 如果不能下落了 Box2Map #将当前移动中的方块贴到背景方块中 CreateBox #产生新的方块 fi } #下落到底 BoxAllDown() { local y iDown #计算能够下落的行数 iDown=0 (( y = boxCurY + 1 )) while BoxMove $y $boxCurX do (( y++ )) (( iDown++ )) done DrawCurBox 0 #将旧的方块抹去 ((boxCurY += iDown)) DrawCurBox 1 #显示新的下落后的方块 Box2Map #将当前移动中的方块贴到背景方块中 CreateBox #产生新的方块 } #翻转 BoxRotate() { [ ${boxStyle[$iBoxCurType]} -eq 1 ] && return ((rotateStyle = (iBoxCurStyle + 1) % ${boxStyle[$iBoxCurType]})) #将当前方块保存到boxTmp boxTmp=( `eval 'echo ${boxCur[@]}'` ) boxCur=( `eval 'echo ${box'$iBoxCurType'_'$rotateStyle'[@]}'` ) if BoxMove $boxCurY $boxCurX #测试旋转后是否有空间放的下 then #抹去旧的方块 boxCur=( `eval 'echo ${boxTmp[@]}'` ) DrawCurBox 0 boxCur=( `eval 'echo ${box'$iBoxCurType'_'$rotateStyle'[@]}'` ) DrawCurBox 1 iBoxCurStyle=$rotateStyle else #不能旋转,还是继续使用老的样式 boxCur=( `eval 'echo ${boxTmp[@]}'` ) fi } #准备下一个方块 PrepareNextBox() { local i x y #清除右边预显示的方块 if (( ${#boxNext[@]} != 0 )); then for ((i = 0; i < 8; i += 2)) do ((y = marginTop + 1 + ${boxNext[$i]})) ((x = marginLeft + 2 * mapWidth + 7 + 2 * ${boxNext[$i + 1]})) echo -ne "\033[${y};${x}H\040\040" done fi #随机生成预显式方块 (( iBoxNextType = RANDOM % iSumType )) (( iBoxNextStyle = RANDOM % ${boxStyle[$iBoxNextType]} )) (( iBoxNextColor = RANDOM % $iSumColor + 1 )) boxNext=( `eval 'echo ${box'$iBoxNextType'_'$iBoxNextStyle'[@]}'` ) #显示右边预显示的方块 echo -ne "\033[1m\033[3${iBoxNextColor}m\033[4${iBoxNextColor}m" for ((i = 0; i < 8; i += 2)) do ((y = marginTop + 1 + ${boxNext[$i]})) ((x = marginLeft + 2 * mapWidth + 7 + 2 * ${boxNext[$i + 1]})) echo -ne "\033[${y};${x}H[]" done echo -ne "\033[0m" } #显示新方块 CreateBox() { if (( ${#boxCur[@]} == 0 )); then #当前方块不存在 (( iBoxCurType = RANDOM % iSumType )) (( iBoxCurStyle = RANDOM % ${boxStyle[$iBoxCurType]} )) (( iBoxCurColor = RANDOM % $iSumColor + 1 )) else #当前方块已存在, 将下一个方块赋给当前方块 iBoxCurType=$iBoxNextType; iBoxCurStyle=$iBoxNextStyle; iBoxCurColor=$iBoxNextColor fi #当前方块数组 boxCur=( `eval 'echo ${box'$iBoxCurType'_'$iBoxCurStyle'[@]}'` ) #初始化方块起始坐标 boxCurY=boxCur[8]; boxCurX=boxCur[9]; DrawCurBox 1 #绘制当前方块 if ! BoxMove $boxCurY $boxCurX then kill -$sigExit $PPID ShowExit fi PrepareNextBox } #绘制边框 DrawBorder() { clear local i y x1 x2 #显示边框 echo -ne "\033[1m\033[3${cBorder}m\033[4${cBorder}m" ((x1 = marginLeft + 1)) #左边框x坐标 ((x2 = x1 + 2 + mapWidth * 2)) #右边框x坐标 for ((i = 0; i < mapHeight; i++)) do ((y = i + marginTop + 2)) echo -ne "\033[${y};${x1}H||" #绘制左边框 echo -ne "\033[${y};${x2}H||" #绘制右边框 done ((x1 = marginTop + mapHeight + 2)) for ((i = 0; i < mapWidth + 2; i++)) do ((y = i * 2 + marginLeft + 1)) echo -ne "\033[${mapTop};${y}H==" #绘制上边框 echo -ne "\033[${x1};${y}H==" #绘制下边框 done echo -ne "\033[0m" #显示"Score"和"Level"字样 echo -ne "\033[1m" ((y = marginLeft + mapWidth * 2 + 7)) ((x1 = marginTop + 10)) echo -ne "\033[3${cScore}m\033[${x1};${y}HScore" ((x1 = marginTop + 11)) echo -ne "\033[3${cScoreValue}m\033[${x1};${y}H${iScore}" ((x1 = marginTop + 13)) echo -ne "\033[3${cScore}m\033[${x1};${y}HLevel" ((x1 = marginTop + 14)) echo -ne "\033[3${cScoreValue}m\033[${x1};${y}H${iLevel}" echo -ne "\033[0m" } InitDraw() { clear #清屏 DrawBorder #绘制边框 CreateBox #创建方块 } #退出时显示GameOVer! ShowExit() { local y ((y = mapHeight + mapTop + 3)) echo -e "\033[${y};1HGameOver!\033[0m" exit } #游戏主程序在这儿开始. if [[ "$1" == "--version" ]]; then echo "$APP_NAME $APP_VERSION" elif [[ "$1" == "--show" ]]; then #当发现具有参数--show时,运行显示函数 RunAsDisplayer else bash $0 --show& #以参数--show将本程序再运行一遍 RunAsKeyReceiver $! #以上一行产生的进程的进程号作为参数 fi
keytest.sh
#!/bin/bash GetKey() { aKey=(0 0 0) #定义一个数组来保存3个按键 cESC=`echo -ne "\033"` cSpace=`echo -ne "\040"` while : do read -s -n 1 key #读取一个字符,将读取到的字符保存在key中 #echo $key #echo XXX aKey[0]=${aKey[1]} #第一个按键 aKey[1]=${aKey[2]} #第二个按键 aKey[2]=$key #第三个按键 if [[ $key == $cESC && ${aKey[1]} == $cESC ]] then MyExit elif [[ ${aKey[0]} == $cESC && ${aKey[1]} == "[" ]] then if [[ $key == "A" ]]; then echo KEYUP elif [[ $key == "B" ]]; then echo KEYDOWN elif [[ $key == "D" ]]; then echo KEYLEFT elif [[ $key == "C" ]]; then echo KEYRIGHT fi fi done } GetKey
draw.sh
#!/bin/bash #位置与大小 marginLeft=8 #边框左边距 marginTop=6 #边框上边距 ((mapLeft=marginLeft+2)) #棋盘左边距 ((mapTop=$marginTop+1)) #棋盘上边距 mapWidth=10 #棋盘宽度 mapHeight=15 #棋盘高度 #方块定义,7大类19种样式 #前8位为方块坐标,后2位为方块刚出现的时候的位置 box0_0=(0 0 0 1 1 0 1 1 0 4) box1_0=(0 1 1 1 2 1 3 1 0 3) box1_1=(1 0 1 1 1 2 1 3 -1 3) box2_0=(0 0 1 0 1 1 2 1 0 4) box2_1=(0 1 0 2 1 0 1 1 0 3) box3_0=(0 1 1 0 1 1 2 0 0 4) box3_1=(0 0 0 1 1 1 1 2 0 4) box4_0=(0 2 1 0 1 1 1 2 0 3) box4_1=(0 1 1 1 2 1 2 2 0 3) box4_2=(1 0 1 1 1 2 2 0 -1 3) box4_3=(0 0 0 1 1 1 2 1 0 4) box5_0=(0 0 1 0 1 1 1 2 0 3) box5_1=(0 1 0 2 1 1 2 1 0 3) box5_2=(1 0 1 1 1 2 2 2 -1 3) box5_3=(0 1 1 1 2 0 2 1 0 4) box6_0=(0 1 1 0 1 1 1 2 0 3) box6_1=(0 1 1 1 1 2 2 1 0 3) box6_2=(1 0 1 1 1 2 2 1 -1 3) box6_3=(0 1 1 0 1 1 2 1 0 4) #绘制边框 DrawBorder() { clear local i y x1 x2 #显示边框 echo -ne "\033[1m\033[32m\033[42m" ((x1 = marginLeft + 1)) #左边框x坐标 ((x2 = x1 + 2 + mapWidth * 2)) #右边框x坐标 for ((i = 0; i < mapHeight; i++)) do ((y = i + marginTop + 2)) echo -ne "\033[${y};${x1}H||" #绘制左边框 echo -ne "\033[${y};${x2}H||" #绘制右边框 done ((x1 = marginTop + mapHeight + 2)) for ((i = 0; i < mapWidth + 2; i++)) do ((y = i * 2 + marginLeft + 1)) echo -ne "\033[${mapTop};${y}H==" #绘制上边框 echo -ne "\033[${x1};${y}H==" #绘制下边框 done echo -ne "\033[0m" } DrawBox() { local i x y xPos yPos yPos=${box0_0[8]} xPos=${box0_0[9]} echo -ne "\033[1m\033[35m\033[45m" for ((i = 0; i < 8; i += 2)) do (( y = mapTop + 1 + ${box0_0[$i]} + yPos )) (( x = mapLeft + 1 + 2 * (${box0_0[$i + 1]} + xPos) )) echo -ne "\033[${y};${x}H[]" done echo -ne "\033[0m" } InitDraw() { clear #清屏 DrawBorder #绘制边框 DrawBox while : do sleep 1 done } InitDraw
时间: 2024-10-25 19:56:32