2048小游戏

?以下运算核心
local lbrt={1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,13,9,5,1,14,10,6,2,15,11,7,3,16,12,8,4,4,3,2,1,8,7,6,5,12,11,10,9,16,15,14,13,1,5,9,13,2,6,10,14,3,7,11,15,4,8,12,16,}
local num={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,}
--当前方向、是否正在进行、是否结束
local drct,ising,isend,has=0,0,0,0
local i,j,k=0,0,0
local score=0

--2048
local function Check()
?? ?for i=1,16 do
?? ??? ?if num[i]==11 then
?? ??? ??? ?isend=99999
?? ??? ?end
?? ?end
?? ?if isend==99999 then
?? ??? ?print("恭喜！2048！")
?? ??? ?has=2
?? ?end
end
--界面显示刷新
local function Re()
?? ?for i=1,16 do
?? ??? ?if num[i]==0 then

? ? ? ? print('')
?? ? ? ? else?

? ? ? ? print(2^num[i])? ??
?? ??? ?end
?? ?end
? ? print("游戏分数："..score)
?? ?if has==1 then
?? ??? ?Check()
?? ?end
end
--随机生成1个2/4
local function Add()
?? ?math.randomseed(os.time())
?? ?local z=0
?? ?for i=1,16 do
?? ??? ?if num[i]==0 then
?? ??? ??? ?z=z+1
?? ??? ?end
?? ?end
?? ?if z>0 then
?? ??? ?local r=math.random(1,z)
?? ??? ?for j=1,16 do
?? ??? ??? ?if num[j]==0 then
?? ??? ??? ??? ?r=r-1
?? ??? ??? ?end
?? ??? ??? ?if r==0 then
?? ??? ??? ??? ?math.randomseed(os.time())
?? ??? ??? ??? ?num[j]=math.random(1,10)
?? ??? ??? ??? ?if num[j]<6?then
?? ??? ??? ??? ??? ?num[j]=2
?? ??? ??? ??? ??? ?score=score+4
?? ??? ??? ??? ?else
?? ??? ??? ??? ??? ?num[j]=1
?? ??? ??? ??? ??? ?score=score+2
?? ??? ??? ??? ?end
?? ??? ??? ??? ?r=-1
?? ??? ??? ?end
?? ??? ?end
?? ?end
?? ?Re()
end
--四个数字的合并
local function Fin(num1,num2,num3,num4)
?? ?local numr={0,0,0,0,}
?? ?local m=1
?? ?if num1~=0 then
?? ??? ?numr[m]=num1
?? ??? ?m=m+1
?? ?elseif (num2~=0)or(num3~=0)or(num4~=0) then
?? ??? ?isend=1
?? ?end
?? ?if num2~=0 then
?? ??? ?numr[m]=num2
?? ??? ?m=m+1
?? ?elseif (num3~=0)or(num4~=0) then
?? ??? ?isend=1
?? ?end
?? ?if num3~=0 then
?? ??? ?numr[m]=num3
?? ??? ?m=m+1
?? ?elseif (num4~=0) then
?? ??? ?isend=1
?? ?end
?? ?if num4~=0 then
?? ??? ?numr[m]=num4
?? ??? ?m=m+1
?? ?end
?? ?if (numr[1]==numr[2])and(numr[1]~=0)and(numr[1]~=11) then
?? ??? ?numr[1]=numr[1]+1
?? ??? ?score=score+math.pow(2,numr[1])
?? ??? ?isend=1
?? ??? ?if (numr[3]==numr[4])and(numr[3]~=0)and(numr[3]~=11) then
?? ??? ??? ?numr[2]=numr[3]+1
?? ??? ??? ?score=score+math.pow(2,numr[2])
?? ??? ??? ?isend=1
?? ??? ??? ?numr[3]=0
?? ??? ??? ?numr[4]=0
?? ??? ??? ?return numr
?? ??? ?else
?? ??? ??? ?numr[2]=numr[3]
?? ??? ??? ?numr[3]=numr[4]
?? ??? ??? ?numr[4]=0
?? ??? ??? ?return numr
?? ??? ?end
?? ?elseif (numr[2]==numr[3])and(numr[2]~=0)and(numr[2]~=11) then
?? ??? ?numr[2]=numr[2]+1
?? ??? ?score=score+math.pow(2,numr[2])
?? ??? ?isend=1
?? ??? ?numr[3]=numr[4]
?? ??? ?numr[4]=0
?? ??? ?return numr
?? ?elseif (numr[3]==numr[4])and(numr[3]~=0)and(numr[3]~=11) then
?? ??? ?numr[3]=numr[3]+1
?? ??? ?score=score+math.pow(2,numr[3])
?? ??? ?isend=1
?? ??? ?numr[4]=0
?? ??? ?return numr
?? ?else
?? ??? ?return numr
?? ?end
end
--滑动
local function Move()
?? ?isend=0
?? ?if has==0 then
?? ??? ?isend=1
?? ??? ?has=1
?? ?end
?? ?for i=1,4 do
?? ??? ?local wn=(drct-1)*16+i*4
?? ??? ?local nw=Fin(num[lbrt[wn-3]],num[lbrt[wn-2]],num[lbrt[wn-1]],num[lbrt[wn]])
?? ??? ?for j=1,4 do
?? ??? ??? ?num[lbrt[wn+j-4]]=nw[j]
?? ??? ?end
?? ?end
?? ?if isend==0 then
? ? ? ? print("无法移动！当前分数："..score)
?? ?else
?? ??? ?Add()
?? ?end
end
--玩家点击按钮
Go=function(e)
? ??? ? if 上 then
?? ??? ?drct=1
?? ??? ?Move()
?? ?elseif 下 then
?? ??? ?drct=2
?? ??? ?Move()
?? ?elseif 左 then
?? ??? ?drct=3
?? ??? ?Move()
?? ?elseif 右 then
?? ??? ?drct=4
?? ??? ?Move()
?? ?elseif 重新开始 then
?? ??? ?for i=1,16 do
?? ??? ??? ?num[i]=0
?? ??? ?end
?? ??? ?has=0
?? ??? ?score=0
?? ??? ?Re()
?? ?end
end