Compare commits

..

2 Commits

Author SHA1 Message Date
MrZ_26
17094b988b 0.190726α 2020-02-04 19:24:43 +08:00
MrZ_26
f62613638e 0.190721α 2020-02-04 19:24:00 +08:00
13 changed files with 864 additions and 648 deletions

75
SRS.lua
View File

@@ -1,75 +0,0 @@
blocks={
{[0]={{0,1,1},{1,1,0}},{{1,0},{1,1},{0,1}},{{0,1,1},{1,1,0}},{{1,0},{1,1},{0,1}}},--Z
{[0]={{1,1,0},{0,1,1}},{{0,1},{1,1},{1,0}},{{1,1,0},{0,1,1}},{{0,1},{1,1},{1,0}}},--S
{[0]={{1,1,1},{0,0,1}},{{1,1},{1,0},{1,0}},{{1,0,0},{1,1,1}},{{0,1},{0,1},{1,1}}},--L
{[0]={{1,1,1},{1,0,0}},{{1,0},{1,0},{1,1}},{{0,0,1},{1,1,1}},{{1,1},{0,1},{0,1}}},--J
{[0]={{1,1,1},{0,1,0}},{{1,0},{1,1},{1,0}},{{0,1,0},{1,1,1}},{{0,1},{1,1},{0,1}}},--T
{[0]={{1,1},{1,1}},{{1,1},{1,1}},{{1,1},{1,1}},{{1,1},{1,1}}},--O
{[0]={{1,1,1,1}},{{1},{1},{1},{1}},{{1,1,1,1}},{{1},{1},{1},{1}}},--I
}
do--SRS data
local K={0,0}
local D,E,L,S,R,Q,J,C={0,1},{1,1},{1,0},{1,-1},{0,-1},{-1,-1},{-1,0},{-1,1}
local B,I,P,F,M,T={-2,1},{-2,0},{-2,-1},{2,1},{2,0},{2,-1}
local X,Y,Z={-1,-2},{0,-2},{1,-2}
local F,G,N={-1,2},{0,2},{1,2}
scs={N,N,N,N,N,{1.5,1.5},{.5,2.5}}
SRS={
[1]={
[01]={K,J,C,Y,X,D},
[10]={K,L,S,G,N,R},
[12]={K,L,S,G,N},
[21]={K,J,C,Y,X},
[23]={K,L,E,Y,Z},
[32]={K,J,Q,G,F},
[30]={K,J,Q,G,F},
[03]={K,L,E,Y,Z},
[02]={K,L,J,R,D},
[20]={K,J,L,D,R},
[13]={K,D,R,J,L,G},
[31]={K,R,D,L,J,G},
},
[2]={
[01]={K,J,C,Y,X},
[10]={K,L,S,G,N},
[12]={K,L,S,G,N},
[21]={K,J,C,Y,X},
[23]={K,L,E,Y,Z},
[32]={K,J,Q,G,F},
[30]={K,J,Q,G,F,R},
[03]={K,L,E,Y,Z,D},
[02]={K,J,L,R,D},
[20]={K,L,J,D,R},
[13]={K,R,D,L,J,G},
[31]={K,D,R,J,L,G},
},
[5]={
[01]={K,J,C,Y,X},
[10]={K,L,S,G,N},
[12]={K,L,S,G,N},
[21]={K,J,C,Y,X},
[23]={K,L,E,Y,Z},
[32]={K,J,Q,G,F},
[30]={K,J,Q,G,F,R},
[03]={K,L,E,Y,Z,D},
[02]={K,J,L,R,D},
[20]={K,L,J,D,R},
[13]={K,R,D,L,J,G},
[31]={K,R,D,J,L,G},
},
[7]={
[01]={K,I,L,P,N},
[10]={K,M,J,F,X},
[12]={K,J,M,F,T},
[21]={K,L,I,Z,B},
[23]={K,M,J,F,X},
[32]={K,I,L,P,N},
[30]={K,L,I,Z,B},
[03]={K,J,M,F,T},
[02]={K,J,L,D},
[20]={K,L,J,R},
[13]={K,L},
[31]={K,J},
}
}SRS[3],SRS[4],SRS[6]=SRS[2],SRS[1],SRS[1]
end

70
TRS.lua Normal file
View File

@@ -0,0 +1,70 @@
blocks={
{[0]={{0,1,1},{1,1,0}},{{1,0},{1,1},{0,1}},{{0,1,1},{1,1,0}},{{1,0},{1,1},{0,1}}},--Z
{[0]={{1,1,0},{0,1,1}},{{0,1},{1,1},{1,0}},{{1,1,0},{0,1,1}},{{0,1},{1,1},{1,0}}},--S
{[0]={{1,1,1},{0,0,1}},{{1,1},{1,0},{1,0}},{{1,0,0},{1,1,1}},{{0,1},{0,1},{1,1}}},--L
{[0]={{1,1,1},{1,0,0}},{{1,0},{1,0},{1,1}},{{0,0,1},{1,1,1}},{{1,1},{0,1},{0,1}}},--J
{[0]={{1,1,1},{0,1,0}},{{1,0},{1,1},{1,0}},{{0,1,0},{1,1,1}},{{0,1},{1,1},{0,1}}},--T
{[0]={{1,1},{1,1}},{{1,1},{1,1}},{{1,1},{1,1}},{{1,1},{1,1}}},--O
{[0]={{1,1,1,1}},{{1},{1},{1},{1}},{{1,1,1,1}},{{1},{1},{1},{1}}},--I
}
do
scs={{1,2},{1,2},{1,2},{1,2},{1,2},{1.5,1.5},{.5,2.5}}
TRS={
[1]={
[01]={{0,0},{-1,0},{-1,1},{0,-2},{-1,-2},{0,1}},
[10]={{0,0},{1,0},{1,-1},{0,2},{1,2},{0,-1}},
[12]={{0,0},{1,0},{1,-1},{0,2},{1,2}},
[21]={{0,0},{-1,0},{-1,1},{0,-2},{-1,-2}},
[23]={{0,0},{1,0},{1,1},{0,-2},{1,-2}},
[32]={{0,0},{-1,0},{-1,-1},{0,2},{-1,2}},
[30]={{0,0},{-1,0},{-1,-1},{0,2},{-1,2}},
[03]={{0,0},{1,0},{1,1},{0,-2},{1,-2}},
[02]={{0,0},{1,0},{-1,0},{0,-1},{0,1}},
[20]={{0,0},{-1,0},{1,0},{0,1},{0,-1}},
[13]={{0,0},{0,1},{0,-1},{-1,0},{1,0},{0,2}},
[31]={{0,0},{0,-1},{0,1},{1,0},{-1,0},{0,2}},
},
[2]={
[01]={{0,0},{-1,0},{-1,1},{0,-2},{-1,-2}},
[10]={{0,0},{1,0},{1,-1},{0,2},{1,2}},
[12]={{0,0},{1,0},{1,-1},{0,2},{1,2}},
[21]={{0,0},{-1,0},{-1,1},{0,-2},{-1,-2}},
[23]={{0,0},{1,0},{1,1},{0,-2},{1,-2}},
[32]={{0,0},{-1,0},{-1,-1},{0,2},{-1,2}},
[30]={{0,0},{-1,0},{-1,-1},{0,2},{-1,2},{0,-1}},
[03]={{0,0},{1,0},{1,1},{0,-2},{1,-2},{0,1}},
[02]={{0,0},{-1,0},{1,0},{0,-1},{0,1}},
[20]={{0,0},{1,0},{-1,0},{0,1},{0,-1}},
[13]={{0,0},{0,-1},{0,1},{1,0},{-1,0},{0,2}},
[31]={{0,0},{0,1},{0,-1},{-1,0},{1,0},{0,2}},
},
[5]={
[01]={{0,0},{-1,0},{-1,1},{0,-2},{-1,-2}},
[10]={{0,0},{1,0},{1,-1},{0,2},{1,2}},
[12]={{0,0},{1,0},{1,-1},{0,2},{1,2}},
[21]={{0,0},{-1,0},{-1,1},{0,-2},{-1,-2}},
[23]={{0,0},{1,0},{1,1},{0,-2},{1,-2}},
[32]={{0,0},{-1,0},{-1,-1},{0,2},{-1,2}},
[30]={{0,0},{-1,0},{-1,-1},{0,2},{-1,2},{0,-1}},
[03]={{0,0},{1,0},{1,1},{0,-2},{1,-2},{0,1}},
[02]={{0,0},{-1,0},{1,0},{0,-1},{0,1}},
[20]={{0,0},{1,0},{-1,0},{0,1},{0,-1}},
[13]={{0,0},{0,-1},{0,1},{1,0},{-1,0},{0,2}},
[31]={{0,0},{0,-1},{0,1},{-1,0},{1,0},{0,2}},
},
[7]={
[01]={{0,0},{-2,0},{1,0},{-2,-1},{1,2}},
[10]={{0,0},{2,0},{-1,0},{2,1},{-1,-2}},
[12]={{0,0},{-1,0},{2,0},{-1,2},{2,-1}},
[21]={{0,0},{1,0},{-2,0},{1,-2},{-2,1}},
[23]={{0,0},{2,0},{-1,0},{2,1},{-1,-2}},
[32]={{0,0},{-2,0},{1,0},{-2,-1},{1,2}},
[30]={{0,0},{1,0},{-2,0},{1,-2},{-2,1}},
[03]={{0,0},{-1,0},{2,0},{-1,2},{2,-1}},
[02]={{0,0},{-1,0},{1,0},{0,1}},
[20]={{0,0},{1,0},{-1,0},{0,-1}},
[13]={{0,0},{1,0}},
[31]={{0,0},{-1,0}},
}
}TRS[3],TRS[4],TRS[6]=TRS[2],TRS[1],TRS[1]
end

4
ai.lua
View File

@@ -75,9 +75,9 @@ function getScore(field,cb,cx,cy)
end
return
-highest*5
-rough*15
-rough*20
-cy*15
+clear^2*3
+clear^2*4
-hole*20
end
--controlname:mL,mR,rR,rL,rF,hD,sD,H,LL,RR

View File

@@ -2,71 +2,90 @@ Buttons={
load={},
intro={},
main={
{x=500,y=300,w=320,h=60,rgb={1,0,0},alpha=0,t="Play",code=function()gotoScene("mode")end},
{x=500,y=380,w=320,h=60,rgb={0,0,1},alpha=0,t="Settings",code=function()gotoScene("setting")end},
{x=415,y=460,w=150,h=60,rgb={1,1,0},alpha=0,t="Help",code=function()gotoScene("help")end},
{x=585,y=460,w=150,h=60,rgb={0,1,1},alpha=0,t="Statistics",code=function()gotoScene("stat")end},
{x=500,y=540,w=320,h=60,rgb={.5,.5,.5},alpha=0,t="Quit",code=function()gotoScene("quit")end},
{x=240,y=300,w=320,h=60,rgb=color.red,t="Play",code=function()gotoScene("mode")end},
{x=240,y=380,w=320,h=60,rgb=color.blue,t="Settings",code=function()gotoScene("setting")end},
{x=155,y=460,w=150,h=60,rgb=color.yellow,t="Help",code=function()gotoScene("help")end},
{x=325,y=460,w=150,h=60,rgb=color.cyan,t="Statistics",code=function()gotoScene("stat")end},
{x=240,y=540,w=320,h=60,rgb=color.grey,t="Quit",code=function()gotoScene("quit")end},
},
mode={
{x=200,y=150,w=250,h=70,rgb={1,1,1},alpha=0,t="40 Lines",code=function()startGame("sprint")end},
{x=500,y=150,w=250,h=70,rgb={1,1,1},alpha=0,t="Zen",code=function()startGame("zen")end},
{x=200,y=250,w=250,h=70,rgb={1,1,1},alpha=0,t="Marathon",code=function()startGame("marathon")end},
{x=200,y=350,w=250,h=70,rgb={1,1,1},alpha=0,t="Death",code=function()startGame("death")end},
{x=500,y=250,w=250,h=70,rgb={1,1,1},alpha=0,t="Tetris 25",code=function()startGame("tetris25")end},
{x=500,y=350,w=250,h=70,rgb={1,1,1},alpha=0,t="AI Solo",code=function()startGame("solo")end},
{x=800,y=250,w=250,h=70,rgb={1,1,1},alpha=0,t="Blind",code=function()startGame("blind")end},
{x=800,y=350,w=250,h=70,rgb={1,1,1},alpha=0,t="Asymmetry Solo",code=function()startGame("asymsolo")end},
{x=500,y=520,w=350,h=80,rgb={1,1,1},alpha=0,t="Back",code=function()gotoScene("main")end},
{x=330,y=140,w=280,h=70,rgb=color.white,t="40 Lines",code=function()startGame("sprint")end},
{x=640,y=140,w=280,h=70,rgb=color.white,t="Zen",code=function()startGame("zen")end},
{x=950,y=140,w=280,h=70,rgb=color.white,t="GM Roll",code=function()startGame("gmroll")end},
{x=330,y=250,w=280,h=70,rgb=color.white,t="Marathon",code=function()startGame("marathon")end},
{x=330,y=360,w=280,h=70,rgb=color.white,t="Death",code=function()startGame("death")end},
{x=640,y=250,w=280,h=70,rgb=color.white,t="Tetris 25",code=function()startGame("tetris25")end},
{x=640,y=360,w=280,h=70,rgb=color.white,t="AI Solo",code=function()startGame("solo")end},
{x=950,y=250,w=280,h=70,rgb=color.white,t="Blind",code=function()startGame("blind")end},
{x=950,y=360,w=280,h=70,rgb=color.white,t="Asymmetry Solo",code=function()startGame("asymsolo")end},
{x=640,y=590,w=180,h=60,rgb=color.white,t="Back",code=function()gotoScene("main")end},
},
play={
{x=950,y=30,w=80,h=40,rgb={1,1,1},alpha=0,t="Back",code=function()gotoScene("mode")end},
{x=1230,y=30,w=80,h=40,rgb=color.white,t="Back",code=function()gotoScene("mode")end},
},
setting={
{x=120,y=80,w=30,h=30,rgb={1,1,1},alpha=0,t="-",code=function()setting.das=(setting.das-1)%31 end,hold=true},
{x=280,y=80,w=30,h=30,rgb={1,1,1},alpha=0,t="+",code=function()setting.das=(setting.das+1)%31 end,hold=true},
{x=320,y=80,w=30,h=30,rgb={1,1,1},alpha=0,t="-",code=function()setting.arr=(setting.arr-1)%16 end,hold=true},
{x=480,y=80,w=30,h=30,rgb={1,1,1},alpha=0,t="+",code=function()setting.arr=(setting.arr+1)%16 end,hold=true},
{x=200,y=200,w=190,h=40,rgb={1,1,1},alpha=0,t=function()return setting.ghost and"Ghost ON"or"Ghost OFF"end,code=function()setting.ghost=not setting.ghost end},
{x=400,y=200,w=190,h=40,rgb={1,1,1},alpha=0,t=function()return setting.center and"Center ON"or"Center OFF"end,code=function()setting.center=not setting.center end},
{x=700,y=80,w=280,h=50,rgb={1,1,1},alpha=0,t=function()return setting.sfx and"Disable SFX"or"Enable SFX"end,code=function()setting.sfx=not setting.sfx end},
{x=700,y=150,w=280,h=50,rgb={1,1,1},alpha=0,t=function()return setting.bgm and"Disable BGM"or"Enable BGM"end,
code=function()
setting.bgm=not setting.bgm
if setting.bgm then BGM("blank")else BGM()end
end
},
{x=700,y=220,w=280,h=50,rgb={1,1,1},alpha=0,t=function()return setting.fullscreen and"Disable fullscreen"or"Enable fullscreen"end,
{x=330,y=100,w=200,h=60,rgb=color.white,t=function()return setting.ghost and"Ghost ON"or"Ghost OFF"end,code=function()setting.ghost=not setting.ghost end},
{x=540,y=100,w=200,h=60,rgb=color.white,t=function()return setting.center and"Center ON"or"Center OFF"end,code=function()setting.center=not setting.center end},
{x=870,y=100,w=340,h=60,rgb=color.white,t=function()return setting.sfx and"Disable SFX"or"Enable SFX"end,code=function()setting.sfx=not setting.sfx end},
{x=870,y=180,w=340,h=60,rgb=color.white,t=function()return setting.bgm and"Disable BGM"or"Enable BGM"end,code=function()BGM()setting.bgm=not setting.bgmBGM("blank")end},
{x=870,y=260,w=340,h=60,rgb=color.white,t=function()return setting.fullscreen and"Disable fullscreen"or"Enable fullscreen"end,
code=function()
setting.fullscreen=not setting.fullscreen
love.window.setFullscreen(setting.fullscreen)
end
},
{x=300,y=400,w=230,h=50,rgb={1,1,1},alpha=0,t="More settings",code=function()gotoScene("setting2")end},
{x=500,y=500,w=100,h=50,rgb={1,1,1},alpha=0,t="Back",code=function()back()end},
{x=390,y=250,w=320,h=60,rgb=color.white,t="Advanced settings",code=function()gotoScene("setting2")end},
{x=640,y=590,w=180,h=60,rgb=color.white,t="Back",code=function()back()end},
},
setting2={
{x=350,y=70,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[1]end,code=function()keysetting=1 end},
{x=350,y=120,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[2]end,code=function()keysetting=2 end},
{x=350,y=170,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[3]end,code=function()keysetting=3 end},
{x=350,y=220,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[4]end,code=function()keysetting=4 end},
{x=350,y=270,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[5]end,code=function()keysetting=5 end},
{x=350,y=320,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[6]end,code=function()keysetting=6 end},
{x=350,y=370,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[7]end,code=function()keysetting=7 end},
{x=350,y=420,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[8]end,code=function()keysetting=8 end},
{x=350,y=470,w=210,h=43,rgb={1,1,1},alpha=0,t=function()return setting.key[9]end,code=function()keysetting=9 end},
{x=320,y=550,w=130,h=43,rgb={1,1,1},alpha=0,t="Reset",code=function()setting.key={"left","right","x","z","c","up","down","space","r","LEFT","RIGHT"}end},
{x=500,y=550,w=100,h=50,rgb={1,1,1},alpha=0,t="Back",code=function()back()end},
{x=850,y=90,w=40,h=40,rgb=color.white,t="-",code=function()setting.das=(setting.das-1)%31 end,hold=true},
{x=1210,y=90,w=40,h=40,rgb=color.white,t="+",code=function()setting.das=(setting.das+1)%31 end,hold=true},
{x=1260,y=90,w=40,h=40,rgb=color.white,t="-",code=function()setting.arr=(setting.arr-1)%16 end,hold=true},
{x=1430,y=90,w=40,h=40,rgb=color.white,t="+",code=function()setting.arr=(setting.arr+1)%16 end,hold=true},
{x=420,y=70,w=190,h=45,rgb=color.white,t=function()return setting.key[1]end,code=function()keysetting=1 end},
{x=420,y=130,w=190,h=45,rgb=color.white,t=function()return setting.key[2]end,code=function()keysetting=2 end},
{x=420,y=190,w=190,h=45,rgb=color.white,t=function()return setting.key[3]end,code=function()keysetting=3 end},
{x=420,y=250,w=190,h=45,rgb=color.white,t=function()return setting.key[4]end,code=function()keysetting=4 end},
{x=420,y=310,w=190,h=45,rgb=color.white,t=function()return setting.key[5]end,code=function()keysetting=5 end},
{x=420,y=370,w=190,h=45,rgb=color.white,t=function()return setting.key[6]end,code=function()keysetting=6 end},
{x=420,y=430,w=190,h=45,rgb=color.white,t=function()return setting.key[7]end,code=function()keysetting=7 end},
{x=420,y=490,w=190,h=45,rgb=color.white,t=function()return setting.key[8]end,code=function()keysetting=8 end},
{x=420,y=550,w=190,h=45,rgb=color.white,t=function()return setting.key[9]end,code=function()keysetting=9 end},
{x=420,y=630,w=120,h=55,rgb=color.white,t="Reset",code=function()setting.key={"left","right","x","z","c","up","down","space","r","LEFT","RIGHT"}end},
{x=640,y=590,w=180,h=60,rgb=color.white,t="Back",code=function()keysetting=nil;back()end},
},
help={
{x=500,y=500,w=200,h=60,rgb={1,1,1},alpha=0,t="Back",code=function()back()end},
{x=640,y=590,w=180,h=60,rgb=color.white,t="Back",code=function()back()end},
},
stat={
{x=500,y=500,w=200,h=60,rgb={1,1,1},alpha=0,t="Back",code=function()back()end},
{x=640,y=590,w=180,h=60,rgb=color.white,t="Back",code=function()back()end},
},
sel=nil,--selected button Obj
pressing=0,--pressing time
}
}
for k,v in pairs(Buttons)do
if type(v)=="table"then
for i=1,#v do
v[i].alpha=0
end
end
end
gamePad={
{x=0,y=0,r=60},--moveLeft
{x=0,y=0,r=60},--moveRight
{x=0,y=0,r=60},--rotLeft
{x=0,y=0,r=60},--rotRight
{x=0,y=0,r=60},--rotFlip
{x=0,y=0,r=60},--hardDrop
{x=0,y=0,r=60},--softDrop
{x=0,y=0,r=60},--hold
{x=0,y=0,r=60},--restart
{x=0,y=0,r=60},--toLeft
{x=0,y=0,r=60},--toRight
{x=0,y=0,r=60},--toDown
}
for i=1,#gamePad do
gamePad[i].press=false
gamePad[i].r=gamePad[i].r^2
end

View File

@@ -2,27 +2,27 @@ function love.conf(t)
local X=nil
t.identity="Techmino"--The name of the save directory (string)
t.appendidentity=X--Search files in source directory before save directory (boolean)
t.version="11.2"
t.version="11.1"
t.console=X
t.accelerometerjoystick=X--Enable the accelerometer on iOS and Android by exposing it as a Joystick (boolean)
t.externalstorage=X
t.gammacorrect=true
-- t.audio.mixwithsystem=true--Keep background music playing when opening LOVE (boolean, iOS and Android only)
t.window.title="Techmino"
t.window.title="Techmino Alpha"
t.window.icon="/image/icon.png"
t.window.width=1000
t.window.height=600
t.window.width=1280
t.window.height=720
t.window.borderless=X
t.window.resizable=true
t.window.minwidth=500
t.window.minheight=300
t.window.minwidth=640
t.window.minheight=360
t.window.fullscreen=X
t.window.fullscreentype="desktop"--Choose between "desktop" fullscreen or "exclusive" fullscreen mode (string)
t.window.vsync=0
t.window.msaa=0--The number of samples to use with multi-sampled antialiasing (number)
t.window.depth=nil--The number of bits per sample in the depth buffer
t.window.stencil=nil--The number of bits per sample in the stencil buffer
t.window.vsync=1
t.window.msaa=X--The number of samples to use with multi-sampled antialiasing (number)
t.window.depth=X--The number of bits per sample in the depth buffer
t.window.stencil=1--The number of bits per sample in the stencil buffer
t.window.display=1--Index of the monitor to show the window in (number)
t.window.highdpi=X--Enable high-dpi mode for the window on a Retina display (boolean)
t.window.x=nil

View File

@@ -1,11 +1,10 @@
function love.mousemoved(x,y)
x,y=mouseConvert(x,y)
mx,my=x,y
mx,my=mouseConvert(x,y)
Buttons.sel=nil
for i=1,#Buttons[scene]do
local B=Buttons[scene][i]
if not(B.hide and B.hide())then
if abs(x-B.x)<B.w*.5 and abs(y-B.y)<B.h*.5 then
if abs(mx-B.x)<B.w*.5 and abs(my-B.y)<B.h*.5 then
Buttons.sel=B
return nil
end
@@ -14,8 +13,8 @@ function love.mousemoved(x,y)
if not Buttons.sel then Buttons.pressing=0 end
end
function love.mousepressed(x,y,k)
x,y=mouseConvert(x,y)
if mouseDown[scene]then mouseDown[scene](x,y,k)end
mx,my=mouseConvert(x,y)
if mouseDown[scene]then mouseDown[scene](mx,my,k)end
if k==1 then
if not sceneSwaping and Buttons.sel then
local B=Buttons.sel
@@ -23,7 +22,7 @@ function love.mousepressed(x,y,k)
B.code()
B.alpha=1
Buttons.sel=nil
love.mousemoved(mx,my)
love.mousemoved(x,y)
SFX("button")
end
elseif k==3 then
@@ -33,17 +32,38 @@ end
function love.mousereleased(x,y,k)
Buttons.pressing=0
end
--[[
function love.touchpressed(id,x,y)
local i=love.touch.getTouches
if #i==1 then
love.mousemoved(x,y)
end
ins(touches,id)
end
function love.touchrealeased(id,x,y)
love.mousepressed(x,y,1)
end]]
for i=1,#touches do
if touches[i]==id then rem(touches,i)break end
end
end
function love.touchmoved(id,x,y,dx,dy)
end
function love.keypressed(i)
--[[
if Buttons.sel then
local b=Buttons.sel
if i=="up"then b.y=b.y-10
elseif i=="down"then b.y=b.y+10
elseif i=="left"then b.x=b.x-10
elseif i=="right"then b.x=b.x+10
elseif i=="k"then b.w=b.w-10
elseif i=="l"then b.w=b.w+10
elseif i==","then b.h=b.h-10
elseif i=="."then b.h=b.h+10
elseif i=="s"then
print("")
for i=1,#Buttons[scene]do
local b=Buttons[scene][i]
print(b.t,b.x,b.y,b.w,b.h)
end
end
end]]
if keyDown[scene]then keyDown[scene](i)
elseif i=="escape"then back()
end

View File

@@ -27,6 +27,8 @@ end
function game.play()
scene="play"
--curBG="game1"
resetGameData()
collectgarbage()
SFX("ready")
end
function game.setting()

Binary file not shown.

Before

Width:  |  Height:  |  Size: 9.3 KiB

After

Width:  |  Height:  |  Size: 10 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 5.1 KiB

After

Width:  |  Height:  |  Size: 5.2 KiB

883
main.lua

File diff suppressed because it is too large Load Diff

246
paint.lua
View File

@@ -1,73 +1,116 @@
swapDeck_data={
{4,0,1,1},{6,0,15,1},{5,0,9,1},{6,0,6,1},
{1,0,3,1},{3,0,12,1},{1,1,8,1},{2,1,4,2},
{3,2,13,2},{4,1,12,2},{5,2,1,2},{7,1,11,2},
{2,1,9,3},{3,0,6,3},{4,2,14,3},{1,0,4,4},
{7,1,1,4},{6,0,2,4},{5,2,6,4},{6,0,14,5},
{3,3,15,5},{4,0,7,6},{7,1,10,5},{5,0,2,6},
{2,1,1,7},{1,0,4,6},{4,1,13,5},{1,1,6,7},
{5,3,11,5},{3,2,11,7},{6,0,8,7},{4,2,12,8},
{7,0,8,9},{1,0,2,8},{5,2,4,8},{6,0,15,8},
}--Block id [ZSLJTOI] ,dir,x,y
swap={
none={2,1,d=function()end},
flash={8,1,d=function()gc.clear(1,1,1)end},
deck={42,1,d=function()
local t=sceneSwaping.time
gc.setColor(1,1,1)
if t>6 then
for i=1,43-t do
local bn=swapDeck_data[i][1]
local b=blocks[bn][swapDeck_data[i][2]]
local cx,cy=swapDeck_data[i][3],swapDeck_data[i][4]
for y=1,#b do for x=1,#b[1]do
if b[y][x]>0 then
gc.draw(blockSkin[bn],80*(cx+x-2),80*(10-cy-y),nil,8/3)
end
end end
end
else
gc.clear(1,1,1)
end
end
},
}--Scene swapping animations
function drawButton()
for i=1,#Buttons[scene]do
local B=Buttons[scene][i]
if not(B.hide and B.hide())then
local t=B==Buttons.sel and .3 or 0
B.alpha=abs(B.alpha-t)>.02 and(B.alpha+(B.alpha<t and .02 or -.02))or t
if B.alpha>t then B.alpha=B.alpha-.02 elseif B.alpha<t then B.alpha=B.alpha+.02 end
gc.setColor(B.rgb[1],B.rgb[2],B.rgb[3],B.alpha)
gc.rectangle("fill",B.x-B.w*.5,B.y-B.h*.5,B.w,B.h)
local t=B.t
if type(t)=="function"then t=t()
end
gc.setColor(B.rgb[1],B.rgb[2],B.rgb[3],.3)
gc.setLineWidth(5)gc.rectangle("line",B.x-B.w*.5,B.y-B.h*.5,B.w,B.h)
mStr(t,B.x-1,B.y-1-currentFont*.5)
mStr(t,B.x-1,B.y+1-currentFont*.5)
mStr(t,B.x+1,B.y-1-currentFont*.5)
mStr(t,B.x+1,B.y+1-currentFont*.5)
gc.setColor(B.rgb)
gc.setLineWidth(3)gc.rectangle("line",B.x-B.w*.5,B.y-B.h*.5,B.w,B.h)
mStr(t,B.x,B.y-currentFont*.5)
end
end
end
function drawDial(x,y,speed)
gc.push("transform")
gc.translate(x,y)
gc.setColor(1,1,1)
mStr(int(speed),0,-14)
gc.setColor(.6,.6,.6)gc.setLineWidth(5)
gc.circle("line",0,0,30)
gc.setColor(1,1,1)gc.setLineWidth(2)
gc.circle("line",0,0,30)
gc.rotate(2.0944+(speed<=175 and .020944*speed or 4.712389-52.35988/(speed-125)))
gc.setColor(.4,.4,.4,.5)gc.setLineWidth(5)
gc.line(0,0,22,0)
gc.setColor(.6,.6,.6,.5)gc.setLineWidth(3)
gc.line(0,0,22,0)
gc.pop()
end
function drawPixel(y,x,id,alpha)
gc.setColor(1,1,1,alpha)
gc.draw(blockSkin[id],30*x-30,600-30*y)
end
Pnt={BG={}}
function Pnt.BG.none()
gc.clear(.2,.2,.2)
end
function Pnt.BG.menu()
gc.setLineWidth(40)
gc.setColor(1,.9,.9)
local t=(Timer()%1)*100
for i=-6,9 do
gc.line(t+100*i,-50,t+100*i+600,650)
end
gc.setLineWidth(2)
gc.clear(.1,.1,.1)
end
function Pnt.BG.game1()
gc.setColor(1,1,1)
gc.draw(background[1],500,300,Timer()*.15,nil,nil,600,600)
gc.draw(background[1],640,360,Timer()*.15,nil,nil,768,768)
end
function Pnt.BG.game2()
gc.setColor(1,.5,.5)
gc.draw(background[1],500,300,Timer()*.15,nil,nil,600,600)
gc.draw(background[1],640,360,Timer()*.15,nil,nil,768,768)
end
function Pnt.BG.game3()
gc.push("transform")
gc.translate(500,300)
gc.scale(1,.6)
gc.setColor(1,.9,.9)
gc.setLineWidth(30)
local t=(Timer()%1)*60
for x=0,8 do
local d=60*x+t
gc.rectangle("line",-d,-d,2*d,2*d)
end
gc.setLineWidth(2)
gc.pop()
end
function Pnt.BG.game4()
local t=215+sin(Timer()*6)*40
gc.setColor(255,t,t)
gc.rectangle("fill",0,0,1000,600)
end
function Pnt.BG.game5()
gc.setColor(1,.9,.9)
local t=(Timer()%1)*50
for x=0,20 do
for y=0,12 do
if(x+y)%2==0 then
gc.rectangle("fill",50*x-t,50*y-t,50,50)
end
end
end
gc.setColor(.6,.6,1)
gc.draw(background[1],640,360,Timer()*.15,nil,nil,768,768)
end
function Pnt.load()
if loadprogress then
gc.setLineWidth(3)
gc.setLineWidth(4)
gc.setColor(.8,.8,.8)
gc.rectangle("fill",200,280,loadprogress*600,40)
gc.rectangle("fill",340,340,loadprogress*640,40)
gc.setColor(1,1,1)
gc.rectangle("line",200,280,600,40)
gc.rectangle("line",340,340,640,40)
setFont(30)
mStr("Loading...",500,285)
mStr("Loading...",640,345)
end
end
function Pnt.intro()
gc.setColor(1,1,1)
gc.draw(img.title[setting.lang],500,300,nil,nil,nil,250,100)
end
function Pnt.main()
gc.setColor(1,1,1)
gc.draw(img.title[setting.lang],500,120,nil,nil,nil,250,60)
setFont(30)
gc.print("Alpha 0.0.19726",370,150)
gc.draw(img.title[setting.lang],30,30)
end
function Pnt.play()
for p=1,#players do
@@ -75,10 +118,10 @@ function Pnt.play()
setmetatable(_G,P.index)
gc.push("transform")
gc.translate(x,y)gc.scale(size)--Scale
gc.setColor(0,0,0,.8)gc.rectangle("fill",0,0,620,690)--Black Background
gc.setColor(0,0,0,.8)gc.rectangle("fill",0,0,600,690)--Black Background
gc.setLineWidth(3)
gc.setColor(1,1,1)gc.rectangle("line",0,0,620,690)--Big frame
gc.translate(160,70)
gc.setColor(1,1,1)gc.rectangle("line",0,0,600,690)--Big frame
gc.translate(150,70)
gc.stencil(stencil_field, "replace", 1)
gc.translate(0,fieldBeneath)
love.graphics.setStencilTest("equal",1)
@@ -91,34 +134,41 @@ function Pnt.play()
end
else
gc.setColor(1,1,1,falling/gameEnv.fall)
gc.rectangle("fill",0,600-30*j,300,30)
gc.rectangle("fill",0,600-30*j,320,30)
end
end--Field
if waiting<=0 then
if gameEnv.ghost then
for i=1,r do for j=1,c do
if cb[i][j]>0 then
drawPixel(i+y_img-1,j+cx-1,gameEnv.color[bn],.4)
drawPixel(i+y_img-1,j+cx-1,bn,.3)
end
end end
end--Ghost
gc.setColor(1,1,1,lockDelay/gameEnv.lock)
for i=1,r do for j=1,c do
if cb[i][j]>0 then
gc.rectangle("fill",30*(j+cx-1)-35,595-30*(i+cy-1),40,40)
gc.rectangle("fill",30*(j+cx-1)-34,596-30*(i+cy-1),38,38)
end
end end--BlockShade(lockdelay indicator)
for i=1,r do for j=1,c do
if cb[i][j]>0 then
drawPixel(i+cy-1,j+cx-1,gameEnv.color[bn],1)
drawPixel(i+cy-1,j+cx-1,bn,1)
end
end end--Block
if gameEnv.center then
local x=30*(cx+sc[2]-1)-30+15
gc.circle("fill",x,600-30*(cy+sc[1]-1)+15,4)
gc.setColor(1,1,1,.5)
gc.circle("fill",x,600-30*(y_img+sc[1]-1)+15,4)
end--Rotate center
end
gc.setColor(1,1,1)
gc.draw(PTC.dust[p])--Draw game field
love.graphics.setStencilTest()--In-field mask
love.graphics.setStencilTest()--In-playField mask
gc.translate(0,-fieldBeneath)
gc.setColor(1,1,1)gc.rectangle("line",-1,-1,300,600)--Draw boarder
local h=0
for i=1,#atkBuffer do
local a=atkBuffer[i]
@@ -133,11 +183,11 @@ function Pnt.play()
gc.rectangle("fill",302,600-h,8,-bar+5)
gc.setColor(1,1,0)
gc.rectangle("fill",302,600-h+(-bar+5),8,-(-bar+5)*(1-a.countdown/a.cd0))
--Time count
--Timing
else
gc.setColor(1,(sin((Timer()-i)*20)+1)*.5,0)
gc.rectangle("fill",302,600-h,8,-bar+5)
--warning
--Warning
end
else
gc.setColor(1,0,0)
@@ -156,7 +206,7 @@ function Pnt.play()
for i=1,#hb do
for j=1,#hb[1] do
if hb[i][j]>0 then
drawPixel(i+17.5-#hb*.5,j-2.5-#hb[1]*.5,holded and 13 or gameEnv.color[hn],1)
drawPixel(i+17.5-#hb*.5,j-2.5-#hb[1]*.5,holded and 13 or hn,1)
end
end
end
@@ -168,7 +218,7 @@ function Pnt.play()
for i=1,#b do
for j=1,#b[1] do
if b[i][j]>0 then
drawPixel(i+20-2.4*N-#b*.5,j+12.5-#b[1]*.5,gameEnv.color[nxt[N]],1)
drawPixel(i+20-2.4*N-#b*.5,j+12.5-#b[1]*.5,nxt[N],1)
end
end
end
@@ -185,22 +235,20 @@ function Pnt.play()
for i=1,#bonus do
bonus[i]:draw()
end--Effects
if mesDisp[gamemode]then mesDisp[gamemode]()end--Draw message
setFont(45)
gc.translate(380,550)
gc.setColor(1,1,1)
mStr(int(dropSpeed),0,-21)
gc.setColor(.6,.6,.6)gc.setLineWidth(5)
gc.circle("line",0,0,50)
gc.setColor(1,1,1)gc.setLineWidth(2)
gc.circle("line",0,0,50)
gc.rotate(2.0944+(dropSpeed<=175 and .020944*dropSpeed or 4.712389-52.35988/(dropSpeed-125)))
gc.setColor(.4,.4,.4,.5)gc.setLineWidth(5)
gc.line(0,0,40,0)
gc.setColor(.6,.6,.6,.5)gc.setLineWidth(3)
gc.line(0,0,40,0)
--Speed dial
gc.setColor(1,1,1)
setFont(40)
gc.print(format("%0.2f",time),-125,530)--Draw time
if mesDisp[gamemode]then mesDisp[gamemode]()end--Draw other message
setFont(15)
gc.setColor(1,1,1)
gc.print("BPM",380,490)
gc.print("KPM",335,580)
setFont(30)
drawDial(350,520,dropSpeed)
drawDial(400,570,keySpeed)
--Speed dials
gc.pop()
end--Draw players
gc.setLineWidth(3)
@@ -222,38 +270,40 @@ function Pnt.play()
end
setmetatable(_G,nil)
end
function Pnt.setting()
setFont(30)
gc.setColor(1,1,1)
mStr("DAS:"..setting.das,200,65)
mStr("ARR:"..setting.arr,400,65)
end
function Pnt.setting2()
setFont(30)
setFont(35)
gc.setColor(1,1,1)
mStr("DAS:"..setting.das,330,72)
mStr("ARR:"..setting.arr,545,72)
gc.setColor(1,1,1)
for i=1,9 do
gc.printf(actName_[i]..":",80,5+50*i,150,"right")
gc.printf(actName_show[i]..":",100,60*i-8,200,"right")
end
if keysetting then
setFont(35)
gc.print("<<",470,50*keysetting)
gc.print("<<",550,60*keysetting-10)
end
end
function Pnt.help()
setFont(32)
gc.setColor(1,1,1)
gc.draw(img.title[setting.lang],60,420,.2,.5+.05*sin(Timer()*2))
for i=1,11 do
mStr(Text.help[i],640,15+43*i)
end
gc.draw(img.title[setting.lang],180,600,.2,.7+.05*sin(Timer()*2),nil,140,100)
end
function Pnt.stat()
setFont(30)
gc.setColor(1,1,1)
gc.print(Text.stat[1],250,60)
gc.print(Text.stat[2],250,100)
gc.print(Text.stat[3],250,140)
gc.print(Text.stat[4],250,180)
gc.print(stat.game,600,60)
gc.print(format("%0.2f",stat.gametime).."s",600,100)
gc.print(stat.piece,600,140)
gc.print(stat.row,600,180)
gc.draw(img.title[setting.lang],60,420,.2,.5+.05*sin(Timer()*2))
for i=1,6 do
gc.print(Text.stat[i],250,20+40*i)
end
gc.print(stat.run,600,60)
gc.print(stat.game,600,100)
gc.print(format("%0.2f",stat.gametime).."s",600,140)
gc.print(stat.piece,600,180)
gc.print(stat.row,600,220)
gc.print(stat.atk,600,260)
gc.draw(img.title[setting.lang],180,600,.2,.7+.05*sin(Timer()*2),nil,140,100)
end

View File

@@ -28,17 +28,18 @@ function Tmr.load()
else
for i=1,#sfx do sfx[i]=nil end
loading=4
loadnum=1
loadnum=0
end
elseif loading==4 then
loadnum=loadnum+1
if loadnum==20 then
if loadnum==15 then
gotoScene("main")
end
end
end
function Tmr.play(dt)
frame=frame+1
stat.gametime=stat.gametime+dt
if count then
count=count-1
if count==0 then
@@ -49,6 +50,7 @@ function Tmr.play(dt)
_G.P=P
setmetatable(_G,P.index)
P.control=true
P.timing=true
resetblock()
end
setmetatable(_G,nil)
@@ -56,13 +58,12 @@ function Tmr.play(dt)
SFX("ready")
end
return nil
end
end--Start counting
for p=1,#players do
P=players[p]
setmetatable(_G,P.index)
if timing then P.time=time+dt end
if alive then
if control then P.time=time+dt end
local v=0
for i=2,10 do v=v+i*(i-1)*7.2/(frame-keyTime[i])end P.keySpeed=keySpeed*.99+v*.1
v=0 for i=2,10 do v=v+i*(i-1)*7.2/(frame-dropTime[i])end P.dropSpeed=dropSpeed*.99+v*.1
@@ -118,6 +119,7 @@ function Tmr.play(dt)
end
P.clearing={}
end
--Rows cleared drop
elseif waiting>0 then
P.waiting=waiting-1
if waiting<=0 then
@@ -137,7 +139,26 @@ function Tmr.play(dt)
end
end
end
end--If alive
else--Alive
P.keySpeed=keySpeed*.96+cstat.key/time*60*.04
P.dropSpeed=dropSpeed*.96+cstat.piece/time*60*.04
--Final average speeds
if falling>0 then
P.falling=falling-1
if falling<=0 then
if #field>clearing[1]then SFX("fall")end
for i=1,#clearing do
rem(field,clearing[i])
rem(visTime,clearing[i])
end
P.clearing={}
end
end--Rows cleared drop
for j=1,#field do for i=1,10 do
if visTime[j][i]<20 then P.visTime[j][i]=visTime[j][i]+.5 end
end end
--Make field visible
end--Dead
for i=#bonus,1,-1 do
bonus[i].t=bonus[i].t+1
if bonus[i].t>60 then rem(bonus,i)end

View File

@@ -4,11 +4,9 @@ act={
if not ifoverlap(cb,cx-1,cy)then
P.cx=cx-1
freshgho()
P.freshTime=P.freshTime+1
if P.freshTime<=gameEnv.freshLimit then
P.lockDelay=gameEnv.lock
end
freshLockDelay()
if cy==y_img then SFX("move")end
P.spinLast=false
end
end,
moveRight=function(auto)
@@ -16,17 +14,16 @@ act={
if not ifoverlap(cb,cx+1,cy)then
P.cx=cx+1
freshgho()
P.freshTime=P.freshTime+1
if P.freshTime<=gameEnv.freshLimit then
P.lockDelay=gameEnv.lock
end
freshLockDelay()
if cy==y_img then SFX("move")end
P.spinLast=false
end
end,
hardDrop=function()
if P.waiting<=0 then
if cy~=y_img then
P.cy=y_img
P.spinLast=false
SFX("drop")
end
drop()
@@ -43,11 +40,12 @@ act={
hold=hold,
--Player movements
restart=function()
startGame(gamemode)
resetGameData()
count=60+26--Althour'z neim
end,
down1=function()drop()end,
down4=function()for i=1,4 do if cy~=y_img then drop()else break end end end,
toDown=function()P.cy,P.lockDelay=y_img,gameEnv.lock end,
toDown=function()if cy~= y_img then P.cy,P.lockDelay,P.spinLast=y_img,gameEnv.lock,false end end,
toLeft=function()while not ifoverlap(cb,cx-1,cy)do P.cx,P.lockDelay=cx-1,gameEnv.lock;freshgho()end end,
toRight=function()while not ifoverlap(cb,cx+1,cy)do P.cx,P.lockDelay=cx+1,gameEnv.lock;freshgho()end end,
quit=function()Event.gameover.lose()end,