俄罗斯方块—

 #!/bin/bash

 # Tetris Game

 # 10.21. xhchen<[email]xhchen@winbond.com.tw[/email]>

 #APP declaration

 APP_NAME="${0##*[\\/]}"

 APP_VERSION="1.0"

 #颜色定义

 cRed=

 cGreen=

 cYellow=

 cBlue=

 cFuchsia=

 cCyan=

 cWhite=

 colorTable=($cRed $cGreen $cYellow $cBlue $cFuchsia $cCyan $cWhite)

 #位置和大小

 iLeft=

 iTop=

 ((iTrayLeft = iLeft + ))

 ((iTrayTop = iTop + ))

 ((iTrayWidth = ))

 ((iTrayHeight = ))

 #颜色设置

 cBorder=$cGreen

 cScore=$cFuchsia

 cScoreValue=$cCyan

 #控制信号

 #改游戏使用两个进程，一个用于接收输入，一个用于游戏流程和显示界面;

 #当前者接收到上下左右等按键时，通过向后者发送signal的方式通知后者。

 sigRotate=

 sigLeft=

 sigRight=

 sigDown=

 sigAllDown=

 sigExit=

 #七中不同的方块的定义

 #通过旋转，每种方块的显示的样式可能有几种

 box0=(       )

 box1=(               )

 box2=(               )

 box3=(               )

 box4=(                               )

 box5=(                               )

 box6=(                               )

 #所有其中方块的定义都放到box变量中

 box=(${box0[@]} ${box1[@]} ${box2[@]} ${box3[@]} ${box4[@]} ${box5[@]} ${box6[@]})

 #各种方块旋转后可能的样式数目

 countBox=(      )

 #各种方块再box数组中的偏移

 offsetBox=(      )

 #每提高一个速度级需要积累的分数

 iScoreEachLevel=        #be greater than 

 #运行时数据

 sig=                #接收到的signal

 iScore=        #总分

 iLevel=        #速度级

 boxNew=()        #新下落的方块的位置定义

 cBoxNew=        #新下落的方块的颜色

 iBoxNewType=        #新下落的方块的种类

 iBoxNewRotate=        #新下落的方块的旋转角度

 boxCur=()        #当前方块的位置定义

 cBoxCur=        #当前方块的颜色

 iBoxCurType=        #当前方块的种类

 iBoxCurRotate=        #当前方块的旋转角度

 boxCurX=-        #当前方块的x坐标位置

 boxCurY=-        #当前方块的y坐标位置

 iMap=()                #背景方块图表

 #初始化所有背景方块为-, 表示没有方块

 for ((i = ; i < iTrayHeight * iTrayWidth; i++)); do iMap[$i]=-; done

 #接收输入的进程的主函数

 function RunAsKeyReceiver()

 {

         local pidDisplayer key aKey sig cESC sTTY

         pidDisplayer=$

         aKey=(  )

         cESC=`echo -ne "\033"`

         cSpace=`echo -ne "\040"`

         #保存终端属性。在read -s读取终端键时，终端的属性会被暂时改变。

         #如果在read -s时程序被不幸杀掉，可能会导致终端混乱，

         #需要在程序退出时恢复终端属性。

         sTTY=`stty -g`

         #捕捉退出信号

         trap "MyExit;" INT TERM

         trap "MyExitNoSub;" $sigExit

         #隐藏光标

         echo -ne "\033[?25l"

         while :

         do

                 #读取输入。注-s不回显，-n读到一个字符立即返回

                 read -s -n  key

                 aKey[]=${aKey[]}

                 aKey[]=${aKey[]}

                 aKey[]=$key

                 sig=

                 #判断输入了何种键

                 if [[ $key == $cESC && ${aKey[]} == $cESC ]]

                 then

                         #ESC键

                         MyExit

                 elif [[ ${aKey[]} == $cESC && ${aKey[]} == "[" ]]

                 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 !=  ]]

                 then

                         #向另一进程发送消息

                         kill -$sig $pidDisplayer

                 fi

         done

 }

 #退出前的恢复

 function MyExitNoSub()

 {

         local y

         #恢复终端属性

         stty $sTTY

         ((y = iTop + iTrayHeight + ))

         #显示光标

         echo -e "\033[?25h\033[${y};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 :

         do

                 #根据当前的速度级iLevel不同，设定相应的循环的次数

                 for ((i = ; i <  - iLevel; i++))

                 do

                         sleep 0.02

                         sigThis=$sig

                         sig=

                         #根据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 = ; j < ; j += ))

         do

                 ((i = j + ))

                 ((y = ${boxCur[$j]} + yTest))

                 ((x = ${boxCur[$i]} + xTest))

                 if (( y <  || y >= iTrayHeight || x <  || x >= iTrayWidth))

                 then

                         #撞到墙壁了

                         return

                 fi

                 if ((${iMap[y * iTrayWidth + x]} != - ))

                 then

                         #撞到其他已经存在的方块了

                         return

                 fi

         done

         return ;

 }

 #将当前移动中的方块放到背景方块中去,

 #并计算新的分数和速度级。(即一次方块落到底部)

 function Box2Map()

 {

         local j i x y xp yp line

         #将当前移动中的方块放到背景方块中去

         for ((j = ; j < ; j += ))

         do

                 ((i = j + ))

                 ((y = ${boxCur[$j]} + boxCurY))

                 ((x = ${boxCur[$i]} + boxCurX))

                 ((i = y * iTrayWidth + x))

                 iMap[$i]=$cBoxCur

         done

         #消去可被消去的行

         line=

         for ((j = ; j < iTrayWidth * iTrayHeight; j += iTrayWidth))

         do

                 for ((i = j + iTrayWidth - ; i >= j; i--))

                 do

                         if ((${iMap[$i]} == -)); then break; fi

                 done

                 if ((i >= j)); then continue; fi

                 ((line++))

                 for ((i = j - ; i >= ; i--))

                 do

                         ((x = i + iTrayWidth))

                         iMap[$x]=${iMap[$i]}

                 done

                 for ((i = ; i < iTrayWidth; i++))

                 do

                         iMap[$i]=-

                 done

         done

         if ((line == )); then return; fi

         #根据消去的行数line计算分数和速度级

         ((x = iLeft + iTrayWidth *  + ))

         ((y = iTop + ))

         ((iScore += line *  - ))

         #显示新的分数

         echo -ne "\033[1m\033[3${cScoreValue}m\033[${y};${x}H${iScore}         "

         if ((iScore % iScoreEachLevel < line *  - ))

         then

                 if ((iLevel < ))

                 then

                         ((iLevel++))

                         ((y = iTop + ))

                         #显示新的速度级

                         echo -ne "\033[3${cScoreValue}m\033[${y};${x}H${iLevel}        "

                 fi

         fi

         echo -ne "\033[0m"

         #重新显示背景方块

         for ((y = ; y < iTrayHeight; y++))

         do

                 ((yp = y + iTrayTop + ))

                 ((xp = iTrayLeft + ))

                 ((i = y * iTrayWidth))

                 echo -ne "\033[${yp};${xp}H"

                 for ((x = ; x < iTrayWidth; x++))

                 do

                         ((j = i + x))

                         if ((${iMap[$j]} == -))

                         then

                                 echo -ne "  "

                         else

                                 echo -ne "\033[1m\033[7m\033[3${iMap[$j]}m\033[4${iMap[$j]}m[]\033[0m"

                         fi

                 done

         done

 }

 #下落一行

 function BoxDown()

 {

         local y s

         ((y = boxCurY + ))        #新的y坐标

         if BoxMove $y $boxCurX        #测试是否可以下落一行

         then

                 s="`DrawCurBox 0`"        #将旧的方块抹去

                 ((boxCurY = y))

                 s="$s`DrawCurBox 1`"        #显示新的下落后方块

                 echo -ne $s

         else

                 #走到这儿, 如果不能下落了

                 Box2Map                #将当前移动中的方块贴到背景方块中

                 RandomBox        #产生新的方块

         fi

 }

 #左移一列

 function BoxLeft()

 {

         local x s

         ((x = boxCurX - ))

         if BoxMove $boxCurY $x

         then

                 s=`DrawCurBox `

                 ((boxCurX = x))

                 s=$s`DrawCurBox `

                 echo -ne $s

         fi

 }

 #右移一列

 function BoxRight()

 {

         local x s

         ((x = boxCurX + ))

         if BoxMove $boxCurY $x

         then

                 s=`DrawCurBox `

                 ((boxCurX = x))

                 s=$s`DrawCurBox `

                 echo -ne $s

         fi

 }

 #下落到底

 function BoxAllDown()

 {

         local k j i x y iDown s

         iDown=$iTrayHeight

         #计算一共需要下落多少行

         for ((j = ; j < ; j += ))

         do

                 ((i = j + ))

                 ((y = ${boxCur[$j]} + boxCurY))

                 ((x = ${boxCur[$i]} + boxCurX))

                 for ((k = y + ; k < iTrayHeight; k++))

                 do

                         ((i = k * iTrayWidth + x))

                         if (( ${iMap[$i]} != -)); then break; fi

                 done

                 ((k -= y + ))

                 if (( $iDown > $k )); then iDown=$k; fi

         done

         s=`DrawCurBox `        #将旧的方块抹去

         ((boxCurY += iDown))

         s=$s`DrawCurBox `        #显示新的下落后的方块

         echo -ne $s

         Box2Map                #将当前移动中的方块贴到背景方块中

         RandomBox        #产生新的方块

 }

 #旋转方块

 function BoxRotate()

 {

         local iCount iTestRotate boxTest j i s

         iCount=${countBox[$iBoxCurType]}        #当前的方块经旋转可以产生的样式的数目

         #计算旋转后的新的样式

         ((iTestRotate = iBoxCurRotate + ))

         if ((iTestRotate >= iCount))

         then

                 ((iTestRotate = ))

         fi

         #更新到新的样式, 保存老的样式(但不显示)

         for ((j = , i = (${offsetBox[$iBoxCurType]} + $iTestRotate) * ; j < ; j++, i++))

         do

                 boxTest[$j]=${boxCur[$j]}

                 boxCur[$j]=${box[$i]}

         done

         if BoxMove $boxCurY $boxCurX        #测试旋转后是否有空间放的下

         then

                 #抹去旧的方块

                 for ((j = ; j < ; j++))

                 do

                         boxCur[$j]=${boxTest[$j]}

                 done

                 s=`DrawCurBox `

                 #画上新的方块

                 for ((j = , i = (${offsetBox[$iBoxCurType]} + $iTestRotate) * ; j < ; j++, i++))

                 do

                         boxCur[$j]=${box[$i]}

                 done

                 s=$s`DrawCurBox `

                 echo -ne $s

                 iBoxCurRotate=$iTestRotate

         else

                 #不能旋转，还是继续使用老的样式

                 for ((j = ; j < ; j++))

                 do

                         boxCur[$j]=${boxTest[$j]}

                 done

         fi

 }

 #DrawCurBox(bDraw), 绘制当前移动中的方块, bDraw为1, 画上, bDraw为0, 抹去方块。

 function DrawCurBox()

 {

         local i j t bDraw sBox s

         bDraw=$

         s=""

         if (( bDraw ==  ))

         then

                 sBox="\040\040"

         else

                 sBox="[]"

                 s=$s"\033[1m\033[7m\033[3${cBoxCur}m\033[4${cBoxCur}m"

         fi

         for ((j = ; j < ; j += ))

         do

                 ((i = iTrayTop +  + ${boxCur[$j]} + boxCurY))

                 ((t = iTrayLeft +  +  * (boxCurX + ${boxCur[$j + ]})))

                 #\[y;xH, 光标到(x, y)处

                 s=$s"\033[${i};${t}H${sBox}"

         done

         s=$s"\033[0m"

         echo -n $s

 }

 #更新新的方块

 function RandomBox()

 {

         local i j t

         #更新当前移动的方块

         iBoxCurType=${iBoxNewType}

         iBoxCurRotate=${iBoxNewRotate}

         cBoxCur=${cBoxNew}

         for ((j = ; j < ${#boxNew[@]}; j++))

         do

                 boxCur[$j]=${boxNew[$j]}

         done

         #显示当前移动的方块

         if (( ${#boxCur[@]} ==  ))

         then

                 #计算当前方块该从顶端哪一行"冒"出来

                 for ((j = , t = ; j < ; j += ))

                 do

                         if ((${boxCur[$j]} < t)); then t=${boxCur[$j]}; fi

                 done

                 ((boxCurY = -t))

                 for ((j = , i = -, t = ; j < ; j += ))

                 do

                         if ((${boxCur[$j]} > i)); then i=${boxCur[$j]}; fi

                         if ((${boxCur[$j]} < t)); then t=${boxCur[$j]}; fi

                 done

                 ((boxCurX = (iTrayWidth -  - i - t) / ))

                 #显示当前移动的方块

                 echo -ne `DrawCurBox `

                 #如果方块一出来就没处放，Game over!

                 if ! BoxMove $boxCurY $boxCurX

                 then

                         kill -$sigExit ${PPID}

                         ShowExit

                 fi

         fi

         #清除右边预显示的方块

         for ((j = ; j < ; j++))

         do

                 ((i = iTop +  + j))

                 ((t = iLeft +  * iTrayWidth + ))

                 echo -ne "\033[${i};${t}H        "

         done

         #随机产生新的方块

         ((iBoxNewType = RANDOM % ${#offsetBox[@]}))

         ((iBoxNewRotate = RANDOM % ${countBox[$iBoxNewType]}))

         for ((j = , i = (${offsetBox[$iBoxNewType]} + $iBoxNewRotate) * ; j < ; j++, i++))

         do

                 boxNew[$j]=${box[$i]};

         done

         ((cBoxNew = ${colorTable[RANDOM % ${#colorTable[@]}]}))

         #显示右边预显示的方块

         echo -ne "\033[1m\033[7m\033[3${cBoxNew}m\033[4${cBoxNew}m"

         for ((j = ; j < ; j += ))

         do

                 ((i = iTop +  + ${boxNew[$j]}))

                 ((t = iLeft +  * iTrayWidth +  +  * ${boxNew[$j + ]}))

                 echo -ne "\033[${i};${t}H[]"

         done

         echo -ne "\033[0m"

 }

 #初始绘制

 function InitDraw()

 {

         clear

         RandomBox        #随机产生方块，这时右边预显示窗口中有方快了

         RandomBox        #再随机产生方块，右边预显示窗口中的方块被更新，原先的方块将开始下落

         local i t1 t2 t3

         #显示边框

         echo -ne "\033[1m"

         echo -ne "\033[3${cBorder}m\033[4${cBorder}m"

         ((t2 = iLeft + ))

         ((t3 = iLeft + iTrayWidth *  + ))

         for ((i = ; i < iTrayHeight; i++))

         do

                 ((t1 = i + iTop + ))

                 echo -ne "\033[${t1};${t2}H||"

                 echo -ne "\033[${t1};${t3}H||"

         done

         ((t2 = iTop + iTrayHeight + ))

         for ((i = ; i < iTrayWidth + ; i++))

         do

                 ((t1 = i *  + iLeft + ))

                 echo -ne "\033[${iTrayTop};${t1}H=="

                 echo -ne "\033[${t2};${t1}H=="

         done

         echo -ne "\033[0m"

         #显示"Score"和"Level"字样

         echo -ne "\033[1m"

         ((t1 = iLeft + iTrayWidth *  + ))

         ((t2 = iTop + ))

         echo -ne "\033[3${cScore}m\033[${t2};${t1}HScore"

         ((t2 = iTop + ))

         echo -ne "\033[3${cScoreValue}m\033[${t2};${t1}H${iScore}"

         ((t2 = iTop + ))

         echo -ne "\033[3${cScore}m\033[${t2};${t1}HLevel"

         ((t2 = iTop + ))

         echo -ne "\033[3${cScoreValue}m\033[${t2};${t1}H${iLevel}"

         echo -ne "\033[0m"

 }

 #退出时显示GameOVer!

 function ShowExit()

 {

         local y

         ((y = iTrayHeight + iTrayTop + ))

         echo -e "\033[${y};0HGameOver!\033[0m"

         exit

 }

 #显示用法.

 function Usage

 {

         cat << EOF

 Usage: $APP_NAME

 Start tetris game.

   -h, --help              display this help and exit

       --version           output version information and exit

 EOF

 }

 #游戏主程序在这儿开始.

 if [[ "$1" == "-h" || "$1" == "--help" ]]; then

         Usage

 elif [[ "$1" == "--version" ]]; then

         echo "$APP_NAME $APP_VERSION"

 elif [[ "$1" == "--show" ]]; then

         #当发现具有参数--show时，运行显示函数

         RunAsDisplayer

 else

         bash $ --show&        #以参数--show将本程序再运行一遍

         RunAsKeyReceiver $!        #以上一行产生的进程的进程号作为参数

 fi

俄罗斯方块——shell的更多相关文章

【转】shell脚本写的俄罗斯方块游戏
亲测一个很好玩的shell脚本写的俄罗斯方块游戏,脚本来自互联网先来讲一下思维流程一.方块的表示由于shell不能定义二维数组,所以只能用一维数组表示方块,俄罗斯方块主要可以分为7类,每一类方块 ...
很强大的shell写的俄罗斯方块
网上看到的一个用linux的shell脚本写的俄罗斯方块. 是我至今见过写的最牛逼的shell了.共享一下. 原作者信息在脚本的凝视中有. 下载地址:点击下载 #!/bin/bash # Tetris ...
shell编程之俄罗斯方块
按键获取: 向上 ^[[A 向下 ^[[B 向左 ^[[D 向右 ^[[C 其中 ^[为ESC键. 按键获取的具体shell代码如下所示: #! /bin/bash GetKey() { a ...
shell脚本俄罗斯方块游戏
亲自测试了一个大牛写的shell脚本,感兴趣可以看看,效果如下:
用Shell编写的俄罗斯方块代码
用Shell编写的俄罗斯方块代码不得不承认任何一门语言玩6了,啥都能搞出来啊,竟然用Shell编写出来了一个俄罗斯方块游戏的代码,很有意思,这个代码不是我写出来的,不过大家可以下载一下在window ...
【网摘】一个用shell写的俄罗斯方块
一位大神的shell,值得学习:https://blog.csdn.net/zhenliang8/article/details/85316926 详见下: #!/bin/bash APP_NAME= ...
用Shell实现俄罗斯方块代码(Tetris.sh)
本代码来源于网络: 文件下载地址:http://files.cnblogs.com/files/DreamDrive/Tetris.sh #!/bin/bash # Tetris Game # 10. ...
shell写的俄罗斯方块
共享一下. #!/bin/bash # Tetris Game # xhchen<[email]xhchen@winbond.com.tw[/email]> #APP declaratio ...
Shell脚本编程具体解释
第12章 Shell脚本编程 l Shell命令行的执行 l 编写.改动权限和运行Shell程序的步骤 l 在Shell程序中使用參数和变量 l 表达式比較.循环结构语句和条件结构语句 l ...

随机推荐

test_login
import unittest,requestsimport ddtfrom BeautifulReport import BeautifulReport as bffrom urllib impor ...
easyui treegrid增、删、改及批量保存
treegrid添加新行和删除行的方法: 添加和删除直接调用这两个方法即可,修改的方法有点特殊,treegrid没有提供update方法,设置行为编辑状态,$('#obj_tgd_objectlist ...
rownum使用说明
参考:http://www.blogjava.net/conans/articles/219693.html 参考:http://www.blogjava.net/freeman1984/archiv ...
转：SNMP 原理及配置简述
SNMP 原理及配置简述转载 2016年01月13日 16:18:51 随着机器数量的增长,管理员不能像过去那样,一台台机器进行监控.解决问题,而需要借助各方工具进行统一监控和管理.利用SNMP,一 ...
折腾gcc/g++链接时.o文件及库的顺序问题(转)
转自: http://www.cnblogs.com/OCaml/archive/2012/06/18/2554086.html#sec-1-1 折腾gcc/g++链接时.o文件及库的顺序问题 Tab ...
什么是ETag
ETag 是 Entity Tag 的缩写,中文译过来就是实体标签的意思.在HTTP1.1协议中其实就是请求HEAD中的一个属性而已. HTTP/1.1 200 OK Date: Mon, 23 Ma ...
[转]C++11 标准新特性：Defaulted 和 Deleted 函数
http://www.ibm.com/developerworks/cn/aix/library/1212_lufang_c11new/
spring junit 部署两套测试方案
第一套方案: 1.初始化application:使用@ContextConfigurationr的classpath属性,如 @ContextConfiguration(locations = { & ...
iOS UITableViewHeaderFooterView设置背景色为透明
给UITableViewHeaderFooterView设置背景色分2种情况 1.tableView在group模式下,UITableViewHeaderFooterView的背景色默认是透明的,此时 ...
JVM Specification 9th Edition (4) Chapter 3. Compiling for the Java Virtual Machine
Chapter 3. Compiling for the Java Virtual Machine 内容列表 3.1. Format of Examples 3.2. Use of Constants ...

俄罗斯方块——shell

俄罗斯方块——shell的更多相关文章

随机推荐

热门专题