Compare commits

...

7 Commits

Author SHA1 Message Date
MrZ_26
5eea97dd8b Alpha V0.7.20 2020-02-04 19:34:54 +08:00
MrZ_26
f0a118e714 Alpha V0.7.19 2020-02-04 19:34:43 +08:00
MrZ_26
3019f83999 Alpha V0.7.18 2020-02-04 19:34:16 +08:00
MrZ_26
438046f77f Alpha V0.7.17 2020-02-04 19:34:07 +08:00
MrZ_26
830f0ffbed Alpha V0.7.16 2020-02-04 19:33:52 +08:00
MrZ_26
849e5b586e Alpha V0.7.15 2020-02-04 19:33:41 +08:00
MrZ_26
f82e979f9c Alpha V0.7.14 2020-02-04 19:33:20 +08:00
84 changed files with 2445 additions and 1496 deletions

BIN
BGM/8-bit happiness.ogg Normal file

Binary file not shown.

Binary file not shown.

BIN
SFX/ren_mega.ogg Normal file

Binary file not shown.

BIN
SFX/swipe.ogg Normal file

Binary file not shown.

BIN
VOICE/I_1.ogg Normal file

Binary file not shown.

BIN
VOICE/I_2.ogg Normal file

Binary file not shown.

BIN
VOICE/J_1.ogg Normal file

Binary file not shown.

BIN
VOICE/J_2.ogg Normal file

Binary file not shown.

BIN
VOICE/L_1.ogg Normal file

Binary file not shown.

BIN
VOICE/L_2.ogg Normal file

Binary file not shown.

BIN
VOICE/O_1.ogg Normal file

Binary file not shown.

BIN
VOICE/O_2.ogg Normal file

Binary file not shown.

BIN
VOICE/PC_1.ogg Normal file

Binary file not shown.

BIN
VOICE/S_1.ogg Normal file

Binary file not shown.

BIN
VOICE/S_2.ogg Normal file

Binary file not shown.

BIN
VOICE/T_1.ogg Normal file

Binary file not shown.

BIN
VOICE/T_2.ogg Normal file

Binary file not shown.

BIN
VOICE/Z_1.ogg Normal file

Binary file not shown.

BIN
VOICE/Z_2.ogg Normal file

Binary file not shown.

BIN
VOICE/b2b_1.ogg Normal file

Binary file not shown.

BIN
VOICE/b2b_2.ogg Normal file

Binary file not shown.

BIN
VOICE/b2b_3.ogg Normal file

Binary file not shown.

BIN
VOICE/b3b_1.ogg Normal file

Binary file not shown.

BIN
VOICE/double_1.ogg Normal file

Binary file not shown.

BIN
VOICE/double_2.ogg Normal file

Binary file not shown.

BIN
VOICE/double_3.ogg Normal file

Binary file not shown.

BIN
VOICE/lose_1.ogg Normal file

Binary file not shown.

BIN
VOICE/lose_2.ogg Normal file

Binary file not shown.

BIN
VOICE/lose_3.ogg Normal file

Binary file not shown.

BIN
VOICE/mini_1.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_1.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_11.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_12.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_13.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_2.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_21.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_22.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_3.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_31.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_4.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_o0.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_o1.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_o2.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_o3.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_o4.ogg Normal file

Binary file not shown.

BIN
VOICE/nya_o5.ogg Normal file

Binary file not shown.

BIN
VOICE/single_1.ogg Normal file

Binary file not shown.

BIN
VOICE/single_2.ogg Normal file

Binary file not shown.

BIN
VOICE/single_3.ogg Normal file

Binary file not shown.

BIN
VOICE/spin-_1.ogg Normal file

Binary file not shown.

BIN
VOICE/spin-_2.ogg Normal file

Binary file not shown.

BIN
VOICE/spin_1.ogg Normal file

Binary file not shown.

BIN
VOICE/spin_2.ogg Normal file

Binary file not shown.

BIN
VOICE/spin_3.ogg Normal file

Binary file not shown.

BIN
VOICE/spin_4.ogg Normal file

Binary file not shown.

BIN
VOICE/spin_5.ogg Normal file

Binary file not shown.

BIN
VOICE/triple_1.ogg Normal file

Binary file not shown.

BIN
VOICE/triple_2.ogg Normal file

Binary file not shown.

BIN
VOICE/tts_1.ogg Normal file

Binary file not shown.

BIN
VOICE/win_1.ogg Normal file

Binary file not shown.

BIN
VOICE/win_2.ogg Normal file

Binary file not shown.

Binary file not shown.

8
ai.lua
View File

@@ -60,7 +60,7 @@ function resetField(f0,f,start)
goto L
end
for i=start,#f0 do
f[i]=getNewRow()
f[i]=getNewRow(0)
for j=1,10 do
f[i][j]=f0[i][j]
end
@@ -69,7 +69,7 @@ end
function getScore(field,bn,cb,cx,cy)
local score=0
local highest=0
local height=getNewRow()
local height=getNewRow(0)
local clear=0
local hole=0
@@ -124,7 +124,7 @@ function AI_getControls(ctrl)
local Tfield={}--test field
local field_org=P.field
for i=1,#field_org do
Tfield[i]=getNewRow()
Tfield[i]=getNewRow(0)
for j=1,10 do
Tfield[i][j]=field_org[i][j]
end
@@ -142,7 +142,7 @@ function AI_getControls(ctrl)
end--move to bottom
for i=1,#cb do
local y=cy+i-1
if not Tfield[y]then Tfield[y]=getNewRow()end
if not Tfield[y]then Tfield[y]=getNewRow(0)end
for j=1,#cb[1]do
if cb[i][j]then
Tfield[y][cx+j-1]=1

File diff suppressed because it is too large Load Diff

View File

@@ -29,16 +29,9 @@ function clearTask(opt)
end
end
function Task:update()
if self.code(self.P,self.data)then
self:destroy()
return nil
end
end
function Task:destroy()
for i=#Task,1,-1 do
if Task[i]==self then
rem(Task,i)
return nil
end
if(not self.P or self.P and scene=="play")and self:code(self.P,self.data)then
for i=#Task,1,-1 do
if Task[i]==self then rem(Task,i)return end
end--Destroy
end
end

View File

@@ -9,7 +9,7 @@ function love.conf(t)
t.audio.mixwithsystem=true--Switch on to keep sysBGM
local W=t.window
W.title="Techmino V0.7.13+"
W.title="Techmino V0.7.20"
W.icon="/image/icon.png"
W.width,W.height=1280,720
W.minwidth,W.minheight=640,360

File diff suppressed because it is too large Load Diff

BIN
font.ttf

Binary file not shown.

View File

@@ -1,3 +1,4 @@
local gc=love.graphics
local blockPos={4,4,4,4,4,5,4}
local renATK={[0]=0,0,0,1,1,2,2,3,3,4,4}--3 else
local b2bPoint={50,100,180}
@@ -6,7 +7,9 @@ local testScore={[-1]=1,[-2]=0,[-3]=1,2,2,2}
local visible_opt={show=1e99,time=300,fast=20,none=5}
local reAtk={0,0,1,1,1,2,2,3,3}
local reDef={0,1,1,2,3,3,4,4,5}
local spin_n={"spin_1","spin_2","spin_3"}
local blockName={"Z","S","L","J","T","O","I"}
local clearName={"single","double","triple"}
local spin_n={[0]="spin_0","spin_1","spin_2","spin_3"}
local clear_n={"clear_1","clear_2","clear_3","clear_4"}
local ren_n={}for i=1,11 do ren_n[i]="ren_"..i end
@@ -105,9 +108,9 @@ local freshMethod={
newNext(i)
end,--random
pc=function()
if P.cstat.piece%4==0 then
if P.stat.piece%4==0 then
local r=rnd(#PClist)
local f=P.cstat.event==1
local f=P.modeData.event==1
for i=1,4 do
local b=PClist[r][i]
if f then
@@ -117,7 +120,7 @@ local freshMethod={
end
newNext(b)
end
P.cstat.event=(P.cstat.event+1)%2
P.modeData.event=(P.modeData.event+1)%2
end
end,
drought1=function()
@@ -130,7 +133,7 @@ local freshMethod={
end,
drought2=function()
if #P.next<6 then
local bag={1,1,1,2,2,2,3,3,3,4,4,4,6,6,6,5,7}
local bag={1,1,1,1,2,2,2,2,6,6,6,6,3,3,4,4,5,7}
::L::
newNext(rem(bag,rnd(#bag)))
if bag[1]then goto L end
@@ -147,7 +150,7 @@ local shadeColor={
{0,1,1,.3},
}
local function createShade(x1,y1,x2,y2)--x1<x2,y1>y2
if not P.small and P.showTime>=20 and setting.fxs and y1>=y2 then
if P.gameEnv.block and y1>=y2 then
ins(P.shade,{5,P.cur.color,x1,y1,x2,y2})
end
end
@@ -157,13 +160,46 @@ function loadGame(mode,level)
PTC.attack[1]:reset()PTC.attack[2]:reset()PTC.attack[3]:reset()
drawableText.modeName:set(text.modeName[mode])
drawableText.levelName:set(modeLevel[modeID[mode]][level])
needResetGameData=true
gotoScene("play","deck")
end
function resetPartGameData()
frame=30
if players then
for _,P in next,players do if P.id then
while P.field[1]do
removeRow(P.field)
removeRow(P.visTime)
end
end end
end
players={alive={}}human=0
loadmode[curMode.id]()
if modeEnv.royaleMode then
for i=1,#players do
changeAtk(players[i],randomTarget(players[i]))
end
end
for i=1,#virtualkey do
virtualkey[i].press=false
end
collectgarbage()
end
function resetGameData()
gamefinished=false
frame=0
garbageSpeed=1
pushSpeed=3
pauseTime=0--Time paused
pauseCount=0--Times paused
if players then
for _,P in next,players do if P.id then
while P.field[1]do
removeRow(P.field)
removeRow(P.visTime)
end
end end
end
players={alive={}}human=0
modeEnv=defaultModeEnv[curMode.id][curMode.lv]or defaultModeEnv[curMode.id][1]
loadmode[curMode.id]()
@@ -171,7 +207,7 @@ function resetGameData()
BGM(modeEnv.bgm)
FX.beam={}
for k,v in pairs(PTC.dust)do
for _,v in next,PTC.dust do
v:release()
end
for i=1,#players do
@@ -193,15 +229,15 @@ function resetGameData()
virtualkey[i].press=false
end
stat.game=stat.game+1
freeRow={}
collectgarbage()
for i=1,30*#players do
freeRow[i]={0,0,0,0,0,0,0,0,0,0}
local p=60*#players
while freeRow[p]do
rem(freeRow)
end
SFX("ready")
collectgarbage()
end
function gameStart()
sysSFX("start")
SFX("start")
for P=1,#players do
P=players[P]
_G.P=P
@@ -218,12 +254,16 @@ function createPlayer(id,x,y,size,AIspeed,data)
ins(players.alive,P)
P.index={__index=P}
P.x,P.y,P.size=x,y,size or 1
P.small=P.size<.3
P.fieldOffX,P.fieldOffY=0,0
P.small=P.size<.1
if P.small then
P.centerX,P.centerY=P.x+150*P.size,P.y+300*P.size
P.size=P.size*5
P.centerX,P.centerY=P.x+300*P.size,P.y+600*P.size
P.canvas=gc.newCanvas(60,120)
P.frameWait=rnd(30,120)
else
P.centerX,P.centerY=P.x+300*P.size,P.y+670*P.size
P.absFieldX=P.x+150*P.size
P.absFieldY=P.y+60*P.size
end
if AIspeed then
@@ -233,18 +273,22 @@ function createPlayer(id,x,y,size,AIspeed,data)
controlDelay0=AIspeed,
}
else
P.human=true
human=human+1
end
P.alive=true
P.control=false
P.timing=false
P.time=0
P.cstat={
key=0,piece=0,row=0,atk=0,
techrash=0,pc=0,
point=0,event=0
P.stat={
time=0,
key=0,rotate=0,hold=0,piece=0,row=0,
atk=0,send=0,recv=0,pend=0,
clear_1=0,clear_2=0,clear_3=0,clear_4=0,
spin_0=0,spin_1=0,spin_2=0,spin_3=0,
pc=0,b2b=0,b3b=0,
}--Current gamestat
P.modeData={point=0,event=0}--data use by mode
P.keyTime={}for i=1,10 do P.keyTime[i]=-1e5 end P.keySpeed=0
P.dropTime={}for i=1,10 do P.dropTime[i]=-1e5 end P.dropSpeed=0
@@ -345,7 +389,10 @@ function garbageSend(S,R,send,time)
sent=false,
lv=min(int(send^.69),5),
})
if R.id==1 then sysSFX(send<4 and "blip_1"or"blip_2",min(send+1,5)*.1)end
R.stat.recv=R.stat.recv+send
if R.human then
SFX(send<4 and "blip_1"or"blip_2",min(send+1,5)*.1)
end
end
end
function garbageRelease()
@@ -354,6 +401,7 @@ function garbageRelease()
if not A.sent and A.countdown<=0 then
garbageRise(8+A.lv,A.amount,A.pos)
P.atkBuffer.sum=P.atkBuffer.sum-A.amount
P.stat.pend=P.stat.pend+A.amount
A.sent=true
A.time=0
end
@@ -367,8 +415,12 @@ function garbageRise(color,amount,pos)
P.field[1][pos]=0
end
P.fieldBeneath=P.fieldBeneath+amount*30
P.curY,P.y_img=P.curY+amount,P.y_img+amount
if #P.field>40 then Event_gameover.lose()end
P.curY=P.curY+amount
freshgho()
for i=1,#P.clearing do
P.clearing[i]=P.clearing[i]+amount
end
if #P.field>40 then Event.lose()end
end
function createBeam(S,R,lv)--Player id
local x1,y1,x2,y2
@@ -378,23 +430,23 @@ function createBeam(S,R,lv)--Player id
x1,y1=S.x+(30*(P.curX+P.sc[2]-1)-30+15+150)*S.size,S.y+(600-30*(P.curY+P.sc[1]-1)+15+70)*S.size
end
if R.small then
x2,y2=R.x+150*R.size*.2,R.y+300*R.size*.2
x2,y2=R.centerX,R.centerY
else
x2,y2=R.x+308*R.size,R.y+450*R.size
end
ins(FX.beam,{x1,y1,x2,y2,t=0,lv=lv})
end
function throwBadge(S,R)--Player id
function throwBadge(S,R)--Sender/Receiver
local x1,y1,x2,y2
if S.small then
x1,y1=S.x+30*S.size,S.y+60*S.size
x1,y1=S.centerX,S.centerY
else
x1,y1=S.x+308*S.size,S.y+450*S.size
end
if R.small then
x2,y2=R.x+30*R.size,R.y+60*R.size
x2,y2=R.centerX,R.centerY
else
x2,y2=R.x+73*R.size,R.y+345*R.size
x2,y2=R.x+70*R.size,R.y+344*R.size
end
ins(FX.badge,{x1,y1,x2,y2,t=0})
end
@@ -528,7 +580,10 @@ function freshgho()
goto L
end
if P.curY>P.y_img then
createShade(P.curX,P.curY+1,P.curX+P.c-1,P.y_img+P.r-1)
if P.human and setting.fxs then
createShade(P.curX,P.curY+1,P.curX+P.c-1,P.y_img+P.r-1)
P.fieldOffY=4
end
P.curY=P.y_img
end
else
@@ -600,7 +655,7 @@ function resetblock()
P.curX=P.curX+(P.moving>0 and 1 or -1)
end--Initial SYSs
if ifoverlap(P.cur.bk,P.curX,P.curY)then lock()Event_gameover.lose()end
if ifoverlap(P.cur.bk,P.curX,P.curY)then lock()Event.lose()end
freshgho()
if P.keyPressing[6]then act.hardDrop()P.keyPressing[6]=false end
end
@@ -608,7 +663,9 @@ function spin(d,ifpre)
local idir=(P.dir+d)%4
if P.cur.id==6 then
freshLockDelay()
SFX(ifpre and"prerotate"or"rotate")
if P.human then
SFX(ifpre and"prerotate"or"rotate")
end
if P.gameEnv.ospin and P.freshTime>10 then
if d==1 then
if P.curY==P.y_img and solid(P.curX+2,P.curY+1)and solid(P.curX+2,P.curY)and solid(P.curX-1,P.curY+1)and not solid(P.curX-1,P.curY)then
@@ -632,24 +689,24 @@ function spin(d,ifpre)
P.curX=P.curX-1
goto I
end
goto E
goto quit
::T::
P.cur.id=5
P.cur.bk=blocks[5][0]
P.sc=scs[5][0]
P.r,P.c,P.dir=2,3,0
P.spinLast=3
if P.id==1 then stat.rotate=stat.rotate+1 end
goto E
P.stat.rotate=P.stat.rotate+1
goto quit
::I::
P.cur.id=7
P.cur.bk=blocks[7][2]
P.sc=scs[7][2]
P.r,P.c,P.dir=1,4,2
P.spinLast=3
if P.id==1 then stat.rotate=stat.rotate+1 end
end
::E::return
P.stat.rotate=P.stat.rotate+1
end
goto quit
end
local icb=blocks[P.cur.id][idir]
local isc=scs[P.cur.id][idir]
@@ -664,19 +721,22 @@ function spin(d,ifpre)
goto spin
end
end
goto fail
goto quit
::spin::
if P.human and setting.fxs then
createShade(P.curX,P.curY+P.r-1,P.curX+P.c-1,P.curY)
end
P.curX,P.curY,P.dir=ix,iy,idir
P.sc,P.cur.bk=scs[P.cur.id][idir],icb
P.r,P.c=ir,ic
P.spinLast=t==2 and testScore[-d]or 2
freshgho()
freshLockDelay()
SFX(ifpre and"prerotate"or ifoverlap(P.cur.bk,P.curX,P.curY+1)and ifoverlap(P.cur.bk,P.curX-1,P.curY)and ifoverlap(P.cur.bk,P.curX+1,P.curY)and"rotatekick"or"rotate")
if id==1 then
stat.rotate=stat.rotate+1
if P.human then
SFX(ifpre and"prerotate"or ifoverlap(P.cur.bk,P.curX,P.curY+1)and ifoverlap(P.cur.bk,P.curX-1,P.curY)and ifoverlap(P.cur.bk,P.curX+1,P.curY)and"rotatekick"or"rotate")
end
::fail::
P.stat.rotate=P.stat.rotate+1
::quit::
end
function hold(ifpre)
if not P.holded and P.waiting==-1 and P.gameEnv.hold then
@@ -697,12 +757,12 @@ function hold(ifpre)
freshgho()
P.dropDelay,P.lockDelay,P.freshTime=P.gameEnv.drop,P.gameEnv.lock,max(P.freshTime-5,0)
if ifoverlap(P.cur.bk,P.curX,P.curY)then lock()Event_gameover.lose()end
if ifoverlap(P.cur.bk,P.curX,P.curY)then lock()Event.lose()end
SFX(ifpre and"prehold"or"hold")
if P.id==1 then
stat.hold=stat.hold+1
if P.human then
SFX(ifpre and"prehold"or"hold")
end
P.stat.hold=P.stat.hold+1
end
end
function drop()
@@ -727,7 +787,7 @@ function drop()
end--Immobile
end
lock()
local cc,csend,exblock,sendTime=checkrow(P.curY,P.r),0,0,0--Currect clear&send&sendTime
local cc,send,exblock,sendTime=checkrow(P.curY,P.r),0,0,0--Currect clear&send&sendTime
local mini
if P.spinLast and cc>0 and dospin>0 then
dospin=dospin+P.spinLast
@@ -748,115 +808,151 @@ function drop()
if cc==4 then
if P.b2b>1000 then
showText(P,text.techrashB3B,"fly",80,-30)
csend=6
send=6
sendTime=100
exblock=exblock+1
P.stat.b3b=P.stat.b3b+1
if P.human then
VOICE("b3b")
end
elseif P.b2b>=40 then
showText(P,text.techrashB2B,"drive",80,-30)
sendTime=80
csend=5
send=5
P.stat.b2b=P.stat.b2b+1
if P.human then
VOICE("b2b")
end
else
showText(P,text.techrash,"stretch",80,-30)
sendTime=60
csend=4
send=4
end
P.b2b=P.b2b+120
P.lastClear=74
P.cstat.techrash=P.cstat.techrash+1
P.stat.clear_4=P.stat.clear_4+1
if P.human then
VOICE("tts")
end
elseif cc>0 then
local clearKey=clear_n
if dospin then
if P.b2b>1000 then
showText(P,text.b3b..text.spin[P.cur.name]..text.clear[cc],"spin",40,-30)
csend=b2bATK[cc]+1
send=b2bATK[cc]+1
exblock=exblock+1
P.stat.b3b=P.stat.b3b+1
if P.human then
VOICE("b3b")
end
elseif P.b2b>=40 then
showText(P,text.b2b..text.spin[P.cur.name]..text.clear[cc],"spin",40,-30)
csend=b2bATK[cc]
send=b2bATK[cc]
P.stat.b2b=P.stat.b2b+1
if P.human then
VOICE("b2b")
end
else
showText(P,text.spin[P.cur.name]..text.clear[cc],"spin",50,-30)
csend=2*cc
send=2*cc
end
sendTime=20+csend*20
sendTime=20+send*20
if mini then
showText(P,text.mini,"appear",40,-80)
csend=ceil(csend*.5)
send=ceil(send*.5)
sendTime=sendTime+60
P.b2b=P.b2b+b2bPoint[cc]*.8
if P.human then
VOICE("mini")
end
else
P.b2b=P.b2b+b2bPoint[cc]
end
P.lastClear=P.cur.id*10+cc
if P.id==1 then
stat.spin=stat.spin+1
clearKey=spin_n
if P.human then
SFX(spin_n[cc])
VOICE(blockName[P.cur.name])
VOICE("spin_")
end
SFX(spin_n[cc])
elseif #P.clearing<#P.field then
P.b2b=max(P.b2b-250,0)
showText(P,text.clear[cc],"appear",32+cc*3,-30,(8-cc)*.3)
csend=cc-1
sendTime=20+csend*20
send=cc-1
sendTime=20+send*20
P.lastClear=cc
end
P.stat[clearKey[cc]]=P.stat[clearKey[cc]]+1
if P.human then
VOICE(clearName[cc])
end
else
P.combo=0
if dospin then
showText(P,text.spin[P.cur.name],"appear",50,-30)
SFX("spin_0")
P.b2b=P.b2b+20
P.stat.spin_0=P.stat.spin_0+1
if P.human then
SFX("spin_0")
VOICE(blockName[P.cur.name])
VOICE("spin")
end
end
end
send=send+(renATK[P.combo]or 4)
if #P.clearing==#P.field then
showText(P,text.PC,"flicker",70,-80)
csend=csend+min(6+P.cstat.pc,10)
send=min(send,4)+min(6+P.stat.pc,10)
exblock=exblock+2
sendTime=sendTime+30
if P.cstat.row>4 then P.b2b=1200 end
P.cstat.pc=P.cstat.pc+1
sendTime=sendTime+60
if P.stat.row>4 then P.b2b=1200 end
P.stat.pc=P.stat.pc+1
P.lastClear=P.cur.id*10+5
SFX("perfectclear")
if P.human then
SFX("perfectclear")
VOICE("pc")
end
end
csend=csend+(renATK[P.combo]or 4)
if P.combo>2 then
showText(P,text.cmb[min(P.combo,20)],P.combo<10 and"appear"or"flicker",20+P.combo*3,60)
showText(P,text.cmb[min(P.combo,20)],P.combo<10 and"appear"or"flicker",20+min(P.combo,25)*3,60)
end
sendTime=sendTime+20*P.combo
if cc>0 then
if P.human and cc>0 then
SFX(clear_n[cc])
SFX(ren_n[min(P.combo,11)])
if P.id==1 then VIB(cc<3 and 1 or cc-1)end
if P.combo>14 then SFX("ren_mega",(P.combo-10)*.1)end
VIB(cc)
end
if P.b2b>1200 then P.b2b=1200 end
if cc>0 and modeEnv.royaleMode then
local i=min(#P.atker,9)
if i>1 then
csend=csend+reAtk[i]
send=send+reAtk[i]
exblock=exblock+reDef[i]
end
end
if csend>0 then
if send>0 then
if exblock then exblock=int(exblock*(1+P.strength*.25))end
csend=csend*(1+P.strength*.25)
if mini then csend=csend end
csend=int(csend)
send=send*(1+P.strength*.25)
if mini then send=send end
send=int(send)
--Badge Buff
P.cstat.atk=P.cstat.atk+csend
if P.id==1 then stat.atk=stat.atk+csend end
P.stat.atk=P.stat.atk+send
--ATK statistics
if csend==0 then goto L end
showText(P,csend,"zoomout",40,70)
if send==0 then goto L end
showText(P,send,"zoomout",40,70)
if exblock==0 then goto L end
showText(P,exblock,"zoomout",20,115)
::L::
if csend>0 and P.atkBuffer[1]then
if send>0 and P.atkBuffer[1]then
if exblock>0 then
exblock=exblock-1
else
csend=csend-1
send=send-1
end
P.atkBuffer[1].amount=P.atkBuffer[1].amount-1
P.atkBuffer.sum=P.atkBuffer.sum-1
@@ -865,24 +961,25 @@ function drop()
end
goto L
end
if csend>0 then
if send>0 then
if modeEnv.royaleMode then
if P.atkMode==4 then
if #P.atker>0 then
for i=1,#P.atker do
garbageSend(P,P.atker[i],csend,sendTime)
garbageSend(P,P.atker[i],send,sendTime)
end
else
garbageSend(P,randomTarget(P),csend,sendTime)
garbageSend(P,randomTarget(P),send,sendTime)
end
else
freshTarget(P)
garbageSend(P,P.atking,csend,sendTime)
garbageSend(P,P.atking,send,sendTime)
end
elseif #players.alive>1 then
garbageSend(P,randomTarget(P),csend,sendTime)
garbageSend(P,randomTarget(P),send,sendTime)
end
if P.id==1 and csend>3 then sysSFX("emit",min(csend,8)*.125)end
P.stat.send=P.stat.send+send
if P.human and send>3 then SFX("emit",min(send,8)*.125)end
end
elseif cc==0 then
if P.b2b>1000 then
@@ -890,15 +987,14 @@ function drop()
end
garbageRelease()
end
if P.id==1 then
stat.piece,stat.row=stat.piece+1,stat.row+cc
end
P.cstat.piece,P.cstat.row=P.cstat.piece+1,P.cstat.row+cc
if P.cstat.row>=P.gameEnv.target then
P.stat.piece,P.stat.row=P.stat.piece+1,P.stat.row+cc
if P.stat.row>=P.gameEnv.target then
P.gameEnv.reach()
end
P.spinLast=dospin and cc>0
SFX("lock")
if P.human then
SFX("lock")
end
else
P.curY=P.curY-1
P.spinLast=false
@@ -907,7 +1003,7 @@ end
function lock()
for i=1,P.r do
local y=P.curY+i-1
if not P.field[y]then P.field[y],P.visTime[y]=getNewRow(),getNewRow()end
if not P.field[y]then P.field[y],P.visTime[y]=getNewRow(0),getNewRow(0)end
for j=1,P.c do
if P.cur.bk[i][j]then
P.field[y][P.curX+j-1]=P.cur.color
@@ -950,8 +1046,7 @@ function pressKey(i,p)
end
end
ins(P.keyTime,1,frame)rem(P.keyTime,11)
P.cstat.key=P.cstat.key+1
if P.id==1 then stat.key=stat.key+1 end
P.stat.key=P.stat.key+1
end
--ins(rec,{i,frame})
end
@@ -972,7 +1067,7 @@ act={
P.curX=P.curX-1
freshgho()
freshLockDelay()
if P.curY==P.y_img then SFX("move")end
if P.human and P.curY==P.y_img then SFX("move")end
P.spinLast=false
end
end
@@ -988,25 +1083,30 @@ act={
P.curX=P.curX+1
freshgho()
freshLockDelay()
if P.curY==P.y_img then SFX("move")end
if P.human and P.curY==P.y_img then SFX("move")end
P.spinLast=false
end
end
end,
rotRight=function()spin(1)end,
rotLeft=function()spin(3)end,
rotLeft=function()spin(-1)end,
rotFlip=function()spin(2)end,
hardDrop=function()
if P.keyPressing[9]and setting.swap then
changeAtkMode(3)
else
if P.waiting==-1 then
if P.curY-P.y_img>0 then
createShade(P.curX,P.curY+1,P.curX+P.c-1,P.y_img+P.r-1)
if P.curY~=P.y_img then
if P.human and setting.fxs then
createShade(P.curX,P.curY+1,P.curX+P.c-1,P.y_img+P.r-1)
P.fieldOffY=5
end
P.curY=P.y_img
P.spinLast=false
SFX("drop")
if P.id==1 then VIB(1)end
if P.human then
SFX("drop")
VIB(0)
end
end
P.lockDelay=-1
drop()
@@ -1025,53 +1125,86 @@ act={
end
end,
hold=function()hold()end,
swap=function()
if modeEnv.royaleMode then
for i=1,#P.keyPressing do
if P.keyPressing[i]then
P.keyPressing[i]=false
func=function()
if modeEnv.Fkey then
if modeEnv.royaleMode then
for i=1,#P.keyPressing do
if P.keyPressing[i]then
P.keyPressing[i]=false
end
end
if setting.swap then
P.keyPressing[9]=true
else
changeAtkMode(P.atkMode<3 and P.atkMode+2 or 5-P.atkMode)
P.swappingAtkMode=30
end
end
if setting.swap then
P.keyPressing[9]=true
else
changeAtkMode(P.atkMode<3 and P.atkMode+2 or 5-P.atkMode)
P.swappingAtkMode=30
if curMode.id=="custom"and curMode.lv==2 and P.stat.row>0 then
for y=1,20 do
local L=P.field[y]
for x=1,10 do
local a,b=preField[y][x],L and L[x]or 0
if a~=-1 and(a==0 and b>0 or a<8 and a~=b or a>7 and b==0)then goto change end
end
end
P.modeData.event=0
Event.win()
::change::
P.modeData.event=1-P.modeData.event
end
else
P.keyPressing[9]=false
end
end,
restart=function()
clearTask("play")
resetGameData()
frame=30
if frame<180 then
clearTask("play")
resetPartGameData()
end
end,
insDown=function()
if P.curY~=P.y_img then
createShade(P.curX,P.curY+1,P.curX+P.c-1,P.y_img+P.r-1)
if P.human and setting.fxs then
createShade(P.curX,P.curY+1,P.curX+P.c-1,P.y_img+P.r-1)
end
P.curY,P.lockDelay,P.spinLast=P.y_img,P.gameEnv.lock,false
if P.human and setting.fxs then
P.fieldOffY=4
end
end
end,
insLeft=function()
local x0=cx
local x0=P.curX
::L::if not ifoverlap(P.cur.bk,P.curX-1,P.curY)then
P.curX=P.curX-1
createShade(P.curX-1,P.curY+P.r-1,P.curX+P.c-1,P.curY)
if P.human and setting.fxs then
createShade(P.curX+1,P.curY+P.r-1,P.curX+1,P.curY)
end
freshgho()
goto L
end
if x0~=cx then freshLockDelay()end
if x0~=P.curX then
if P.human and setting.fxs and P.curX==1 then
P.fieldOffX=-4
end
freshLockDelay()
end
end,
insRight=function()
local x0=cx
local x0=P.curX
::L::if not ifoverlap(P.cur.bk,P.curX+1,P.curY)then
P.curX=P.curX+1
createShade(P.curX,P.curY+P.r-1,P.curX+P.c-1,P.curY)
if P.human and setting.fxs then
createShade(P.curX+P.c-1,P.curY+P.r-1,P.curX+P.c-1,P.curY)
end
freshgho()
goto L
end
if x0~=cx then freshLockDelay()end
if x0~=P.curX then
if P.human and setting.fxs and P.curX+P.c==11 then
P.fieldOffX=4
end
freshLockDelay()
end
end,
down1=function()
if P.curY~=P.y_img then
@@ -1089,6 +1222,6 @@ act={
end
end
end,
quit=function()Event_gameover.lose()end,
quit=function()Event.lose()end,
--System movements
}

BIN
image/block.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 24 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 6.5 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 60 KiB

After

Width:  |  Height:  |  Size: 60 KiB

BIN
image/virtualkey/func.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 370 B

Binary file not shown.

Before

Width:  |  Height:  |  Size: 300 B

View File

@@ -3,17 +3,15 @@ return{
royale_remain=function(n)return"剩余 "..n.." 名玩家"end,
cmb={nil,nil,"3 Combo","4 Combo","5 Combo","6 Combo","7 Combo","8 Combo","9 Combo","10 Combo!","11 Combo!","12 Combo!","13 Combo!","14 Combo!","15 Combo!","16 Combo!","17 Combo!","18 Combo!","19 Combo!","MEGACMB"},
techrash="Techrash",
techrashB2B="Techrash B2B",
techrashB3B="Techrash B2B2B",
techrashB2B="B2B Techrash",
techrashB3B="B2B2B Techrash",
block={"Z","S","L","J","T","O","I"},
spin={"Z-spin","S-spin","L-spin","J-spin","T-spin","O-spin","I-spin"},
clear={" single"," double"," triple"},
b2b="B2B ",
b3b="B2B2B ",
spin={"Z-spin","S-spin","L-spin","J-spin","T-spin","O-spin","I-spin"},
b2b="B2B ",b3b="B2B2B ",
mini="Mini",
PC="Perfect Clear",
hold="暂存",
next="下一个",
hold="暂存",next="下一个",
stage={"关卡 1","关卡 2","关卡 3","关卡 4","关卡 5",},
maxspeed="最高速度",
@@ -21,6 +19,9 @@ return{
win="胜利",
lose="失败",
pause="暂停",
finish="结束",
pauseTime="暂停时间",
custom="自定义游戏",
customOption={
@@ -35,6 +36,8 @@ return{
target="目标行数:",
freshLimit="锁延刷新次数:",
opponent="对手速度等级:",
bg="背景:",
bgm="背景音乐:",
},
customVal={
drop={0,1,2,3,4,5,6,7,8,9,10,12,14,16,18,20,25,30,40,60,180,"","[20G]"},
@@ -42,7 +45,7 @@ return{
wait=nil,
fall=nil,
next=nil,
hold={"",""},
hold={"","","无限"},
sequence={"bag7","his4","随机"},
visible={"可见","半隐","全隐","瞬隐"},
target={10,20,40,100,200,500,1000,""},
@@ -52,16 +55,17 @@ return{
softdropdas="软降DAS:",
softdroparr="软降ARR:",
snapLevelName={"任意摆放","10px吸附","20px吸附","40px吸附","60px吸附","80px吸附"},
keyboard="键盘",
joystick="手柄",
keyboard="键盘",joystick="手柄",
space="空格",enter="回车",
setting2Help="方向键选择/翻页,回车修改,esc返回",
musicRoom="音乐室",
nowPlaying="正在播放:",
actName={"左移:","右移:","顺时针旋转:","逆时针旋转:","180°旋转","硬降:","软降:","暂存:","切换攻击:","重新开始:","左瞬移:","右瞬移:","软降到底:"},
actName={"左移:","右移:","顺时针旋转:","逆时针旋转:","180°旋转","硬降:","软降:","暂存:","功能键:","重新开始:","左瞬移:","右瞬移:","软降到底:"},
modeName={
[0]="自定义",
"竞速","马拉松","大师","经典","","无尽","单挑","仅TSD","隐形","挖掘","生存","科研",
"全清训练","全清挑战","41人混战","99人混战","干旱","多人",
"C4W练习","全清训练","全清挑战","49人混战","99人混战","干旱","多人",
},
modeInfo={
sprint="挑战世界纪录",
@@ -71,42 +75,63 @@ return{
zen="无重力消除200行",
infinite="科研沙盒",
solo="打败AI",
tsd="尽可能做T旋消2",
tsd="尽可能做TSD",
blind="最强大脑",
dig="核能挖掘机",
survivor="防守练习",
tech="ALLSPIN练习",
tech="尽可能不要普通消除",
c4wtrain="无 限 连 击",
pctrain="熟悉全清定式的组合",
pcchallenge="100行内尽可能多全清",
techmino41="41人混战",
pcchallenge="100行内尽可能多PC",
techmino49="49人混战",
techmino99="99人混战",
drought="异常序列",
hotseat="友尽模式",
},
loadTip="真在加载,不只是动画!",
load={"加载材质ing","加载音乐ing","加载音效ing","加载完成",},
load={"加载语音ing","加载音乐ing","加载音效ing","加载完成",},
tips={
"The whole game is made by MrZ!",
"Back to Back 10 combo Techrash PC!",
"Techmino has a Nspire-CX edition!",
"Is B2B2B2B possible?",
"MrZ spin Penta!",
"不是动画,真的在加载!",
"整个游戏都是MrZ完成的!",
"大满贯10连击消四全清!",
"<方块研究所>有一个Nspire-CX版本!",
"B2B2B2B存在吗?",
"MEGACMB!",
"ALLSPIN!",
"O spin Techrash?"
"O型回旋三清?",
"只用一个输入设备就可以游玩了",
"Miya:喵!",
"225238922,哔哩哔哩 干杯~",
"适度游戏益脑,沉迷游戏伤身,合理安排时间,享受健康生活",
"合群了就会消失,但是消失不代表没有意义",
"学会使用两个旋转键,三个更好",
"更小的DAS和ARR拥有更高的操作上限",
"注意到\"旋转\"到底对方块做了些什么吗?",
"20G是一套全新的游戏规则",
"不要在上课时玩游戏!",
"本游戏难度上限很高,做好心理准备",
"方块可以不是个休闲游戏",
"调到特殊的日期也不会发生什么的",
"[随机文本]",
},
stat={
"游戏运行次数:",
"游戏局数:",
"游戏时间:",
"总方块使用:",
"总消行数:",
"总攻击行数:",
"总按键数:",
"总旋转数:",
"暂存次数:",
"总旋转消行数:",
"按键数:",
"旋转数:",
"Hold次数:",
"方块使用数:",
"消行数:",
"攻击数:",
"发送数:",
"接收数:",
"上涨数:",
"消除数:",
"Spin数:",
"B2B数:",
"PC数:",
"效率:",
},
help={
"好像也没啥好帮助的吧?就当是关于了",
@@ -116,9 +141,9 @@ return{
"",
"使用LOVE2D引擎",
"作者:MrZ 邮箱:1046101471@qq.com",
"程序:MrZ 美术:MrZ 音乐:MrZ 音效:MrZ",
"程序:MrZ 美术:MrZ 音乐:MrZ 音效:MrZ 语音:Miya",
"使用工具:VScode,GFIE,Beepbox,Goldwave",
"特别感谢:Farter,Teatube,196,Flyz,T830,[所有测试人员]和 你!",
"特别感谢:Farter,196,Teatube,Flyz,T830,[所有测试人员]和 你!",
"错误或者建议请附带相关信息发送到作者邮箱~",
},
support="支持作者",
@@ -127,6 +152,7 @@ return{
main={
play="开始",
setting="设置",
music="音乐室",
stat="统计信息",
help="帮助",
quit="退出",
@@ -140,16 +166,51 @@ return{
custom="自定义(C)",
back="返回",
},
music={
up="",
play="播放",
down="",
back="返回",
},
custom={
up="Λ",
down="v",
up="",
down="",
left="<",
right=">",
start="开始",
start1="消除开始",
start2="拼图开始",
draw="画图(D)",
set1="40行",
set2="1v1",
set3="无尽",
set4="隐形",
set5="极限",
back="返回",
},
draw={
any="不定",
block1="",
block2="",
block3="",
block4="",
block5="",
block6="",
block7="",
gb1="",
gb2="",
gb3="",
gb4="",
gb5="",
space="×",
clear="清空",
back="返回",
},
play={
back="返回",
pause="暂停",
},
pause={
resume="继续",
quit="退出",
},
setting={
ghost=function()return setting.ghost and"阴影:开"or"阴影:关"end,
@@ -157,19 +218,22 @@ return{
grid=function()return setting.grid and"网格:开"or"网格:关"end,
swap=function()return setting.swap and"目标选择:组合键"or"目标选择:循环"end,
fxs=function()return setting.fxs and"特效:开"or"特效:关"end,
bg=function()return setting.bg and"背景:开"or"背景:关"end,
dasD="-",dasU="+",
arrD="-",arrU="+",
sddasD="-",sddasU="+",
sdarrD="-",sdarrU="+",
ctrl="控制设置",
touch="触摸设置",
lang=function()return langName[setting.lang]end,
sfx=function()return setting.sfx and"音效:开"or"音效:关"end,
bgm=function()return setting.bgm and"音乐:开"or"音乐:关"end,
vib=function()return "震动强度:"..setting.vib end,
vib=function()return "震动:"..setting.vib end,
voc=function()return setting.voc and"语音:开"or"语音:关"end,
fullscreen=function()return setting.fullscreen and"全屏:开"or"全屏:关"end,
bgblock=function()return setting.bgblock and"背景动画:开"or"背景动画:关"end,
frame=function()return"绘制帧:"..setting.frameMul.."%"end,
control="控制设置",
touch="触摸设置",
lang=function()return langName[setting.lang]end,
skin="切换方块皮肤",
back="保存&返回",
},
setting2={
@@ -193,4 +257,4 @@ return{
path="打开存储目录",
},
},
}--中文
}

260
language/chi_full.lua Normal file
View File

@@ -0,0 +1,260 @@
return{
atkModeName={"随机","徽章","击杀","反击"},
royale_remain=function(n)return"剩余 "..n.." 名玩家"end,
cmb={nil,nil,"3 Combo","4 Combo","5 Combo","6 Combo","7 Combo","8 Combo","9 Combo","10 Combo!","11 Combo!","12 Combo!","13 Combo!","14 Combo!","15 Combo!","16 Combo!","17 Combo!","18 Combo!","19 Combo!","MEGACMB"},
techrash="四清",
techrashB2B="满贯 四清",
techrashB3B="大满贯 四清",
block={"Z","S","L","J","T","O","I"},
clear={"单清","双清","三清"},
spin={"Z型回旋","S型回旋","L型回旋","J型回旋","T型回旋","O型回旋","I型回旋"},
b2b="满贯",b3b="大满贯",
mini="迷你",
PC="场地全清",
hold="暂存",next="下一个",
stage={"关卡 1","关卡 2","关卡 3","关卡 4","关卡 5",},
maxspeed="最高速度",
speedup="速度加快",
win="胜利",
lose="失败",
pause="暂停",
finish="结束",
pauseTime="暂停时间",
custom="自定义游戏",
customOption={
drop="下落延迟:",
lock="锁定延迟:",
wait="放块延迟:",
fall="消行延迟:",
next="序列数量:",
hold="暂存:",
sequence="序列:",
visible="可见性:",
target="目标行数:",
freshLimit="锁延刷新次数:",
opponent="对手速度等级:",
bg="背景:",
bgm="背景音乐:",
},
customVal={
drop={0,1,2,3,4,5,6,7,8,9,10,12,14,16,18,20,25,30,40,60,180,"","[20G]"},
lock={0,1,2,3,4,5,6,7,8,9,10,12,14,16,18,20,25,30,40,60,180,""},
wait=nil,
fall=nil,
next=nil,
hold={"","","无限"},
sequence={"bag7","his4","随机"},
visible={"可见","半隐","全隐","瞬隐"},
target={10,20,40,100,200,500,1000,""},
freshLimit={0,8,15,""},
opponent={"无电脑",1,2,3,4,5,6,7,8,9,10,11},
},
softdropdas="软降DAS:",
softdroparr="软降ARR:",
snapLevelName={"任意摆放","10px吸附","20px吸附","40px吸附","60px吸附","80px吸附"},
keyboard="键盘",joystick="手柄",
space="空格",enter="回车",
setting2Help="方向键选择/翻页,回车修改,esc返回",
musicRoom="音乐室",
nowPlaying="正在播放:",
actName={"左移:","右移:","顺时针旋转:","逆时针旋转:","180°旋转","硬降:","软降:","暂存:","功能键:","重新开始:","左瞬移:","右瞬移:","软降到底:"},
modeName={
[0]="自定义",
"竞速","马拉松","大师","经典","","无尽","单挑","仅TSD","隐形","挖掘","生存","科研",
"C4W练习","全清训练","全清挑战","49人混战","99人混战","干旱","多人",
},
modeInfo={
sprint="挑战世界纪录",
marathon="尝试坚持到最后",
master="成为方块大师",
classic="高速经典",
zen="无重力消除200行",
infinite="科研沙盒",
solo="打败AI",
tsd="尽可能做T旋双清",
blind="最强大脑",
dig="核能挖掘机",
survivor="防守练习",
tech="尽可能不要普通消除!",
c4wtrain="无 限 连 击",
pctrain="熟悉全清定式的组合",
pcchallenge="100行内尽可能多全清",
techmino49="49人混战",
techmino99="99人混战",
drought="异常序列",
hotseat="友尽模式",
},
load={"加载语音ing","加载音乐ing","加载音效ing","加载完成",},
tips={
"不是动画,真的在加载!",
"整个游戏都是MrZ完成的!",
"大满贯10连击消四全清!",
"<方块研究所>有一个Nspire-CX版本!",
"B2B2B2B存在吗?",
"MEGACMB!",
"ALLSPIN!",
"O型回旋三清?",
"只用一个输入设备就可以游玩了",
"Miya:喵!",
"225238922,哔哩哔哩 干杯~",
"适度游戏益脑,沉迷游戏伤身,合理安排时间,享受健康生活",
"合群了就会消失,但是消失不代表没有意义",
"学会使用两个旋转键,三个更好",
"更小的DAS和ARR拥有更高的操作上限",
"注意到\"旋转\"到底对方块做了些什么吗?",
"20G是一套全新的游戏规则",
"不要在上课时玩游戏!",
"本游戏难度上限很高,做好心理准备",
"方块可以不是个休闲游戏",
"调到特殊的日期也不会发生什么的",
"[随机文本]",
},
stat={
"游戏运行次数:",
"游戏局数:",
"游戏时间:",
"按键数:",
"旋转数:",
"暂存次数:",
"方块使用:",
"消行数:",
"攻击行数:",
"发送数:",
"接收数:",
"上涨数:",
"消除数:",
"旋转消行数:",
"满贯数:",
"全清数:",
"效率:",
},
help={
"好像也没啥好帮助的吧?就当是关于了",
"这只是一个方块游戏,请勿过度解读和随意联想",
"不过就当成TOP/C2/KOS/TGM3/JS玩好了",
"游戏还在测试阶段,请 勿 外 传",
"",
"使用LOVE2D引擎",
"作者:MrZ 邮箱:1046101471@qq.com",
"程序:MrZ 美术:MrZ 音乐:MrZ 音效:MrZ 语音:Miya",
"使用工具:VScode,GFIE,Beepbox,Goldwave",
"特别感谢:Farter,Teatube,196,Flyz,T830,[所有测试人员]和 你!",
"错误或者建议请附带相关信息发送到作者邮箱~",
},
support="支持作者",
group="官方QQ群",
ButtonText={
main={
play="开始",
setting="设置",
music="音乐室",
stat="统计信息",
help="帮助",
quit="退出",
},
mode={
up="Λ",
down="v",
left="<",
right=">",
start="开始",
custom="自定义(C)",
back="返回",
},
music={
up="",
play="播放",
down="",
back="返回",
},
custom={
up="",
down="",
left="<",
right=">",
start1="消除开始",
start2="拼图开始",
draw="画图(D)",
set1="40行",
set2="1v1",
set3="无尽",
set4="隐形",
set5="极限",
back="返回",
},
draw={
any="不定",
block1="",
block2="",
block3="",
block4="",
block5="",
block6="",
block7="",
gb1="",
gb2="",
gb3="",
gb4="",
gb5="",
space="×",
clear="清空",
back="返回",
},
play={
pause="暂停",
},
pause={
resume="继续",
quit="退出",
},
setting={
ghost=function()return setting.ghost and"阴影:开"or"阴影:关"end,
center=function()return setting.center and"旋转中心:开"or"旋转中心:关"end,
grid=function()return setting.grid and"网格:开"or"网格:关"end,
swap=function()return setting.swap and"目标选择:组合键"or"目标选择:循环"end,
fxs=function()return setting.fxs and"特效:开"or"特效:关"end,
bg=function()return setting.bg and"背景:开"or"背景:关"end,
dasD="-",dasU="+",
arrD="-",arrU="+",
sddasD="-",sddasU="+",
sdarrD="-",sdarrU="+",
ctrl="控制设置",
touch="触摸设置",
lang=function()return langName[setting.lang]end,
sfx=function()return setting.sfx and"音效:开"or"音效:关"end,
bgm=function()return setting.bgm and"音乐:开"or"音乐:关"end,
vib=function()return "震动:"..setting.vib end,
voc=function()return setting.voc and"语音:开"or"语音:关"end,
fullscreen=function()return setting.fullscreen and"全屏:开"or"全屏:关"end,
bgblock=function()return setting.bgblock and"背景动画:开"or"背景动画:关"end,
frame=function()return"绘制帧:"..setting.frameMul.."%"end,
skin="切换方块皮肤",
back="保存&返回",
},
setting2={
back="返回",
},
setting3={
back="返回",
hide=function()return setting.virtualkeySwitch and"隐藏虚拟按键"or"显示虚拟按键"end,
default="默认组合",
snap=function()return text.snapLevelName[snapLevel]end,
alpha=function()return percent0to5[setting.virtualkeyAlpha]end,
icon="图标",
size="大小",
},
help={
back="返回",
qq="作者QQ",
},
stat={
back="返回",
path="打开存储目录",
},
},
}

View File

@@ -3,17 +3,15 @@ return{
royale_remain=function(n)return n.." Players Remain"end,
cmb={nil,nil,"3 Combo","4 Combo","5 Combo","6 Combo","7 Combo","8 Combo","9 Combo","10 Combo!","11 Combo!","12 Combo!","13 Combo!","14 Combo!","15 Combo!","16 Combo!","17 Combo!","18 Combo!","19 Combo!","MEGACMB"},
techrash="Techrash",
techrashB2B="Techrash B2B",
techrashB3B="Techrash B2B2B",
techrashB2B="B2B Techrash",
techrashB3B="B2B2B Techrash",
block={"Z","S","L","J","T","O","I"},
spin={"Z-spin","S-spin","L-spin","J-spin","T-spin","O-spin","I-spin"},
clear={" single"," double"," triple"},
b2b="B2B ",
b3b="B2B2B ",
spin={"Z-spin","S-spin","L-spin","J-spin","T-spin","O-spin","I-spin"},
b2b="B2B ",b3b="B2B2B ",
mini="Mini",
PC="Perfect Clear",
hold="Hold",
next="Next",
hold="Hold",next="Next",
stage={"STAGE 1","STAGE 2","STAGE 3","STAGE 4","STAGE 5",},
maxspeed="Max speed",
@@ -21,7 +19,10 @@ return{
win="WIN",
lose="LOSE",
pause="PAUSE",
finish="FINISH",
pauseTime="Pause time",
custom="Custom Game",
customOption={
drop="Drop delay:",
@@ -35,6 +36,8 @@ return{
target="Line limit:",
freshLimit="Lock fresh limit:",
opponent="Opponent speed:",
bg="Background:",
bgm="BGM:",
},
customVal={
drop={0,1,2,3,4,5,6,7,8,9,10,12,14,16,18,20,25,30,40,60,180,"","[20G]"},
@@ -42,26 +45,27 @@ return{
wait=nil,
fall=nil,
next=nil,
hold={"ON","OFF"},
hold={"ON","OFF","FREE"},
sequence={"bag7","his4","random"},
visible={"normal","time","invisible","sudden"},
target={10,20,40,100,200,500,1000,""},
freshLimit={0,8,15,""},
opponent={"No CPU",1,2,3,4,5,6,7,8,9,10,11},
},
softdropdas="softdropDAS:",
softdroparr="softdropARR:",
softdropdas="Down DAS:",
softdroparr="Down ARR:",
snapLevelName={"Free pos","Snap-10","Snap-20","Snap-40","Snap-60","Snap-80"},
keyboard="Keyboard",
joystick="Joystick",
keyboard="Keyboard",joystick="Joystick",
space="Space",enter="Enter",
setting2Help="Arrowkey to select/change slot,Enter to change,Esc back",
musicRoom="Music Room",
nowPlaying="Now Playing:",
actName={"Move Left:","Move Right:","Rotate Right:","Rotate Left:","Rotate Flip:","Hard Drop:","Soft Drop:","Hold:","Swap:","Restart:","Instant Left:","Instant Right:","Ins Down:"},
actName={"Move Left:","Move Right:","Rotate Right:","Rotate Left:","Rotate Flip:","Hard Drop:","Soft Drop:","Hold:","Function:","Restart:","Instant Left:","Instant Right:","Ins Down:"},
modeName={
[0]="Custom",
"Sprint","Marathon","Master","Classic","Zen","Infinite","1v1","TSD-only","Blind","Dig","Survivor","Tech",
"PC Train","PC Challenge","Techmino41","Techmino99","Drought","Hotseat",
"C4W Train","PC Train","PC Challenge","Techmino49","Techmino99","Drought","Hotseat",
},
modeInfo={
sprint="Speed run",
@@ -75,48 +79,69 @@ return{
blind="Invisible board",
dig="Downstack!",
survivor="Hand them!",
tech="Techniques practice",
tech="Don't do normal clear",
c4wtrain="Infinite combo",
pctrain="Let's learn some PCs",
pcchallenge="Make PCs in 100 Lines",
techmino41="Melee fight with 40 AIs",
techmino49="Melee fight with 48 AIs",
techmino99="Melee fight with 98 AIs",
drought="ERRSEQ flood attack",
hotseat="",
},
loadTip="not animation,real loading!",
load={"Loading textures","Loading BGM","Loading SFX","Finished",},
load={"Loading VOICE","Loading BGM","Loading SFX","Finished",},
tips={
"The whole game is made by MrZ!",
"Not animation,real loading!",
"The WHOLE game is made by MrZ!",
"Back to Back 10 combo Techrash PC!",
"Techmino has a Nspire-CX edition!",
"Is B2B2B2B possible?",
"MrZ spin Penta!",
"MEGACMB!",
"ALLSPIN!",
"O spin Techrash?"
"O spin triple?",
"You can play with any input device!",
"Miya:Nya!",
"225238922,Bilibili cheers!",
"Playing too much = taking drugs",
"Disappearing doesn't mean useless",
"Try to use two rotate button,three better",
"Small DAS&ARR can make you faster,if you can adapt to it",
"Have you noticed what does \"rotating\" do to block?",
"20G is a brand new game rule",
"Do not play game in class!",
"This game can be very hard,be mentally perpared",
"This in not a casual game",
"Nothing will happen when some special day come",
"[random text]",
},
stat={
"Games run:",
"Games played:",
"Game time:",
"Total block used:",
"Total rows cleared:",
"Total lines sent:",
"Total key pressed:",
"Total rotate:",
"Total hold:",
"Total spin:",
"Key pressed:",
"Rotate:",
"Hold:",
"Block used:",
"Rows cleared:",
"Attack:",
"Sent:",
"Receive:",
"Pend:",
"Clear:",
"Spin:",
"B2B:",
"PC:",
"Efficiency:",
},
help={
"I think you don't need \"help\".",
"THIS IS ONLY A SMALL BLOCK GAME",
"I don't think you need \"help\".",
"THIS IS ONLY A BLOCK GAME",
"But just play like playing TOP/C2/KOS/TGM3",
"Game is not public now,so DO NOT DISTIRBUTE",
"",
"Powered by LOVE2D",
"Author:MrZ E-mail:1046101471@qq.com",
"Programe:MrZ Art:MrZ Music:MrZ SFX:MrZ",
"Programe:MrZ Art:MrZ Music:MrZ SFX:MrZ VOICE:Miya",
"Tool used:VScode,GFIE,Beepbox,Goldwave",
"Special thanks:Farter,Teatube,196,Flyz,T830,[all test staff] and YOU!",
"Any bugs/suggestions to my E-mail.",
@@ -127,6 +152,7 @@ return{
main={
play="Play",
setting="Settings",
music="Music room",
stat="Statistics",
help="Help",
quit="Quit",
@@ -140,16 +166,51 @@ return{
custom="Custom(C)",
back="Back",
},
music={
up="",
play="Play",
down="",
back="Back",
},
custom={
up="Λ",
down="v",
up="",
down="",
left="<",
right=">",
start="Start",
start1="Clear Start",
start2="Puzzle Start",
draw="Draw(D)",
set1="40L",
set2="1v1",
set3="infinite",
set4="blind",
set5="classic",
back="Back",
},
draw={
any="ANY",
block1="",
block2="",
block3="",
block4="",
block5="",
block6="",
block7="",
gb1="",
gb2="",
gb3="",
gb4="",
gb5="",
space="×",
clear="CLEAR",
back="Back",
},
play={
back="Back",
pause="Pause",
},
pause={
resume="Resume",
quit="Quit",
},
setting={
ghost=function()return setting.ghost and"Ghost:ON"or"Ghost:OFF"end,
@@ -157,23 +218,22 @@ return{
grid=function()return setting.grid and"Grid:ON"or"Grid:OFF"end,
swap=function()return setting.swap and"Swap:comboKey"or"Swap:loop"end,
fxs=function()return setting.fxs and"FXs:ON"or"FXs:OFF"end,
dasD="-",
dasU="+",
arrD="-",
arrU="+",
sddasD="-",
sddasU="+",
sdarrD="-",
sdarrU="+",
bg=function()return setting.bg and"BG:ON"or"BG:OFF"end,
dasD="-",dasU="+",
arrD="-",arrU="+",
sddasD="-",sddasU="+",
sdarrD="-",sdarrU="+",
ctrl="Control settings",
touch="Touch settings",
lang=function()return langName[setting.lang]end,
sfx=function()return setting.sfx and"SFX:ON"or"SFX:OFF"end,
bgm=function()return setting.bgm and"BGM:ON"or"BGM:OFF"end,
vib=function()return "Vibrate level:"..setting.vib end,
voc=function()return setting.voc and"VOC:ON"or"VOC:OFF"end,
vib=function()return "VIB:"..setting.vib end,
fullscreen=function()return setting.fullscreen and"Fullscreen:ON"or"Fullscreen:OFF"end,
bgblock=function()return setting.bgblock and"BG animation:ON"or"BG animation:OFF"end,
frame=function()return"FrameDraw:"..setting.frameMul.."%"end,
control="Control settings",
touch="Touch settings",
lang=function()return langName[setting.lang]end,
skin="Change Block Skin",
back="Save&Back",
},
setting2={

326
list.lua
View File

@@ -1,7 +1,8 @@
local gc=love.graphics
local tc,kb=love.touch,love.keyboard
local sys=love.system
actName={"moveLeft","moveRight","rotRight","rotLeft","rotFlip","hardDrop","softDrop","hold","swap","restart","insLeft","insRight","insDown"}
local fs=love.filesystem
actName={"moveLeft","moveRight","rotRight","rotLeft","rotFlip","hardDrop","softDrop","hold","func","restart","insLeft","insRight","insDown"}
color={
red={1,0,0},
green={0,1,0},
@@ -31,17 +32,32 @@ color={
orange={1,.6,0},
lightOrange={1,.7,.3},
purple={.5,0,1},
lightPurple={.7,.3,1},
lightPurple={.8,.4,1},
darkPurple={.3,0,.6},
}
blockColor={
color.red,
color.green,
color.orange,
color.blue,
color.magenta,
color.yellow,
color.cyan,
color.darkGreen,
color.darkGrey,
color.grey,
color.darkPurple,
color.darkRed,
color.darkGreen,
}
sfx={
"button",
"button","swipe",
"ready","start","win","fail","collect",
"move","rotate","rotatekick","hold",
"prerotate","prehold",
"lock","drop","fall",
"reach",
"ren_1","ren_2","ren_3","ren_4","ren_5","ren_6","ren_7","ren_8","ren_9","ren_10","ren_11",
"ren_1","ren_2","ren_3","ren_4","ren_5","ren_6","ren_7","ren_8","ren_9","ren_10","ren_11","ren_mega",
"clear_1","clear_2","clear_3","clear_4",
"spin_0","spin_1","spin_2","spin_3",
"emit","blip_1","blip_2",
@@ -60,21 +76,65 @@ bgm={
"secret7th",
"secret8th",
"rockblock",
"8-bit happiness",
"end",
}
voiceList={
"Z","S","L","J","T","O","I",
"single","double","triple","tts",
"spin","spin_","mini","b2b","b3b","pc",
"win","lose","voc_nya","nya",
}
voiceBank={}
voice={
Z={"Z_1","Z_2"},
S={"S_1","S_2"},
J={"J_1","J_2"},
L={"L_1","L_2"},
T={"T_1","T_2"},
O={"O_1","O_2"},
I={"I_1","I_2"},
single={"single_1","single_2","single_3"},
double={"double_1","double_2","double_3"},
triple={"triple_1","triple_2"},
tts={"tts_1"},
spin={"spin_1","spin_2","spin_3","spin_4","spin_5"},
spin_={"spin-_1","spin-_2"},
mini={"mini_1"},
b2b={"b2b_1","b2b_2"},
b3b={"b3b_1"},
pc={"PC_1"},
win={"win_1","win_2"},
lose={"lose_1","lose_2","lose_3"},
voc_nya={"nya_11","nya_12","nya_13","nya_21","nya_22"},
nya={"nya_1","nya_2","nya_3","nya_4"},
}
musicID={
"blank",
"way",
"race",
"newera",
"push",
"reason",
"infinite",
"cruelty",
"final",
"secret7th",
"secret8th",
"rockblock",
"8-bit happiness",
"end",
}
customID={
"drop",
"lock",
"wait",
"fall",
"next",
"hold",
"sequence",
"visible",
"drop","lock",
"wait","fall",
"next","hold",
"sequence","visible",
"target",
"freshLimit",
"opponent",
"bg","bgm",
}
customRange={
drop={0,1,2,3,4,5,6,7,8,9,10,12,14,16,18,20,25,30,40,60,180,1e99,-1},
@@ -82,24 +142,25 @@ customRange={
wait={0,1,2,3,4,5,6,7,8,10,15,20,30,60},
fall={0,1,2,3,4,5,6,7,8,10,15,20,30,60},
next={0,1,2,3,4,5,6},
hold={true,false},
hold={true,false,true},
sequence={"bag7","his4","rnd"},
visible={"show","time","fast","none"},
target={10,20,40,100,200,500,1000,1e99},
freshLimit={0,8,15,1e99},
opponent={0,60,30,20,15,10,7,5,4,3,2,1},
bg={"none","game1","game2","game3","strap","rgb","grid","glow","matrix"},
bgm={"blank","way","race","newera","push","reason","infinite","secret7th","secret8th","rockblock"},
}
snapLevelValue={1,10,20,40,60,80}
RCPB={10,33,200,33,105,5,105,60}
snapLevelValue={1,10,20,40,60,80}
up0to4={[0]="000%UP","025%UP","050%UP","075%UP","100%UP",}
percent0to5={[0]="0%","20%","40%","60%","80%","100%",}
modeID={
[0]="custom",
"sprint","marathon","master","classic","zen","infinite","solo","tsd","blind","dig","survivor","tech",
"pctrain","pcchallenge","techmino41","techmino99","drought","hotseat",
"c4wtrain","pctrain","pcchallenge","techmino49","techmino99","drought","hotseat",
}
modeLevel={
sprint={"10L","20L","40L","100L","400L","1000L"},
@@ -107,30 +168,31 @@ modeLevel={
master={"LUNATIC","ULTIMATE"},
classic={"CTWC"},
zen={"NORMAL"},
infinite={"NORMAL"},
infinite={"NORMAL","EXTRA"},
solo={"EASY","NORMAL","HARD","LUNATIC"},
tsd={"NORMAL","HARD"},
blind={"EASY","HARD","HARD+","LUNATIC","ULTIMATE","GM"},
dig={"NORMAL","LUNATIC"},
survivor={"EASY","NORMAL","HARD","LUNATIC","ULTIMATE"},
tech={"EASY","NORMAL","HARD","LUNATIC","ULTIMATE"},
tech={"NORMAL","NORMAL+","HARD","LUNATIC","ULTIMATE"},
c4wtrain={"NORMAL","LUNATIC"},
pctrain={"NORMAL","EXTRA"},
pcchallenge={"NORMAL","HARD","LUNATIC"},
techmino41={"EASY","NORMAL","HARD","LUNATIC","ULTIMATE"},
techmino49={"EASY","NORMAL","HARD","LUNATIC","ULTIMATE"},
techmino99={"EASY","NORMAL","HARD","LUNATIC","ULTIMATE"},
drought={"NORMAL","MESS"},
hotseat={"2P","3P","4P",},
custom={""},
custom={"Normal","Puzzle"},
}
local t,f=true,false
local O,_=true,false
blocks={
{[0]={{f,t,t},{t,t,f}},{{t,f},{t,t},{f,t}}},
{[0]={{t,t,f},{f,t,t}},{{f,t},{t,t},{t,f}}},
{[0]={{t,t,t},{f,f,t}},{{t,t},{t,f},{t,f}},{{t,f,f},{t,t,t}},{{f,t},{f,t},{t,t}}},
{[0]={{t,t,t},{t,f,f}},{{t,f},{t,f},{t,t}},{{f,f,t},{t,t,t}},{{t,t},{f,t},{f,t}}},
{[0]={{t,t,t},{f,t,f}},{{t,f},{t,t},{t,f}},{{f,t,f},{t,t,t}},{{f,t},{t,t},{f,t}}},
{[0]={{t,t},{t,t}},{{t,t},{t,t}}},
{[0]={{t,t,t,t}},{{t},{t},{t},{t}}},
{[0]={{_,O,O},{O,O,_}},{{O,_},{O,O},{_,O}}},
{[0]={{O,O,_},{_,O,O}},{{_,O},{O,O},{O,_}}},
{[0]={{O,O,O},{_,_,O}},{{O,O},{O,_},{O,_}},{{O,_,_},{O,O,O}},{{_,O},{_,O},{O,O}}},
{[0]={{O,O,O},{O,_,_}},{{O,_},{O,_},{O,O}},{{_,_,O},{O,O,O}},{{O,O},{_,O},{_,O}}},
{[0]={{O,O,O},{_,O,_}},{{O,_},{O,O},{O,_}},{{_,O,_},{O,O,O}},{{_,O},{O,O},{_,O}}},
{[0]={{O,O},{O,O}},{{O,O},{O,O}}},
{[0]={{O,O,O,O}},{{O},{O},{O},{O}}},
}
local l={1,2,6,7}for i=1,4 do blocks[l[i]][2],blocks[l[i]][3]=blocks[l[i]][0],blocks[l[i]][1]end
for i=1,7 do blocks[i+7]=blocks[i]end
@@ -145,7 +207,7 @@ local virtualkeySet={
{200,720-320,6400,80},--hardDrop
{200,720-80,6400,80},--softDrop
{1280-320,720-200,6400,80},--hold
{1280-80,280,6400,80},--swap
{1280-80,280,6400,80},--func
{80,280,6400,80},--restart
},--Farter's set 3
{
@@ -157,7 +219,7 @@ local virtualkeySet={
{1280-200,720-320,6400,80},--hardDrop
{1280-200,720-80,6400,80},--softDrop
{320,720-200,6400,80},--hold
{80,280,6400,80},--swap
{80,280,6400,80},--func
{1280-80,280,6400,80},--restart
},--Mirrored farter's set 3
{
@@ -169,7 +231,7 @@ local virtualkeySet={
{1280-80,720-80,6400,80},--hardDrop
{1280-80,720-240,6400,80},--softDrop
{1280-80,720-400,6400,80},--hold
{80,360,6400,80},--swap
{80,360,6400,80},--func
{80,80,6400,80},--restart
},--Author's set
{
@@ -181,104 +243,172 @@ local virtualkeySet={
{1280-240,720-240,6400,80},--hardDrop
{1280-240,720-80,6400,80},--softDrop
{1280-80,720-240,6400,80},--hold
{80,720-240,6400,80},--swap
{80,720-240,6400,80},--func
{80,320,6400,80},--restart
},--Keyboard set
{
{1200-360,40,0,40},--moveLeft
{1200-280,40,0,40},--moveRight
{1200-520,40,0,40},--rotRight
{1200-600,40,0,40},--rotLeft
{1200-440,40,0,40},--rotFlip
{1200-40,40,0,40},--hardDrop
{1200-120,40,0,40},--softDrop
{1200-200,40,0,40},--hold
{1200-680,40,0,40},--swap
{1200-760,40,0,40},--restart
{1200-370,40,1600,40},--moveLeft
{1200-280,40,1600,40},--moveRight
{1200-530,40,1600,40},--rotRight
{1200-610,40,1600,40},--rotLeft
{1200-450,40,1600,40},--rotFlip
{1200-50,40,1600,40},--hardDrop
{1200-130,40,1600,40},--softDrop
{1200-210,40,1600,40},--hold
{1200-690,40,1600,40},--func
{1200-770,40,1600,40},--restart
},--PC key feedback
}
local customSet={
{20,20,1,1,7,1,1,1,3,4,1,1,1},
{18,20,1,1,7,1,1,1,8,3,8,1,1},
{22,22,1,1,7,3,1,3,8,4,1,1,1},
{20,20,1,1,7,1,1,3,8,3,1,1,1},
{23,11,8,11,4,1,2,1,8,3,1,1,1},
}
local function useDefaultSet(n)
for i=1,#customSet[n]do
customSel[i]=customSet[n][i]
end
end
Buttons={
load={},
intro={},
main={
play={x=380,y=300,w=240,h=240,rgb=color.red,f=70,code=function()gotoScene("mode")end,down="stat",right="setting"},
setting={x=640,y=300,w=240,h=240,rgb=color.lightBlue,f=55,code=function()gotoScene("setting")end,down="stat",left="play",right="help"},
stat={x=640,y=560,w=240,h=240,rgb=color.cyan,f=55,code=function()gotoScene("stat")end,up="setting",left="play",right="help"},
help={x=900,y=560,w=240,h=240,rgb=color.yellow,f=55,code=function()gotoScene("help")end,up="setting",left="stat",right="quit"},
quit={x=1180,y=620,w=120,h=120,rgb=color.lightGrey,f=50,code=function()gotoScene("quit")end,up="setting",left="help"},
play= {x=380,y=300,w=240, h=240,rgb=color.red, f=70,code=function()gotoScene("mode")end,down="stat",right="setting"},
setting={x=640,y=300,w=240, h=240,rgb=color.lightBlue, f=55,code=function()gotoScene("setting")end,down="stat",left="play",right="music"},
music= {x=900,y=300,w=240, h=240,rgb=color.lightCyan, f=42,code=function()gotoScene("music")end,down="help",left="setting",right="quit"},
stat= {x=640,y=560,w=240, h=240,rgb=color.cyan, f=55,code=function()gotoScene("stat")end,up="setting",left="play",right="help"},
help= {x=900,y=560,w=240, h=240,rgb=color.yellow, f=55,code=function()gotoScene("help")end,up="music",left="stat",right="quit"},
quit= {x=1180,y=620,w=120,h=120,rgb=color.lightGrey, f=50,code=function()gotoScene("quit")end,up="setting",left="help"},
},
mode={
up={x=1000,y=210,w=200,h=140,rgb=color.white,hide=function()return modeSel==1 end,f=64,code=function()keyDown.mode("up")end},
down={x=1000,y=430,w=200,h=140,rgb=color.white,hide=function()return modeSel==#modeID end,f=80,code=function()keyDown.mode("down")end},
left={x=190,y=160,w=100,h=80,rgb=color.white,hide=function()return levelSel==1 end,code=function()keyDown.mode("left")end},
right={x=350,y=160,w=100,h=80,rgb=color.white,hide=function()return levelSel==#modeLevel[modeID[modeSel]] end,code=function()keyDown.mode("right")end},
start={x=1000,y=600,w=250,h=100,rgb=color.green,f=50,code=function()loadGame(modeSel,levelSel)end},
custom={x=270,y=540,w=190,h=85,rgb=color.yellow,code=function()gotoScene("custom")end},
back={x=640,y=630,w=230,h=90,rgb=color.white,f=45,code=back},
up= {x=1000,y=210,w=200,h=140, rgb=color.white, f=64, code=function()keyDown.mode("up")end, hide=function()return modeSel==1 end,},
down= {x=1000,y=430,w=200,h=140, rgb=color.white, f=80, code=function()keyDown.mode("down")end, hide=function()return modeSel==#modeID end,},
left= {x=190, y=160,w=100,h=80, rgb=color.white, code=function()keyDown.mode("left")end, hide=function()return levelSel==1 end,},
right= {x=350, y=160,w=100,h=80, rgb=color.white, code=function()keyDown.mode("right")end,hide=function()return levelSel==#modeLevel[modeID[modeSel]]end,},
start= {x=1000,y=600,w=250,h=100, rgb=color.green, f=50, code=function()
loadGame(modeSel,levelSel)end},
custom= {x=275, y=420,w=200,h=90, rgb=color.yellow, code=function()gotoScene("custom")end},
back= {x=640, y=630,w=230,h=90, rgb=color.white, f=45, code=back},
},
music={
up= {x=1100,y=200,w=120,h=120, rgb=color.white,f=50,code=function()sel=(sel-2)%#musicID+1 end},
play= {x=1100,y=340,w=120,h=120, rgb=color.white,f=40,code=function()BGM(musicID[sel])end},
down= {x=1100,y=480,w=120,h=120, rgb=color.white,f=50,code=function()sel=sel%#musicID+1 end},
back= {x=640, y=630,w=230,h=90, rgb=color.white,f=45,code=back},
},
custom={
up={x=1000,y=200,w=100,h=100,rgb=color.white,code=function()optSel=(optSel-2)%#customID+1 end},
down={x=1000,y=440,w=100,h=100,rgb=color.white,f=50,code=function()optSel=optSel%#customID+1 end},
left={x=880,y=320,w=100,h=100,rgb=color.white,f=50,code=function()local k=customID[optSel]customSel[k]=(customSel[k]-2)%#customRange[k]+1 end},
right={x=1120,y=320,w=100,h=100,rgb=color.white,f=50,code=function()local k=customID[optSel]customSel[k]=customSel[k]%#customRange[k]+1 end},
start={x=1000,y=580,w=180,h=80,rgb=color.green,code=function()loadGame(0,1)end},
back={x=640,y=630,w=180,h=60,rgb=color.white,code=back},
up= {x=1000,y=220, w=100,h=100, rgb=color.white, code=function()optSel=(optSel-2)%#customID+1 end},
down= {x=1000,y=460, w=100,h=100, rgb=color.white,f=50, code=function()optSel=optSel%#customID+1 end},
left= {x=880, y=340, w=100,h=100, rgb=color.white,f=50, code=function()customSel[optSel]=(customSel[optSel]-2)%#customRange[customID[optSel]]+1 end},
right= {x=1120,y=340, w=100,h=100, rgb=color.white,f=50, code=function()customSel[optSel]=customSel[optSel]%#customRange[customID[optSel]]+1 end},
start1= {x=880, y=580, w=220,h=70, rgb=color.green, code=function()loadGame(0,1)end},
start2= {x=1120,y=580, w=220,h=70, rgb=color.lightPurple, code=function()loadGame(0,2)end},
draw= {x=1000,y=90, w=190,h=85, rgb=color.cyan, code=function()gotoScene("draw")end},
set1= {x=640, y=160, w=240,h=75, rgb=color.lightRed, code=function()useDefaultSet(1)end},
set2= {x=640, y=250, w=240,h=75, rgb=color.lightRed, code=function()useDefaultSet(2)end},
set3= {x=640, y=340, w=240,h=75, rgb=color.lightRed, code=function()useDefaultSet(3)end},
set4= {x=640, y=430, w=240,h=75, rgb=color.lightRed, code=function()useDefaultSet(4)end},
set5= {x=640, y=520, w=240,h=75, rgb=color.lightRed, code=function()useDefaultSet(5)end},
back= {x=640, y=630, w=180,h=60, rgb=color.white, code=back},
},
draw={
any= {x=700, y=80,w=120,h=120, f=45, rgb=color.lightGrey,code=function()pen=-1 end},
block1= {x=840, y=80,w=120,h=120, f=65, rgb=color.red, code=function()pen=1 end},
block2= {x=980, y=80,w=120,h=120, f=65, rgb=color.green, code=function()pen=2 end},
block3= {x=1120,y=80,w=120,h=120, f=65, rgb=color.orange, code=function()pen=3 end},
block4= {x=840, y=220,w=120,h=120, f=65, rgb=color.blue, code=function()pen=4 end},
block5= {x=980, y=220,w=120,h=120, f=65, rgb=color.magenta, code=function()pen=5 end},
block6= {x=1120,y=220,w=120,h=120, f=65, rgb=color.yellow, code=function()pen=6 end},
block7= {x=840, y=360,w=120,h=120, f=65, rgb=color.cyan, code=function()pen=7 end},
gb1= {x=980, y=360,w=120,h=120, f=65, rgb=color.darkGrey, code=function()pen=9 end},
gb2= {x=1120,y=360,w=120,h=120, f=65, rgb=color.grey, code=function()pen=10 end},
gb3= {x=840, y=500,w=120,h=120, f=65, rgb=color.darkPurple,code=function()pen=11 end},
gb4= {x=980, y=500,w=120,h=120, f=65, rgb=color.darkRed, code=function()pen=12 end},
gb5= {x=1120,y=500,w=120,h=120, f=65, rgb=color.darkGreen,code=function()pen=13 end},
space= {x=840, y=640,w=120,h=120, f=70, rgb=color.grey, code=function()pen=0 end},
clear= {x=1120,y=640,w=120,h=120, f=45, rgb=color.white, code=function()
if clearSureTime>0 then
for y=1,20 do for x=1,10 do preField[y][x]=0 end end
clearSureTime=0
else
clearSureTime=50
end
end},
back= {x=1235,y=45,w=80,h=80, f=35, rgb=color.white, code=back},
},
play={
back={x=1235,y=45,w=80,h=80,rgb=color.white,code=back,f=35},
pause={x=1235,y=45,w=80,h=80,rgb=color.white,f=30,code=pauseGame},
},
pause={
resume= {x=640,y=400,w=240,h=100, rgb=color.white,f=50,code=resumeGame},
quit= {x=640,y=550,w=240,h=100, rgb=color.white,f=50,code=back},
},
setting={--Normal setting
ghost= {x=290, y=90, w=210, h=60, rgb=color.white, code=function()setting.ghost=not setting.ghost end,down="grid",right="center"},
center= {x=505, y=90, w=210, h=60, rgb=color.white, code=function()setting.center=not setting.center end,down="swap",left="ghost",right="sfx"},
grid= {x=290, y=160, w=210, h=60, rgb=color.white, code=function()setting.grid=not setting.grid end,up="ghost",down="fxs",right="swap"},
swap= {x=505, y=160, w=210, h=60,f=28, rgb=color.white, code=function()setting.swap=not setting.swap end,up="center",down="arrD",left="grid",right="vib"},
fxs= {x=290, y=230, w=210, h=60, rgb=color.white, code=function()setting.fxs=not setting.fxs end,up="grid",down="dasU",right="fullscreen"},
ghost= {x=290, y=90, w=210, h=60, rgb=color.white,code=function()setting.ghost=not setting.ghost end,down="grid",right="center"},
center= {x=505, y=90, w=210, h=60, rgb=color.white,code=function()setting.center=not setting.center end,down="swap",left="ghost",right="sfx"},
grid= {x=290, y=160, w=210, h=60, rgb=color.white,code=function()setting.grid=not setting.grid end,up="ghost",down="fxs",right="swap"},
swap= {x=505, y=160, w=210, h=60,f=28, rgb=color.white,code=function()setting.swap=not setting.swap end,up="center",down="bg",left="grid",right="vib"},
fxs= {x=290, y=230, w=210, h=60, rgb=color.white,code=function()setting.fxs=not setting.fxs end,up="grid",down="dasU",right="bg"},
bg= {x=505, y=230, w=210, h=60, rgb=color.white,code=function()setting.bg=not setting.bg end,up="swap",down="arrD",right="fullscreen"},
dasD= {x=210, y=300, w=50, h=50, rgb=color.white,code=function()setting.das=(setting.das-1)%31 end,up="fxs",down="sddasD",right="dasU"},
dasU= {x=370, y=300, w=50, h=50, rgb=color.white,code=function()setting.das=(setting.das+1)%31 end,up="fxs",down="sddasU",left="dasD",right="arrD"},
arrD= {x=425, y=300, w=50, h=50, rgb=color.white,code=function()setting.arr=(setting.arr-1)%16 end,up="bg",down="sdarrD",left="dasU",right="arrU"},
arrU= {x=585, y=300, w=50, h=50, rgb=color.white,code=function()setting.arr=(setting.arr+1)%16 end,up="bg",down="sdarrU",left="arrD",right="bgblock"},--3~6
sddasD= {x=210, y=370, w=50, h=50, rgb=color.white,code=function()setting.sddas=(setting.sddas-1)%11 end,up="dasD",down="ctrl",right="sddasU"},
sddasU= {x=370, y=370, w=50, h=50, rgb=color.white,code=function()setting.sddas=(setting.sddas+1)%11 end,up="dasU",down="ctrl",left="sddasD",right="sdarrD"},
sdarrD= {x=425, y=370, w=50, h=50, rgb=color.white,code=function()setting.sdarr=(setting.sdarr-1)%4 end,up="arrD",down="ctrl",left="sddasU",right="sdarrU"},
sdarrU= {x=585, y=370, w=50, h=50, rgb=color.white,code=function()setting.sdarr=(setting.sdarr+1)%4 end,up="arrU",down="ctrl",left="sdarrD",right="frame"},
dasD= {x=210, y=300, w=50, h=50, rgb=color.white, code=function()setting.das=(setting.das-1)%31 end,up="fxs",down="sddasD",right="dasU"},
dasU= {x=370, y=300, w=50, h=50, rgb=color.white, code=function()setting.das=(setting.das+1)%31 end,up="fxs",down="sddasU",left="dasD",right="arrD"},
arrD= {x=425, y=300, w=50, h=50, rgb=color.white, code=function()setting.arr=(setting.arr-1)%16 end,up="swap",down="sdarrD",left="dasU",right="arrU"},
arrU= {x=585, y=300, w=50, h=50, rgb=color.white, code=function()setting.arr=(setting.arr+1)%16 end,up="swap",down="sdarrU",left="arrD",right="bgblock"},--3~6
sddasD= {x=210, y=370, w=50, h=50, rgb=color.white, code=function()setting.sddas=(setting.sddas-1)%11 end,up="dasD",down="lang",right="sddasU"},
sddasU= {x=370, y=370, w=50, h=50, rgb=color.white, code=function()setting.sddas=(setting.sddas+1)%11 end,up="dasU",down="lang",left="sddasD",right="sdarrD"},
sdarrD= {x=425, y=370, w=50, h=50, rgb=color.white, code=function()setting.sdarr=(setting.sdarr-1)%4 end,up="arrD",down="lang",left="sddasU",right="sdarrU"},
sdarrU= {x=585, y=370, w=50, h=50, rgb=color.white, code=function()setting.sdarr=(setting.sdarr+1)%4 end,up="arrU",down="lang",left="sdarrD",right="frame"},
ctrl= {x=340,y=440, w=310,h=60,rgb=color.green, code=function()gotoScene("setting2")end,up="sddasU",down="touch",left="lang",right="skin"},
touch= {x=340,y=510, w=310,h=60,rgb=color.yellow,code=function()gotoScene("setting3")end,up="ctrl",down="back",right="lang"},
lang= {x=580,y=510, w=150,h=60,rgb=color.red, code=function()
setting.lang=setting.lang%#langName+1
swapLanguage(setting.lang)
end,up="sdarrU",down="back",left="touch",right="skin"},
sfx= {x=760, y=90, w=160, h=60, rgb=color.white, code=function()setting.sfx=not setting.sfx end,down="vib",left="center",right="bgm"},
bgm= {x=940, y=90, w=160, h=60, rgb=color.white, code=function()
sfx= {x=760,y=90, w=160, h=60, rgb=color.white,code=function()setting.sfx=not setting.sfx end,down="vib",left="center",right="bgm"},
bgm= {x=940,y=90, w=160, h=60, rgb=color.white,code=function()
BGM()
setting.bgm=not setting.bgm
BGM("blank")
end,down="vib",left="sfx"},
vib= {x=850, y=160, w=340, h=60, rgb=color.white, code=function()
setting.vib=(setting.vib+1)%5
VIB(2)
end,up="sfx",down="fullscreen",left="swap"},
fullscreen= {x=850, y=230, w=340, h=60, rgb=color.white, code=function()
end,down="voc",left="sfx"},
vib= {x=760,y=160, w=160, h=60,rgb=color.white, code=function()
setting.vib=(setting.vib+1)%6
VIB(1)
end,up="sfx",down="fullscreen",left="swap",right="voc"},
voc= {x=940,y=160, w=160, h=60,rgb=color.white,
hide=function()
return not(kb.isDown("m")or false)
end,
code=function()
setting.voc=not setting.voc
end,up="sfx",down="fullscreen",left="vib"},
fullscreen= {x=850,y=230, w=340,h=60,rgb=color.white, code=function()
setting.fullscreen=not setting.fullscreen
love.window.setFullscreen(setting.fullscreen)
if not setting.fullscreen then
love.resize(gc.getWidth(),gc.getHeight())
end
end,up="vib",down="bgblock",left="arrU"},
bgblock= {x=850, y=300, w=340, h=60, rgb=color.white, code=function()
end,up="vib",down="bgblock",left="bg"},
bgblock={x=850,y=300, w=340,h=60,rgb=color.white, code=function()
setting.bgblock=not setting.bgblock
if not setting.bgblock then
for i=1,16 do
BGblockList[i].v=3*BGblockList[i].v
end
end
end,up="fullscreen",down="frame",left="sdarrU"},
frame= {x=850, y=370, w=340, h=60, rgb=color.white, code=function()
end,up="fullscreen",down="frame",left="arrU"},
frame= {x=850,y=370, w=340,h=60,rgb=color.white, code=function()
setting.frameMul=setting.frameMul+(setting.frameMul<50 and 5 or 10)
if setting.frameMul>100 then setting.frameMul=25 end
end,up="bgblock",down="control",left="sdarrU"},
control= {x=850, y=440, w=340, h=60, rgb=color.green, code=function()gotoScene("setting2")end,up="frame",down="touch",left="lang"},
touch= {x=850, y=510, w=340, h=60, rgb=color.yellow, code=function()gotoScene("setting3")end,up="control",down="back",left="lang"},
lang= {x=280, y=510, w=200, h=60, rgb=color.red, code=function()
setting.lang=setting.lang%#langName+1
swapLanguage(setting.lang)
end,up="sddasD",down="back",right="touch"},
back= {x=640, y=620, w=300, h=70, rgb=color.white, code=back,up="touch"},
end,up="bgblock",down="skin",left="sdarrU"},
skin= {x=850,y=440, w=340,h=60,rgb=color.white, code=function()
setting.skin=setting.skin%6+1
changeBlockSkin(setting.skin)
end,up="frame",down="back",left="ctrl"},
back= {x=640,y=620, w=300,h=70,rgb=color.white, code=back,up="lang"},
},
setting2={--Control setting
back={x=840,y=630,w=180,h=60,rgb=color.white,code=back},
@@ -317,11 +447,11 @@ Buttons={
},
help={
back={x=640,y=590,w=180,h=60,rgb=color.white,code=back,right="qq"},
qq={x=980,y=590,w=230,h=60,rgb=color.white,code=function()sys.openURL("tencent://message/?uin=1046101471&Site=&Menu=yes")end,left="back"},
qq={x=980,y=590,w=230,h=60,hide=function()return system=="Android"end,rgb=color.white,code=function()sys.openURL("tencent://message/?uin=1046101471&Site=&Menu=yes")end,left="back"},
},
stat={
back={x=640,y=590,w=180,h=60,rgb=color.white,code=back,right="path"},
path={x=980,y=590,w=250,h=60,f=30,rgb=color.white,code=function()sys.openURL("C:/Users/MrZ/AppData/Roaming/LOVE/Techmino")end,left="back"},
path={x=980,y=590,w=250,h=60,f=30,hide=function()return system=="Android"end,rgb=color.white,code=function()sys.openURL(fs.getSaveDirectory())end,left="back"},
},
sel=nil,--selected button id(integer)
}

125
main.lua
View File

@@ -1,20 +1,24 @@
local gc=love.graphics
local tm=love.timer
local gc,tm=love.graphics,love.timer
local ms,kb=love.mouse,love.keyboard
local fs,sys=love.filesystem,love.system
int,ceil,abs,rnd,max,min,sin,cos,atan,pi=math.floor,math.ceil,math.abs,math.random,math.max,math.min,math.sin,math.cos,math.atan,math.pi
int,ceil,abs,rnd,max,min,sin,cos,atan=math.floor,math.ceil,math.abs,math.random,math.max,math.min,math.sin,math.cos,math.atan
sub,gsub,find,format,byte,char=string.sub,string.gsub,string.find,string.format,string.byte,string.char
ins,rem,sort=table.insert,table.remove,table.sort
ins,rem,concat=table.insert,table.remove,table.concat
-- sort=table.sort
math.randomseed(os.time()*626)
null=function()end
system=sys.getOS()
scr={x=0,y=0,w=gc.getWidth(),h=gc.getHeight(),k=1}
scene=""
bgmPlaying=nil
curBG="none"
voicePlaying={}
kb.setKeyRepeat(false)
kb.setTextInput(false)
ms.setVisible(false)
local F=false
kb.setKeyRepeat(F)
kb.setTextInput(F)
ms.setVisible(F)
local Fonts={}
function setFont(s)
@@ -35,48 +39,41 @@ gameEnv0={
das=10,arr=2,
sddas=0,sdarr=2,
ghost=true,center=true,
grid=false,swap=true,
_20G=false,bone=false,
grid=F,swap=true,
_20G=F,bone=F,
drop=30,lock=45,
wait=0,fall=0,
next=6,hold=true,oncehold=true,
keepVisible=true,visible="show",
sequence="bag7",
block=true,
ospin=true,
freshLimit=1e99,
target=1e99,
reach=null,
bg="none",
bgm="race"
}
customSel={
drop=20,
lock=20,
wait=1,
fall=1,
next=7,
hold=1,
sequence=1,
visible=1,
target=4,
freshLimit=3,
opponent=1,
keepVisible=true,visible="show",
Fkey=F,puzzle=F,ospin=true,
freshLimit=1e99,target=1e99,reach=null,
bg="none",bgm="race"
}
customSel={22,22,1,1,7,3,1,1,8,4,1,1,1}
preField={h=20}
for i=1,18 do preField[i]={0,0,0,0,0,0,0,0,0,0}end
for i=19,20 do preField[i]={-1,-1,-1,-1,-1,-1,-1,-1,-1,-1}end
freeRow={}
for i=1,40 do
freeRow[i]={0,0,0,0,0,0,0,0,0,0}
end
--Game system Data
setting={
ghost=true,center=true,
grid=false,swap=true,
fxs=true,
grid=F,swap=true,
fxs=true,bg=true,
das=10,arr=2,
sddas=0,sdarr=2,
sfx=true,bgm=true,vib=3,
fullscreen=false,
bgblock=true,
lang=1,
sfx=true,bgm=true,
vib=3,voc=false,
fullscreen=F,
bgblock=true,
skin=1,
keyMap={
{"left","right","x","z","c","up","down","space","tab","r","","",""},
{"","","","","","","","","","","","",""},
@@ -95,12 +92,6 @@ setting={
{"","","","","","","","","","","","",""},
{"","","","","","","","","","","","",""},
},--keyboard & joystick
keyLib={
{1},
{2},
{3},
{4},
},--Players' key setting(s)
virtualkey={
{80,720-80,6400,80},--moveLeft
{240,720-80,6400,80},--moveRight
@@ -114,20 +105,16 @@ setting={
},
virtualkeyAlpha=3,
virtualkeyIcon=true,
virtualkeySwitch=false,
virtualkeySwitch=F,
frameMul=100,
}
stat={
run=0,
game=0,
gametime=0,
piece=0,
row=0,
atk=0,
key=0,
hold=0,
rotate=0,
spin=0,
run=0,game=0,time=0,
key=0,rotate=0,hold=0,piece=0,row=0,
atk=0,send=0,recv=0,pend=0,
clear_1=0,clear_2=0,clear_3=0,clear_4=0,
spin_0=0,spin_1=0,spin_2=0,spin_3=0,
b2b=0,b3b=0,pc=0,
}
virtualkey={
{80,720-80,6400,80},--moveLeft
@@ -138,7 +125,7 @@ virtualkey={
{1280-80,720-80,6400,80},--hardDrop
{1280-80,720-240,6400,80},--softDrop
{1280-80,720-400,6400,80},--hold
{80,360,6400,80},--swap
{80,360,6400,80},--func
{80,80,6400,80},--restart
--[[
{x=0,y=0,r=0},--toLeft
@@ -147,19 +134,19 @@ virtualkey={
]]
}
virtualkeyDown={false,false,false,false,false,false,false,false,false,false,false,false,false}
virtualkeyDown={F,F,F,F,F,F,F,F,F,F,F,F,F}
virtualkeyPressTime={0,0,0,0,0,0,0,0,0,0,0,0,0}
--User Data&User Setting
require"toolfunc"
require"list"
require"class"
require"gamefunc"
require"ai"
require"timer"
require"paint"
require"call&sys"
require"dataList"
require"texture"
require("toolfunc")
require("list")
require("class")
require("gamefunc")
require("ai")
require("timer")
require("paint")
require("call&sys")
require("dataList")
require("texture")
userData,userSetting=fs.newFile("userdata"),fs.newFile("usersetting")
if fs.getInfo("userdata")then
@@ -169,6 +156,8 @@ if fs.getInfo("usersetting")then
loadSetting()
elseif system=="Android" or system=="iOS"then
setting.virtualkeySwitch=true
setting.swap=false
setting.swap=F
end
swapLanguage(setting.lang)
swapLanguage(setting.lang)
changeBlockSkin(setting.skin)

377
paint.lua
View File

@@ -20,6 +20,7 @@ local frameColor={
local modeLevelColor={
EASY=color.cyan,
NORMAL=color.green,
["NORMAL+"]=color.darkGreen,
HARD=color.magenta,
["HARD+"]=color.darkMagenta,
LUNATIC=color.red,
@@ -37,7 +38,51 @@ local modeLevelColor={
["400L"]=color.red,
["1000L"]=color.darkRed,
}
local dataOptL={"key","rotate","hold",nil,nil,nil,"send","recv","pend"}
local function dataOpt(i)
local stat=players[1].stat
if i==4 then
return stat.piece.." "..(int(stat.piece/stat.time*100)*.01).."PPS"
elseif i==5 then
return stat.row.." "..(int(stat.row/stat.time*600)*.1).."LPM"
elseif i==6 then
return stat.atk.." "..(int(stat.atk/stat.time*600)*.1).."APM"
elseif i<10 then
return stat[dataOptL[i]]
elseif i==10 then
return stat.clear_1.."/"..stat.clear_2.."/"..stat.clear_3.."/"..stat.clear_4
elseif i==11 then
return "["..stat.spin_0.."]/"..stat.spin_1.."/"..stat.spin_2.."/"..stat.spin_3
elseif i==12 then
return stat.b2b.."[+"..stat.b3b.."]"
elseif i==13 then
return stat.pc
elseif i==14 then
return format("%0.2f",stat.atk/stat.row)
end
end
local statOptL={
"run","game",nil,
"key","rotate","hold","piece","row",
"atk","send","recv","pend",
}
local function statOpt(i)
if i<13 and i~=3 then
return stat[statOptL[i]]
elseif i==3 then
return format("%0.1fHr",stat.time*2.78e-4)
elseif i==13 then
return stat.clear_1.."/"..stat.clear_2.."/"..stat.clear_3.."/"..stat.clear_4
elseif i==14 then
return "["..stat.spin_0.."]/"..stat.spin_1.."/"..stat.spin_2.."/"..stat.spin_3
elseif i==15 then
return stat.b2b.."[+"..stat.b3b.."]"
elseif i==16 then
return stat.pc
elseif i==17 then
return format("%0.2f",stat.atk/stat.row)
end
end
local miniTitle_rect={
{2,0,5,1},{4,1,1,6},
{9,0,4,1},{9,3,4,1},{9,6,4,1},{8,0,1,7},
@@ -53,12 +98,6 @@ local function stencil_miniTitle()
gc.rectangle("fill",unpack(miniTitle_rect[i]))
end
end
local function stencil_field()
gc.rectangle("fill",0,-10,300,610)
end
local function stencil_field_small()
gc.rectangle("fill",0,0,60,120)
end
FX={
flash=0,--Black screen(frame)
@@ -133,39 +172,6 @@ FX={
end,
}
function updateButton()
for k,B in next,Buttons[scene]do
local t=B==Buttons.sel and .4 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
end
end
function drawButton()
for k,B in next,Buttons[scene]do
if not(B.hide and B.hide())then
local C=B.rgb or color.white
gc.setColor(C[1],C[2],C[3],B.alpha)
gc.rectangle("fill",B.x-B.w*.5,B.y-B.h*.5,B.w,B.h)
gc.setColor(C)
gc.setLineWidth(3)gc.rectangle("line",B.x-B.w*.5,B.y-B.h*.5,B.w,B.h,4)
gc.setColor(C[1],C[2],C[3],.3)
gc.setLineWidth(5)gc.rectangle("line",B.x-B.w*.5,B.y-B.h*.5,B.w,B.h,4)
local t=B.t
local y0
if t then
if type(t)=="function"then t=t()end
setFont(B.f or 40)
y0=B.y-currentFont*.64
gc.printf(t,B.x-201,y0+2,400,"center")
gc.printf(t,B.x-199,y0+2,400,"center")
gc.printf(t,B.x-201,y0,400,"center")
gc.printf(t,B.x-199,y0,400,"center")
gc.setColor(C)
mStr(t,B.x,y0+1)
end
end
end
end
function drawDial(x,y,speed)
gc.setColor(1,1,1)
mStr(int(speed),x,y-18)
@@ -187,7 +193,8 @@ end
function VirtualkeyPreview()
for i=1,#virtualkey do
gc.setColor(1,sel==i and .5 or 1,sel==i and .5 or 1,setting.virtualkeyAlpha*.2)
local c=sel==i and .8 or 1
gc.setColor(c,c,c,setting.virtualkeyAlpha*.2)
local b=virtualkey[i]
gc.setLineWidth(b[4]*.07)
gc.circle("line",b[1],b[2],b[4]-5)
@@ -198,16 +205,18 @@ function drawVirtualkey()
local a=setting.virtualkeyAlpha*.2
local P=players[1]
for i=1,#virtualkey do
local p,b=virtualkeyDown[i],virtualkey[i]
if p then gc.setColor(.7,.7,.7,a)
else gc.setColor(1,1,1,a)
end
gc.setLineWidth(b[4]*.07)
gc.circle("line",b[1],b[2]+virtualkeyPressTime[i],b[4]-5)
if setting.virtualkeyIcon then gc.draw(virtualkeyIcon[i],b[1],b[2]+virtualkeyPressTime[i],nil,b[4]*.025,nil,18,18)end
if virtualkeyPressTime[i]>0 then
gc.setColor(1,1,1,a*virtualkeyPressTime[i]*.1)
gc.circle("line",b[1],b[2],b[4]*(1.4-virtualkeyPressTime[i]*.04))
if i~=9 or modeEnv.Fkey then
local p,b=virtualkeyDown[i],virtualkey[i]
if p then gc.setColor(.7,.7,.7,a)
else gc.setColor(1,1,1,a)
end
gc.setLineWidth(b[4]*.07)
gc.circle("line",b[1],b[2]+virtualkeyPressTime[i],b[4]-5)
if setting.virtualkeyIcon then gc.draw(virtualkeyIcon[i],b[1],b[2]+virtualkeyPressTime[i],nil,b[4]*.025,nil,18,18)end
if virtualkeyPressTime[i]>0 then
gc.setColor(1,1,1,a*virtualkeyPressTime[i]*.1)
gc.circle("line",b[1],b[2],b[4]*(1.4-virtualkeyPressTime[i]*.04))
end
end
end
end
@@ -216,6 +225,9 @@ Pnt={BG={}}
function Pnt.BG.none()
gc.clear(.15,.15,.15)
end
function Pnt.BG.grey()
gc.clear(.3,.3,.3)
end
function Pnt.BG.glow()
local t=((sin(Timer()*.5)+sin(Timer()*.7)+sin(Timer()*.9+1)+sin(Timer()*1.5)+sin(Timer()*2+3))+5)*.05
gc.clear(t,t,t)
@@ -232,6 +244,28 @@ function Pnt.BG.game3()
gc.setColor(.6,.6,1)
gc.draw(background1,640,360,Timer()*.25,12,nil,64,64)
end
function Pnt.BG.game4()
gc.setColor(.1,.5,.5)
local x=Timer()%4*320
gc.draw(background2,x,0,nil,10)
gc.draw(background2,x-1280,0,nil,10)
end
function Pnt.BG.game5()
local t=2.5-Timer()%20%6%2.5
if t<.5 then gc.clear(t,t,t)
else gc.clear(0,0,0)
end
end
local scs={{1,2},nil,nil,nil,nil,{1.5,1.5},{0.5,2.5}}for i=2,5 do scs[i]=scs[1]end
function Pnt.BG.game6()
local t=1.2-Timer()%10%3%1.2
if t<.5 then gc.clear(t,t,t)
else gc.clear(0,0,0)
end
gc.setColor(.3,.3,.3)
local r=7-int(Timer()*.5)%7
gc.draw(mouseBlock[r],640,360,Timer()%3.1416*6,400,400,scs[r][2]-.5,#blocks[r][0]-scs[r][1]+.5)
end
function Pnt.BG.rgb()
gc.clear(
sin(Timer()*1.2)*.15+.5,
@@ -247,6 +281,7 @@ function Pnt.BG.strap()
end
local matrixT={}for i=0,15 do matrixT[i]={}for j=0,8 do matrixT[i][j]=mt.noise(i,j)+2 end end
function Pnt.BG.matrix()
gc.clear(.15,.15,.15)
for i=0,15 do
for j=0,8 do
local t=sin(matrixT[i][j]*Timer())*.2+.2
@@ -264,8 +299,8 @@ function Pnt.load()
gc.rectangle("line",300,330,680,60,5)
setFont(40)
mStr(text.load[loading],640,335)
setFont(25)
mStr(text.loadTip,640,400)
setFont(30)
mStr(loadTip,640,400)
end
function Pnt.intro()
gc.push()
@@ -287,7 +322,7 @@ function Pnt.main()
gc.setColor(1,1,1)
gc.draw(titleImage,300,30)
setFont(30)
gc.print("Alpha V0.7.13+",290,140)
gc.print("Alpha V0.7.20",290,140)
gc.print(system,800,110)
end
function Pnt.mode()
@@ -309,81 +344,143 @@ function Pnt.mode()
end
end
end
function Pnt.music()
gc.setColor(1,1,1,.3+sin(Timer()*5)*.2)
gc.rectangle("fill",45,98+30*sel,237,30)
gc.setColor(.8,.8,.8)
gc.draw(drawableText.musicRoom,20,20)
gc.setColor(1,1,1)
gc.draw(drawableText.musicRoom,22,23)
gc.draw(drawableText.nowPlaying,520,83)
setFont(35)
for i=1,#musicID do
gc.print(musicID[i],50,90+30*i)
end
setFont(50)
gc.setColor(sin(Timer()*.5)*.2+.8,sin(Timer()*.7)*.2+.8,sin(Timer())*.2+.8)
gc.print(bgmPlaying or"",600,140)
end
function Pnt.custom()
gc.setColor(1,1,1,.3+sin(Timer()*8)*.2)
gc.rectangle("fill",25,95+40*optSel,465,40)
setFont(80)
gc.setColor(.8,.8,.8)gc.print(text.custom,20,20)
gc.setColor(1,1,1)gc.print(text.custom,22,23)
gc.setColor(.8,.8,.8)gc.draw(drawableText.custom,20,20)
gc.setColor(1,1,1)gc.draw(drawableText.custom,22,23)
setFont(40)
for i=1,#customID do
local k=customID[i]
local y=90+40*i
gc.printf(text.customOption[k],30,y,320,"right")
if text.customVal[k]then
gc.print(text.customVal[k][customSel[k]],350,y)
gc.print(text.customVal[k][customSel[i]],350,y)
else
gc.print(customRange[k][customSel[k]],350,y)
gc.print(customRange[k][customSel[i]],350,y)
end
end
end
function Pnt.draw()
gc.translate(200,60)
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
gc.setColor(1,1,1)
gc.setLineWidth(3)
gc.rectangle("line",-2,-2,304,604)
gc.setLineWidth(2)
for y=1,20 do for x=1,10 do
local B=preField[y][x]
if B>0 then
drawPixel(y,x,B)
elseif B==0 then
gc.line(30*x-25,605-30*y,30*x-5,625-30*y)
gc.line(30*x-25,625-30*y,30*x-5,605-30*y)
end
end end
if sx and sy then
gc.setLineWidth(2)
gc.rectangle("line",30*sx-30,600-30*sy,30,30)
end
gc.translate(-200,-60)
if clearSureTime>0 then
gc.setColor(1,1,1,clearSureTime*.02)
gc.draw(drawableText.question,1100,570)
end
if pen>0 then
gc.setLineWidth(13)
gc.setColor(blockColor[pen])
gc.rectangle("line",945,605,70,70)
elseif pen==0 then
gc.setLineWidth(5)
gc.setColor(.9,.9,.9)
gc.line(960,620,1000,660)
gc.line(960,660,1000,620)
end
end
function Pnt.play()
for p=1,#players do
P=players[p]
if P.small then
gc.push("transform")
gc.translate(P.x,P.y)gc.scale(P.size)--Scale
gc.setColor(0,0,0,.4)gc.rectangle("fill",0,0,60,120)--Black Background
gc.stencil(stencil_field_small,"replace",1)
gc.translate(0,P.fieldBeneath*.2)
gc.setStencilTest("equal",1)
gc.setColor(1,1,1,P.result and max(20-P.endCounter,0)*.05 or 1)
for j=int(P.fieldBeneath/30+1),#P.field do
if P.falling<=0 or without(P.clearing,j)then
for i=1,10 do
if P.field[j][i]>0 then
gc.draw(blockSkinmini[P.field[j][i]],6*i-6,120-6*j)
P.frameWait=P.frameWait-1
if P.frameWait==0 then
P.frameWait=8
gc.setCanvas(P.canvas)
gc.clear(0,0,0,.4)
gc.push("transform")
gc.origin()
gc.setColor(1,1,1,P.result and max(20-P.endCounter,0)*.05 or 1)
local h=#P.clearing
local F=P.field
for j=1,#F do
if j==P.clearing[h]and P.falling>-1 then
h=h-1
else
for i=1,10 do
if F[j][i]>0 then
gc.draw(blockSkinmini[F[j][i]],6*i-6,120-6*j)
end
end
end
end--Field
if P.alive then
gc.setLineWidth(2)
gc.setColor(frameColor[P.strength])gc.rectangle("line",1,1,58,118)
end--Draw boarder
if modeEnv.royaleMode then
gc.setColor(1,1,1)
for i=1,P.strength do
gc.draw(badgeIcon,12*i-7,4,nil,.5)
end
end
end
gc.setStencilTest()--In-playField mask
gc.translate(0,-P.fieldBeneath*.2)
gc.setLineWidth(2)
gc.setColor(frameColor[P.strength])gc.rectangle("line",-1,-1,62,122)--Draw boarder
if modeEnv.royaleMode then
gc.setColor(1,1,1)
for i=1,P.strength do
gc.draw(badgeIcon,12*i-7,4,nil,.5)
if P.result then
gc.setColor(1,1,1,min(P.endCounter,60)*.01)
setFont(22)mStr(P.result,32,47)
setFont(20)mStr(P.rank,30,82)
end
gc.pop()
gc.setCanvas()
end
if P.result then
gc.setColor(1,1,1,min(P.endCounter,60)*.01)
setFont(22)mStr(P.result,32,47)
setFont(20)mStr(P.rank,30,82)
if P.killMark then
gc.setLineWidth(4)
gc.setColor(1,0,0,min(P.endCounter,25)*.04)
gc.circle("line",31,60,84-2*min(P.endCounter,30))
end
gc.setColor(1,1,1)
gc.draw(P.canvas,P.x,P.y,nil,P.size*10)
if P.killMark then
gc.setLineWidth(3)
gc.setColor(1,0,0,min(P.endCounter,25)*.04)
gc.circle("line",P.centerX,P.centerY,(840-20*min(P.endCounter,30))*P.size)
end
gc.pop()
else
gc.push("transform")
gc.translate(P.x,P.y)gc.scale(P.size)
gc.setColor(0,0,0,.6)gc.rectangle("fill",0,0,600,690)--Black Background
gc.translate(P.x,P.y)gc.scale(P.size)--Position
gc.setColor(0,0,0,.6)gc.rectangle("fill",0,0,600,690)--Background
gc.setLineWidth(7)
gc.setColor(frameColor[P.strength])gc.rectangle("line",0,0,600,690)--Big frame
gc.translate(150,70)
gc.setColor(frameColor[P.strength])gc.rectangle("line",0,0,600,690,3)--Big frame
gc.translate(150+P.fieldOffX,70+P.fieldOffY)
if P.gameEnv.grid then
gc.setLineWidth(1)
gc.setColor(1,1,1,.2)
for x=1,9 do gc.line(30*x,-10,30*x,600)end
for y=0,19 do gc.line(0,30*y,300,30*y)end
end
gc.stencil(stencil_field,"replace", 1)
end--Grid lines
gc.translate(0,P.fieldBeneath)
gc.setStencilTest("equal",1)
gc.setScissor(scr.x+P.absFieldX*scr.k,scr.y+P.absFieldY*scr.k,300*P.size*scr.k,610*P.size*scr.k)
local h=#P.clearing
for j=int(P.fieldBeneath/30+1),#P.field do
if j==P.clearing[h]and P.falling>-1 then
@@ -393,7 +490,7 @@ function Pnt.play()
else
for i=1,10 do
if P.field[j][i]>0 then
gc.setColor(1,1,1,min(P.visTime[j][i],20)*.05)
gc.setColor(1,1,1,min(P.visTime[j][i]*.05,1))
drawPixel(j,i,P.field[j][i])
end
end
@@ -401,13 +498,13 @@ function Pnt.play()
end--Field
for i=1,#P.shade do
local S=P.shade[i]
gc.setColor(1,1,1,.15+S[1]*.08)
gc.setColor(1,1,1,S[1]*.12)
for x=S[3],S[5]do
for y=S[6],S[4]do
drawPixel(y,x,S[2])
end
end
end
end--shade FX
if P.waiting==-1 then
if P.gameEnv.ghost then
gc.setColor(1,1,1,.3)
@@ -439,13 +536,12 @@ function Pnt.play()
gc.draw(spinCenter,x,600-30*(P.y_img+P.sc[1]-1)+15,nil,nil,nil,4,4)
end--Rotate center
end
gc.setColor(1,1,1)
gc.draw(PTC.dust[p])
--Draw game field
gc.setStencilTest()--In-playField mask
gc.setScissor()--In-playField mask
gc.translate(0,-P.fieldBeneath)
gc.setLineWidth(3)
gc.setColor(1,1,1)
gc.draw(PTC.dust[p])
gc.setLineWidth(3)
gc.rectangle("line",-1,-11,302,612)--Draw boarder
gc.setLineWidth(2)
@@ -491,19 +587,20 @@ function Pnt.play()
gc.setColor(1,1,1)
gc.rectangle("line",-17,-3,16,604.5)--Draw b2b bar boarder
--B2B indictator
gc.translate(-P.fieldOffX,-P.fieldOffY)
if P.gameEnv.hold then
gc.draw(drawableText.hold,-75-drawableText.hold:getWidth()*.5,-10)
gc.setColor(1,1,1)
mDraw(drawableText.hold,-82,-10)
for i=1,#P.hold.bk do
for j=1,#P.hold.bk[1] do
if P.hold.bk[i][j]then
drawPixel(i+17.5-#P.hold.bk*.5,j-2.5-#P.hold.bk[1]*.5,P.holded and 9 or P.hold.color)
drawPixel(i+17.5-#P.hold.bk*.5,j-2.7-#P.hold.bk[1]*.5,P.holded and 9 or P.hold.color)
end
end
end
end--Hold
gc.draw(drawableText.next,382-drawableText.next:getWidth()*.5,-10)
mDraw(drawableText.next,381,-10)
local N=1
::L::
local b,c=P.next[N].bk,P.next[N].color
@@ -535,7 +632,7 @@ function Pnt.play()
gc.setColor(1,1,1)
setFont(35)
mStr(format("%.2f",P.time),-75,520)--Draw time
mStr(format("%.2f",P.stat.time),-82,520)--Draw time
if mesDisp[curMode.id]then mesDisp[curMode.id]()end--Draw other message
gc.setColor(1,1,1)
@@ -584,15 +681,44 @@ function Pnt.play()
end
end
end
if restartCount>0 then
gc.setColor(0,0,0,restartCount/17)
gc.rectangle("fill",0,0,1280,720)
end
end
function Pnt.pause()
Pnt.play()
gc.setColor(0,0,0,pauseTimer*.015)
gc.rectangle("fill",0,0,1280,720)
gc.setColor(1,1,1,pauseTimer*.02)
setFont(30)
if pauseCount>0 then
gc.print(text.pauseTime..":["..pauseCount.."] "..format("%0.2f",pauseTime).."s",110,150)
end
for i=1,7 do
gc.print(text.stat[i+3],110,30*i+270)
gc.print(dataOpt(i),305,30*i+270)
end
for i=8,14 do
gc.print(text.stat[i+3],860,30*i+60)
gc.print(dataOpt(i),1000,30*i+60)
end
setFont(40)
if system~="Android"then
mStr(text.space.."/"..text.enter,640,300)
gc.print("ESC",610,598)
end
mDraw(gamefinished and drawableText.finish or drawableText.pause,640,140-12*(5-pauseTimer*.1)^2)
end
function Pnt.setting()
gc.setColor(1,1,1)
setFont(35)
mStr("DAS:"..setting.das,290,278)
mStr("ARR:"..setting.arr,506,278)
setFont(18)
mStr(text.softdropdas..setting.sddas,290,361)
mStr(text.softdroparr..setting.sdarr,506,361)
setFont(21)
mStr(text.softdropdas..setting.sddas,290,357)
mStr(text.softdroparr..setting.sdarr,506,357)
gc.draw(blockSkin[7-int(Timer()*2)%7],820,480,nil,2)
end
function Pnt.setting2()
local a=.3+sin(Timer()*15)*.1
@@ -622,11 +748,12 @@ function Pnt.setting2()
gc.line(200*x-160,30,200*x-160,550)
end
gc.line(40,550,640,550)
mStr(text.keyboard,340,0)
mStr(text.joystick,540,0)
gc.print(text.setting2Help,50,620)
mDraw(drawableText.keyboard,340,0)
mDraw(drawableText.joystick,540,0)
gc.draw(drawableText.setting2Help,50,620)
setFont(40)
gc.print("< P"..curBoard.."/P8 >",430,570)
gc.print("P"..int(curBoard*.5+.5).."/P4",420,560)
gc.print(curBoard.."/8",580,560)
end
function Pnt.setting3()
VirtualkeyPreview()
@@ -649,6 +776,9 @@ function Pnt.help()
gc.printf(text.help[i],140,15+43*i,1000,"center")
end
gc.draw(titleImage,180,600,.2,.7+.05*sin(Timer()*2),nil,140,100)
gc.setLineWidth(5)
gc.rectangle("line",17,17,260,260)
gc.rectangle("line",1077,17,186,186)
gc.draw(payCode,20,20)
gc.draw(groupCode,1080,20)
gc.setColor(1,1,1,sin(Timer()*10)*.5+.5)
@@ -658,18 +788,11 @@ function Pnt.help()
mStr(text.group,1170,210)
end
function Pnt.stat()
setFont(35)
setFont(28)
gc.setColor(1,1,1)
for i=1,10 do gc.print(text.stat[i],350,20+40*i)end
gc.print(stat.run,650,60)
gc.print(stat.game,650,100)
gc.print(format("%0.1fhr",stat.gametime*2.78e-4),650,140)
gc.print(stat.piece,650,180)
gc.print(stat.row,650,220)
gc.print(stat.atk,650,260)
gc.print(stat.key,650,300)
gc.print(stat.rotate,650,340)
gc.print(stat.hold,650,380)
gc.print(stat.spin,650,420)
for i=1,17 do
gc.print(text.stat[i],400,30*i-5)
gc.print(statOpt(i),720,30*i-5)
end
gc.draw(titleImage,260,570,.2+.07*sin(Timer()*3),.8,nil,250,60)
end

View File

@@ -8,33 +8,18 @@ local function C(x,y)
end
gc.setDefaultFilter("nearest","nearest")
local blockImg=N("/image/block/1.png")
blockImg=N("/image/block.png")
blockSkin,blockSkinmini={},{}
for i=1,13 do
C(30,30)
gc.draw(blockImg,30-30*i,0)
blockSkin[i]=c
C(6,6)
gc.draw(blockImg,6-6*i,0,nil,.2)
blockSkinmini[i]=c
blockSkin[i]=C(30,30)
blockSkinmini[i]=C(6,6)
end
blockImg:release()
virtualkeyIcon={}
for i=1,10 do
virtualkeyIcon[i]=N("/image/virtualkey/"..actName[i]..".png")
end
local blockColor={
color.red,
color.green,
color.orange,
color.blue,
color.magenta,
color.yellow,
color.cyan,
}
gc.setColor(1,1,1)
mouseBlock={}
for i=1,7 do
@@ -92,14 +77,19 @@ background1=N("/image/BG/bg1.jpg")
background2=N("/image/BG/bg2.png")
groupCode=N("/image/mess/groupcode.png")
payCode=N("/image/mess/paycode.png")
drawableText={
question=T(100,"?"),
bpm=T(15,"BPM"),
kpm=T(15,"KPM"),
modeName=T(30),
levelName=T(30),
next=T(40),
hold=T(40),
}
modeName=T(30),levelName=T(30),
next=T(40),hold=T(40),
pause=T(120),
finish=T(120),
custom=T(80),
keyboard=T(25),joystick=T(25),
setting2Help=T(25),
musicRoom=T(80),
nowPlaying=T(50),
}
c=gc.setCanvas()

View File

@@ -1,21 +1,28 @@
local wd=love.window
local Timer=love.timer.getTime
Tmr={}
function Tmr.load()
local t=Timer()
::R::
if loading==1 then
loadnum=loadnum+1
loadprogress=loadnum/10
if loadnum==5 then
--require("texture")
elseif loadnum==10 then
loadnum=1
if loadnum<=#voiceList then
local N=voiceList[loadnum]
for i=1,#voice[N]do
voice[N][i]=love.audio.newSource("VOICE/"..voice[N][i]..".ogg","static")
end
loadprogress=loadnum/#voiceList
loadnum=loadnum+1
else
loading=2
loadnum=1
end
elseif loading==2 then
if loadnum<=#bgm then
bgm[bgm[loadnum]]=love.audio.newSource("/BGM/"..bgm[loadnum]..".ogg","stream")
bgm[bgm[loadnum]]:setLooping(true)
bgm[bgm[loadnum]]:setVolume(0)
local N=bgm[loadnum]
bgm[N]=love.audio.newSource("/BGM/"..N..".ogg","stream")
bgm[N]:setLooping(true)
bgm[N]:setVolume(0)
loadprogress=loadnum/#bgm
loadnum=loadnum+1
else
@@ -31,7 +38,7 @@ function Tmr.load()
else
for i=1,#sfx do sfx[i]=nil end
loading=4
loadnum=0
loadnum=1
end
elseif loading==4 then
loadnum=loadnum+1
@@ -45,10 +52,12 @@ function Tmr.intro()
count=count+1
if count==200 then count=80 end
end
function Tmr.draw()
if clearSureTime>0 then clearSureTime=clearSureTime-1 end
end
function Tmr.play(dt)
frame=frame+1
stat.gametime=stat.gametime+dt
stat.time=stat.time+dt
for i=#FX.beam,1,-1 do
local b=FX.beam[i]
b.t=b.t+1
@@ -79,7 +88,7 @@ function Tmr.play(dt)
if frame==179 then
gameStart()
elseif frame%60==0 then
sysSFX("ready")
SFX("ready")
end
for p=1,#players do
P=players[p]
@@ -89,11 +98,21 @@ function Tmr.play(dt)
P.moving=0
end
end
if restartCount>0 then restartCount=restartCount-1 end
return
end--Counting,include pre-das,directy RETURN
elseif players[1].keyPressing[10]then
restartCount=restartCount+1
if restartCount>17 then
clearTask("play")
updateStat()
resetGameData()
end
elseif restartCount>0 then
restartCount=max(restartCount-2,0)
end--Counting,include pre-das,directy RETURN,or restart counting
for p=1,#players do
P=players[p]
if P.timing then P.time=P.time+dt end
if P.timing then P.stat.time=P.stat.time+dt end
if P.alive then
if not P.small then
local v=0
@@ -121,9 +140,9 @@ function Tmr.play(dt)
else
AI_getControls(P.ai.controls)
P.ai.controlDelay=P.ai.controlDelay0+2
if Timer()-P.cstat.point>P.cstat.event then
P.cstat.point=Timer()
P.cstat.event=P.ai.controlDelay0+rnd(2,10)
if Timer()-P.modeData.point>P.modeData.event then
P.modeData.point=Timer()
P.modeData.event=P.ai.controlDelay0+rnd(2,10)
changeAtkMode(rnd()<.85 and 1 or #P.atker>3 and 4 or rnd()<.35 and 2 or 3)
end
end
@@ -168,7 +187,7 @@ function Tmr.play(dt)
if P.falling>=0 then
P.falling=P.falling-1
if P.falling>=0 then goto stop end
if P.gameEnv.fall>0 and #P.field>P.clearing[1]then SFX("fall")end
if P.human and P.gameEnv.fall>0 and #P.field>P.clearing[1]then SFX("fall")end
for i=1,#P.clearing do
removeRow(P.field,P.clearing[i])
removeRow(P.visTime,P.clearing[i])
@@ -207,8 +226,8 @@ function Tmr.play(dt)
--Alive
else
if not P.small then
P.keySpeed=P.keySpeed*.96+P.cstat.key/P.time*60*.04
P.dropSpeed=P.dropSpeed*.96+P.cstat.piece/P.time*60*.04
P.keySpeed=P.keySpeed*.96+P.stat.key/P.stat.time*60*.04
P.dropSpeed=P.dropSpeed*.96+P.stat.piece/P.stat.time*60*.04
--Final average speeds
if modeEnv.royaleMode then
P.swappingAtkMode=min(P.swappingAtkMode+2,30)
@@ -217,7 +236,7 @@ function Tmr.play(dt)
if P.falling>=0 then
P.falling=P.falling-1
if P.falling>=0 then goto stop end
if P.gameEnv.fall>0 and #P.field>P.clearing[1]then SFX("fall")end
if P.human and P.gameEnv.fall>0 and #P.field>P.clearing[1]then SFX("fall")end
for i=1,#P.clearing do
removeRow(P.field,P.clearing[i])
removeRow(P.visTime,P.clearing[i])
@@ -241,6 +260,12 @@ function Tmr.play(dt)
rem(P.shade,i)
end
end
if P.fieldOffY>0 then
P.fieldOffY=P.fieldOffY-(P.fieldOffY>3 and 2 or 1)
end
if P.fieldOffX~=0 then
P.fieldOffX=P.fieldOffX-(P.fieldOffX>0 and 1 or -1)
end
for i=#P.bonus,1,-1 do
local b=P.bonus[i]
if b.inf then
@@ -271,4 +296,12 @@ function Tmr.play(dt)
end
end
if modeEnv.royaleMode and frame%120==0 then freshMostDangerous()end
end
function Tmr.pause(dt)
if not gamefinished then
pauseTime=pauseTime+dt
end
if pauseTimer<50 and not wd.isMinimized()then
pauseTimer=pauseTimer+1
end
end

View File

@@ -1,4 +1,6 @@
local tm=love.timer
local gc=love.graphics
local kb=love.keyboard
local setFont=setFont
local toN,toS=tonumber,tostring
@@ -11,25 +13,21 @@ local function splitS(s,sep)
if #s~=0 then goto L end
return t
end
function without(t,v)
for i=1,#t do
if t[i]==v then return end
end
return true
end
function mStr(s,x,y)
gc.printf(s,x-300,y,600,"center")
gc.printf(s,x-320,y,640,"center")
end
function mDraw(s,x,y)
gc.draw(s,x-s:getWidth()*.5,y)
end
function getNewRow(val)
if not val then val=0 end
local t=rem(freeRow)
for i=1,10 do
t[i]=val or 0
t[i]=val
end
--clear a row and move to active list
if #freeRow==0 then
for i=1,20 do
for i=1,10 do
ins(freeRow,{0,0,0,0,0,0,0,0,0,0})
end
end
@@ -41,8 +39,20 @@ function removeRow(t,k)
end
--Single-usage funcs
langName={"中文","English"}
local langID={"chi","eng"}
langName={"中文","全中文","English"}
local langID={"chi","chi_full","eng"}
local drawableTextLoad={
"next",
"hold",
"pause",
"finish",
"custom",
"keyboard",
"joystick",
"setting2Help",
"musicRoom",
"nowPlaying",
}
function swapLanguage(l)
text=require("language/"..langID[l])
Buttons.sel=nil
@@ -52,9 +62,6 @@ function swapLanguage(l)
B.t=text.ButtonText[S][N]
end
end
drawableText.next:set(text.next)
drawableText.hold:set(text.hold)
if royaleCtrlPad then royaleCtrlPad:release()end
gc.push("transform")
gc.origin()
royaleCtrlPad=gc.newCanvas(300,100)
@@ -66,18 +73,34 @@ function swapLanguage(l)
gc.rectangle("line",RCPB[2*i-1],RCPB[2*i],90,35,8,4)
mStr(text.atkModeName[i],RCPB[2*i-1]+45,RCPB[2*i]+3)
end
gc.setCanvas()
gc.pop()
gc.setCanvas()
for _,s in next,drawableTextLoad do
drawableText[s]:set(text[s])
end
collectgarbage()
end
function changeBlockSkin(n)
n=n-1
gc.push("transform")
gc.origin()
for i=1,13 do
gc.setCanvas(blockSkin[i])
gc.draw(blockImg,30-30*i,-30*n)
gc.setCanvas(blockSkinmini[i])
gc.draw(blockImg,6-6*i,-6*n,nil,.2)
end
gc.pop()
gc.setCanvas()
end
local vibrateLevel={0,0,.03,.04,.05,.07,.9}
local vibrateLevel={0,.02,.03,.04,.05,.06,.07,.08}
function VIB(t)
if setting.vib>0 then
love.system.vibrate(vibrateLevel[setting.vib+t])
end
end
function sysSFX(s,v)
function SFX(s,v)
if setting.sfx then
local n=1
::L::if sfx[s][n]:isPlaying()then
@@ -93,20 +116,12 @@ function sysSFX(s,v)
sfx[s][n]:play()
end
end
function SFX(s,v)
if setting.sfx and not P.ai then
local n=1
::L::if sfx[s][n]:isPlaying()then
n=n+1
if not sfx[s][n]then
sfx[s][n]=sfx[s][n-1]:clone()
sfx[s][n]:seek(0)
goto quit
end
goto L
end::quit::
sfx[s][n]:setVolume(v or 1)
sfx[s][n]:play()
function VOICE(s,n)
if setting.voc then
ins(voicePlaying,voice[s][n or rnd(#voice[s])])
if #voicePlaying==1 then
voicePlaying[1]:play()
end
end
end
function BGM(s)
@@ -175,29 +190,42 @@ function gotoScene(s,style)
draw=swap[style].d
}
Buttons.sel=nil
if style~="none"then
SFX("swipe")
end
end
end
function updateStat()
for k,v in next,players[1].stat do
stat[k]=stat[k]+v
end
end
local prevMenu={
load=love.event.quit,
intro="quit",
main="intro",
music="main",
mode="main",
custom="mode",
ready="mode",
draw=function()
kb.setKeyRepeat(false)
gotoScene("custom")
end,
play=function()
updateStat()
clearTask("play")
gotoScene(curMode.id~="custom"and"mode"or"custom","deck")
end,
help="main",
stat="main",
pause=nil,
setting=function()
saveSetting()
gotoScene("main")
end,
setting2="setting",
setting3="setting",
}
help="main",
stat="main",
}prevMenu.pause=prevMenu.play
function back()
local t=prevMenu[scene]
if type(t)=="string"then
@@ -206,41 +234,33 @@ function back()
t()
end
end
function pauseGame()
pauseTimer=0--Pause timer for animation
if not gamefinished then
pauseCount=pauseCount+1
if bgmPlaying then bgm[bgmPlaying]:pause()end
end
for i=1,#players.alive do
local l=players.alive[i].keyPressing
for j=1,#l do
if l[j]then
releaseKey(j,players.alive[i])
end
end
end
gotoScene("pause","none")
end
function resumeGame()
if bgmPlaying then bgm[bgmPlaying]:play()end
gotoScene("play","fade")
end
local dataOpt={
"run",
"game",
"gametime",
"piece",
"row",
"atk",
"key",
"rotate",
"hold",
"spin",
}
local saveOpt={
"lang",
"ghost",
"center",
"grid",
"swap",
"sfx",
"bgm",
"vib",
"fxs",
"das",
"arr",
"sddas",
"sdarr",
"fullscreen",
"bgblock",
"virtualkeyAlpha",
"virtualkeyIcon",
"virtualkeySwitch",
"frameMul",
"run","game","time",
"key","rotate","hold","piece","row",
"atk","send","recv","pend",
"clear_1","clear_2","clear_3","clear_4",
"spin_0","spin_1","spin_2","spin_3",
"b2b","b3b","pc",
}
function loadData()
userData:open("r")
@@ -252,10 +272,15 @@ function loadData()
if find(i,"=")then
local t=sub(i,1,find(i,"=")-1)
local v=sub(i,find(i,"=")+1)
if t=="run"or t=="game"or t=="gametime"or t=="piece"or t=="row"or t=="atk"or t=="key"or t=="rotate"or t=="hold"or t=="spin"then
if t=="gametime"then t="time"end
for i=1,#dataOpt do
if t==dataOpt[i]then goto L end
end
goto E
::L::
v=toN(v)if not v or v<0 then v=0 end
stat[t]=v
end
::E::
end
end
end
@@ -264,7 +289,7 @@ function saveData()
for i=1,#dataOpt do
ins(t,dataOpt[i].."="..toS(stat[dataOpt[i]]))
end
t=table.concat(t,"\r\n")
t=concat(t,"\r\n")
--t=love.math.compress(t,"zlib"):getString()
userData:open("w")
userData:write(t)
@@ -280,10 +305,10 @@ function loadSetting()
if find(i,"=")then
local t=sub(i,1,find(i,"=")-1)
local v=sub(i,find(i,"=")+1)
if t=="sfx"or t=="bgm"or t=="bgblock"then
if t=="sfx"or t=="bgm"or t=="bgblock"or t=="voc"then
setting[t]=v=="true"
elseif t=="vib"then
setting.vib=toN(v:match("[01234]"))or 0
setting.vib=toN(v:match("[012345]"))or 0
elseif t=="fullscreen"then
setting.fullscreen=v=="true"
love.window.setFullscreen(setting.fullscreen)
@@ -295,21 +320,6 @@ function loadSetting()
setting.keyMap[i][j]=v1[j]
end
end
elseif t=="keylib"then
v=splitS(v,"/")
for i=1,4 do
local v1=splitS(v[i],",")
for j=1,#v1 do
setting.keyLib[i][j]=toN(v1[j])
end
for j=1,#setting.keyLib[i]do
local v=setting.keyLib[i][j]
if int(v)~=v or v>=9 or v<=0 then
setting.keyLib[i]={i}
break
end
end
end
elseif t=="virtualkey"then
v=splitS(v,"/")
for i=1,10 do
@@ -329,39 +339,54 @@ function loadSetting()
elseif t=="das"or t=="arr"or t=="sddas"or t=="sdarr"then
v=toN(v)if not v or v<0 then v=0 end
setting[t]=int(v)
elseif t=="ghost"or t=="center"or t=="grid"or t=="swap"or t=="fxs"then
elseif t=="ghost"or t=="center"or t=="grid"or t=="swap"or t=="fxs"or t=="bg"then
setting[t]=v=="true"
elseif t=="lang"then
setting[t]=toN(v:match("[12]"))or 1
setting[t]=toN(v:match("[123]"))or 1
elseif t=="skin"then
setting[t]=toN(v:match("[123456]"))or 1
end
end
end
end
local saveOpt={
"ghost","center",
"grid","swap",
"fxs","bg",
"das","arr",
"sddas","sdarr",
"lang",
"sfx","bgm",
"vib","voc",
"fullscreen",
"bgblock",
"skin",
"virtualkeyAlpha",
"virtualkeyIcon",
"virtualkeySwitch",
"frameMul",
}
function saveSetting()
local vk={}
for i=1,10 do
for j=1,4 do
virtualkey[i][j]=int(virtualkey[i][j]+.5)
end--Saving a integer is better?
vk[i]=table.concat(virtualkey[i],",")
vk[i]=concat(virtualkey[i],",")
end--pre-pack virtualkey setting
local map={}
for i=1,16 do
map[i]=table.concat(setting.keyMap[i],",")
end
local lib={}
for i=1,4 do
lib[i]=table.concat(setting.keyLib[i],",")
map[i]=concat(setting.keyMap[i],",")
end
local t={
"keymap="..toS(table.concat(map,"/")),
"keylib="..toS(table.concat(lib,"/")),
"virtualkey="..toS(table.concat(vk,"/")),
"keymap="..toS(concat(map,"/")),
"virtualkey="..toS(concat(vk,"/")),
}
for i=1,#saveOpt do
ins(t,saveOpt[i].."="..toS(setting[saveOpt[i]]))
end
t=table.concat(t,"\r\n")
t=concat(t,"\r\n")
--t=love.math.compress(t,"zlib"):getString()
userSetting:open("w")
userSetting:write(t)