Shell写的贪吃蛇游戏(页 1) - 编程开发 & Rational - LoveUnix 最强AIX小机技术论坛,UNIX,Linux,存储,数据库,中间件,开发,管理

2003-10-28 08:18 黄叶

作者：飞灰橙来自：ChinaUnix.net 忙一下午，终于出来了 在我的redhat8.0上运行通过。 游戏键： 上：w, i 下：s, k 左：a, j 右：d, l 退出：q <div class='codetop'>CODE</div><div class='codemain'> #!/bin/bash function DetectInput { while [[ 1 ]] do c="" read -n 1 c echo -ne "\r \r" if [[ $c == "a" || $c == "j" || $c == "A" || $c == "J" ]] then kill -36 $pidShowSnake elif [[ $c == "w" || $c == "i" || $c == "W" || $c == "I" ]] then kill -37 $pidShowSnake elif [[ $c == "d" || $c == "l" || $c == "D" || $c == "L" ]] then kill -38 $pidShowSnake elif [[ $c == "s" || $c == "k" || $c == "S" || $c == "K" ]] then kill -39 $pidShowSnake elif [[ $c == "q" || $c == "Q" ]] then echo Quit. kill -40 $pidShowSnake exit fi done } function AllExit { kill -40 $pidShowSnake exit } if [[ $1 != "--showsnake" ]] then eval $0" --showsnake "$$"&" trap "exit" TERM trap "AllExit" INT pidShowSnake=$! DetectInput exit else pidCtlSnake=$2 fi echo sub iSpeed=500 #time interval in millisecond iDirection=0 #1-left, 2-up, 3-right, 4-down iWidth=15 iHeight=15 iX=(6 7 8) iY=(7 7 7) iMap=() iS=0 #Start pointer in iX (( iTotalBox = iWidth * iHeight )) for (( i = 0; i < iTotalBox; i++ )) do (( iMap[$i] = 0 )) done function RandomHeader { (( iNew = RANDOM % ( iTotalBox - ${#iX[@]} ) )) for (( iNewP = 0, i = 0; iNewP < iTotalBox && i < iNew; iNewP++)) do if (( ${iMap[$iNewP]} != 1 )); then (( i++ )); fi done while (( ${iMap[$iNewP]} == 1 )); do (( iNewP++ )); done (( iNewX = iNewP % iWidth )) (( iNewY = (iNewP - iNewX) / iWidth )) echo -ne "\33[1m\33[35m" (( pX = 2 * iNewX + iLeft + 1 )) (( pY = iNewY + iTop + 1 )) echo -ne "\33["$pY";"$pX"H[]" echo -ne "\33["$iCursor";1H" echo -ne "\33[0m" } function InitDraw { clear (( iTop = 1 )) (( iBottom = iTop + iHeight + 1 )) (( iLeft = 1 )) (( iRight = iLeft + iWidth + iWidth + 1 )) (( iCursor = iBottom + 1 )) echo -ne "\33[1m\33[32m" for (( i = iLeft + 1; i < iWidth + iWidth + iLeft + 1; i++ )) do echo -ne "\33["$iTop";"$i"H=" echo -ne "\33["$iBottom";"$i"H=" done for (( i = iTop; i < iHeight + iTop + 2; i++ )) do echo -ne "\33["$i";"$iLeft"H|" echo -ne "\33["$i";"$iRight"H|" done echo -ne "\33["$iCursor";1H" echo -ne "\33[0m" echo -ne "\33[1m\33[33m" for (( i = 0; i < ${#iX[@]}; i++ )) do (( pX = 2 * ${iX[$i]} + iLeft + 1 )) (( pY = ${iY[$i]} + iTop + 1 )) (( pM = ${iY[$i]} * iWidth + ${iX[$i]} )) (( iMap[$pM] = 1 )) echo -ne "\33["$pY";"$pX"H[]" #echo ${iX[$i]} done echo -ne "\33["$iCursor";1H" echo -ne "\33[0m" RandomHeader } function ShiftSnake { (( iLastP = iS - 1 )) if (( iLastP < 0 )); then ((iLastP = ${#iX[@]} - 1 )); fi if (( iDir == 1 )) #left then (( iHX = ${iX[$iLastP]} - 1 )) (( iHY = ${iY[$iLastP]} )) elif (( iDir == 2 )) #up then (( iHX = ${iX[$iLastP]} )) (( iHY = ${iY[$iLastP]} - 1 )) elif (( iDir == 3 )) #right then (( iHX = ${iX[$iLastP]} + 1 )) (( iHY = ${iY[$iLastP]} )) elif (( iDir == 4 )) #down then (( iHX = ${iX[$iLastP]} )) (( iHY = ${iY[$iLastP]} + 1 )) fi bOver=0 if (( iHX < 0 || iHY < 0 || iHX >= iWidth || iHY >= iHeight )); then bOver=1;fi if (( bOver == 0 )); then if (( ${iMap[iHY * iWidth + iHX]} == 1 )); then bOver=1; fi fi if (( bOver == 1 )) then kill $pidCtlSnake (( iBottom = iBottom + 1 )) echo -e "\33["$iBottom";0HGame over! (Score: "${#iX[@]}"00)\33[0m" exit 0; fi #check if catch the new box if (( iHX == iNewX && iHY == iNewY )) then for (( i = ${#iX[@]}; i > iS; i-- )) do (( iX[$i] = ${iX[$i - 1]} )) (( iY[$i] = ${iY[$i - 1]} )) done (( iX[$iS] = iHX )) (( iY[$iS] = iHY )) (( iNextP = iS + 1 )) if (( iNextP >= ${#iX[@]} )); then iNextP=0; fi echo -ne "\a" RandomHeader else (( iNextP = iS + 1 )) if (( iNextP >= ${#iX[@]} )); then iNextP=0; fi #clear snake tailer (( pX = 2 * ${iX[$iS]} + iLeft + 1 )) (( pY = ${iY[$iS]} + iTop + 1 )) (( pM = ${iY[$iS]} * iWidth + ${iX[$iS]} )) (( iMap[$pM] = 0 )) echo -ne "\33["$pY";"$pX"H " (( iX[$iS] = iHX )) (( iY[$iS] = iHY )) fi #draw snake header echo -ne "\33[1m\33[33m" (( pX = 2 * iHX + iLeft + 1 )) (( pY = iHY + iTop + 1 )) (( pM = iHY * iWidth + iHX )) (( iMap[$pM] = 1 )) echo -ne "\33["$pY";"$pX"H[]" echo -ne "\33["$iCursor";1H" echo -ne "\33[0m" (( iS = iNextP )) } trap "if (( iDir != 3 && iDir != 0 )); then iDirection=1; fi" 36 trap "if (( iDir != 4 )); then iDirection=2; fi" 37 trap "if (( iDir != 1 )); then iDirection=3; fi" 38 trap "if (( iDir != 2 )); then iDirection=4; fi" 39 trap "exit" 40 InitDraw (( iNanoSec = iSpeed * 1000000 )) iTime="1"`date +"%S%N"` while [[ 1 ]] do usleep 100000 iTimeNew="1"`date +"%S%N"` #avoid iTimeNew < iTime when new minute comes if (( iTimeNew < iTime )) then (( iTime = iTime - 60000000000 )) fi #detect the time interval if (( iTimeNew - iTime < iNanoSec )); then continue; fi iTime=$iTimeNew iDir=$iDirection if (( iDir != 0 )) then ShiftSnake fi done </div>

2004-7-29 09:30 时家东

前辈： 您好！ 我今天在查资料的时候无意中发现了这个论坛，看了你好多文章，真是佩服你，我也是正在学习shell编程，不过是刚刚起步，希望能拜您为师，向您多学习点这方面的知识，不知道您愿意收我吗？呵呵。希望您不要拒绝我。 祝您身体健康，工作顺利！ 您未来的学生： 时家东

2004-7-29 15:01 zsdzsd1

好啊！！ 先收下再仔细研究。

2004-7-29 17:53 无双

黄叶兄现在有了baby比较忙了 不过他可能上linuxsir 楼上想找他的可以到那里看看说不定会看到他

2004-11-1 22:28 daliwa

顶

2006-4-16 10:05 george16

PF PF

2006-4-20 22:08 ohpig

晕，强人。。。
我先收下在研究。。。 :L