295 lines
9.0 KiB
Lua
295 lines
9.0 KiB
Lua
local gc,sys=love.graphics,love.system
|
|
local ms,kb=love.mouse,love.keyboard
|
|
|
|
local max,min,int=math.max,math.min,math.floor
|
|
local ins,rem=table.insert,table.remove
|
|
local sub=string.sub
|
|
|
|
local FIELD=FIELD
|
|
local scene={}
|
|
|
|
local sure
|
|
local pen--Pen type
|
|
local px,py--Pen position
|
|
local demo--If show x
|
|
local page
|
|
|
|
function scene.sceneInit()
|
|
sure=0
|
|
pen=1
|
|
px,py=1,1
|
|
demo=false
|
|
page=1
|
|
end
|
|
|
|
local penKey={
|
|
["1"]=1,["2"]=2,["3"]=3,["4"]=4,["5"]=5,["6"]=6,["7"]=7,["8"]=8,
|
|
q=9,w=10,e=11,r=12,t=13,y=14,u=15,i=16,
|
|
a=17,s=18,d=19,f=20,g=21,h=22,j=23,k=24,
|
|
z=0,x=-1,
|
|
}
|
|
|
|
function scene.mouseDown(x,y)
|
|
scene.mouseMove(x,y)
|
|
end
|
|
function scene.mouseMove(x,y)
|
|
local sx,sy=int((x-200)/30)+1,20-int((y-60)/30)
|
|
if sx<1 or sx>10 then sx=nil end
|
|
if sy<1 or sy>20 then sy=nil end
|
|
px,py=sx,sy
|
|
if sx and sy and ms.isDown(1,2,3)then
|
|
FIELD[page][sy][sx]=ms.isDown(1)and pen or ms.isDown(2)and -1 or 0
|
|
end
|
|
end
|
|
function scene.wheelMoved(_,y)
|
|
if y<0 then
|
|
pen=pen+1
|
|
if pen==25 then pen=1 end
|
|
else
|
|
pen=pen-1
|
|
if pen==0 then pen=24 end
|
|
end
|
|
end
|
|
function scene.touchDown(x,y)
|
|
scene.mouseMove(x,y)
|
|
end
|
|
function scene.touchMove(x,y)
|
|
local sx,sy=int((x-200)/30)+1,20-int((y-60)/30)
|
|
if sx<1 or sx>10 then sx=nil end
|
|
if sy<1 or sy>20 then sy=nil end
|
|
px,py=sx,sy
|
|
if sx and sy then
|
|
FIELD[page][sy][sx]=pen
|
|
end
|
|
end
|
|
function scene.keyDown(key)
|
|
local sx,sy=px,py
|
|
if key=="up"or key=="down"or key=="left"or key=="right"then
|
|
if not sx then sx=1 end
|
|
if not sy then sy=1 end
|
|
if key=="up"and sy<20 then sy=sy+1
|
|
elseif key=="down"and sy>1 then sy=sy-1
|
|
elseif key=="left"and sx>1 then sx=sx-1
|
|
elseif key=="right"and sx<10 then sx=sx+1
|
|
end
|
|
if kb.isDown("space")then
|
|
FIELD[page][sy][sx]=pen
|
|
end
|
|
elseif key=="delete"then
|
|
if sure>20 then
|
|
for y=1,20 do for x=1,10 do FIELD[page][y][x]=0 end end
|
|
sure=0
|
|
SFX.play("finesseError",.7)
|
|
else
|
|
sure=50
|
|
end
|
|
elseif key=="space"then
|
|
if sx and sy then
|
|
FIELD[page][sy][sx]=pen
|
|
end
|
|
elseif key=="escape"then
|
|
SCN.back()
|
|
elseif key=="j"then
|
|
demo=not demo
|
|
elseif key=="k"then
|
|
ins(FIELD[page],1,{21,21,21,21,21,21,21,21,21,21})
|
|
FIELD[page][21]=nil
|
|
SFX.play("blip")
|
|
elseif key=="l"then
|
|
local F=FIELD[page]
|
|
for i=20,1,-1 do
|
|
for j=1,10 do
|
|
if F[i][j]<=0 then goto L end
|
|
end
|
|
SYSFX.newShade(3,200,660-30*i,300,30)
|
|
SYSFX.newRectRipple(3,200,660-30*i,300,30)
|
|
rem(F,i)
|
|
::L::
|
|
end
|
|
if #F~=20 then
|
|
repeat
|
|
F[#F+1]={0,0,0,0,0,0,0,0,0,0}
|
|
until#F==20
|
|
SFX.play("clear_3",.8)
|
|
SFX.play("fall",.8)
|
|
end
|
|
elseif key=="c"and kb.isDown("lctrl","rctrl")or key=="cC"then
|
|
sys.setClipboardText("Techmino Field:"..copyBoard(page))
|
|
LOG.print(text.exportSuccess,COLOR.green)
|
|
elseif key=="v"and kb.isDown("lctrl","rctrl")or key=="cV"then
|
|
local str=sys.getClipboardText()
|
|
local p=string.find(str,":")--ptr*
|
|
if p then str=sub(str,p+1)end
|
|
if pasteBoard(str,page)then
|
|
LOG.print(text.importSuccess,COLOR.green)
|
|
else
|
|
LOG.print(text.dataCorrupted,COLOR.red)
|
|
end
|
|
elseif key=="tab"or key=="sTab"then
|
|
if key=="sTab"or kb.isDown("lshift","rshift")then
|
|
page=max(page-1,1)
|
|
else
|
|
page=min(page+1,#FIELD)
|
|
end
|
|
elseif key=="n"then
|
|
ins(FIELD,page+1,newBoard(FIELD[page]))
|
|
page=page+1
|
|
SFX.play("blip_1",.8)
|
|
SYSFX.newShade(3,200,60,300,600,.5,1,.5)
|
|
elseif key=="m"then
|
|
rem(FIELD,page)
|
|
page=max(page-1,1)
|
|
if not FIELD[1]then
|
|
ins(FIELD,newBoard())
|
|
end
|
|
SYSFX.newShade(3,200,60,300,600,1,.5,.5)
|
|
SFX.play("clear_4",.8)
|
|
SFX.play("fall",.8)
|
|
else
|
|
pen=penKey[key]or pen
|
|
end
|
|
px,py,pen=sx,sy,pen
|
|
end
|
|
|
|
function scene.update()
|
|
if sure>0 then sure=sure-1 end
|
|
end
|
|
|
|
function scene.draw()
|
|
local sx,sy=px,py
|
|
|
|
gc.translate(200,60)
|
|
|
|
--Draw grid
|
|
gc.setColor(1,1,1,.2)
|
|
gc.setLineWidth(1)
|
|
for x=1,9 do gc.line(30*x,0,30*x,600)end
|
|
for y=0,19 do gc.line(0,30*y,300,30*y)end
|
|
|
|
--Draw field
|
|
gc.setColor(1,1,1)
|
|
gc.setLineWidth(3)
|
|
gc.rectangle("line",-2,-2,304,604)
|
|
gc.setLineWidth(2)
|
|
local cross=puzzleMark[-1]
|
|
local F=FIELD[page]
|
|
local texture=SKIN.curText
|
|
for y=1,20 do for x=1,10 do
|
|
local B=F[y][x]
|
|
if B>0 then
|
|
gc.draw(texture[B],30*x-30,600-30*y)
|
|
elseif B==-1 and not demo then
|
|
gc.draw(cross,30*x-30,600-30*y)
|
|
end
|
|
end end
|
|
|
|
--Draw pen
|
|
if sx and sy then
|
|
local x,y=30*sx,600-30*sy
|
|
if kb.isDown("space")or ms.isDown(1)then
|
|
gc.setLineWidth(5)
|
|
gc.rectangle("line",x-30,y,30,30,4)
|
|
elseif ms.isDown(3)then
|
|
gc.setLineWidth(3)
|
|
gc.line(x-15,y,x-30,y+15)
|
|
gc.line(x,y,x-30,y+30)
|
|
gc.line(x,y+15,x-15,y+30)
|
|
else
|
|
gc.setLineWidth(2)
|
|
gc.rectangle("line",x-30,y,30,30,3)
|
|
gc.setColor(1,1,1,.2)
|
|
gc.rectangle("fill",x-30,y,30,30,3)
|
|
gc.setColor(1,1,1)
|
|
end
|
|
end
|
|
gc.translate(-200,-60)
|
|
|
|
--Draw page
|
|
setFont(55)
|
|
mStr(page,100,530)
|
|
mStr(#FIELD,100,600)
|
|
gc.rectangle("fill",50,600,100,6)
|
|
|
|
--Draw pen color
|
|
if pen>0 then
|
|
gc.setLineWidth(13)
|
|
gc.setColor(SKIN.libColor[pen])
|
|
gc.rectangle("line",565,495,70,70)
|
|
elseif pen==-1 then
|
|
gc.setLineWidth(5)
|
|
gc.setColor(.9,.9,.9)
|
|
gc.line(575,505,625,555)
|
|
gc.line(575,555,625,505)
|
|
end
|
|
|
|
--Confirm reset
|
|
if sure>0 then
|
|
gc.setColor(1,1,1,sure*.02)
|
|
gc.draw(drawableText.question,1145,330)
|
|
end
|
|
|
|
--Block name
|
|
setFont(55)
|
|
gc.setColor(1,1,1)
|
|
local _
|
|
for i=1,7 do
|
|
_=SETTING.skin[i]
|
|
if _<=8 then
|
|
mStr(text.block[i],500+80*_,90)
|
|
else
|
|
mStr(text.block[i],500+80*(_-8),170)
|
|
end
|
|
end
|
|
end
|
|
|
|
local function setPen(i)return function()pen=i end end
|
|
scene.widgetList={
|
|
WIDGET.newText{name="title", x=1020,y=5,font=70,align="R"},
|
|
WIDGET.newText{name="subTitle", x=1030,y=50,font=35,align="L",color="grey"},
|
|
|
|
WIDGET.newButton{name="b1", x=580, y=130,w=75,fText="",color=COLOR.red, code=setPen(1)},--B1
|
|
WIDGET.newButton{name="b2", x=660, y=130,w=75,fText="",color=COLOR.fire, code=setPen(2)},--B2
|
|
WIDGET.newButton{name="b3", x=740, y=130,w=75,fText="",color=COLOR.orange, code=setPen(3)},--B3
|
|
WIDGET.newButton{name="b4", x=820, y=130,w=75,fText="",color=COLOR.yellow, code=setPen(4)},--B4
|
|
WIDGET.newButton{name="b5", x=900, y=130,w=75,fText="",color=COLOR.lame, code=setPen(5)},--B5
|
|
WIDGET.newButton{name="b6", x=980, y=130,w=75,fText="",color=COLOR.grass, code=setPen(6)},--B6
|
|
WIDGET.newButton{name="b7", x=1060, y=130,w=75,fText="",color=COLOR.green, code=setPen(7)},--B7
|
|
WIDGET.newButton{name="b8", x=1140, y=130,w=75,fText="",color=COLOR.water, code=setPen(8)},--B8
|
|
|
|
WIDGET.newButton{name="b9", x=580, y=210,w=75,fText="",color=COLOR.cyan, code=setPen(9)},--B9
|
|
WIDGET.newButton{name="b10", x=660, y=210,w=75,fText="",color=COLOR.sky, code=setPen(10)},--B10
|
|
WIDGET.newButton{name="b11", x=740, y=210,w=75,fText="",color=COLOR.sea, code=setPen(11)},--B11
|
|
WIDGET.newButton{name="b12", x=820, y=210,w=75,fText="",color=COLOR.blue, code=setPen(12)},--B12
|
|
WIDGET.newButton{name="b13", x=900, y=210,w=75,fText="",color=COLOR.purple, code=setPen(13)},--B13
|
|
WIDGET.newButton{name="b14", x=980, y=210,w=75,fText="",color=COLOR.grape, code=setPen(14)},--B14
|
|
WIDGET.newButton{name="b15", x=1060, y=210,w=75,fText="",color=COLOR.magenta,code=setPen(15)},--B15
|
|
WIDGET.newButton{name="b16", x=1140, y=210,w=75,fText="",color=COLOR.pink, code=setPen(16)},--B16
|
|
|
|
WIDGET.newButton{name="b17", x=580, y=290,w=75,fText="[ ]",color="dGrey", code=setPen(17)},--BONE
|
|
WIDGET.newButton{name="b18", x=660, y=290,w=75,fText="N", color="black", code=setPen(18)},--HIDE
|
|
WIDGET.newButton{name="b19", x=740, y=290,w=75,fText="B", color="lYellow",code=setPen(19)},--BOMB
|
|
WIDGET.newButton{name="b20", x=820, y=290,w=75,fText="_", color="grey", code=setPen(20)},--GB1
|
|
WIDGET.newButton{name="b21", x=900, y=290,w=75,fText="_", color="lGrey", code=setPen(21)},--GB2
|
|
WIDGET.newButton{name="b22", x=980, y=290,w=75,fText="_", color="dPurple",code=setPen(22)},--GB3
|
|
WIDGET.newButton{name="b23", x=1060, y=290,w=75,fText="_", color="dRed", code=setPen(23)},--GB4
|
|
WIDGET.newButton{name="b24", x=1140, y=290,w=75,fText="_", color="dGreen", code=setPen(24)},--GB5
|
|
|
|
WIDGET.newButton{name="any", x=600, y=400,w=120,color="lGrey", font=40,code=setPen(0)},
|
|
WIDGET.newButton{name="space", x=730, y=400,w=120,color="grey", font=65,code=setPen(-1)},
|
|
WIDGET.newButton{name="pushLine", x=990, y=400,w=120,h=120,color="lYellow",font=20,code=pressKey"k"},
|
|
WIDGET.newButton{name="delLine", x=1120, y=400,w=120,h=120,color="lYellow",font=20,code=pressKey"l"},
|
|
|
|
WIDGET.newButton{name="copy", x=730, y=530,w=120,color="lRed", font=35,code=pressKey"cC"},
|
|
WIDGET.newButton{name="paste", x=860, y=530,w=120,color="lBlue", font=35,code=pressKey"cV"},
|
|
WIDGET.newButton{name="clear", x=990, y=530,w=120,color="white", font=40,code=pressKey"delete"},
|
|
WIDGET.newSwitch{name="demo", x=755, y=640,disp=function()return demo end,code=function()demo=not demo end},
|
|
|
|
WIDGET.newButton{name="newPage", x=100, y=110,w=160,h=110,color="sky",font=20,code=pressKey"n"},
|
|
WIDGET.newButton{name="delPage", x=100, y=230,w=160,h=110,color="lRed",font=20,code=pressKey"m"},
|
|
WIDGET.newButton{name="prevPage", x=100, y=350,w=160,h=110,color="lGreen",font=20,code=pressKey"sTab",hide=function()return page==1 end},
|
|
WIDGET.newButton{name="nextPage", x=100, y=470,w=160,h=110,color="lGreen",font=20,code=pressKey"tab",hide=function()return page==#FIELD end},
|
|
|
|
WIDGET.newButton{name="back", x=1140, y=640, w=170,h=80,font=40,code=backScene},
|
|
}
|
|
|
|
return scene |