忘了什么时候在哪薅下来的俄罗斯方块脚本
今天突然翻到了，直接复制粘贴一跑居然能玩，分享一下
#!/bin/bashAPP_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++))
domap[$i]=-1
done#接收输入的进程的主函数
function RunAsKeyReceiver()
{local pidDisplayer key aKey sig cESC sTTYpidDisplayer=$1aKey=(0 0 0)cESC=`echo -ne "\033"`cSpace=`echo -ne "\040"`#保存终端属性。在read -s读取终端键时，终端的属性会被暂时改变。#如果在read -s时程序被不幸杀掉，可能会导致终端混乱，#需要在程序退出时恢复终端属性。sTTY=`stty -g`#捕捉退出信号trap "MyExit;" INT QUITtrap "MyExitNoSub;" $sigExit#隐藏光标echo -ne "\033[?25l"while :do#读取输入。注-s不回显，-n读到一个字符立即返回read -s -n 1 keyaKey[0]=${aKey[1]}aKey[1]=${aKey[2]}aKey[2]=$keysig=0#判断输入了何种键if [[ $key == $cESC && ${aKey[1]} == $cESC ]]then#ESC键MyExitelif [[ ${aKey[0]} == $cESC && ${aKey[1]} == "[" ]]thenif [[ $key == "A" ]]; then sig=$sigRotate #<向上键>elif [[ $key == "B" ]]; then sig=$sigDown #<向下键>elif [[ $key == "D" ]]; then sig=$sigLeft #<向左键>elif [[ $key == "C" ]]; then sig=$sigRight #<向右键>fielif [[ $key == "W" || $key == "w" ]]; then sig=$sigRotate #W, welif [[ $key == "S" || $key == "s" ]]; then sig=$sigDown #S, selif [[ $key == "A" || $key == "a" ]]; then sig=$sigLeft #A, aelif [[ $key == "D" || $key == "d" ]]; then sig=$sigRight #D, delif [[ "[$key]" == "[]" ]]; then sig=$sigAllDown #空格键elif [[ $key == "Q" || $key == "q" ]] #Q, qthenMyExitfiif [[ $sig != 0 ]]then#向另一进程发送消息kill -$sig $pidDisplayerfidone
}#退出前的恢复
MyExitNoSub()
{local y#恢复终端属性stty $sTTY((y = marginTop + mapHeight + 4))#显示光标echo -e "\033[?25h\033[${y};0H"exit
}MyExit()
{#通知显示进程需要退出kill -$sigExit $pidDisplayerMyExitNoSub
}#处理显示和游戏流程的主函数
RunAsDisplayer()
{local sigThisInitDraw#挂载各种信号的处理函数trap "sig=$sigRotate;" $sigRotatetrap "sig=$sigLeft;" $sigLefttrap "sig=$sigRight;" $sigRighttrap "sig=$sigDown;" $sigDowntrap "sig=$sigAllDown;" $sigAllDowntrap "ShowExit;" $sigExitwhile :do#根据当前的速度级iLevel不同，设定相应的循环的次数for ((i = 0; i < 21 - iLevel; i++))dosleep 0.02sigThis=$sigsig=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; #下落到底fidone#kill -$sigDown $$BoxDown #下落一行done
}#绘制当前方块，传第一个参数，0表示擦除当前方块，1表示绘制当前方块
DrawCurBox()
{local i x y bErase sBoxbErase=$1if (( bErase == 0 ))thensBox="\040\040" #用两个空格擦除elsesBox="[]"echo -ne "\033[1m\033[3${iBoxCurColor}m\033[4${iBoxCurColor}m"fifor ((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}"doneecho -ne "\033[0m"
}#移动方块
#BoxMove(y, x), 测试是否可以把移动中的方块移到(y, x)的位置, 返回0则可以, 1不可以
BoxMove()
{local i x y xPos yPosyPos=$1xPos=$2for ((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 1fiif (( ${map[y * mapWidth + x]} != -1 ))then#撞到其他已经存在的方块了return 1fidonereturn 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 #将方块颜色赋给地图doneline=0for ((i = 0; i < mapHeight; i++))dofor ((j = 0; j < mapWidth; j++))do#如果棋盘上有空隙，跳出循环[[ ${map[i*mapWidth+j]} -eq -1 ]] && breakdone[ $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++))domap[$i]=-1donedone[ $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))thenif ((iLevel < 20))then((iLevel++))((y = marginTop + 14))#显示新的速度级echo -ne "\033[3${cScoreValue}m\033[${y};${x}H${iLevel} "fifiecho -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))thenecho -ne " "elseecho -ne "\033[1m\033[3${map[$tmp]}m\033[4${map[$tmp]}m[]\033[0m"fidonedone
}#左移一格
BoxLeft()
{local x((x = boxCurX - 1))if BoxMove $boxCurY $xthenDrawCurBox 0((boxCurX = x))DrawCurBox 1fi
}#右移一格
BoxRight()
{local x((x = boxCurX + 1))if BoxMove $boxCurY $xthenDrawCurBox 0((boxCurX = x))DrawCurBox 1fi
}#向下移一格
BoxDown()
{local y((y = boxCurY + 1)) #新的y坐标if BoxMove $y $boxCurX #测试是否可以下落一行thenDrawCurBox 0 #将旧的方块抹去((boxCurY = y))DrawCurBox 1 #显示新的下落后方块else#走到这儿, 如果不能下落了Box2Map #将当前移动中的方块贴到背景方块中CreateBox #产生新的方块fi
}#下落到底
BoxAllDown()
{local y iDown#计算能够下落的行数iDown=0(( y = boxCurY + 1 ))while BoxMove $y $boxCurXdo(( y++ ))(( iDown++ ))doneDrawCurBox 0 #将旧的方块抹去((boxCurY += iDown))DrawCurBox 1 #显示新的下落后的方块Box2Map #将当前移动中的方块贴到背景方块中CreateBox #产生新的方块
}#翻转
BoxRotate()
{[ ${boxStyle[$iBoxCurType]} -eq 1 ] && return((rotateStyle = (iBoxCurStyle + 1) % ${boxStyle[$iBoxCurType]}))#将当前方块保存到boxTmpboxTmp=( `eval 'echo ${boxCur[@]}'` )boxCur=( `eval 'echo ${box'$iBoxCurType'_'$rotateStyle'[@]}'` )if BoxMove $boxCurY $boxCurX #测试旋转后是否有空间放的下then#抹去旧的方块boxCur=( `eval 'echo ${boxTmp[@]}'` )DrawCurBox 0boxCur=( `eval 'echo ${box'$iBoxCurType'_'$rotateStyle'[@]}'` )DrawCurBox 1iBoxCurStyle=$rotateStyleelse#不能旋转，还是继续使用老的样式boxCur=( `eval 'echo ${boxTmp[@]}'` )fi
}#准备下一个方块
PrepareNextBox()
{local i x y#清除右边预显示的方块if (( ${#boxNext[@]} != 0 )); thenfor ((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"donefi#随机生成预显式方块(( 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[]"doneecho -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=$iBoxNextColorfi#当前方块数组boxCur=( `eval 'echo ${box'$iBoxCurType'_'$iBoxCurStyle'[@]}'` )#初始化方块起始坐标boxCurY=boxCur[8];boxCurX=boxCur[9];DrawCurBox 1 #绘制当前方块if ! BoxMove $boxCurY $boxCurXthenkill -$sigExit $PPIDShowExitfiPrepareNextBox}#绘制边框
DrawBorder()
{clearlocal 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==" #绘制下边框doneecho -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" ]]; thenecho "$APP_NAME $APP_VERSION"
elif [[ "$1" == "--show" ]]; then#当发现具有参数--show时，运行显示函数RunAsDisplayer
elsebash $0 --show& #以参数--show将本程序再运行一遍RunAsKeyReceiver $! #以上一行产生的进程的进程号作为参数
fikeytest.sh#!/bin/bashGetKey()
{aKey=(0 0 0) #定义一个数组来保存3个按键cESC=`echo -ne "\033"`cSpace=`echo -ne "\040"`while :doread -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 ]]thenMyExitelif [[ ${aKey[0]} == $cESC && ${aKey[1]} == "[" ]]thenif [[ $key == "A" ]]; then echo KEYUPelif [[ $key == "B" ]]; then echo KEYDOWNelif [[ $key == "D" ]]; then echo KEYLEFTelif [[ $key == "C" ]]; then echo KEYRIGHTfifidone
}GetKeydraw.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()
{clearlocal 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==" #绘制下边框doneecho -ne "\033[0m"
}DrawBox()
{local i x y xPos yPosyPos=${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[]"doneecho -ne "\033[0m"
}InitDraw()
{clear #清屏DrawBorder #绘制边框DrawBoxwhile :dosleep 1done
}InitDraw
运行起来的效果：
在CSDN上找了好半天终于找到原文，原文链接：
https://blog.csdn.net/u013467442/article/details/45727283