色综合久久久无码中文字幕波多 ,无套内射视频爽

yinyuemi

大富大貴

論壇徽章:: 2

15-16賽季CBA聯(lián)賽之上海
日期:2016-03-03 10:27:14

電梯直達(dá)

1樓 [收藏(0)] [報(bào)告]

發(fā)表于 2011-12-15 15:47 |只看該作者 |倒序?yàn)g覽

本帖最后由 yinyuemi 于 2011-12-16 01:28 編輯

一個(gè)小游戲：同色相消，算是提前送大家的節(jié)日小禮物吧
游戲設(shè)計(jì)非常簡(jiǎn)陋，感興趣的可以添加mainpage，打分和時(shí)間限定等。
操作鍵：
上： [Ii]
下: [Kk]
左: [Jj]
右: [Ll]
確認(rèn)：空格鍵
退出：[Qq]

#!/bin/bash
P1=10;P2=1
P3=11;P4=31
LENGTH=25
HEIGHT=10;
RED=41;
GREEN=42;
YELLOW=43;
BLUE=44;
MAGENTA=45;
CYAN=46;
WHITE=47;
Color=(" " "RED" "GREEN" "YELLOW" "BLUE" "MAGENTA" "CYAN" "WHITE");
function Moving_cursor ()
{
stty cbreak -echo
dd if=/dev/tty bs=1 count=1 2>/dev/null
stty -cbreak echo
}
function Location_cursor()
{
h=$1;l=$2
printf "\e[$h;$l;H"
}
function Choose ()
{
x=0;y=0;fresh=0;
while true
do
case $(Moving_cursor) in
i|I) printf "\e[1A";((y--));; # Up
k|K) printf "\e[1B";((y++));; # Down
j|J) printf "\e[1D";((x--));; # Left
l|L) printf "\e[1C";((x++));; # Right
" ") break;; # Enter
q|Q) clear;exit;; # quit the game
esac
done
}
function game_view()
{
local Col
while :
do
random_c[$((LENGTH*$RANDOM/32767))]=${Color[$((1+$((${#Color[@]}-1))*$RANDOM/32767))]}
[ ${#random_c[@]} = $LENGTH ] && break || continue
done
for((i=1;i<=10;i++))
do
RANDOM_P $1
[ $i = 1 ] && array_p=(${random_n[@]})||array_p=(${array_p[@]} ${random_n[@]})
random_n=();
done
printf "%28s\e[32m%s\n\e[0m" " " "++++++++++++++++++++++++++++++++++++++++++++++++++++++"
for((i=0;i<((LENGTH*HEIGHT));i++))
do
Col="${random_c[${array_p[$i]}]}"
pos="$((i/10)),$((i%10))"
if(($((((i+1))%LENGTH))==1))
then
printf "%28s\e[32m+\e[0m \e[0m\e[${!Col}m%2s\e[0m" " " " ";
eval $(echo array_view${2}[$i]=${Col})
elif(($((((i+1))%LENGTH))==0))
then
printf "\e[0m\e[${!Col}m%2s\e[0m \e[32m+\e[0m\n" " ";
eval $(echo array_view${2}[$i]=${Col})
else
printf "\e[0m\e[${!Col}m%2s\e[0m" " ";
eval $(echo array_view${2}[$i]=${Col})
fi
done
printf "%28s\e[32m%s\n\e[0m" " " "++++++++++++++++++++++++++++++++++++++++++++++++++++++"
}
function RANDOM_P()
{
random_n=();
n=$1;
local index=0;
while :
do
((t=$n*$RANDOM/32767));
if ! grep "\b$t\b" <(echo "${random_n[@]}") >/dev/null
then
random_n[$((index))]=$t
((index++))
fi
[ ${#random_n[@]} = $n ] && break || continue
done
}
function Color_decode(){
echo $(eval echo \${array_view${num}[$1]})
}
function if_seq(){
for i in $*
do
[[ $i = "c" ]] || [[ $i = "nc" ]] && echo $i || echo $i $(Color_decode $i)
done |\
awk '
NR==1{C=$1;next}
NR==2{D=$2}
NF==2{a[$2]++;b[$2]=i++?b[$2]" "$1:$1}
END{p=0;
if(C=="c"){if(a[D]>=2) {print b[D];p=1}}
else{for(i in a){if(a[i]>1) {print b[i];p=1}}}
if(!p){print 0}
}'
}
function find_color(){
local dot_x=${1#*,} dot_y=${1%,*}
case $2 in
1) for((i=$dot_x-1;i>=0;i--)); do if [[ $(Color_decode $((dot_y*LENGTH+i))) = "\" \"" ]]; then continue; else echo $((dot_y*LENGTH+i));break ;fi; done
;;
2) for((i=$dot_x+1;i<=$LENGTH;i++)); do if [[ $(Color_decode $((dot_y*LENGTH+i))) = "\" \"" ]]; then continue; else echo $((dot_y*LENGTH+i)); break ;fi; done
;;
3) for((j=1+$dot_y;j<=$HEIGHT;j++)); do if [[ $(Color_decode $((j*LENGTH+dot_x))) = "\" \"" ]]; then continue; else echo $((j*LENGTH+dot_x)); break ;fi; done
;;
4) for((j=$dot_y-1;j>=0;j--)); do if [[ $(Color_decode $((j*LENGTH+dot_x))) = "\" \"" ]]; then continue; else echo $((j*LENGTH+dot_x)); break ;fi; done
;;
esac
}
function if_linking(){
local p=$1 current up down right left dot
((current=${p%,*}*LENGTH+${p#*,}));
up=$(find_color $p 1)
down=$(find_color $p 2)
right=$(find_color $p 3)
left=$(find_color $p 4)
if [[ "$(Color_decode $current)" = "\" \"" ]]
then
dot=$(if_seq "nc" $up $down $right $left) && [ "$dot" != 0 ] && echo -n $dot || echo -n 0;
else
dot=$(if_seq "c" $current $up $down $right $left) && [ "$dot" != 0 ] && echo -n $dot || echo -n 0;
fi
}
function play_game(){
local cursor_y=$P3 cursor_x=$P4 abs_x abs_y num Ori
echo -e "\e[2J" #clear;
Location_cursor $P1 $P2
((num++))
game_view $LENGTH $num
Location_cursor $P3 $P4
while :
do
Choose
((cursor_x=cursor_x+x,cursor_y=cursor_y+y))
((abs_x=((cursor_x-P4))/2,abs_y=cursor_y-P3))
Ori="$abs_y,$abs_x";
pr=$(if_linking $Ori);
Location_cursor $cursor_y $cursor_x
if [[ $pr != ${pr/ /} ]]
then
for i in $(echo "${pr}")
do
eval $(echo array_view${num}[$i]=\"\\\" \\\"\")
((cx=$((i%LENGTH))*2+P4))
((cy=$((i/LENGTH))+P3))
Location_cursor $cy $cx && printf "\e[0m\e[40m \e[0m";
done
fi
Location_cursor $cursor_y $cursor_x
done
}
play_game

復(fù)制代碼

評(píng)分

參與人數(shù) 1	信譽(yù)積分 +10	收起理由
substr函數(shù)	+ 10	贊一個(gè)!

查看全部評(píng)分

文庫(kù)|博客

使用正則表達(dá)式與lex實(shí)現(xiàn)詞法分析器
C語(yǔ)言的MIPS匯編實(shí)現(xiàn)（四）SWITCH
Requested init /linuxrc failed (error -2).
比較 csv 文件中數(shù)據(jù)差異
LMD ElPack v2019.7新版亮點(diǎn)：Transparent mode全新升級(jí)|附下載

zooyo zooyo 當(dāng)前離線禁止發(fā)言好友博客消息論壇徽章: 3	2樓 [報(bào)告] 發(fā)表于 2011-12-15 16:14 \|只看該作者提示: 作者被禁止或刪除內(nèi)容自動(dòng)屏蔽
	實(shí)戰(zhàn)分享：從技術(shù)角度談機(jī)器學(xué)習(xí)入門\| 【大話IT】RadonDB低門檻向MySQL集群下戰(zhàn)書 \| ChinaUnix打賞功能已上線！ \| 新一代分布式關(guān)系型數(shù)據(jù)庫(kù)RadonDB知多少？