328 lines
7.6 KiB
Lua
328 lines
7.6 KiB
Lua
local gc=love.graphics
|
|
|
|
local int,rnd=math.floor,math.random
|
|
local mStr=mStr
|
|
|
|
local scene={}
|
|
|
|
local board,cx,cy
|
|
local startTime,time
|
|
local move,push,state
|
|
|
|
local color,blind='color1'
|
|
local slide,pathVis,revKB
|
|
|
|
function scene.sceneInit()
|
|
BG.set('rainbow2')
|
|
BGM.play('push')
|
|
board={{1,2,3,4},{5,6,7,8},{9,10,11,12},{13,14,15,16}}
|
|
cx,cy=4,4
|
|
startTime=0
|
|
time=0
|
|
move,push=0,0
|
|
state=2
|
|
|
|
color='color1'
|
|
blind=false
|
|
slide=true
|
|
pathVis=true
|
|
revKB=false
|
|
end
|
|
|
|
local function moveU(x,y)
|
|
if y<4 then
|
|
board[y][x],board[y+1][x]=board[y+1][x],board[y][x]
|
|
cy=cy+1
|
|
end
|
|
end
|
|
local function moveD(x,y)
|
|
if y>1 then
|
|
board[y][x],board[y-1][x]=board[y-1][x],board[y][x]
|
|
cy=cy-1
|
|
end
|
|
end
|
|
local function moveL(x,y)
|
|
if x<4 then
|
|
board[y][x],board[y][x+1]=board[y][x+1],board[y][x]
|
|
cx=cx+1
|
|
end
|
|
end
|
|
local function moveR(x,y)
|
|
if x>1 then
|
|
board[y][x],board[y][x-1]=board[y][x-1],board[y][x]
|
|
cx=cx-1
|
|
end
|
|
end
|
|
local function shuffleBoard()
|
|
for i=1,300 do
|
|
i=rnd()
|
|
if i<.25 then moveU(cx,cy)
|
|
elseif i<.5 then moveD(cx,cy)
|
|
elseif i<.75 then moveL(cx,cy)
|
|
else moveR(cx,cy)
|
|
end
|
|
end
|
|
end
|
|
local function checkBoard(b)
|
|
for i=4,1,-1 do
|
|
for j=1,4 do
|
|
if b[i][j]~=4*i+j-4 then return false end
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
local function tapBoard(x,y,key)
|
|
if state<2 then
|
|
if not key then
|
|
if pathVis then
|
|
SYSFX.newShade(6,x-5,y-5,11,11,1,1,1)
|
|
end
|
|
x,y=int((x-320)/160)+1,int((y-40)/160)+1
|
|
end
|
|
local b=board
|
|
local moves=0
|
|
if cx==x then
|
|
if y>cy and y<5 then
|
|
for i=cy,y-1 do
|
|
moveU(x,i)
|
|
moves=moves+1
|
|
end
|
|
elseif y<cy and y>0 then
|
|
for i=cy,y+1,-1 do
|
|
moveD(x,i)
|
|
moves=moves+1
|
|
end
|
|
end
|
|
elseif cy==y then
|
|
if x>cx and x<5 then
|
|
for i=cx,x-1 do
|
|
moveL(i,y)
|
|
moves=moves+1
|
|
end
|
|
elseif x<cx and x>0 then
|
|
for i=cx,x+1,-1 do
|
|
moveR(i,y)
|
|
moves=moves+1
|
|
end
|
|
end
|
|
end
|
|
if moves>0 then
|
|
push=push+1
|
|
move=move+moves
|
|
if state==0 then
|
|
state=1
|
|
startTime=TIME()
|
|
end
|
|
if checkBoard(b)then
|
|
state=2
|
|
time=TIME()-startTime
|
|
if time<1 then MES.new(false,"不是人")
|
|
elseif time<2 then MES.new(false,"还是人")
|
|
elseif time<3 then MES.new(false,"神仙")
|
|
elseif time<5 then MES.new(false,"太强了")
|
|
elseif time<7.5 then MES.new(false,"很强")
|
|
elseif time<10 then MES.new(false,"可以的")
|
|
elseif time<20 then MES.new(false,"马上入门了")
|
|
elseif time<30 then MES.new(false,"入门不远了")
|
|
elseif time<60 then MES.new(false,"多加练习")
|
|
else MES.new(false,"第一次玩?加油")
|
|
end
|
|
SFX.play('win')
|
|
return
|
|
end
|
|
SFX.play('move')
|
|
end
|
|
end
|
|
end
|
|
function scene.keyDown(key,isRep)
|
|
if isRep then return end
|
|
if key=="up"then
|
|
tapBoard(cx,cy-(revKB and 1 or -1),true)
|
|
elseif key=="down"then
|
|
tapBoard(cx,cy+(revKB and 1 or -1),true)
|
|
elseif key=="left"then
|
|
tapBoard(cx-(revKB and 1 or -1),cy,true)
|
|
elseif key=="right"then
|
|
tapBoard(cx+(revKB and 1 or -1),cy,true)
|
|
elseif key=="space"then
|
|
shuffleBoard()
|
|
state=0
|
|
time=0
|
|
move,push=0,0
|
|
elseif key=="q"then
|
|
if state~=1 then
|
|
color=(color+1)%5
|
|
end
|
|
elseif key=="w"then
|
|
if state==0 then
|
|
blind=not blind
|
|
end
|
|
elseif key=="e"then
|
|
if state==0 then
|
|
slide=not slide
|
|
if not slide then
|
|
pathVis=false
|
|
end
|
|
end
|
|
elseif key=="r"then
|
|
if state==0 and slide then
|
|
pathVis=not pathVis
|
|
end
|
|
elseif key=="t"then
|
|
if state==0 then
|
|
revKB=not revKB
|
|
end
|
|
elseif key=="escape"then
|
|
SCN.back()
|
|
end
|
|
end
|
|
function scene.mouseDown(x,y)
|
|
tapBoard(x,y)
|
|
end
|
|
function scene.mouseMove(x,y)
|
|
if slide then
|
|
tapBoard(x,y)
|
|
end
|
|
end
|
|
function scene.touchDown(x,y)
|
|
tapBoard(x,y)
|
|
end
|
|
function scene.touchMove(x,y)
|
|
if slide then
|
|
tapBoard(x,y)
|
|
end
|
|
end
|
|
|
|
function scene.update()
|
|
if state==1 then
|
|
time=TIME()-startTime
|
|
end
|
|
end
|
|
|
|
local frontColor={
|
|
color1={
|
|
COLOR.lR,COLOR.lR,COLOR.lR,COLOR.lR,
|
|
COLOR.lG,COLOR.lB,COLOR.lB,COLOR.lB,
|
|
COLOR.lG,COLOR.lY,COLOR.lV,COLOR.lV,
|
|
COLOR.lG,COLOR.lY,COLOR.lV,COLOR.lV,
|
|
},--Colored(rank)
|
|
rainbow={
|
|
COLOR.lR,COLOR.lR,COLOR.lR,COLOR.lR,
|
|
COLOR.lO,COLOR.lY,COLOR.lY,COLOR.lY,
|
|
COLOR.lO,COLOR.lG,COLOR.lB,COLOR.lB,
|
|
COLOR.lO,COLOR.lG,COLOR.lB,COLOR.lB,
|
|
},--Rainbow(rank)
|
|
color2={
|
|
COLOR.lR,COLOR.lR,COLOR.lR,COLOR.lR,
|
|
COLOR.lB,COLOR.lB,COLOR.lB,COLOR.lB,
|
|
COLOR.lG,COLOR.lY,COLOR.lV,COLOR.lV,
|
|
COLOR.lG,COLOR.lY,COLOR.lV,COLOR.lV,
|
|
},--Colored(row)
|
|
gray={
|
|
COLOR.Z,COLOR.Z,COLOR.Z,COLOR.Z,
|
|
COLOR.Z,COLOR.Z,COLOR.Z,COLOR.Z,
|
|
COLOR.Z,COLOR.Z,COLOR.Z,COLOR.Z,
|
|
COLOR.Z,COLOR.Z,COLOR.Z,COLOR.Z,
|
|
},--Gray
|
|
black={
|
|
COLOR.Z,COLOR.Z,COLOR.Z,COLOR.Z,
|
|
COLOR.Z,COLOR.Z,COLOR.Z,COLOR.Z,
|
|
COLOR.Z,COLOR.Z,COLOR.Z,COLOR.Z,
|
|
COLOR.Z,COLOR.Z,COLOR.Z,COLOR.Z,
|
|
},--Black
|
|
}
|
|
local backColor={
|
|
color1={
|
|
COLOR.dR,COLOR.dR,COLOR.dR,COLOR.dR,
|
|
COLOR.dG,COLOR.dB,COLOR.dB,COLOR.dB,
|
|
COLOR.dG,COLOR.dY,COLOR.dV,COLOR.dV,
|
|
COLOR.dG,COLOR.dY,COLOR.dV,COLOR.dV,
|
|
},--Colored(rank)
|
|
rainbow={
|
|
COLOR.dR,COLOR.dR,COLOR.dR,COLOR.dR,
|
|
COLOR.dO,COLOR.dY,COLOR.dY,COLOR.dY,
|
|
COLOR.dO,COLOR.dG,COLOR.dB,COLOR.dB,
|
|
COLOR.dO,COLOR.dG,COLOR.dB,COLOR.dB,
|
|
},--Rainbow(rank)
|
|
color2={
|
|
COLOR.dR,COLOR.dR,COLOR.dR,COLOR.dR,
|
|
COLOR.dB,COLOR.dB,COLOR.dB,COLOR.dB,
|
|
COLOR.dG,COLOR.dY,COLOR.dV,COLOR.dV,
|
|
COLOR.dG,COLOR.dY,COLOR.dV,COLOR.dV,
|
|
},--Colored(row)
|
|
gray={
|
|
COLOR.dH,COLOR.dH,COLOR.dH,COLOR.dH,
|
|
COLOR.dH,COLOR.dH,COLOR.dH,COLOR.dH,
|
|
COLOR.dH,COLOR.dH,COLOR.dH,COLOR.dH,
|
|
COLOR.dH,COLOR.dH,COLOR.dH,COLOR.dH,
|
|
},--Gray
|
|
black={
|
|
COLOR.D,COLOR.D,COLOR.D,COLOR.D,
|
|
COLOR.D,COLOR.D,COLOR.D,COLOR.D,
|
|
COLOR.D,COLOR.D,COLOR.D,COLOR.D,
|
|
COLOR.D,COLOR.D,COLOR.D,COLOR.D,
|
|
},--Black
|
|
}
|
|
function scene.draw()
|
|
setFont(40)
|
|
gc.setColor(1,1,1)
|
|
gc.print(("%.3f"):format(time),1026,80)
|
|
gc.setColor(1,.8,.8)
|
|
gc.print(move,1026,130)
|
|
gc.setColor(.8,.8,1)
|
|
gc.print(push,1026,180)
|
|
|
|
if state==2 then
|
|
--Draw no-setting area
|
|
gc.setColor(1,0,0,.3)
|
|
gc.rectangle('fill',15,295,285,340)
|
|
|
|
gc.setColor(.9,.9,0)--win
|
|
elseif state==1 then
|
|
gc.setColor(.9,.9,.9)--game
|
|
elseif state==0 then
|
|
gc.setColor(.2,.8,.2)--ready
|
|
end
|
|
gc.setLineWidth(10)
|
|
gc.rectangle('line',313,33,654,654,18)
|
|
|
|
gc.setLineWidth(4)
|
|
local mono=blind and state==1
|
|
setFont(80)
|
|
for i=1,4 do
|
|
for j=1,4 do
|
|
if cx~=j or cy~=i then
|
|
local N=board[i][j]
|
|
local C=mono and 3 or color
|
|
|
|
gc.setColor(backColor[C][N])
|
|
gc.rectangle('fill',j*160+163,i*160-117,154,154,8)
|
|
gc.setColor(frontColor[C][N])
|
|
gc.rectangle('line',j*160+163,i*160-117,154,154,8)
|
|
if not mono then
|
|
gc.setColor(.1,.1,.1)
|
|
mStr(N,j*160+240,i*160-96)
|
|
mStr(N,j*160+242,i*160-98)
|
|
gc.setColor(1,1,1)
|
|
mStr(N,j*160+243,i*160-95)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
gc.setColor(0,0,0,.3)
|
|
gc.setLineWidth(10)
|
|
gc.rectangle('line',cx*160+173,cy*160-107,134,134,50)
|
|
end
|
|
|
|
local function ifGaming()return state==1 end
|
|
scene.widgetList={
|
|
WIDGET.newButton{name="reset", x=160,y=100,w=180,h=100,color='lG', font=40,code=pressKey"space"},
|
|
WIDGET.newSelector{name="color",x=150,y=240,w=200,list={'color1','rainbow','color2','gray','black'},color='lY',disp=function()return color end, code=function(v)if state~=1 then color=v end end,hideF=ifGaming},
|
|
WIDGET.newSwitch{name="blind", x=240,y=330,w=60, font=40,disp=function()return blind end, code=pressKey"w",hideF=ifGaming},
|
|
WIDGET.newSwitch{name="slide", x=240,y=420,w=60, font=40,disp=function()return slide end, code=pressKey"e",hideF=ifGaming},
|
|
WIDGET.newSwitch{name="pathVis",x=240,y=510,w=60, font=40,disp=function()return pathVis end, code=pressKey"r",hideF=function()return state==1 or not slide end},
|
|
WIDGET.newSwitch{name="revKB", x=240,y=600,w=60, font=40,disp=function()return revKB end, code=pressKey"t",hideF=ifGaming},
|
|
WIDGET.newButton{name="back", x=1140,y=640,w=170,h=80,fText=TEXTURE.back,code=backScene},
|
|
}
|
|
|
|
return scene |