SCO、Linux下的shell五子棋小游戏

时间：2006-09-12 18:03:10 来源：Linux联盟收集作者：Linux联盟收集

/>  L 6 28;echo $white_b"                      "$black_w
  L 7 28;echo $white_b"    "$run$1"!!!     "$black_w"  "$black_w
  L 8 28;echo $white_b"   再来一盘否[y|n]?   "$black_w"  "$black_w
  L 9 28;echo $white_b"                      "$black_w"  "$black_w
  L 10 30;echo "                      "
key=`getchar`
case $key in
 y)
  init_
  count=`expr $count + 1`
  L 23 36;echo "第 $count 局"
  break;;
 n)
  clear;cat abc
  L 7 30;echo $blue_b"                  "$black_w    
  L 8 30;echo $blue_b"    "!!!再见!!!"    "$black_w"  "$black_w
  L 9 30;echo $blue_b"                  "$black_w"  "$black_w
  L 10 30;echo $blue_b"  "Author: c1l2d3"  "$black_w"  "$black_w
  L 11 30;echo $blue_b"                  "$black_w"  "$black_w
  L 12 32;echo $black_w"                  "$black_w
  tput cnorm
  rm yyy;exit;;
 *);;
esac
done
}

award()  #判断输赢函数
{
cat abc|sed -n 18,"$"p|awk -F";" '{print $1,$2,$4}'|sed 's/^..//'
|awk '{print $1,$2,substr($3,2,1)}' >yyy               # 计算输赢临时文件      
grep "$qs$" yyy|sort -r -n +0 +1|awk '$2+=(NR*2)'
|uniq -c|awk '{print $1}'|grep '[5-9]' >/dev/null 2>&1
if [ $? -eq 0 ];then sy;sy1 "棋赢啦!   ";fi            # 横连子>=5        
grep "$qs$" yyy|sort -r -n +1|awk '$1+=NR'
|uniq -c|awk '{print $1}'|grep '[5-9]' >/dev/null 2>&1
if [ $? -eq 0 ];then sy;sy1 "棋赢啦!   ";fi           # 竖连子>=5        
grep "$qs$" yyy|sort -r -n +0 +1|awk '$1=$1+$2/2'|sort -r -n
|awk '$2+=(NR*2)'|uniq -c|awk '{print $1}'|grep '[5-9]' >/dev/null 2>&1
if [ $? -eq 0 ];then sy;sy1 "棋赢啦!   ";fi            # 右斜连子>=5
grep "$qs$" yyy|sort -r -n +0 +1|awk '$1=$1-$2/2'|sort -r -n
|awk '$2+=(NR*2)'|uniq -c|awk '{print $1}'|grep '[5-9]' >/dev/null 2>&1
if [ $? -eq 0 ];then sy;sy1 "棋赢啦!   ";fi            # 左斜连子>=5
}

count=1    #局数
while true
do
 L 1 4;echo $white_b" 【执白方】 "$black_w
 L 4 5;echo $gray_b" a---左移 "$black_w
 L 6 5;echo $gray_b" d---右移 "$black_w
 L 8 5;echo $gray_b" w---上移 "$black_w
 L 10 5;echo $gray_b" s---下移 "$black_w
 L 12 5;echo $gray_b" p---落子 "$black_w
 L 14 5;echo $gray_b" ]---投降 "$black_w
 L 1 62;echo $white_b" 【执黑方】 "$black_w
 L 4 63;echo $gray_b" 4---左移 "$black_w
 L 6 63;echo $gray_b" 6---右移 "$black_w
 L 8 63;echo $gray_b" 8---上移 "$black_w
 L 10 63;echo $gray_b" 5---下移 "$black_w
 L 12 63;echo $gray_b" 9---落子 "$black_w
 L 14 63;echo $gray_b" 0---投降 "$black_w
 L 22 1;echo -n
 L 23 36;echo "第 $count 局"
 cc=`getchar`
case $cc in
 a|4)
  if [ $ss -eq 0 ] && [ "$cc" = "a" ];then left;fi
  if [ $ss -eq 1 ] && [ "$cc" = "4" ];then left;fi;;
 d|6)
  if [ $ss -eq 0 ] && [ "$cc" = "d" ];then right;fi
  if [ $ss -eq 1 ] && [ "$cc" = "6" ];then right;fi;;
 s|5)
  if [ $ss -eq 0 ] && [ "$cc" = "s" ];then down;fi
  if [ $ss -eq 1 ] && [ "$cc" = "5" ];then down;fi;;
 w|8)
  if [ $ss -eq 0 ] && [ "$cc" = "w" ];then up;fi
  if [ $ss -eq 1 ] && [ "$cc" = "8" ];then up;fi;;
 m)
   run="此局和棋!    ";sy1;;
 p|9)
  if [ $ss -eq 0 ] && [ "$cc" = "p" ];then
   sed -n 18,"$"p abc|grep "[$a1;$a2" 2>&1  
   if [ $? -eq 0 ];then L 10 32;echo "  此处已有棋...";tput bel;sleep 1
     write=$green_b白$black_w
     sss=0
   else
      mm=`L $a1 $a2`[$color2●$black_w
     echo $mm>>abc
     write=$green_b黑$black_w
     sss=1
   fi
   sort -t"[" -n +1 abc
   qs=7
   award;tput bel    
  fi
  if [ $ss -eq 1 ] && [ "$cc" = "9" ];then
   sed -n 18,"$"p abc|grep "[$a1;$a2" 2>&1  
   if [ $? -eq 0 ];then L 10 32;echo "  此处已有棋...";tput bel;sleep 1
     write=$green_b黑$black_w
     sss=1
   else
      mm=`L $a1 $a2`"[$color1●$black_w"
     echo $mm>>abc
     write=$green_b白$black_w
     sss=0
   fi
   sort -t"[" -n +1 abc
   qs=0
   award;tput bel
  fi
   ss=$sss;;  # 落子方不允许再走,等待对方走棋
 0|])
   if [ "$cc" = "]" ];then go="白";run="白";bs=`expr $bs + 1`
     by=`expr $by + 0`
     bsy=`expr $by - $bs`
     hy=$bs;hs=$by;hsy=`expr $hy - $hs`
     sss=0
   else go="黑";run="黑";hs=`expr $hs + 1`;hy=`expr $hy + 0`
     hsy=`expr $hy - $hs`
     by=$hs;bs=$hy;bsy=`expr $by - $bs`
     sss=1
   fi
     ss=$sss  #谁投降谁下一局先走
   sy1 "棋投降啦";;
 c)
   md=$ccc    # 变换棋盘颜色
    if [ $md -eq 1 ];then
     def1=`expr substr $gray_b 3 8`;def2=`expr substr $gray_w 3 8`
     color1=`expr substr $brown_b 3 6`;color2=`expr substr $brown_w 3 6`
     sed 's/'$def1'/'$color1'/g' abc|sed 's/'$def2'/'$color2'/g' >abc.tmp
     mv abc.tmp abc
     cat abc
     ccc=`expr $ccc + 1`
    fi    # 桔黄色
    if [ $md -eq 2 ];then
     def1=`expr substr $brown_b 3 6`;def2=`expr substr $brown_w 3 6`
     color1=`expr substr $lt_blue_b 3 8`;color2=`expr substr $lt_blue_w 3 8`
     sed 's/'$def1'/'$color1'/g' abc|sed 's/'$def2'/'$color2'/g' >abc.tmp
     mv abc.

2/3 |‹ ‹‹ 1 2 3 ›› ›|

来顶一下

返回首页

相关文章

无相关信息

栏目更新

栏目热门