少妇人妻偷人精品视频,午夜影院色av,性一交一乱一伦一色一情

#!/bin/sh
######此處可修改相應(yīng)的值######
Width=20
Height=15
PadX=21
PadY=5
number=5 # 連續(xù)幾個就可以消掉
PerNum=3 # 每次生成幾個珠子
((ScoreX=PadX+15))
((ScoreY=PadY-2))
###############
P1="\033[31mO\033[0m"
P2="\033[32mO\033[0m"
P3="\033[33mO\033[0m"
P4="\033[34mO\033[0m"
P5="\033[35mO\033[0m"
P6="\033[36mO\033[0m"
P7="\033[37mO\033[0m"
Pearls=($P1 $P2 $P3 $P4 $P5 $P6 $P7)
PearlNum=${#Pearls[*]}
score=0
clear
function DrawBox(){
function DrawCell(){
local cell num i
cell=$1; num=$2; str=""
for((i=1;i<=$num;i++)); do str=$str$cell; done
echo "$str"
}
Bank=`DrawCell ' ' $PadX `
Line=`DrawCell "|-" $Width `
for((i=1;i<=$PadY;i++));do echo ;done
for((j=1;j<=$Height;j++)); do echo "$Bank$Line"; done
echo -ne "\033[$ScoreY;${ScoreX}HScore: $score"
}
function CordToKey(){
local x y Max
Max=100
x=$1
y=$2
((x+=Max))
((y+=Max))
echo $x$y
}
function Value(){
local i j
for((i=$PadX+1;i<=$PadX+Width*2;i+=2))
do
for((j=$PadY;j<=$PadY+$Height;j++))
do
values[`CordToKey $i $j`]="$i|$j"
done
done
}
function FindPearl(){
local PosX PosY XBig YBig XSmall YSmall type numx numy i j hold bx by dnum
PosX=$1
PosY=$2
type=$3
hold=()
((dnum=number*2))
FoundedPearl=()
((numx=((number-1))*2))
((numy=number-1))
((XSmall=PosX-numx))
((XBig=PosX+numx))
((YSmall=PosY-numy))
((YBig=PosY+numy))
function PealDispel(){
local x y same
x=$1
y=$2
same=0
[[ ${values[`CordToKey $x $y`]} == $type ]] && same=1
[[ $same == 1 ]] && { hold[${#hold[*]}]=$x; hold[${#hold[*]}]=$y; }
[[ $same == 0 && ${#hold[*]} -lt $dnum ]] && hold=()
[[ $same == 0 && ${#hold[*]} -ge $dnum ]] && break
}
hold=()
for((i=$XSmall;i<=$XBig;i+=2))
do
PealDispel $i $PosY
done
FoundedPearl=(${FoundedPearl[*]} ${hold[*]})
hold=()
for((i=$XSmall,j=$YBig;i<=$XBig,j>=$YSmall;i+=2,j--))
do
PealDispel $i $j
done
FoundedPearl=(${FoundedPearl[*]} ${hold[*]})
hold=()
for((j=$YSmall;j<=$YBig;j++))
do
PealDispel $PosX $j
done
FoundedPearl=(${FoundedPearl[*]} ${hold[*]})
hold=()
for((i=$XSmall,j=$YSmall;i<=$XBig,j<=$YBig;i+=2,j++))
do
PealDispel $i $j
done
FoundedPearl=(${FoundedPearl[*]} ${hold[*]})
if [[ ${#FoundedPearl[*]} -ge $dnum ]];then
for((m=0;m<${#FoundedPearl[*]};m+=2))
do
((n=m+1))
echo -ne "\033[${FoundedPearl[$n]};${FoundedPearl[$m]}H\033[41m${Pearls[$type]}\033[0m"
done
sleep .2
for((f=0;f<${#FoundedPearl[*]};f+=2))
do
((h=f+1))
bx=${FoundedPearl[$f]}
by=${FoundedPearl[$h]}
echo -e "\033[$by;${bx}H|"
values[`CordToKey $bx $by`]="$bx|$by"
done
((score+=${#FoundedPearl[*]}/2-number+1))
echo -ne "\033[$ScoreY;${ScoreX}HScore: $score"
fi
}
function NewPearl(){
local newX newY loop key
loop=0
GameOver
while :
do
((newX=$RANDOM%Width*2+PadX+1))
((newY=$RANDOM%Height+PadY+1))
key=`CordToKey $newX $newY`
if [[ ${#values[$key]} -ne 1 ]];then
((loop++))
((pnum=$RANDOM%$PearlNum))
p=${Pearls[$pnum]}
values[$key]="$pnum"
echo -ne "\033[$newY;${newX}H$p"
FindPearl $newX $newY $pnum
sleep .1
else
continue
fi
if((loop==PerNum));then
X=$newX
Y=$newY
echo -ne "\033[$Y;${X}H"
break;
fi
done
}
function IfNew(){
local ifP
ifP=${values[`CordToKey $X $Y`]}
if [[ $NewP == 1 && ${#ifP} != 1 ]];then
NewPearl
elif [[ $NewP == 1 && ${#ifP} == 1 ]];then
downP=$ifP
MoveingP="${Pearls[$ifP]}"
values[`CordToKey $X $Y`]="$X|$Y"
MoveP=1
NewP=0
elif [[ $NewP == 0 && ${#ifP} != 1 ]];then
echo -ne "\033[$Y;${X}H$MoveingP"
values[`CordToKey $X $Y`]=$downP
FindPearl $X $Y $downP
NewP=1
MoveP=0
sleep .2
NewPearl
fi
}
function GameOver(){
local num i x y v
num=1
for i in ${values[*]}
do
[[ $i =~ "\|" ]] && ((num++))
done
if ((num<PerNum+Height+Width));then
((x=PadX+Width/2))
((y=PadY+Height+2))
echo -e "\033[$y;${x}H \033[32mGame Over!\033[0m"
sleep .5
exit
fi
}
function MoveXY(){
local Direction oldX oldY length
Direction=$1
oldX=$X
oldY=$Y
case $Direction in
x++)((maxX=Width*2+PadX))
((X+=2))
length=${values[`CordToKey $X $Y`]}
if [[ $X -ge $maxX ]] || [[ ${#length} == 1 && $MoveP == 1 ]];then
((X-=2))
continue
fi
;;
x--)((X-=2))
length=${values[`CordToKey $X $Y`]}
if [[ $X -le $PadX ]] || [[ ${#length} == 1 && $MoveP == 1 ]];then
((X+=2))
continue
fi
;;
y++)((maxY=Height+PadY+1))
((Y++))
length=${values[`CordToKey $X $Y`]}
if [[ $Y -ge $maxY ]] || [[ ${#length} == 1 && $MoveP == 1 ]] ;then
((Y--))
continue
fi
;;
y--)((Y--))
length=${values[`CordToKey $X $Y`]}
if [[ $Y -le $PadY ]] || [[ ${#length} == 1 && $MoveP == 1 ]];then
((Y++))
continue
fi
;;
esac
[ $MoveP == 0 ] && echo -ne "\033[$Y;${X}H"
[ $MoveP == 1 ] && {
echo -ne "\033[$oldY;${oldX}H|"
echo -ne "\033[$Y;${X}H$MoveingP"
}
}
function Move(){
local key curP
DrawBox
Value
NewPearl
NewP=1
MoveP=0
while :
do
read -s -n 1 key
[[ "$key" == "A" ]] && MoveXY y--
[[ "$key" == "B" ]] && MoveXY y++
[[ "$key" == "C" ]] && MoveXY x++
[[ "$key" == "D" ]] && MoveXY x--
[[ "[$key]" == "[]" ]] && IfNew
done
}
Move

復(fù)制代碼

亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

Chinaunix